"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_scb = new class_funciones_banco(); $io_fun_scb->uf_load_seguridad("SCB","sigesp_scb_p_liquidacion_creditos.php",$ls_permisos,$la_seguridad,$la_permisos); function uf_limpiar_variables() { ////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiar_variables. // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Néstor Falcón. // Fecha Creación: 22/07/2007 Fecha Última Modificación : 22/07/2008. //////////////////////////////////////////////////////////////////////////////////// global $ls_codban,$ls_nomban,$ls_ctaban,$ls_denctaban,$ls_numdoc,$io_fun_scb,$ls_operacion,$ls_cedben,$ls_nomben,$ls_fecmov; global $ld_mondoc,$ls_rutfil,$la_object,$li_totrows,$la_rowgri,$ls_codope,$ls_scgcta,$li_totrowscg,$la_objscg,$la_titscg; global $ls_chevau,$ls_conmov,$ls_disabled,$ls_docnum,$ls_nombenalt,$ld_monret,$li_estciespg,$li_estciespi,$li_estciescg; $ls_codban = ""; $ls_nomban = ""; $ls_ctaban = ""; $ls_denctaban = ""; $ls_fecmov = ""; $ls_cedben = ""; $ls_nomben = $ls_nombenalt = ""; $ls_numdoc = $ls_docnum = ""; $ls_codope = ""; $ls_scgcta = ""; $ld_mondoc = "0,00"; $ls_filnam = ""; $ls_conmov = ""; $ls_chevau = ""; $ls_disabled = "disabled"; $li_filsel = $ld_monret = 0; $li_totrows = $li_totrowscg = 1; $ls_rutfil = "../scc/liquidacion/pendientes"; $la_rowgri[1] = "Cuenta"; $la_rowgri[2] = "Denominación"; $la_rowgri[3] = "Estructura Presupuestaria"; $la_rowgri[4] = "Tipo"; $la_rowgri[5] = "Monto"; $la_titscg[1] = "Cuenta"; $la_titscg[2] = "Denominación"; $la_titscg[3] = "Debe/Haber"; $la_titscg[4] = "Monto"; $ls_operacion = $io_fun_scb->uf_obteneroperacion(); if (isset($la_object) || !empty($la_object)) { unset($la_object); } if (isset($la_objscg) || !empty($la_objscg)) { unset($la_objscg); } if ($ls_operacion=="NUEVO") { $la_object[$li_totrows][1] = ""; $la_object[$li_totrows][2] = ""; $la_object[$li_totrows][3] = ""; $la_object[$li_totrows][4] = ""; $la_object[$li_totrows][5] = " "; $la_objscg[$li_totrows][1] = ""; $la_objscg[$li_totrows][2] = ""; $la_objscg[$li_totrows][3] = ""; $la_objscg[$li_totrows][4] = " "; } $li_estciespg = $io_fun_scb->uf_load_estatus_cierre($li_estciespi,$li_estciescg); if ($li_estciescg==1 || $li_estciespg==1 || $li_estciespi==1) { require_once("../shared/class_folder/class_mensajes.php"); $io_msg = new class_mensajes(); $io_msg->message("Ya fué procesado el Cierre Presupuestario, No pueden efectuarse movimientos, Contacte al Administrador del Sistema !!!"); unset($io_msg); } } function uf_clear_grid() { ////////////////////////////////////////////////////////////////////////////// // Function: uf_clear_grid. // Access: private // Description: Función que limpia los grid de Detalles. // Creado Por: Ing. Néstor Falcón. // Fecha Creación: 22/07/2007 Fecha Última Modificación : 22/07/2008. //////////////////////////////////////////////////////////////////////////////////// global $la_object,$la_objscg,$li_totrows,$li_totrowscg; $li_totrows = $li_totrowscg = 1; $la_object[$li_totrows][1] = ""; $la_object[$li_totrows][2] = ""; $la_object[$li_totrows][3] = ""; $la_object[$li_totrows][4] = ""; $la_object[$li_totrows][5] = " "; $la_objscg[$li_totrowscg][1] = ""; $la_objscg[$li_totrowscg][2] = ""; $la_objscg[$li_totrowscg][3] = ""; $la_objscg[$li_totrowscg][4] = " "; } function uf_load_variables($aa_seguridad) { ////////////////////////////////////////////////////////////////////////////// // Function: uf_load_variables // Access: private // Description: Función que carga todas las variables necesarias en la página // Creado Por: Ing. Néstor Falcón. // Fecha Creación: 22/07/2007 Fecha Última Modificación : 22/07/2007. ////////////////////////////////////////////////////////////////////////////// global $li_totrows,$ls_filnam,$ls_numdoc,$ls_codban,$ls_ctaban,$ls_nomban,$ls_denctaban,$ls_cedben,$ls_nomben,$ls_docnum; global $ls_nombenalt,$ls_codope,$ls_scgcta,$ls_fecmov,$ld_mondoc,$li_totrowscg,$ls_conmov,$ls_disabled,$io_fun_scb,$ls_chevau; global $lb_existe,$ld_monret; $ls_codban = $_POST["txtcodban"]; $ls_nomban = $_POST["txtnomban"]; $ls_ctaban = $_POST["txtctaban"]; $ls_denctaban = $_POST["txtdenctaban"]; $ls_cedben = $_POST["txtcedben"]; $ls_nomben = $_POST["txtnomben"]; $ls_nombenalt = $_POST["hidnombenalt"]; $ls_numdoc = $_POST["txtnumdoc"]; $ls_docnum = $_POST["hiddocnum"]; $ls_filnam = $_POST["hidfilnam"]; $li_totrows = $_POST["hidtotrow"]; $li_totrowscg = $_POST["hidtotrowscg"]; $ls_codope = $_POST["hidcodope"]; $ld_monret = $_POST["hidmonret"]; $lb_existe = false; if ($ls_codope=='CH') { require_once("sigesp_scb_c_movbanco.php"); $io_movbco = new sigesp_scb_c_movbanco($aa_seguridad); $ls_disabled = ""; $ls_operacion = $io_fun_scb->uf_obteneroperacion(); if ($ls_operacion=='CARGAR_DT') { $ls_chevau = $io_movbco->uf_generar_voucher($_SESSION["la_empresa"]["codemp"]); } elseif($ls_operacion=='PROCESAR') { $ls_chevau = $_POST["txtchevau"]; $lb_existe = $io_movbco->uf_select_voucher($ls_chevau); if ($lb_existe) { require_once("../shared/class_folder/class_mensajes.php"); $io_msg = new class_mensajes(); $io_msg->message("Nº de Voucher ya existe, favor indicar otro"); unset($io_msg); } } unset($io_movbco); } else { $ls_disabled = "disabled"; } $ls_fecmov = $_POST["txtfecmov"]; $ld_mondoc = $_POST["txtmonmov"]; $ls_conmov = $_POST["txtconmov"]; $ls_scgcta = $_POST["hidscgcta"];//Cuenta Contable asociada a la Cuenta Bancaria. $li_estciespg = $_POST["hidestciespg"];//Estatus del Cierre Presupuestario de Gasto. $li_estciespi = $_POST["hidestciespi"];//Estatus del Cierre Presupuestario de Ingresos. } function uf_load_grid($ai_totrows,&$la_object,$ai_totrowscg,&$la_objscg) { ////////////////////////////////////////////////////////////////////////////// // Function: uf_load_grid // Access: private // Description: Función que carga todo el objeto grid. // Creado Por: Ing. Néstor Falcón. // Fecha Creación: 08/07/2007 Fecha Última Modificación : 08/07/2007. ////////////////////////////////////////////////////////////////////////////// for ($li_i=1;$li_i<=$ai_totrows;$li_i++) { $ls_spgcta = $_POST["txtspgcta".$li_i]; $ls_codestpro = $_POST["txtcodestpro".$li_i]; $ls_estcla = $_POST["txtcodtipest".$li_i]; $ls_denctaspg = $_POST["txtdenctaspg".$li_i]; $ld_mondetspg = $_POST["txtmondetspg".$li_i]; $ls_codestpre = $_POST["hidcodestpre".$li_i]; $la_object[$li_i][1] = ""; $la_object[$li_i][2] = ""; $la_object[$li_i][3] = ""; $la_object[$li_i][4] = ""; $la_object[$li_i][5] = " "; } for ($li_y=1;$li_y<=$ai_totrowscg;$li_y++) { $ls_scgcta = $_POST["txtscgcta".$li_y]; $ls_denctascg = $_POST["txtdenscgcta".$li_y]; $ls_debhab = $_POST["txtdebhab".$li_y]; $ld_mondetscg = $_POST["txtmonscg".$li_y]; $la_objscg[$li_y][1] = ""; $la_objscg[$li_y][2] = ""; $la_objscg[$li_y][3] = ""; $la_objscg[$li_y][4] = ""; } } $li_diasem = date('w'); switch ($li_diasem){ case '0': $ls_diasem='Domingo'; break; case '1': $ls_diasem='Lunes'; break; case '2': $ls_diasem='Martes'; break; case '3': $ls_diasem='Miércoles'; break; case '4': $ls_diasem='Jueves'; break; case '5': $ls_diasem='Viernes'; break; case '6': $ls_diasem='Sábado'; break; } ?> Liquidación de Créditos
Caja y Banco
 
Guardar
Salir
  

 

uf_load_detalles_spg($ls_rutfil.'/'.$ls_filnam,$li_totrows,$la_datscg,$ld_montotspg); if (!empty($la_datscg) && !empty($la_object)) { $la_objscg = $io_scb->uf_print_detalles_scg($ls_rutfil.'/'.$ls_filnam,$la_datscg,$li_totrowscg,$ls_codope,$ls_codban,$ls_ctaban,$ls_scgcta,$ld_montotspg,$ld_monret); if ($li_totrowscg<2) { uf_limpiar_variables(); uf_clear_grid(); } } else { uf_limpiar_variables(); uf_clear_grid(); } break; case 'PROCESAR': uf_load_variables($la_seguridad); uf_load_grid($li_totrows,$la_object,$li_totrowscg,$la_objscg); $la_datos["codban"] = $ls_codban; $la_datos["ctaban"] = $ls_ctaban; $la_datos["numdoc"] = $ls_numdoc; $la_datos["codope"] = $ls_codope; $la_datos["cedben"] = $ls_cedben; $la_datos["nomben"] = $ls_nomben; $la_datos["nombenalt"] = $ls_nombenalt; $la_datos["fecmov"] = $ls_fecmov; $la_datos["mondoc"] = $ld_mondoc; $la_datos["conmov"] = $ls_conmov; $la_datos["chevau"] = $ls_chevau; $la_datos["docnum"] = $ls_docnum; $la_datos["monret"] = $ld_monret; if (!$lb_existe) { $lb_valido = $io_scb->uf_procesar_liquidacion($ls_rutfil.'/'.$ls_filnam,$la_datos,$li_totrows,$li_totrowscg,$la_seguridad); if ($lb_valido) { uf_limpiar_variables(); uf_clear_grid(); } } break; } ?>
uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_scb); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>
Liquidación de Créditos
 
Banco
Cuenta
Documento   Voucher
Fecha   Monto
Beneficiario
Concepto
 
make_gridScroll($li_totrows,$la_rowgri,$la_object,750,'Detalle Presupuestario',"grid_dtspg",100); ?>
 
make_gridScroll($li_totrowscg,$la_titscg,$la_objscg,750,'Detalle Contable',"grid_dtscg",100); ?>