} 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> <script > function jsPrintIDE() { var elUrl = "../rpt_formatos/recibo.rpt.php?recibo=<?php
function setDeposito($monto, $cheque = DEFAULT_CHEQUE, $tipo_de_pago = "cheque", $recibo_fiscal = "NA", $observaciones = "", $grupo = DEFAULT_GRUPO, $fecha = false, $recibo = false) { if ($monto > 0) { if (setNoMenorQueCero($this->mPeriodoCuenta) == 0) { $this->mPeriodoCuenta = 1; } if (setNoMenorQueCero($this->mSocioTitular) <= DEFAULT_SOCIO) { $this->init(); } if ($grupo == DEFAULT_GRUPO) { $grupo = $this->mGrupoAsociado; } //Corregir la fecha si no existe if ($fecha == false) { if (isset($this->mFechaOperacion) and $this->mFechaOperacion != false) { $fecha = $this->mFechaOperacion; } else { $fecha = fechasys(); } } $this->mFechaOperacion = $fecha; $socio = $this->mSocioTitular; $CRecibo = new cReciboDeOperacion(7, true); //Agregar recibo si no hay if (setNoMenorQueCero($recibo) == 0) { $recibo = $CRecibo->setNuevoRecibo($socio, $this->mNumeroCuenta, $this->mFechaOperacion, $this->mPeriodoCuenta, 7, $observaciones, $cheque, $tipo_de_pago, $recibo_fiscal, $grupo); //Checar si se agrego el recibo if (setNoMenorQueCero($recibo) == 0) { $this->mMessages .= "OK\tSe Agrego Exitosamente el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " de fecha {$fecha} \r\n"; $this->mReciboDeOperacion = $recibo; $this->mSucess = true; } else { $this->mMessages .= "ERROR\tSe Fallo al Agregar el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " de Fecha {$fecha}\r\n"; $this->mSucess = false; } } $this->mReciboDeOperacion = $recibo; if (setNoMenorQueCero($recibo) > 0) { //Agregar el Movimiento $CRecibo->setNuevoMvto($fecha, $monto, $this->mOperacionDeposito, $this->mPeriodoCuenta, $observaciones, 1, TM_ABONO, $socio, $this->mNumeroCuenta); $CRecibo->addMvtoContableByTipoDePago(); $CRecibo->setFinalizarRecibo(true); $CRecibo->setFinalizarTesoreria(); $this->mNuevoSaldo = $this->mSaldoAnterior + $monto; $this->mMessages .= $CRecibo->getMessages(); $this->mSucess = true; //Actualizar la Cuenta $this->setUpdateSaldo(); } else { $this->mMessages .= "ERROR\tNo Existe Recibo con el cual trabajar({$recibo}) \r\n"; } $this->mMessages .= $CRecibo->getMessages(); } return $recibo; }
$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> </html>
$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); // } ?> </body> <script > var wFrm = document.frminteresant;
$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); $xFL->setClose(); $xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", "")); }