}
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;
