Se agrega la funcion CPBR()