} if (MODO_CORRECION == true) { //my_query("DELETE FROM operaciones_mvtos WHERE socio_afectado=$socio AND docto_afectado=$solicitud AND (tipo_operacion=410 OR tipo_operacion=412 OR tipo_operacion=413)"); } if ($sucess == true) { $FInteres_normal = new cFormula("interes_normal"); $factor_interes = $xPlan->getFactorIVA($iva_incluido); $DatosDePagos = array(); if ($xCred->initPagosEfectuados() == true) { $DatosDePagos = $xCred->getListadoDePagos(); } //=========================== Corrige el Monto extra de bonificaciones ================================================================ $bonificaciones = 0; $xB = new cBases(7022); //base son bonificaciones $xB->init(); if ($xB->getIsMember($tipo_monto_extra) == true) { $msg .= "{$socio}\t{$solicitud}\tLa operacion {$tipo_monto_extra} es de Bonificaciones\r\n"; $bonificaciones = round($monto_extra / $PAGOS_AUTORIZADOS, 2); $monto_extra = 0; } //===================================================================================================================================== $total_ahorro = $monto_autorizado * $tasa_ahorro; $parcialidad_capital = ($FormaDePago == CREDITO_TIPO_PAGO_INTERES_PERIODICO or $FormaDePago == CREDITO_TIPO_PAGO_INTERES_COMERCIAL) ? 0 : $monto_autorizado / $PAGOS_AUTORIZADOS; $parcialidad_ahorro = round($total_ahorro / $PAGOS_AUTORIZADOS, 2); $parcialidad_interes = 0; $parcialidad_iva = 0; $parcialidad_cargo = round($monto_extra / $PAGOS_AUTORIZADOS, 2); $saldo_inicial = 0; $saldo_final = 0; $interes_normal = 0;