public static function aplicarReglas(array $reglas, VO $obj, $cantidad = null, $id_unidad = null)
{
//Logger::log("aplicando reglas de tarifa");
//Logger::log( sizeof($reglas) . " reglas.");
//Logger::log( $cantidad . " unidades de idunidad=" .$id_unidad );
$precio_base = 0;
if (!$obj instanceof Paquete) {
if ($obj->getMetodoCosteo() == "costo") {
$precio_base = $obj->getCostoEstandar();
} else {
if ($obj->getMetodoCosteo() == "precio") {
$precio_base = $obj->getPrecio();
} else {
$precio_base = $obj->getPrecio();
//throw new Exception("El producto o servicio tiene un metodo de costeo invalido", 901);
}
}
} else {
$precio_base = $obj->getPrecio();
}
$precio_final = 0;
$regla = new Regla();
foreach ($reglas as $regla) {
if (!$regla instanceof VO) {
Logger::error("La regla recibida no es un VO valido");
throw new Exception("La regla recibida no es un VO valido");
}
Logger::log("procesando regla..." . $regla->getIdRegla());
//Si la regla especifica que actuara sobre algun tipo especial, se evalua si el objeto recibido entra en esa clasificacion
if (!is_null($regla->getIdClasificacionProducto()) || !is_null($regla->getIdClasificacionServicio()) || !is_null($regla->getIdPaquete()) || !is_null($regla->getIdProducto()) || !is_null($regla->getIdRegla()) || !is_null($regla->getIdServicio())) {
$encontrado = false;
//Bandera que indicara si se encontro que la regla es aplicable o no
//Si la regla especifica una clasificacion de producto y el objeto es un producto,
//entonces se busca la clasificacion especificada por la regla en las clasificaciones del producto.
//Si es encontrada se cambia a verdadero la bandera.
if (!is_null($regla->getIdClasificacionProducto()) && $obj instanceof Producto) {
Logger::log("Si la regla especifica una clasificacion de producto y el objeto es un producto");
$clasificaciones_producto = ProductoClasificacionDAO::search(new ProductoClasificacion(array("id_producto" => $obj->getIdProducto())));
foreach ($clasificaciones_producto as $clasificacion_producto) {
if ($clasificacion_producto->getIdClasificacionProducto() == $regla->getIdClasificacionProducto()) {
$encontrado = true;
break;
}
}
}
//Si aun no esta activa la bandera, la regla especifica una clasificacion de servicio y el objeto es un servicio,
//entonces se busca la clasificacion esecificada por la regla en las clasificaciones del servicio.
//Si es encontrada se cambia a verdadero la bandera
if (!$encontrado && !is_null($regla->getIdClasificacionServicio()) && $obj instanceof Servicio) {
Logger::log("la regla especifica una clasificacion de servicio y el objeto es un servicio,");
$clasificaciones_servicio = ServicioClasificacionDAO::search(new ServicioClasificacion(array("id_servicio" => $obj->getIdServicio())));
foreach ($clasificaciones_servicio as $clasificacion_servicio) {
if ($clasificacion_servicio->getIdClasificacionServicio() == $regla->getIdClasificacionServicio()) {
$encontrado = true;
break;
}
}
}
//Si aun no esta activa la bandera, la regla especifica un producto y el objeto es un producto,
//entonces se compara el id especificado por la regla con el id del producto. Si son iguales,
//verifica si la regla especifica una unidad. De ser asi, verifica que la unidad especificada
//por la regla sea igual a la obtenida, si lo son, entonces se cambia la bandera a verdadero.
//Si no se especifica una unidad en la regla, entonces se cambia la bandera a verdadero
if (!$encontrado && !is_null($regla->getIdProducto()) && $obj instanceof Producto) {
Logger::log("la regla especifica un producto y el objeto es un producto");
if ($obj->getIdProducto() == $regla->getIdProducto()) {
if (!is_null($regla->getIdUnidad())) {
if ($regla->getIdUnidad() == $id_unidad) {
$encontrado = true;
}
} else {
$encontrado = true;
}
}
}
//Si la bandera aun no esta activa, la regla especifica un servicio y el objeto es un servicio,
//entonces se verifica que el id especificado por la regla sea igual al del servicio. Si son
//iguales entonces se cambia la bandera a verdadero.
if (!$encontrado && !is_null($regla->getIdServicio()) && $obj instanceof Servicio) {
Logger::log("la regla especifica un servicio y el objeto es un servicio,");
if ($obj->getIdServicio() == $regla->getIdServicio()) {
$encontrado = true;
}
}
//Si la bandera aun no esta activa, la regla especifica un paquete y el objeto es un paquete,
//entonces se verifica que el id especificado por al regla sea igual al del paquete. Si son
//iguales entonces se cambia la bandera a verdadero.
if (!$encontrado && !is_null($regla->getIdPaquete()) && $obj instanceof Paquete) {
Logger::log("la regla especifica un paquete y el objeto es un paquete,");
if ($obj->getIdPaquete() == $regla->getIdPaquete()) {
$encontrado = true;
}
}
if ($encontrado) {
Logger::log("Encontre un filtro especifico, saliendo de este pedo... ");
continue;
}
}
//if
Logger::log("No encontre un filtro especifico, continuando... ");
Logger::log("precio_final = precio_base * ( 1 + (regla->getPorcentajeUtilidad()/100 ));");
$precio_final = $precio_base * (1 + $regla->getPorcentajeUtilidad() / 100);
Logger::log("{$precio_final} = {$precio_base} * ( 1 + (" . $regla->getPorcentajeUtilidad() . "/100 ));");
$metodo_redondeo = $regla->getMetodoRedondeo();
/*
* Para saber el precio final despues del redondeo se utilizan dos valores de redondeo,
* un redoden superior y un redonde inferior. Por ejemplo, si el valor de precio final
* es 57 y el metodo de redondeo es 10, existen dos posibles redondeos, 50 y 60, siendo 50
* el redondeo inferior y 60 el redondeo superior.
*
* Para calcula estos redondeos se usa la siguiente formula
*
* residuo = precio_final % metodo_redondeo
*
* El residuo es lo que le sobra al precio final para ser un multiplo del metodo de redondeo,
* entonces el redondeo inferior siempre sera el precio final menos el residuo. En nuestro ejemplo
*
* precio_final - residuo = 57 - 7 = 50
*
* El redondeo superior es el precio final mas la resta del metodo de redondeo con el residuo. En
* nuestro ejemplo
*
* precio_final + ( metodo_redondeo - residuo) = 57 + ( 10 - 7) = 60
*/
if ($metodo_redondeo > 0) {
$redondeo_superior = $precio_final + $metodo_redondeo - $precio_final % $metodo_redondeo;
$redondeo_inferior = $precio_final - $precio_final % $metodo_redondeo;
if ($redondeo_superior - $precio_final < $precio_final - $redondeo_inferior) {
$precio_final = $redondeo_superior;
} else {
$precio_final = $redondeo_inferior;
}
}
//Si el precio final es menor que el margen minimo y el margen minimo esta especificado
//( No es cero), entonces se sobreescribe el precio final con el del margen minimo
$precio_final += $regla->getUtilidadNeta();
if ($precio_final < $regla->getMargenMin() && $regla->getMargenMin() != 0) {
$precio_final = $regla->getMargenMin();
}
//Si el precio final es mayor que el margen maximo y el margen maximo esta especificado
//( No es cero), entonces se sobreescribe el precio final con el del margen maximo
if ($precio_final > $regla->getMargenMax() && $regla->getMargenMax() != 0) {
$precio_final = $regla->getMargenMax();
}
$precio_base = $precio_final;
}
//Logger::log("El precio despues de todas las reglas es ".$precio_base);
return $precio_base;
}
