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;
     $interes_iva = 0;
     if ($i == 1) {
         $sdo = $MontoAutorizado;
         $sdos = getFMoney($sdo);
     }
     //mvtos subsecuentes
     $sdos = $sdo;
     $sdos = getFMoney($sdo);
 }
 $monto = getFMoney($rw["monto"]);
 $tdEsp = "";
 if ($BCapital->getIsMember($rw["tipo_operacion"]) == true) {
     $tdEsp = "<td class='mny'>{$monto}</td><td /><td /><td />";
 } elseif ($BInteres->getIsMember($rw["tipo_operacion"]) == true) {
     $tdEsp = "<td /><td class='mny'>{$monto}</td><td /><td />";
     $ints += $rw["monto"];
 } elseif ($BIva->getIsMember($rw["tipo_operacion"]) == true) {
     $tdEsp = "<td /><td /><td class='mny'>{$monto}</td><td />";
     $iva += $rw["monto"];
 } else {
     $tdEsp = "<td /><td /><td /><td class='mny'>{$monto}</td>";
     $otros += $rw["monto"];
 }
 $xF->set($rw["fecha_operacion"]);
 $cssFecha = $xF->mes() != $mes ? " class='otromes' " : " class='date' ";
 $mtd = "<tr>\n\t\t\t\t\t<td {$cssFecha}>" . $xF->getFechaDDMM() . "</td>\n\t\t\t\t\t<td onclick=\"msgbox('Total Recibo " . $rw["total_recibo"] . "')\">" . $rw[2] . "</td>\n\t\t\t\t\t<td>" . $rw[3] . "</td>\n\t\t\t\t\t<td class='ajustar'>" . $rw[4] . "</td>\n\t\t\t\t\t{$tdEsp}\n\t\t\t\t\t<td class='mny'>{$sdos}</td>\n\t\t\t\t\t<td class='ajustar'>{$observa}</td>\n\t\t\t\t</tr>";
 //parche de credito
 if (strtotime($rw["fecha_operacion"]) < strtotime($fecha_inicial) or strtotime($rw["fecha_operacion"]) > strtotime($fecha_final)) {
     $mtd = "";
 }
 $mes = $xF->mes();
 $trs .= $mtd;
 function getEsPersonaFisica()
 {
     $xB = new cBases(BASE_ES_PERSONA_MORAL);
     $this->mMessages .= "PERSONALIDAD LEGAL " . $this->mTipoFiguraJu . "\r\n";
     return $xB->getIsMember($this->mTipoFiguraJu) == false ? true : false;
 }