function getReciboDesc($numero) { if (isset($numero) and $numero != 0) { $cRec = new cReciboDeOperacion(false, false, $numero); $cRec->setNumeroDeRecibo($numero, true); $d = $cRec->getDatosInArray(); $desRec = $cRec->getDescripcion(); $tab = new TinyAjaxBehavior(); $tab->add(TabSetValue::getBehavior("txtDescRecibo", $desRec)); return $tab->getString(); } }
$xHP->addJsFile("../js/tinybox.js"); $oficial = elusuario($iduser); $xT = new cTipos(); $xFRM = new cHForm("frmrecibo"); $xF = new cFecha(); $recibo = parametro("recibo", false); $xQl = new MQL(); echo $xHP->getHeader(); if ($recibo == false) { header("location:../404.php?i=" . DEFAULT_CODIGO_DE_ERROR); } $arrQ = array("aumento" => 1, "disminucion" => -1, "ninguna" => 0); //capturar datos del recibo $xRec = new cReciboDeOperacion(false, false, $recibo); $xRec->init(); $DRec = $xRec->getDatosInArray(); $idsocio = $xRec->getCodigoDeSocio(); // $DRec["numero_socio"]; $numero_de_socio = $xRec->getCodigoDeSocio(); //$DRec["numero_socio"]; $afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]]; //datos del socio $cSoc = new cSocio($numero_de_socio); $DSoc = $cSoc->getDatosInArray(); $numero_caja_local = $DSoc["cajalocal"]; $cCL = new cCajaLocal($numero_caja_local); $caja_local = $cCL->getNombre(); $variable_nombre_del_socio = $idsocio == DEFAULT_SOCIO ? $DRec["cadena_distributiva"] : $cSoc->getNombreCompleto(); $tipo_de_pago = $xRec->getTipoDePago(); //$variable_nombre_del_cajero //
/** * Agrega una operacion a tesoreria * @param integer $recibo Numero de recibo * */ function addOperacion($recibo, $tipoDeExposicion, $MontoRecibido, $MontoOperacion = 0, $MontoCambio = 0, $banco = FALLBACK_CLAVE_DE_BANCO, $cheque = "", $CuentaBancaria = 0, $DocumentoDescontado = 0, $Observaciones = "", $fecha = false, $hora = false, $moneda = false, $monto_original = 0, $persona = false, $documento = false, $transaccion = SYS_NINGUNO) { $sucess = false; $fecha = $fecha == false ? fechasys() : $fecha; $arrQ = array("aumento" => 1, "disminucion" => -1, "ninguna" => 0); $xF = new cFecha(0, $fecha); $xT = new cTipos(); $fecha = $xF->get(); $hora = $hora == false ? date("H:i:s") : $hora; $CodigoDeCaja = $this->getKey(); $cajero = $this->mCajero; $banco = setNoMenorQueCero($banco) <= 0 ? FALLBACK_CLAVE_DE_BANCO : $banco; $this->mMoneda = $this->mMoneda == "" ? AML_CLAVE_MONEDA_LOCAL : $this->mMoneda; if ($moneda == false or $moneda == AML_CLAVE_MONEDA_LOCAL) { $moneda = $this->mMoneda != AML_CLAVE_MONEDA_LOCAL ? $this->mMoneda : AML_CLAVE_MONEDA_LOCAL; } //$monto_original = setNoMenorQueCero($monto_original); $monto_original = $monto_original == 0 ? $this->mMontoOrigen : $monto_original; $xRec = new cReciboDeOperacion(false, false, $recibo); $xRec->init(); $DRec = $xRec->getDatosInArray(); $persona = ($persona == false or $persona == "") ? DEFAULT_SOCIO : $persona; $documento = $documento == false ? $xRec->getCodigoDeDocumento() : $documento; $afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]]; $MontoOperacion = $MontoOperacion == 0 ? $DRec["total_operacion"] : $MontoOperacion; $MontoCambio = $MontoCambio == 0 ? $MontoRecibido - $MontoOperacion : $MontoCambio; //Obtener Banco $pais = EACP_CLAVE_DE_PAIS; $eacp = EACP_CLAVE; $sucursal = getSucursal(); if ($banco == FALLBACK_CLAVE_DE_BANCO and $CuentaBancaria > 0) { $xCta = new cCuentaBancaria($CuentaBancaria); $xCta->init(); $banco = $xCta->getClaveDeBanco(); $pais = $xCta->getPaisDeOrigen(); } $xBanco = new cBancos_entidades(); $xBanco->setData($xBanco->query()->initByID($banco)); $pais = $xBanco->pais_de_origen()->v(); //Actualizar Moneda por pais if ($banco != FALLBACK_CLAVE_DE_BANCO) { $moneda2 = mifila("SELECT clave_de_moneda FROM `tesoreria_monedas` WHERE `pais_de_origen` ='{$pais}' LIMIT 0,1 ", "clave_de_moneda"); if ($moneda2 === 0) { } else { $moneda = $moneda2; } } $xTes = new cTesoreria_cajas_movimientos(); $xTes->banco($banco); $xTes->codigo_de_caja($CodigoDeCaja); $xTes->cuenta_bancaria($CuentaBancaria); $xTes->documento($documento); $xTes->documento_descontado($DocumentoDescontado); $xTes->eacp(EACP_CLAVE); $xTes->fecha($fecha); $xTes->hora($hora); $xTes->idtesoreria_cajas_movimientos($xTes->query()->getLastID()); $xTes->idusuario($cajero); $xTes->moneda_de_operacion($moneda); if ($moneda != AML_CLAVE_MONEDA_LOCAL) { } //EVALUAR MONEDA $xTes->monto_del_movimiento($MontoOperacion); $xTes->monto_en_cambio($MontoCambio); $xTes->monto_recibido($MontoRecibido); $xTes->numero_de_cheque($cheque); $xTes->observaciones($Observaciones); $xTes->recibo($recibo); $xTes->sucursal($sucursal); $xTes->tipo_de_exposicion($tipoDeExposicion); $xTes->tipo_de_movimiento($afectaCaja); $xTes->unidades_de_moneda(setNoMenorQueCero($monto_original)); $xTes->persona($persona); $sucess = $xT->getEvalNotNull(array($cajero, $CodigoDeCaja)); if ($sucess == true) { $q = $xTes->query()->insert(); $id = $q->save(); $sucess = $id == false ? false : true; if ($sucess == true) { $this->mMessages .= "OK\tRegistro Agregado exitosamente, relacionado con el Recibo {$recibo}, Operacion {$id} ({$moneda}|{$monto_original}|{$cheque}|{$tipoDeExposicion}|{$transaccion})\r\n"; //Agregar recibo $xRec->setDatosDePago($moneda, $monto_original, $cheque, $tipoDeExposicion, $transaccion); $this->mMessages .= $xRec->getMessages(OUT_TXT); } else { if (MODO_DEBUG == true) { $this->mMessages .= $q->getMessages(OUT_TXT); } } } else { $this->mMessages .= "ERROR\tSe produjo un error al Agregar la Operacion de Tesoreria({$cajero}, {$CodigoDeCaja})\r\n"; } return $sucess; }
function Common_c5fe0408555dbf392918c6f77a4d01b2($params) { $stdDiv = STD_LITERAL_DIVISOR; $DPar = explode($stdDiv, $params, 10); //mensajes //grupo $xTip = new cTipos(); // $socio = $xTip->cInt($DPar[0]); $credito = $xTip->cInt($DPar[1]); $letra = $xTip->cInt($DPar[2]); $capital = $xTip->cFloat($DPar[3]); $interes = $xTip->cFloat($DPar[4]); $iva = $xTip->cFloat($DPar[5]); $ahorro = $xTip->cFloat($DPar[6]); $nota = $xTip->cChar($DPar[7]); $numero = $xTip->cInt($DPar[8]); $limit = $xTip->cInt($DPar[9]); $msg = "====================== MOVIMIENTO {$numero} DE {$limit} ====================\r\n"; //Datos del Credito $Cred = new cCredito($credito, $socio); $Cred->initCredito(); $DCred = $Cred->getDatosDeCredito(); $saldo = $DCred["saldo_actual"] - $capital; $contrato_captacion = $DCred["contrato_corriente_relacionado"]; $grupo = $DCred["grupo_asociado"]; $msg .= $Cred->getMessages(); if (isset($_SESSION["recibo_en_proceso"])) { $recibo = $_SESSION["recibo_en_proceso"]; $fecha = fechasys(); $_SESSION["total_recibo_en_proceso"] += $capital + $interes + $ahorro; $xRec = new cReciboDeOperacion(200, false, $recibo); $xRec->setNumeroDeRecibo($recibo, true); $xRec->setNumeroDeRecibo($recibo, true); $DRec = $xRec->getDatosInArray(); $cheque = $DRec["cheque_afectador"]; $tipopago = $DRec["tipo_pago"]; $recibofiscal = $DRec["recibo_fiscal"]; $xRec->setGenerarPoliza(); $msg .= "{$socio}\t{$credito}\tCREDITO\tMovimiento {$i} del Credito {$credito} del Socio {$socio} con Saldo {$saldo}\r\n "; $msg .= "{$socio}\t{$credito}\tMONTOS\tCapital: {$capital} || Interes: {$interes} || Ahorro: {$ahorro} \r\n"; //Agregando Capital if ($capital > 0) { $xRec->setNuevoMvto($fecha, $capital, 120, $letra, $nota . ";SDO:" . $saldo, 1, TM_ABONO, $socio, $credito); $arrCred = array("saldo_actual" => $saldo); $Cred->setUpdate($arrCred); } //Agregando Interes if ($interes > 0) { $xRec->setNuevoMvto($fecha, $interes, 140, $letra, $nota, 1, TM_ABONO, $socio, $credito); } //agregando el IVA if ($interes > 0) { $xRec->setNuevoMvto($fecha, $iva, 151, $letra, $nota, 1, TM_ABONO, $socio, $credito); } //Agregando Ahorro if ($ahorro > 0) { $xC = new cCuentaALaVista($contrato_captacion); if (!isset($contrato_captacion) or $contrato_captacion == CTA_GLOBAL_CORRIENTE or $contrato_captacion == 0) { $contrato_captacion = $xC->setNuevaCuenta(2, 1, $socio, "CUENTA_AUTOMATICA", $credito); $msg .= "{$socio}\t{$credito}\tNuevaCta\tse dio de alta a la cuenta {$contrato_captacion}\r\n"; //2011-nov-30 se agrego la actualizacion del contrato relacionado $arrCred = array("contrato_corriente_relacionado" => $contrato_captacion); $Cred->setUpdate($arrCred); } $xC = new cCuentaALaVista($contrato_captacion); $xC->setSocioTitular($socio); $xC->setReciboDeOperacion($recibo); $xC->setDeposito($ahorro, $cheque, $tipopago, $recibofiscal, $nota, $grupo, $fecha, $recibo); $msg .= $xC->getMessages("txt"); $msg .= "{$socio}\t{$credito}\tAhorro\t El Saldo Quedo en " . $xC->getNuevoSaldo() . "\r\n"; } $msg .= "{$socio}\t{$credito}\tObservacion\t {$nota}\r\n"; $msg .= $xRec->getMessages("txt"); } else { $msg .= "NO_SE_HA_DEFINIDO_UN_RECIBO"; } $xLog = new cFileLog("log_de_recibo_" . $recibo); $xLog->setWrite($msg); $xLog->setClose(); $MsgEnd = ""; if ($numero == $limit) { $xRec->setForceUpdateSaldos(); $xRec->setFinalizarRecibo(true); //$MsgEnd .= "**** proceso terminado ****"; } //retorna el id del control de origen para neutralizar return "-{$numero}"; }
function Common_c8581154ac4e27cb0e122d71341dd7d8($strCmd) { $DPar = explode(STD_LITERAL_DIVISOR, $strCmd); $xTip = new cTipos(); // $socio = $xTip->cInt($DPar[0]); $cuenta = $xTip->cInt($DPar[1]); $deposito = $xTip->cFloat($DPar[2]); $retiro = $xTip->cFloat($DPar[3]); $nota = $xTip->cChar($DPar[4]); $numero = $xTip->cInt($DPar[5]); $limit = $xTip->cInt($DPar[6]); if (isset($_SESSION["recibo_en_proceso"])) { $recibo = $_SESSION["recibo_en_proceso"]; $fecha = fechasys(); $_SESSION["total_recibo_en_proceso"] += $deposito - $retiro; $xRec = new cReciboDeOperacion(200, false, $recibo); $xRec->setNumeroDeRecibo($recibo, true); $DRec = $xRec->getDatosInArray(); $cheque = $DRec["cheque_afectador"]; $tipopago = $DRec["tipo_pago"]; $recibofiscal = $DRec["recibo_fiscal"]; if ($deposito > 0 or $retiro > 0) { $xC = new cCuentaALaVista($cuenta); $grupo = DEFAULT_GRUPO; $xC->setSocioTitular($socio); $xC->setReciboDeOperacion($recibo); if ($deposito > 0) { $xC->setDeposito($deposito, $cheque, $tipopago, $recibofiscal, $nota, $grupo, $fecha, $recibo); } if ($retiro > 0) { $xC->setRetiro($retiro, $cheque, $tipopago, $recibofiscal, $nota, $grupo, $fecha, $recibo); } } if ($numero == $limit) { $xRec->setForceUpdateSaldos(); $xRec->setFinalizarRecibo(true); //$MsgEnd .= "**** proceso terminado ****"; } } //retorna el id del control de origen para neutralizar return "-{$numero}"; }