$capital = $_POST["capital"]; $interes = $_POST["interes"]; $idministrado = $_POST["idministrado"]; $idpago = $_POST["idpago"]; $montooriginal = $_POST["montooriginal"]; $aportsocial = $montoaport * EACP_TASA_RESERVA; $aportvol = $montoaport - $aportsocial; $cheque = $_POST["cheque"]; $comopago = $_POST["ctipo_pago"]; $foliofiscal = $_POST["foliofiscal"]; $fecha = fechasys(); $cRec = new cReciboDeOperacion(5, false); //$cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $idrecibo = $cRec->setNuevoRecibo($idsocio, DEFAULT_CREDITO, $fecha, 1, 5, $observaciones, $cheque, $comopago, $foliofiscal, $idgrupo); $cRec->setNuevoMvto($fecha, $aportvol, 702, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->setNuevoMvto($fecha, $aportsocial, 710, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->addMvtoContableByTipoDePago($totalcuotas, TM_CARGO); $cRec->setFinalizarRecibo(true); //PolizaPorRecibo($idrecibo); $cFicha = new cFicha(iDE_SOCIO, $idsocio); $cFicha->setTableWidth(); $cFicha->show(); echo $cRec->getFicha(true); echo $msg_rec_end; echo $cRec->getJsPrint(true); } ?> </body>
$icls = count($p); if ($periocidad != CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) { //eliminar letra o neutralizarla en partes. setEliminarMvto(OPERACION_CLAVE_PLAN_IVA, $socio, $solicitud, $parcialidad, $recibo_pago); //parche 29dic2014 setEliminarMvto(OPERACION_CLAVE_PLAN_CAPITAL, $socio, $solicitud, $parcialidad, $recibo_pago); setEliminarMvto(OPERACION_CLAVE_PLAN_INTERES, $socio, $solicitud, $parcialidad, $recibo_pago); setEliminarMvto(OPERACION_CLAVE_PLAN_AHORRO, $socio, $solicitud, $parcialidad, $recibo_pago); if ($icls >= 1) { $mobserva = "MONTO_PENDIENTE_RECIBO_{$recibo_pago}"; $nueva_parcialidad = $parcialidad; $dxplan = $xCred->getDatosDelPlanDePagos(); $xPlan = setNoMenorQueCero($xCred->getNumeroDePlanDePagos()); $xRec = new cReciboDeOperacion(22, true); if ($xPlan <= 0) { $recibo_pendientes = $xRec->setNuevoRecibo($socio, $solicitud, $fecha_operacion, $parcialidad, false, $mobserva, "", "ninguno", "NA", $grupo); $xRec->setNumeroDeRecibo($recibo_pendientes); $xRec->init(); } else { $recibo_pendientes = $xPlan; $xRec->setNumeroDeRecibo($recibo_pendientes); $xRec->init($dxplan); } //recorre los pendientes //--29Dic2014 foreach ($p as $clave_operacion => $monto_pendiente) { if ($monto_pendiente > TOLERANCIA_SALDOS) { if ($clave_operacion == OPERACION_CLAVE_PLAN_INTERES and $monto_pendiente > 0 and $tasa_iva > 0) { //agregar Interes $iva_pendiente = $monto_pendiente * $tasa_iva; $xRec->setNuevoMvto($fecha_operacion, $iva_pendiente, OPERACION_CLAVE_PLAN_IVA, $parcialidad, $mobserva);
$idsocio = DEFAULT_SOCIO; // Determina el Tipo de Operacion segun tRec if ($tipo_de_recibo == 31) { // Gastos a Comprobar $tipo_de_operacion = 1010; } elseif ($tipo_de_recibo == 32) { // Prestamo Personal $tipo_de_operacion = 1011; } else { $tipo_de_operacion = 99; } $cRec = new cReciboDeOperacion($tipo_de_recibo, false); //$cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $idrecibo = $cRec->setNuevoRecibo($idsocio, DEFAULT_CREDITO, $fecha, 1, $tipo_de_recibo, $observaciones, $cheque, $comopago, $foliofiscal); $cRec->setNuevoMvto($fecha, $monto, $tipo_de_operacion, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->addMvtoContableByTipoDePago($monto, TM_CARGO); $cRec->setFinalizarRecibo(true); $cfSocio = new cFicha(iDE_SOCIO, $idsocio); $cfSocio->setTableWidth(); $cfSocio->show(); echo $cRec->getFicha(); echo $msg_rec_end; } ?> </fieldset> </body> <script > function printrec() { var elUrl= "frmrecibodeegresos.php?recibo=<?php
$cheque = isset($_POST["cheque"]) ? $xT->cChar($_POST["cheque"]) : DEFAULT_CHEQUE; $comopago = isset($_POST["ctipo_pago"]) ? $xT->cChar($_POST["ctipo_pago"]) : DEFAULT_TIPO_PAGO; $foliofiscal = isset($_POST["foliofiscal"]) ? $xT->cChar($_POST["foliofiscal"]) : DEFAULT_RECIBO_FISCAL; if (setNoMenorQueCero($idsocio) <= 0) { //header("location: frmcobrodemultas.php?msg=FALTAN_DATOS"); $xFRM->addAvisoRegistroError(); } else { if (setNoMenorQueCero($monto) <= 0) { $xFRM->addAvisoRegistroError(); } else { $iddocto = DEFAULT_CREDITO; $xRec = new cReciboDeOperacion(RECIBOS_TIPO_TERCEROS, false, false); $xRec->setGenerarBancos(); $xRec->setGenerarPoliza(); $xRec->setGenerarTesoreria(); $idrecibo = $xRec->setNuevoRecibo($idsocio, $iddocto, $fecha, 1, RECIBOS_TIPO_TERCEROS, $observaciones, $cheque, $comopago, $foliofiscal); $xRec->setNuevoMvto($fecha, $monto, OPERACION_CLAVE_MULTAS, 1, $observaciones, 1, TM_ABONO, $idsocio); $xRec->addMvtoContableByTipoDePago($monto, TM_CARGO); $xRec->setFinalizarRecibo(true); $xFRM->addHTML($xRec->getFichaSocio()); $xFRM->addHTML($xRec->getFicha()); $xFRM->addPrintRecibo(); $xFRM->addHTML($xRec->getJsPrint(true)); $xFRM->addAvisoRegistroOK(); if (MODO_DEBUG == true) { $xFRM->addAviso($xRec->getMessages()); } } } } echo $xFRM->get();
</fieldset> </form> <?php } else { $fecha = $_POST["elanno0"] . "-" . $_POST["elmes0"] . "-" . $_POST["eldia0"]; $banco = isset($_POST["cBanco"]) ? $_POST["cBanco"] : false; $numOperacion = isset($_POST["cOperacion"]) ? $_POST["cOperacion"] : false; $monto = isset($_POST["cMonto"]) ? $_POST["cMonto"] : false; $observaciones = isset($_POST["observaciones"]) ? $_POST["observaciones"] : ""; if ($monto != false and $banco != false) { $xRec = new cReciboDeOperacion(201, true); $xRec->setGenerarBancos(false); $xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $xRec->setCuentaBancaria($banco); $idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, 1, $fecha, 1, 201, $observaciones, "NA", "efectivo", "NA", DEFAULT_GRUPO, $banco); $xRec->setNumeroDeRecibo($idrecibo); $xRec->setNuevoMvto($fecha, $monto, 9301, 1, $observaciones, 1, TM_ABONO, DEFAULT_SOCIO); $xRec->addMvtoContableByTipoDePago($monto, TM_CARGO); $xRec->setFinalizarRecibo(true); //Agregar la Operacion Bancaria $xB = new cCuentaBancaria($banco); $xB->setNewRetiro($numOperacion, $idrecibo, "PAGO DEL IDE", $monto, $fecha); // echo $xRec->getFicha(); // echo "<input type='button' onclick='jsPrintIDE()' value='Imprimir Recibo' />"; } } ?> </body>
$key = isset($_GET["k"]) ? true : false; $parser = isset($_GET["s"]) ? true : false; //Obtiene la llave del //if ($key == MY_KEY) { $messages = ""; $fechaop = parametro("f", fechasys()); $xF = new cFecha(0, $fechaop); //INICIAR if (MODULO_CAPTACION_ACTIVADO == true) { $aliasFil = getSucursal() . "-eventos-al-cierre-de-captacion-del-dia-{$fechaop}"; $xLog = new cFileLog($aliasFil, true); $idrecibo = DEFAULT_RECIBO; $xRec = new cReciboDeOperacion(12, false); //$xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CUENTA_CORRIENTE, $fechaop, 1, 12, "CIERRE_DE_CAPTACION_{$fechaop}", "", TESORERIA_COBRO_NINGUNO, "", DEFAULT_GRUPO); $xRec->setNumeroDeRecibo($idrecibo); $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\t" . EACP_NAME . " \r\n"; $messages .= "=========================\t\t" . getSucursal() . " \r\n"; $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\tINICIANDO EL CIERRE DE CAPTACION ====================\r\n"; $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n"; $messages .= "=======================================================================================\r\n"; $xUCapt = new cUtileriasParaCaptacion(); $messages .= "=========================\t\tPurgando Dias Minimo de Inversion \t====================\r\n"; $messages .= $xUCapt->vencer_intereses_de_inversion($idrecibo, $fechaop); $messages .= $xUCapt->inversiones_automaticas($idrecibo, $fechaop); if ($xF->getDiaFinal() == $xF->get()) { $messages .= $xUCapt->setGenerarInteresSobreSDPM($idrecibo, $fechaop); if (CAPTACION_IMPUESTOS_A_DEPOSITOS_ACTIVO == true) {
function setTraspaso($CuentaDestino, $TipoDestino, $observaciones = "", $monto = false) { if ($this->mCuentaIniciada == false) { $this->init(); } $cuentaOrigen = $this->mNumeroCuenta; $socio = $this->mSocioTitular; $saldoOrigen = $this->mSaldoActual; $fechaOperacion = fechasys(); $tipoPago = TESORERIA_COBRO_NINGUNO; $cheque = "NA"; $reciboFiscal = ""; $tipoDocumento = 9; $msg = ""; if ($TipoDestino == CAPTACION_TIPO_PLAZO) { $xCDestino = new cCuentaInversionPlazoFijo($CuentaDestino, $socio); } else { $xCDestino = new cCuentaALaVista($CuentaDestino, $socio); } $xCDestino->init(); if ($monto > $saldoOrigen) { $msg .= "ERROR\tEl Monto a Retirar {$monto} es mayor al saldo de Origen {$saldoOrigen} \r\n"; } else { //Crear el Recibo $xRec = new cReciboDeOperacion($tipoDocumento); $ReciboTrasp = $xRec->setNuevoRecibo($socio, $cuentaOrigen, $fechaOperacion, 1, $tipoDocumento, $observaciones, $cheque, $tipoPago); $xRec->setNumeroDeRecibo($ReciboTrasp); $xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $xRec->initRecibo(); $this->setCuentaBancaria(DEFAULT_CUENTA_BANCARIA); $this->setReciboDeOperacion($ReciboTrasp); $this->setForceOperations(true); $xCDestino->setReciboDeOperacion($ReciboTrasp); $this->setRetiro($monto, $cheque, $tipoPago, $reciboFiscal, $observaciones, DEFAULT_GRUPO, $fechaOperacion, $ReciboTrasp); $xCDestino->setDeposito($monto, $cheque, $tipoPago, $reciboFiscal, $observaciones, DEFAULT_GRUPO, $fechaOperacion, $ReciboTrasp); $xRec->setFinalizarRecibo(true); $msg .= $xRec->getMessages("txt"); } return $msg; }
//if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); } $xCred->setAbonoCapital(9200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-06"); $xCred->setAbonoCapital(9200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-10"); //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); } $xCred->setAbonoCapital(2200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-15"); $xCred->setAbonoCapital(2200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-20"); //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); } $xCred->setAbonoCapital(4200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-25"); $idrec = $xCred->setAbonoCapital(4200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-28"); //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); } $xRec->init(); $xRec->setFinalizarRecibo(true); $xRec->setMoneda("USD"); $xRec->setUnidadesOriginales(100); $x2Rec = new cReciboDeOperacion(RECIBOS_TIPO_PAGO_APORTACIONES, true); $x2Rec->setNuevoRecibo($xCred->getClaveDePersona(), DEFAULT_CREDITO, "2013-01-01", 1); $x2Rec->setNuevoMvto("2013-01-01", 15000, OPERACION_CLAVE_APORT_CORRIENTE, 1, "Prueba de AML"); $x2Rec->setNuevoMvto("2013-01-02", 1500, OPERACION_CLAVE_APORT_FONDO, 1, "Prueba de AML 2"); $x2Rec->setNuevoMvto("2013-01-03", 45000, OPERACION_CLAVE_APORT_VOLUNTARIA, 1, "Prueba de AML 3"); $x2Rec->setFinalizarRecibo(true); $xHFrm->addHElem("<p class='aviso'>" . $x2Rec->getMessages(OUT_HTML) . "</p>"); $xAML->setGuardarPerfilTransaccional(101, "MX", 10000, 10, ""); $xAML->setGuardarPerfilTransaccional(201, "MX", 20000, 2, ""); $xAML->setGuardarPerfilTransaccional(301, "MX", 30000, 3, ""); $xAML->setGuardarPerfilTransaccional(401, "MX", 40000, 4, ""); } $xHFrm->addHElem("<p class='aviso'>" . $xCred->getMessages(OUT_HTML) . "</p>"); } //$xHFrm->addHElem( $txt ); //$xHFrm->addHElem( $xF->show(true) ); //$xHFrm->addHElem( "<p class='aviso'>La $miFecha, Dias del Mes==". $xF->getDiasDelMes() ."</p>");
function setGenerarPlanDePagos() { $msg = ""; $cRec = new cReciboDeOperacion(10); $xRec = $cRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, fechasys(), 1, 10, "RECIBO_DE_AJUSTES_DE_PLAN_DE_PAGOS"); $msg .= "\t\tRECIBO\tEl Recibo de Operacion es {$xRec}\r\n"; $cRec->setNumeroDeRecibo($xRec, true); //Concilia Creditos sin Planes de Pago a SISBANCS $sql = "SELECT * FROM creditos_solicitud WHERE (SELECT\n\t\t\t\t\t\t\t\tCOUNT(credito) FROM sisbancs_suma_amorizaciones\n\t\t\t\t\t\t\t\tWHERE credito = creditos_solicitud.numero_solicitud) = 0\n\t\t\t\t\t\t\t\tAND saldo_actual > 0\n\t\t\t\t\t\t\t\tAND estatus_actual != 50 "; $rs = getRecordset($sql); while ($rw = mysql_fetch_array($rs)) { $socio = $rw["numero_socio"]; $credito = $rw["numero_solicitud"]; $saldo_actual = $rw["saldo_actual"]; $letra = $rw["ultimo_periodo_afectado"] + 1; $fecha = sumardias($rw["fecha_ultimo_mvto"], $rw["periocidad_de_pago"]); $monto = $saldo_actual; $msg .= "{$socio}\t{$credito}\tAGREGAR\tUnica Letra por el SALDO de {$saldo_actual} \r\n"; $sqlIS = "INSERT INTO sisbancs_amortizaciones(socio, credito, parcialidad, fecha_de_vencimiento,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tsaldo_vigente, saldo_vencido, interes_vigente, interes_vencido, saldo_interes_vencido, interes_moratorio,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\testatus, iva_interes_normal, iva_interes_moratorio)\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\tVALUES ({$socio}, {$credito}, {$letra}, '{$fecha}',\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t{$saldo_actual}, 0, 0, 0, 0, 0,\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t1, 0, 0)"; $cRec->setNuevoMvto($fecha, $monto, 410, $letra, "", 1, false, $socio, $credito); $x = my_query($sqlIS); if ($x["stat"] == false) { $msg .= "{$socio}\t{$credito}\tERROR\t \r\n"; } } $msg .= $cRec->getMessages("txt"); return $msg; }
</table> <input type='button' name='btsend' value='GUARDAR DATOS'onClick='frmSubmit();'> </form> </fieldset> <?php $socio = $_POST["idsocio"]; $documento = $_POST["idsolicitud"]; $tipo = $_POST["tipodescuento"]; $monto = $_POST["monto"]; $parcialidad = $_POST["idparcialidad"]; $observaciones = $_POST["observaciones"]; $fecha_operacion = fechasys(); if (isset($socio) and $monto > 0) { $xBtn = new cHButton("id-cmdImprimir"); $xRec = new cReciboDeOperacion(96, false); $recibo = $xRec->setNuevoRecibo($socio, $documento, $fecha_operacion, $parcialidad, 96, $observaciones); $xRec->setNuevoMvto($fecha_operacion, $monto, $tipo, $parcialidad, $observaciones, -1, TM_ABONO); $xRec->setFinalizarRecibo(); echo $xRec->getFichaSocio(); echo $xRec->getFicha(true, "<tr><th colspan='4'>" . $xBtn->getImprimirRecibo() . "</th></tr>"); } // end if ?> </body> <script > <?php if (isset($socio) and $monto > 0) { echo $xRec->getJsPrint(); } ?> </script>
//$cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $sucess = true; $msg = ""; if (CAPITAL_SOCIAL_EN_CAPTACION == true) { $xSoc = new cSocio($persona); $cuenta = $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA, CAPTACION_PRODUCTO_CAPITALSOCIAL); $xCta = new cCuentaALaVista($cuenta); if ($cuenta == 0) { //Aperturar nueva cuenta $cuenta = $xCta->setNuevaCuenta(DEFAULT_CAPTACION_ORIGEN, CAPTACION_PRODUCTO_CAPITALSOCIAL, $persona); $xCta->set($cuenta); } if ($xCta->init() == true) { $idrecibo = $cRec->setNuevoRecibo($persona, $xCta->getNumeroDeCuenta(), $fecha, 1, RECIBOS_TIPO_DEPOSITO_VISTA, $observaciones, $cheque, $comopago, $foliofiscal); $cRec->init(); if ($tipo1 != false and $monto1 > 0) { $xCta->setDeposito($monto1, $cheque, $comopago, $foliofiscal, "Origen {$tipo1}:" . $observaciones, DEFAULT_GRUPO, $fecha, $cRec->getCodigoDeRecibo()); } if ($tipo2 != false and $monto2 > 0) { $xCta->setDeposito($monto2, $cheque, $comopago, $foliofiscal, "Origen {$tipo2}:" . $observaciones, DEFAULT_GRUPO, $fecha, $cRec->getCodigoDeRecibo()); } if ($tipo3 != false and $monto3 > 0) { $xCta->setDeposito($monto2, $cheque, $comopago, $foliofiscal, "Origen {$tipo2}:" . $observaciones, DEFAULT_GRUPO, $fecha, $cRec->getCodigoDeRecibo()); } } else { $msg .= "ERROR\tError en la carga de la cuentar {$cuenta}\r\n"; $sucess = false; } if (MODO_DEBUG == true) {
function setNuevoRecibo($socio, $solicitud, $fecha_operacion, $parcialidad, $tipo_docto, $cadena, $cheque_afectador, $tipo_pago, $recibo_fiscal, $grupo_asoc, $total = 0) { $xRec = new cReciboDeOperacion($tipo_docto); $NumeroRecibo = $xRec->setNuevoRecibo($socio, $solicitud, $fecha_operacion, $parcialidad, $tipo_docto, $cadena, $cheque_afectador, $tipo_pago, $recibo_fiscal, $grupo_asoc); return $NumeroRecibo; }
function setEliminarInteresesDeCreditosPagados() { $msg = ""; //============================================================================== $fecha = fechasys(); $cheque = DEFAULT_CHEQUE; $recibo_fiscal = "NA"; $observaciones = "GENERADO_EN_LA_UTILERIA_883"; //============================================================================== $CRecibo = new cReciboDeOperacion(1, false); //Set a Mvto Contable //$CRecibo->setGenerarPoliza(); //$CRecibo->setGenerarTesoreria(); $recibo = $CRecibo->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $fecha, 1, 1, $observaciones, $cheque, "ninguno", $recibo_fiscal, DEFAULT_GRUPO); $CRecibo->setNumeroDeRecibo($recibo); // $sql = "SELECT\n\t\t\t\t*\n\t\t\tFROM\n\t\t\t\t`creditos_solicitud` `creditos_solicitud`\n\t\t\tWHERE\n\t\t\t\t(`creditos_solicitud`.`saldo_actual` <= 0) AND\n\t\t\t\t(\n\t\t\t\t\t(`creditos_solicitud`.`interes_moratorio_devengado` != 0)\n\t\t\tOR\n\t\t\t\t\t(`creditos_solicitud`.`interes_normal_devengado` != 0)\n\t\t\t\t)"; $rs = mysql_query($sql, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $socio = $rw["numero_socio"]; $solicitud = $rw["numero_solicitud"]; $OpNormal = 420; //420; $OpMora = 421; //431; $MontoM = 0; $MontoN = 0; //terminado: oct/2011 $interesDN = $rw["interes_normal_devengado"]; $interesDM = $rw["interes_moratorio_devengado"]; $interesPN = $rw["interes_normal_pagado"]; $interesPM = $rw["interes_moratorio_pagado"]; if ($interesDN > $interesPN) { $OpNormal = 140; $MontoN = $interesDN - $interesPN; } else { $MontoN = $interesPN - $interesDN; } if ($interesDM > $interesPM) { $OpNormal = 141; $MontoM = $interesDM - $interesPM; } else { $MontoM = $interesPM - $interesDM; } if ($MontoN > 0) { $CRecibo->setNuevoMvto($fecha, $MontoN, $OpNormal, 1, " Ajuste por {$MontoN} de {$interesDN} | {$interesPN} ", 1, TM_CARGO, $socio, $solicitud); $msg .= "{$socio}\t{$solicitud}\tINTERES_NORMAL_DEV\tAjuste por {$MontoN} de {$interesDN} | {$interesPN} \r\n"; } else { } if ($MontoM > 0) { $CRecibo->setNuevoMvto($fecha, $MontoN, $OpMora, 1, "Ajuste por {$MontoM} de {$interesDM} | {$interesPM}", 1, TM_CARGO, $socio, $solicitud); $msg .= "{$socio}\t{$solicitud}\tINTERES_MOR_DEV\tAjuste por {$MontoM} {$interesDM} | {$interesPM} \r\n"; } else { } } $msg .= $CRecibo->getMessages("txt"); $xCUtils = new cUtileriasParaCreditos(); $msg .= $xCUtils->setAcumularIntereses(true); return $msg; }
function setPurgueDB() { $sqlT = array(); $msg = ""; $xF = new cFecha(); $sqlT[] = "DELETE FROM bancos_cuentas WHERE idbancos_cuentas != " . FALLBACK_CUENTA_BANCARIA; $sqlT[] = "DELETE FROM bancos_operaciones "; $sqlT[] = "DELETE FROM captacion_cuentas WHERE numero_cuenta!=" . CTA_GLOBAL_CORRIENTE; $sqlT[] = "DELETE FROM captacion_sdpm_historico "; $sqlT[] = "DELETE FROM captacion_firmas"; $sqlT[] = "DELETE FROM captacion_sdpm_historico"; $sqlT[] = "DELETE FROM contable_catalogo "; $sqlT[] = "DELETE FROM contable_catalogorelacion "; $sqlT[] = "DELETE FROM contable_movimientos "; $sqlT[] = "DELETE FROM contable_polizas "; $sqlT[] = "DELETE FROM contable_saldos"; $sqlT[] = "DELETE FROM contable_polizas_proforma "; $sqlT[] = "DELETE FROM creditos_reconvenio"; $sqlT[] = "DELETE FROM creditos_solicitud WHERE numero_solicitud !=" . DEFAULT_CREDITO; $sqlT[] = "DELETE FROM creditos_garantias"; $sqlT[] = "DELETE FROM creditos_flujoefvo"; $sqlT[] = "DELETE FROM creditos_lineas"; $sqlT[] = "DELETE FROM creditos_productos_otros_parametros "; $sqlT[] = "DELETE FROM creditos_sdpm_historico"; $sqlT[] = "DELETE FROM creditos_periodos "; //WHERE idcreditos_periodos != $sqlT[] = "DELETE FROM creditos_rechazados "; $sqlT[] = "DELETE FROM general_sucursales WHERE codigo_sucursal != \"matriz\" AND codigo_sucursal !='" . getSucursal() . "' "; $sqlT[] = "DELETE FROM general_log "; $sqlT[] = "DELETE FROM general_tmp "; $sqlT[] = "DELETE FROM general_import "; $sqlT[] = "DELETE FROM operaciones_recibos"; $sqlT[] = "DELETE FROM operaciones_mvtos"; $sqlT[] = "DELETE FROM seguimiento_compromisos"; $sqlT[] = "DELETE FROM seguimiento_llamadas "; $sqlT[] = "DELETE FROM seguimiento_notificaciones"; $sqlT[] = "DELETE FROM socios_aeconomica"; $sqlT[] = "DELETE FROM socios_aportaciones"; $sqlT[] = "DELETE FROM socios_baja"; $sqlT[] = "DELETE FROM socios_cajalocal WHERE idsocios_cajalocal != " . getCajaLocal() . " AND sucursal != '" . getSucursal() . "' "; $sqlT[] = "DELETE FROM `socios_aeconomica_dependencias`\n\t\t\tWHERE `idsocios_aeconomica_dependencias` !=" . DEFAULT_EMPRESA . "\n\t\t\tAND `idsocios_aeconomica_dependencias` !=" . FALLBACK_CLAVE_EMPRESA; $sqlT[] = "DELETE FROM socios_general WHERE codigo!=" . DEFAULT_SOCIO . " AND codigo !=" . EACP_ID_DE_PERSONA; $sqlT[] = "DELETE FROM socios_memo"; $sqlT[] = "DELETE FROM socios_patrimonio"; $sqlT[] = "DELETE FROM socios_relaciones"; $sqlT[] = "DELETE FROM socios_vivienda"; $sqlT[] = "DELETE FROM socios_grupossolidarios WHERE idsocios_grupossolidarios!=" . DEFAULT_GRUPO; $sqlT[] = "DELETE FROM `personas_documentacion` "; $sqlT[] = "DELETE FROM `socios_otros_parametros` "; $sqlT[] = "DELETE FROM t_03f996214fba4a1d05a68b18fece8e71 WHERE idusuarios !=99"; $sqlT[] = "DELETE FROM tesoreria_cajas"; $sqlT[] = "DELETE FROM `tesoreria_cajas_movimientos` "; $sqlT[] = "DELETE FROM usuarios_web "; $sqlT[] = "DELETE FROM usuarios_web_connected"; $sqlT[] = "DELETE FROM `usuarios_web_notas` "; $sqlT[] = "DELETE FROM general_tmp"; $sqlT[] = "DELETE FROM general_folios "; $sqlT[] = "DELETE FROM contable_polizas_proforma "; $sqlT[] = "DELETE FROM contable_centrodecostos WHERE idcontable_centrodecostos !=0 "; $sqlT[] = "DELETE FROM general_log "; $sqlT[] = "UPDATE t_03f996214fba4a1d05a68b18fece8e71 SET f_34023acbff254d34664f94c3e08d836e = md5('root') WHERE f_28fb96d57b21090705cfdf8bc3445d2a = 'root'"; //*/ //TODO: Actualizar nombre de la tabla $sqlT[] = "DELETE FROM `empresas_operaciones` "; $sqlT[] = "DELETE FROM `empresas_cobranza`"; $sqlT[] = "DELETE FROM `sistema_programacion_de_avisos` "; $sqlT[] = "DELETE FROM `personas_perfil_transaccional` "; $sqlT[] = "DELETE FROM `creditos_rechazados` "; //AML $sqlT[] = "DELETE FROM `aml_risk_register`"; $sqlT[] = "DELETE FROM `aml_alerts`"; $sqlT[] = "DELETE FROM `personas_documentacion` "; $sqlT[] = "DELETE FROM `socios_otros_parametros` "; $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '5' "; $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '9' "; $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '8' "; //$sqlT[] = "DELETE FROM "; $sqlT[] = "DELETE FROM creditos_otros_datos "; $sqlT[] = "DELETE FROM `aml_perfil_egresos_por_persona` "; $sqlT[] = "DELETE FROM `historial_de_pagos` "; $sqlT[] = "DELETE FROM `operaciones_archivo_de_facturas` "; $sqlT[] = "DELETE FROM `personas_operaciones_recursivas` "; $sqlT[] = "DELETE FROM `personas_relaciones_recursivas` "; $sqlT[] = "DELETE FROM `tesoreria_caja_arqueos` "; //$sqlT[] = "DELETE FROM "; //$sqlT[] = "DELETE FROM "; //$sqlT[] = "DELETE FROM "; $sqlT[] = "UPDATE `socios_general` SET `nombrecompleto` = 'REGISTRO_INICIAL_FINANCIERA' WHERE `codigo` = '10000'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'curp_del_representante_legal'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_del_presidente_del_consejo_de_vigilancia'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_del_representante_legal'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_del_representante_legal'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'domicilio.domicilio_integrado'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_la_entidad'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_la_entidad'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_ante_la_cnbv'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_casfin'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_patronal_imss'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_de_la_entidad'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_nominas'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'entidad_corto_en_el_sic'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_sms_automaticos'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_del_administrador'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_de_usuario_ftp' "; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_usuario_ftp' "; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'system_pay_email_register'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_del_email_del_administrador'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_trabajos_automaticos'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'domicilio.telefono_principal'"; $sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = 'https://demo.sipakal.com/' WHERE `nombre_del_parametro` = 'url_de_entidad_transmisora'"; //$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'"; $sqlT[] = "INSERT INTO `bancos_entidades` (`idbancos_entidades`, `nombre_de_la_entidad`, `rfc_de_la_entidad`) VALUES ('999', 'BANCO_POR_DEFECTO', 'BAN999999') "; $sqlT[] = "INSERT INTO `bancos_cuentas` (`idbancos_cuentas`, `descripcion_cuenta`, `fecha_de_apertura`, `estatus_actual`, `consecutivo_actual`, `saldo_actual`, `sucursal`, `entidad_bancaria`) VALUES ('99', 'FALLBACK_CUENTA', '2014-01-01', 'activo', '1', '100000000', 'matriz', '1') "; $sqlT[] = "INSERT INTO `t_03f996214fba4a1d05a68b18fece8e71` (`idusuarios`, `f_28fb96d57b21090705cfdf8bc3445d2a`, `apellidopaterno`, `apellidomaterno`, `puesto`, `periodo_responsable`, `codigo_de_persona`) VALUES ('1', 'USUARIO POR DEFECTO', '', '', 'Usuario por Defecto', '1', '99999')"; $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '801'"; $sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '4'"; $sqlT[] = "INSERT INTO `contable_centrodecostos` (`idcontable_centrodecostos`, `nombre_centrodecostos`) VALUES ('1', 'POR DEFECTO')"; foreach ($sqlT as $id => $sql) { $x = my_query($sql); if ($x[SYS_ESTADO] != false) { if (isset($x[SYS_INFO])) { $msg .= "OK\t" . $xF->getMarca() . "\t" . $x[SYS_INFO] . " SQL : {$sql}\r\n"; } else { $msg .= "OK\t" . $xF->getMarca() . "\tSQL : {$sql} \r\n"; } } else { if (isset($x[SYS_ERROR])) { $msg .= "ERROR\t" . $xF->getMarca() . "\t" . $x[SYS_ERROR] . " SQL : {$sql} \r\n"; } else { $msg .= "ERROR\t" . $xF->getMarca() . "- \tSQL : {$sql} \r\n"; } } } //llevar los folios al maximo $msg .= setFoliosAlMaximo(); // $xRec = new cReciboDeOperacion(12); $idrecibo = $xRec->setNuevoRecibo(1, 1, fechasys(), 1, 12, "CIERRE_ESTABLECIDO_POR_DEFECTO", "NA", "ninguno", "NA", DEFAULT_GRUPO); $xRec->setFinalizarRecibo(false); //Crear periodo de credito //TODO: Agregar informacion de valores por DEFAULT $xP = new cPeriodoDeCredito(); $xP->add(); $msg .= $xP->setCambiar(EACP_PER_SOLICITUDES); $xConf = new cConfiguration(); $xConf->set("fecha_de_inicio_de_operaciones_en_el_sistema", fechasys()); $msg .= "OK\tCONFIGURATION\tSe cambio la fecha de Inicio de Operaciones en el sistema\r\n"; $xSoc = new cSocio(10000); //); $xSoc->setOmitirAML(); $xSoc->add(EACP_NAME, "", "", EACP_RFC, "", getCajaLocal(), EACP_FECHA_DE_CONSTITUCION, EACP_LOCALIDAD); $xSoc->addVivienda(EACP_DOMICILIO_CORTO, "", EACP_CODIGO_POSTAL, "", "", EACP_TELEFONO_PRINCIPAL, "", true, 1, 1, 99, EACP_COLONIA, "calle", "", EACP_CLAVE_DE_LOCALIDAD, EACP_CLAVE_DE_PAIS); my_query("INSERT INTO `socios_general` (`codigo`, `nombrecompleto`, `estatusactual`, `cajalocal`, `sucursal`) VALUES ('10000', 'MICROFINANCIERA', '10', '1', 'matriz')"); return $msg; }
$monto = $_POST["montointeres"]; if ($action == "p" and isset($idsolicitud) and isset($monto) and $monto > 0) { $observaciones = $_POST["observaciones"]; $iva = $_POST["montoiva"]; $comopago = $_POST["ctipo_pago"]; $cheque = $_POST["cheque"]; $foliofiscal = $_POST["foliofiscal"]; $idsocio = $_POST["idsocio"]; $fecha = fechasys(); $iddocto = $idsolicitud; //=================================================================================================== $cRec = new cReciboDeOperacion(15, true, false); $cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $idrecibo = $cRec->setNuevoRecibo($idsocio, $iddocto, $fecha, 1, 15, $observaciones, $cheque, $comopago, $foliofiscal); $cRec->setNuevoMvto($fecha, $monto, 351, 1, $observaciones, 1, TM_ABONO, $idsocio); //IVA $cRec->setNuevoMvto($fecha, $iva, 151, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->addMvtoContableByTipoDePago($montooperacion, TM_CARGO); $cRec->setFinalizarRecibo(true); $cfSocio = new cFicha(iDE_SOCIO, $idsocio); $cfSocio->setTableWidth(); $cfSocio->show(); echo $cRec->getFicha(); echo $msg_rec_end; // actualiza el interes Anticipado del Credito $sqlica = "UPDATE creditos_solicitud\n\t\tSET sdo_int_ant=(sdo_int_ant + ({$monto}))\n\t\tWHERE numero_solicitud={$idsolicitud}"; my_query($sqlica); // }
$ql = new MQL(); /* * ==================================================================================================================================================== * Agregar codigo de actualizar menores a personas fisicas * ==================================================================================================================================================== */ $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\t" . EACP_NAME . " \r\n"; $messages .= "=========================\t\t" . getSucursal() . " \r\n"; $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\tINICIANDO EL CIERRE DE SISTEMA ====================\r\n"; $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n"; //2011-01-26 : Agrega un recibo estadistico de control diario $xNRec = new cReciboDeOperacion(10); $diaSig = $xF->setSumarDias(1); $xIdNRec = $xNRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $diaSig, 1, 10, "MOVIMIENTOS_ESTADISTICOS_DEL_DIA", "NA", "ninguno", "NA", DEFAULT_GRUPO); //actualiza la configuracion del sistema $xCx = new cConfiguration(); $xUtil = new cUtileriasParaOperaciones(); $xCx->set("numero_de_recibo_por_defecto", $xIdNRec); $messages .= date("Y-m-d") . "\tSe Agrego el Recibo {$xIdNRec} para ESTADISTICOS del proximo dia( {$diaSig} )\n"; //================================= $messages .= $xUtil->setEliminarRecibosDuplicados(); $x20 = setFoliosAlMaximo(); $messages .= date("Y-m-d") . "\tSe llevaron Folios al Maximo, los recibos quedaron en " . $x20["recibos"] . " \n"; $messages .= date("Y-m-d") . "\tSe llevaron la Cuenta de Polizas Contables al Maximo \n"; setSociosAlMaximo(); clearCacheSessions(); $messages .= date("Y-m-d") . "\tSe limpio la Cache de sessiones\n"; $messages .= date("Y-m-d") . "\tSe llevaron los socios al Maximo \n"; if ($xF->getDiaFinal() == $xF->get()) {
$detalles = parametro("idobservaciones", ""); //$monto = parametro("idmonto", 0, MQL_FLOAT); $cheque = parametro("cheque", DEFAULT_CHEQUE); $comopago = parametro("ctipo_pago", DEFAULT_TIPO_PAGO, MQL_RAW); $foliofiscal = parametro("foliofiscal", DEFAULT_RECIBO_FISCAL); $fecha = parametro("idfechacomision", fechasys()); $fecha = $xF->getFechaISO($fecha); $com1 = parametro("idcom1", 0, MQL_FLOAT); $ob1 = parametro("idob1", ""); $com2 = parametro("idcom2", 0, MQL_FLOAT); $ob2 = parametro("idob2", ""); $com3 = parametro("idcom3", 0, MQL_FLOAT); $ob3 = parametro("idob3", ""); $iva = parametro("idiva", 0, MQL_FLOAT); $monto = $com1 + $com2 + $com3 + $iva; $idrecibo = $xRec->setNuevoRecibo($persona, $credito, $fecha, 1, RECIBOS_TIPO_OINGRESOS, $detalles, $cheque, $comopago, $foliofiscal); if (setNoMenorQueCero($idrecibo) > 0) { if ($com1 > 0) { $xRec->setNuevoMvto($fecha, $com1, OPERACION_CLAVE_COMISION_APERTURA, 1, $ob1, 1, TM_ABONO, $persona); } if ($com2 > 0) { $xRec->setNuevoMvto($fecha, $com2, OPERACION_CLAVE_PAGO_CBZA, 1, $ob2, 1, TM_ABONO, $persona); } if ($com3 > 0) { $xRec->setNuevoMvto($fecha, $com3, OPERACION_CLAVE_PAGO_COM_VARIAS, 1, $ob3, 1, TM_ABONO, $persona); } if ($iva > 0) { $xRec->setNuevoMvto($fecha, $iva, OPERACION_CLAVE_PAGO_IVA_OTROS, 1, $detalles, 1, TM_ABONO, $persona); } $xRec->addMvtoContableByTipoDePago($monto, TM_CARGO); if ($xRec->setFinalizarRecibo(true) == true) {
$codigo = $rw["idsocios_grupossolidarios"]; $xG = new cGrupo($codigo, false); $xG->init($rw); $msg .= $xG->setVerificarValidez(false, true); } break; case 878: $xMig = new cMigracionTCB(); $msg = $xMig->TCB_GenerarLetras(); break; //ajusta las cuentas de ahorro por saldo actual y no por movimientos //ajusta las cuentas de ahorro por saldo actual y no por movimientos case 879: $msg .= "============================ GENERANDO AJUSTES DE CUENTA A LA VISTA \r\n "; $CRecibo = new cReciboDeOperacion(10, true); $recibo = $CRecibo->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, fechasys(), 1, 10, "POLIZA_MASIVA_DE_AJUSTE", "NA", "ninguno", "NA", DEFAULT_GRUPO); $sql = "SELECT SQL_CACHE * FROM captacion_saldos_comparados WHERE saldo_cuenta != saldo_obtenido /* LIMIT 0,500 */ "; $rs = mysql_query($sql, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $cuenta = $rw["numero_cuenta"]; $socio = $rw["numero_socio"]; $saldo = round($rw["saldo_cuenta"], 2); $sdoOperativo = round($rw["saldo_obtenido"], 2); if ($saldo != $sdoOperativo) { $cCta = new cCuentaALaVista($cuenta, $socio); $cCta->init(); $cCta->setForceOperations(); $cCta->setReciboDeOperacion($recibo); if ($saldo > $sdoOperativo) { //depositar $diferencia = $saldo - $sdoOperativo;
$idrecibocap = $xDCred->setAbonoCapital($montocreditodesc, SYS_UNO, $cheque, TESORERIA_COBRO_DESCTO, $recibo_fiscal, $observaciones); if (setNoMenorQueCero($idrecibocap) > 0) { $xRecCapt = new cReciboDeOperacion(false, false, $idrecibocap); $xRecCapt->init(); if ($xRecCapt->setFinalizarRecibo(true) == true) { $xFRM->OButton("TR.Recibo de Abono", "jsImprimirReciboCapital()", "imprimir"); $xFRM->addHTML($xRecCapt->getJsPrint(true, "jsImprimirReciboCapital")); //finalizar tesoreria $xRecCapt->setFinalizarTesoreria(array("cuenta" => $cuenta_cheques, "cheque" => $cheque)); } $msg .= MODO_DEBUG == true ? $xRecCapt->getMessages() : ""; } } if ($montocomision > 0) { $xRec = new cReciboDeOperacion(); $idrecibo = $xRec->setNuevoRecibo($idsocio, $idsolicitud, $fecha, 1, RECIBOS_TIPO_OINGRESOS, $observaciones, $cheque, TESORERIA_COBRO_DESCTO, $recibo_fiscal); if (setNoMenorQueCero($idrecibo) > 0) { $montocomision = round($montocomision * (1 / (1 + TASA_IVA)), 2); $montoivacomi = round($montocomision * TASA_IVA, 2); $xRec->setNuevoMvto($fecha, $montocomision, OPERACION_CLAVE_COMISION_APERTURA, 1, $observaciones, 1, TM_CARGO, $idsocio); $xRec->setNuevoMvto($fecha, $montoivacomi, OPERACION_CLAVE_PAGO_IVA_OTROS, 1, $observaciones, 1, TM_CARGO, $idsocio); //$xRec->addMvtoContableByTipoDePago($montocomision, TM_CARGO); if ($xRec->setFinalizarRecibo(true) == true) { $xFRM->OButton("TR.Recibo de Comisiones", "jsImprimirRecibo()", "imprimir"); $xFRM->addHTML($xRec->getJsPrint(true)); $xRec->setFinalizarTesoreria(array("cuenta" => $cuenta_cheques, "cheque" => $cheque)); } $msg .= MODO_DEBUG == true ? $xRec->getMessages() : ""; } } //Buttons
$msg = ""; if (setNoMenorQueCero($monto) > 0) { $xT = new cTipos(); $Fecha = parametro("idfechadepago", false); $Fecha = $Fecha == false ? fechasys() : $xF->getFechaISO($Fecha); $observacion = parametro("idobservaciones", ""); $monto = parametro("idmonto", 0, MQL_FLOAT); $cheque = parametro("cheque", DEFAULT_CHEQUE); $comopago = parametro("ctipo_pago", DEFAULT_TIPO_PAGO, MQL_RAW); $foliofiscal = parametro("foliofiscal", DEFAULT_RECIBO_FISCAL); $fecha_de_operacion = $Fecha; $xRec = new cReciboDeOperacion(20); //$xRec->setGenerarBancos(); //$xRec->setGenerarPoliza(); //$xRec->setGenerarTesoreria(); $idrecibo = $xRec->setNuevoRecibo($persona, 1, $fecha_de_operacion, 1, 20, $observacion, $cheque, $comopago, $foliofiscal, DEFAULT_GRUPO); $xRec->setNuevoMvto($fecha_de_operacion, $monto, 1001, 1, $observacion, 1, TM_ABONO); //agregar Poliza $xRec->addMvtoContableByTipoDePago(); //Finalizar recibo $xRec->setFinalizarRecibo(true); $xRec->init(); $xFRM->addHTML($xRec->getFichaSocio()); $xFRM->addHTML($xRec->getFicha(true)); $xFRM->addHTML($xRec->getJsPrint(true)); $xFRM->OButton("TR. Imprimir recibo", "jsImprimirRecibo()", "imprimir", "idrec-dep"); $xFRM->addCerrar(); if (MODO_DEBUG == true) { $msg .= $xRec->getMessages(); $xFL = new cFileLog(false, true); $xFL->setWrite($msg);
function setRegenerarSDPM($PFechaInicial, $PFechaFinal, $GenerarInteres = true, $incluirSinSaldo = false, $NumeroCuenta = false) { // $PFechaFinal = ""; $mBase = 3100; $xT = new cTipos(); $ql = new MQL(); $BySaldo = $incluirSinSaldo == false ? " AND captacion_cuentas.saldo_cuenta >=" . TOLERANCIA_SALDOS : ""; $ByCuentaSDPM = $NumeroCuenta == false ? "" : " AND `captacion_sdpm_historico`.`cuenta` = {$NumeroCuenta} "; $ByCuentaMvto = $NumeroCuenta == false ? "" : " AND `operaciones_mvtos`.`docto_afectado` = {$NumeroCuenta} "; $ByCuentaCta = $NumeroCuenta == false ? "" : " AND captacion_cuentas.numero_cuenta = {$NumeroCuenta} "; $msg = ""; $msg .= "==========================================================================================\r\n"; $msg .= "==================\tGenerando SDPM desde el {$PFechaInicial} al {$PFechaFinal}\r\n"; $msg .= "==========================================================================================\r\n"; $msg .= "Socio\tCuenta\tOPER\tEjercicio\tPeriodo\tFecha\tDias\tMonto\tSaldo\tSDPM\r\n"; $sqlM = "SELECT \n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`fecha_operacion` AS 'fecha_operacion',\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`recibo_afectado` AS 'recibo_afectado',\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`docto_afectado` AS 'docto_afectado',\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`afectacion_real` AS 'afectacion_real',\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`valor_afectacion`,\n\t\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion` AS 'afectacion'\n\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos` \n\t\t\t\t\t\t\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros` \n\t\t\t\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros` \n\t\t\t\t\t\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = \n\t\t\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro` \n\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` ={$mBase})\n\t\t\t\t\t\t\t\t\t{$ByCuentaMvto}\n\t\t\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t\t\t\t\t`operaciones_mvtos`.`fecha_operacion` ASC"; $rsM = getRecordset($sqlM); $arrOps = array(); //Array de montos de operacion $arrRecs = array(); //Array de Recibos de Operacion while ($rwM = mysql_fetch_array($rsM)) { //clave cuenta fecha $cuenta = $rwM["docto_afectado"]; $fecha = $rwM["fecha_operacion"]; if (isset($arrOps[$cuenta . "-" . $fecha])) { $arrOps[$cuenta . "-" . $fecha] += $rwM["afectacion_real"] * $rwM["afectacion"]; } else { $arrOps[$cuenta . "-" . $fecha] = $rwM["afectacion_real"] * $rwM["afectacion"]; } $arrRecs[$cuenta . "-" . $fecha] = $rwM["recibo_afectado"]; //$msg .= "WARN\t$cuenta\tAgregar " . ($rwM["afectacion_real"] * $rwM["afectacion"] ) . "\r\n"; } //Eliminar periodos anteriores $sqlDF = "DELETE FROM captacion_sdpm_historico WHERE (fecha>='{$PFechaInicial}' AND fecha<='{$PFechaFinal}') {$ByCuentaSDPM} "; my_query($sqlDF); //FECHAS $xF = new cFecha(0); // $xTbl = new cSAFETabla(TCAPTACION_CUENTAS); $sqlCX = $xTbl->getQueryInicial() . " WHERE captacion_cuentas.tipo_cuenta = " . CAPTACION_TIPO_VISTA . " {$BySaldo} {$ByCuentaCta} "; $rs1 = getRecordset($sqlCX); while ($rw1 = mysql_fetch_array($rs1)) { $socio = $rw1["numero_socio"]; $cuenta = $rw1["numero_cuenta"]; $xCta = new cCuentaALaVista($cuenta, $socio); $xCta->init($rw1); $DCta = $xCta->getDatosInArray(); $FApertura = $DCta["fecha_apertura"]; $dias = $xF->setRestarFechas($PFechaFinal, $FApertura); $dias += 1; $sucursal = $DCta["sucursal"]; $FechaAnterior = $FApertura; $saldoAnterior = 0; $xF2 = new cFecha(1); for ($i = 0; $i <= $dias; $i++) { $OpFecha = $xF->setSumarDias($i, $FApertura); $xF->set($OpFecha); $OpFechaFin = $xF->getDiaFinal(); $OpMonto = isset($arrOps[$cuenta . "-" . $OpFecha]) ? $arrOps[$cuenta . "-" . $OpFecha] : 0; $idrecibo = isset($arrRecs[$cuenta . "-" . $OpFecha]) ? $arrRecs[$cuenta . "-" . $OpFecha] : DEFAULT_RECIBO; //si la operacion es mayor a cero o es FIN DE MES if ($OpMonto != 0 or $OpFecha == $OpFechaFin) { $diasTrans = $xF2->setRestarFechas($OpFecha, $FechaAnterior); $xF2->set($OpFecha); $ejercicio = $xF2->anno(); $periodo = $xF2->mes(); $sdpd = $saldoAnterior * $diasTrans; $nuevatasa = $xCta->getTasaAplicable(0, 0, $saldoAnterior); //corregir fecha $sqlUSPM = "INSERT INTO captacion_sdpm_historico\n\t\t\t\t\t\t\t\t\t\t(ejercicio, periodo, cuenta, fecha, dias, tasa, monto, recibo, numero_de_socio, sucursal)\n\t \t\t\t\t\t\t\t\tVALUES( {$ejercicio}, {$periodo}, {$cuenta}, '{$OpFecha}', {$diasTrans}, {$nuevatasa}, {$sdpd}, {$idrecibo}, {$socio}, '{$sucursal}') "; //si es valida la operacion, se actualizan if ($OpFecha >= $PFechaInicial and $OpFecha <= $PFechaFinal) { my_query($sqlUSPM); $msg .= "{$socio}\t{$cuenta}\t+SDPM\t{$ejercicio}\t{$periodo}\t{$OpFecha}\t{$diasTrans}\t{$OpMonto}\t{$saldoAnterior}\t{$sdpd}\r\n"; } else { $msg .= "{$socio}\t{$cuenta}\t=SDPM\t{$ejercicio}\t{$periodo}\t{$OpFecha}\t{$diasTrans}\t{$OpMonto}\t{$saldoAnterior}\t{$sdpd}\r\n"; } $FechaAnterior = $OpFecha; $saldoAnterior += $OpMonto; } } } //Agregar Movimientos Finales del MES. //FIXME: Corregir incidencias //opcional: agregar Interes if ($GenerarInteres == true) { $xRec = new cReciboDeOperacion(12, false); $recibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, 1, $PFechaFinal, 1, 12, "REGENERAR_INTERES_SDPM_{$PFechaFinal}", "NA", "ninguno", "NA", DEFAULT_GRUPO); $msg .= "==========================================================================================\r\n"; $msg .= "==================\tAGREGADO INTERES :: RECIBO {$recibo}\r\n"; $msg .= "==========================================================================================\r\n"; $_SESSION["recibo_en_proceso"] = $recibo; //sumar sdpm del mes por cuenta $sqlSDPM = "SELECT\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`numero_de_socio`,\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`cuenta`,\n\t\t\t\t\t\t\t\tSUM(`captacion_sdpm_historico`.`dias`) AS `dias_transcurridos`,\n\t\t\t\t\t\t\t\tSUM(`captacion_sdpm_historico`.`monto`) AS `sdpm`,\n\t\t\t\t\t\t\t\tROUND( (`captacion_sdpm_historico`.`monto` / `captacion_sdpm_historico`.`dias`), 2) AS `ultimo_saldo`,\n\t\t\t\t\t\t\t\tMAX(`captacion_sdpm_historico`.`fecha`) AS 'UltimaFecha'\n\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico` `captacion_sdpm_historico` \n\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t(`captacion_sdpm_historico`.`fecha` >= '{$PFechaInicial}')\n\t\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t(`captacion_sdpm_historico`.`fecha` <= '{$PFechaFinal}')\n\t\t\t\t\t\t\t\t{$ByCuentaSDPM}\n\t\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`cuenta`,\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`ejercicio`,\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`periodo`\n\t\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t\t`captacion_sdpm_historico`.`fecha` DESC "; $rsCAP = $ql->getDataRecord($sqlSDPM); //setLog($sqlSDPM); foreach ($rsCAP as $rwC) { $socio = $rwC["numero_de_socio"]; $cuenta = $rwC["cuenta"]; $dias_de_calc = $rwC["dias_transcurridos"]; $sumaSDPM = $rwC["sdpm"]; $FechaI = $rwC["UltimaFecha"]; $promedio = $xT->cFloat($sumaSDPM / $dias_de_calc, 2); //XXX: Solucionar Tasa de Interes y hacer las rapida la consulta $xCta = new cCuentaDeCaptacion($cuenta); $xCta->init(); $subtipo = $xCta->getTipoDeSubproducto(); $tasa_nueva = obtentasa($promedio, CAPTACION_TIPO_VISTA, 0, $subtipo); $interes = $sumaSDPM * $tasa_nueva / EACP_DIAS_INTERES; $interes = $xT->cFloat($interes, 2); //agregar movimiento if ($interes > 0) { setNuevoMvto($socio, $cuenta, $recibo, $FechaI, $interes, 222, 1, "CALCULO_AUTOMATICO_DESDE_{$PFechaInicial}"); $msg .= "{$socio}\t{$cuenta}\tAGREGAR\tInteres por {$interes}, tasa {$tasa_nueva}, Promedio {$promedio}, SDPM {$sumaSDPM}, Dias {$dias_de_calc}\r\n"; } else { $msg .= "{$socio}\t{$cuenta}\tIGNORAR\tInteres por {$interes}, tasa {$tasa_nueva}, Promedio {$promedio}, SDPM {$sumaSDPM}, Dias {$dias_de_calc}\r\n"; } } } return $msg; }
$sucess = false; //Si el registros sucede entoces se sale de la programacion } else { $msg .= "\tEl Estatus Es Aceptable\r\n"; $sucess = true; } } else { $msg .= "\tLa Planeacion de un Credito con menos de " . DIAS_ESPERA_CREDITO . " Dias no Existe\r\n"; $sucess = true; } if ($sucess == true) { $PlanAnterior = $xP["idoperaciones_recibos"]; //Eliminar la Planeacion Anterior if (isset($PlanAnterior)) { $DRec = new cReciboDeOperacion(14, false, $PlanAnterior); $DRec->setNuevoRecibo($PlanAnterior); $DRec->setRevertir(); $msg .= $DRec->getMessages(); } //--------------------------------------- DATOS DEL RECIBO ----------------------------------------------- // DATOS GENERALES $fechaop = fechasys(); // fecha de la Operacion y el recibo. /* ******************************************************************************************************* Agrega el Recibo..- VALIDO SOLO PARA PLANEACION DE CREDITO **************************************************************************************************** */ $msqlf = "idoperaciones_recibos, fecha_operacion, numero_socio, docto_afectado, tipo_docto, total_operacion, observacion_recibo, tipo_pago, grupo_asociado, idusuario"; $msqlv = "{$idrecibo}, '{$fechaop}', {$presidenta}, 1, 14, 0, 'PLANEACION DE CREDITO HECHA POR {$oficial}', 'ninguno', {$idgrupo}, {$iduser}"; $sqlrec = "INSERT INTO operaciones_recibos({$msqlf}) VALUES ({$msqlv})"; // --------------------------------------- VALOR SQL DEL MVTO.------------------------------------------------------- // VALORES FIJOS
function add($observaciones, $fecha_operacion = false) { $fecha_operacion = $fecha_operacion == false ? fechasys() : $fecha_operacion; $xRecN = new cReciboDeOperacion(RECIBOS_TIPO_PLAN_DE_PAGO, true); $this->mNumeroDePlan = $xRecN->setNuevoRecibo($this->mClaveDePersona, $this->mClaveDeCredito, $fecha_operacion, 0, false, $observaciones, DEFAULT_CHEQUE, TESORERIA_COBRO_NINGUNO, DEFAULT_RECIBO_FISCAL, $this->mClaveDeGrupo); $xRecN->setNumeroDeRecibo($this->mNumeroDePlan, true); $xRecN->setDefaultEstatusOperacion(OPERACION_ESTADO_GENERADO); $this->init($this->mNumeroDePlan); //, $xRecN->getDatosInArray()); $this->mMessages .= $xRecN->getMessages(); $this->mORec = $xRecN; unset($xRecN); return $this->mNumeroDePlan; }
echo $xF->get(); //.- Agrega el Monto de Gastos de Cobranza $idsolicitud = $_POST["idsolicitud"]; $montoop = $_POST["monto_cargado"]; $idsocio = $_POST["idsocio"]; if (!isset($idsolicitud) or !isset($idsocio) or $montoop <= 0) { echo "<p class='aviso'>AGREGE UN NUMERO DE SOLICITUD. \n\n\t\t si sabe a Que Parcialidad afectara, indique el Numero\n\t\t</p>"; } else { $ulper = $_POST["idparcialidad"]; $idparcialidad = $_POST["idparcialidad"]; $iva = $_POST["iva_cargado"]; //$idsocio = mifila($sqlvs, "numero_socio"); $observaciones = $_POST["observaciones"]; $fecha = fechasys(); $cRec = new cReciboDeOperacion(97); $recibo = $cRec->setNuevoRecibo($idsocio, $idsolicitud, $fecha, $idparcialidad, 97, $observaciones); $cRec->setDefaultEstatusOperacion(40); $cRec->setNuevoMvto($fecha, $montoop, 601, $idparcialidad, $observaciones); $cRec->setNuevoMvto($fecha, $iva, 1202, $idparcialidad, $observaciones); $mSoc = new cFicha(iDE_SOCIO, $idsocio); $mSoc->setTableWidth(); $mSoc->show(); $cRec->setFinalizarRecibo(true); $cRec->getFicha(); echo "<p class='aviso'>EL MONTO DEL CARGO FUE DE: \$ " . getFMoney($montoop) . ", SE PODRA DISMUIR DESDE EL MODULO DE DESCUENTOS</p>"; echo $msg_rec_end; } ?> </body> <script > function printrec() {
//if ($key == MY_KEY) { $messages = ""; $fechaop = parametro("f", fechasys()); $xF = new cFecha(0, $fechaop); /** * Generar el Archivo HTMl del LOG * eventos-del-cierre + fecha_de_cierre + .html * */ $aliasFil = getSucursal() . "-eventos-al-cierre-de-colocacion-del-dia-{$fechaop}"; $xLog = new cFileLog($aliasFil); $ql = new MQL(); $xRec = new cReciboDeOperacion(12); $xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $fechaop, 1, 12, "CIERRE_DE_COLOCACION_{$fechaop}", DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, DEFAULT_GRUPO); $xRec->setNumeroDeRecibo($idrecibo); $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\t" . EACP_NAME . " \r\n"; $messages .= "=========================\t\t" . getSucursal() . " \r\n"; $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\tINICIANDO EL CIERRE DE COLOCACION ====================\r\n"; $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n"; //reconstruir db de pagos $ql->setRawQuery("CALL `proc_historial_de_pagos` "); $xCUtils = new cUtileriasParaCreditos(); $messages .= $xCUtils->setEstatusDeCreditos($idrecibo, $fechaop, false, true); if (date("Y-m-t", strtotime($fechaop)) == date("Y-m-d", strtotime($fechaop))) { $messages .= $xCUtils->setGenerarMvtoFinDeMes($xF->getDiaInicial(), $xF->getDiaFinal()); } if (CREDITO_CIERRE_FORZAR_DEVENGADOS == true) {
function jsaAjustarTotal($recibo, $nuevoTotal, $nuevaletra) { $xRec = new cReciboDeOperacion(false, true, $recibo); $xRec->init(); $xRec->setGenerarBancos(false); $xRec->setGenerarPoliza(false); $xRec->setGenerarTesoreria(false); $xRec->setForceUpdateSaldos(true); $total = $xRec->getTotal(); $QL = new MQL(); $DMov = new cOperaciones_mvtos(); $msg = ""; if ($nuevoTotal < $total) { $NRec = new cReciboDeOperacion($xRec->getTipoDeRecibo(), false, $recibo); $idNRec = $NRec->setNuevoRecibo($xRec->getCodigoDeSocio(), $xRec->getCodigoDeDocumento(), $xRec->getFechaDeRecibo(), 0, $xRec->getTipoDeRecibo(), "AJUSTE DEL RECIBO {$recibo}"); $NRec->setForceUpdateSaldos(true); $NRec->setGenerarBancos(false); $NRec->setGenerarPoliza(false); $NRec->setGenerarTesoreria(false); /*`idoperaciones_mvtos`, `operaciones_mvtos`.`fecha_operacion`, `operaciones_mvtos`.`fecha_afectacion`, `operaciones_mvtos`.`recibo_afectado`, `operaciones_mvtos`.`socio_afectado`, `operaciones_mvtos`.`docto_afectado`, `operaciones_mvtos`.`tipo_operacion`, `operaciones_mvtos`.`afectacion_real` */ $sql = "SELECT\n\t\t\t`operaciones_mvtos`.*\n\n\t\tFROM\n\t\t\t`operaciones_mvtos` `operaciones_mvtos` \n\t\t\t\tINNER JOIN `operaciones_tipos` `operaciones_tipos` \n\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `operaciones_tipos`.\n\t\t\t\t`idoperaciones_tipos` \n\t\tWHERE\n\t\t\t(`operaciones_mvtos`.`recibo_afectado` ={$recibo}) \n\t\tORDER BY\n\t\t\t`operaciones_mvtos`.`tipo_operacion` DESC "; $rs = $QL->getDataRecord($sql); $arrops = array(); foreach ($rs as $rw) { $DMov->setData($rw); $NMonto = $DMov->afectacion_real()->v(); $IDOpe = $DMov->idoperaciones_mvtos()->v(); if ($nuevoTotal > 0) { $nuevoTotal -= $NMonto; $msg .= $IDOpe . " \t {$nuevoTotal} DE {$NMonto}\r\n"; if ($nuevoTotal < 0) { $msg .= "CUADRAR {$NMonto} DE {$nuevoTotal} \r\n"; $nuevoTotal = $nuevoTotal * -1; $dif = $NMonto - $nuevoTotal; $sql = "UPDATE operaciones_mvtos \n\t\t\t\t\t\t\tSET afectacion_real={$dif}, afectacion_cobranza={$dif}, afectacion_contable={$dif},\n\t\t\t\t\t\t\tafectacion_estadistica={$dif} WHERE idoperaciones_mvtos={$IDOpe} "; $x = my_query($sql); $msg .= $x[SYS_INFO]; //agregar el movimiento al nuevo recibo con cargos $NRec->setNuevoMvto($DMov->fecha_operacion()->v(), $nuevoTotal, $DMov->tipo_operacion()->v(), $DMov->periodo_socio()->v(), "SEPARACION DEL MVTO {$IDOpe} {$nuevoTotal}", $DMov->valor_afectacion()->v(), false, $DMov->socio_afectado()->v(), $DMov->docto_afectado()->v(), $DMov->fecha_afectacion()->v(), $DMov->fecha_vcto()->v(), $DMov->saldo_anterior()->v(), $DMov->saldo_actual()->v()); //listo $nuevoTotal = 0; } } else { $arrops[$DMov->idoperaciones_mvtos()->v()] = $DMov->afectacion_real()->v(); } } //$total = $total * -1; foreach ($arrops as $operacion => $monto) { $x = my_query("UPDATE operaciones_mvtos SET recibo_afectado={$idNRec} WHERE idoperaciones_mvtos={$operacion}"); //100 - 50 //$dif = $monto - $total; $msg .= $x[SYS_INFO]; } $NRec->setFinalizarRecibo(true); $msg .= $NRec->getMessages(OUT_TXT); $xRec->setFinalizarRecibo(true); } else { $msg .= "WARN\tNO SE MODIFICA NADA({$nuevoTotal}|{$total})\r\n"; } $msg .= $xRec->getMessages(OUT_TXT); return $msg; }