<?php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr = $_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_disponibilidad.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte = $io_fun_banco->uf_select_config("SCB","REPORTE","DISPONIBILIDAD_FINANCIERA","sigesp_scb_rpp_disponibilidad_pdf.php","C");//print $ls_reporte; $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; }
$ls_codconmov=$_GET["codconmov"]; $ls_estreglib=$_GET["tip_mov"]; $ls_estdoc =$_GET["estdoc"]; $ls_codfuefin =$_GET["codfuefin"]; $ls_codtipfon = $_GET["codtipfon"]; $ls_numordpagmin = $_GET["numordpagmin"]; } if($ls_codfuefin=="") { $ls_codfuefin="--"; } $ls_empresa=$la_emp["codemp"]; $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB",$ls_opener,$ls_permisos,&$la_seguridad,$la_permisos); $title[1]="Check"; $title[2]="Documento"; $title[3]="Denominación"; $title[4]="Monto Obj.Ret."; $title[5]="Monto Ret."; $title[6]="Monto Deducible"; $title[7]="ISLR"; $grid1="grid"; $totrow=0; $ldec_totret=0; if($ls_operacion=="") { $ls_codemp=$la_emp["codemp"]; $ls_sql=" SELECT * FROM sigesp_deducciones"; $rs=$io_sql->select($ls_sql); if($rs===false) { $io_msg->message($fun->uf_convertirmsg($io_sql->message)); } else
<?Php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr = $_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_relacion_sel_chq.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte = $io_fun_banco->uf_select_config("SCB","REPORTE","RELACION_CHEQUE","sigesp_scb_rpp_relacion_chq.php","C"); $ls_reporte2 = $io_fun_banco->uf_select_config("SCB","REPORTE","CHEQUE_VOUCHER","sigesp_scb_rpp_voucher_pdf.php","C"); $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; }
$ls_codconmov=$_GET["codconmov"]; $ls_estreglib=$_GET["tip_mov"]; $ls_opener =$_GET["opener"]; $ls_estdoc =$_GET["estdoc"]; $ls_codfuefin =$_GET["codfuefin"]; $ls_anticipo= $_GET["anticipo"]; $ls_codtipfon = $_GET["codtipfon"]; $ls_numordpagmin = $_GET["numordpagmin"]; } if($ls_codfuefin=="") { $ls_codfuefin="--"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB",$ls_opener,$ls_permisos,&$la_seguridad,$la_permisos); require_once("sigesp_scb_c_movbanco.php"); $in_classmovbanco=new sigesp_scb_c_movbanco($la_seguridad); if(($ls_codope=="ND")||($ls_codope=="RE")||($ls_codope=="CH")) { $ls_operacioncon="H"; $lb_seldeb="selected"; $lb_selhab=""; } else { $ls_operacioncon="D"; $lb_seldeb="";
<?php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr = $_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_chq_custodia_entregados.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
</head> <body> <form name="form1" method="post" action=""> <p align="center"> <input name="operacion" type="hidden" id="operacion"> </p> <table width="500" border="0" align="center" cellpadding="1" cellspacing="1"> <tr> <td width="500" height="20" colspan="2" class="titulo-ventana">Explorar Archivos TXT </td> </tr> </table> <br> <?php require_once("class_funciones_banco.php"); $io_fun_banco=new class_funciones_banco(); $ls_ruta=$_GET["ruta"]; $ls_file=$io_fun_banco->uf_obtenervalor_get("file",""); if($ls_file!="") { @unlink($ls_ruta."/".$ls_file); } uf_print($ls_ruta); unset($io_fun_banco); ?> <br> </div> </form> <p> </p> <p> </p>
<?Php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr = $_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_list_doc_conciliados.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
$documento=$_GET["docum"]; $montret=$_GET["montret"]; $ls_mov_operacion=$_GET["mov_operacion"]; $ldec_monobjret=$_GET["montobjret"]; $ld_fecha=$_GET["fecha"]; $ls_desmov=$_GET["dencon"]; $ls_codconmov=$_GET["codmov"]; $ls_desproben=$_GET["desproben"]; $ls_mov_operacion=$_GET["mov_operacion"]; $ls_chevau=$_GET["chevau"]; $ls_estmov=$_GET["estmov"]; $ls_codfuefin=$_GET["fuente"]; $ls_valido=false; } require_once("class_funciones_banco.php"); $io_scb= new class_funciones_banco(); $io_scb->uf_load_seguridad("SCB","sigesp_scb_p_emision_chq.php",$ls_permisos,$la_seguridad,$la_permisos); require_once("sigesp_scb_c_movbanco.php"); $in_classmovbanco=new sigesp_scb_c_movbanco($la_seguridad); function uf_print(&$totrow, $provbene, $tipproben) { require_once("../shared/class_folder/grid_param.php"); require_once("../shared/class_folder/sigesp_include.php"); require_once("../shared/class_folder/class_sql.php"); require_once("../shared/class_folder/class_funciones.php"); $in = new sigesp_include(); $con = $in->uf_conectar(); $io_msg = new class_mensajes(); $io_sql = new class_sql($con); $io_funcion = new class_funciones();
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_cmp_ret_mun_otros.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
require_once("../shared/class_folder/ddlb_operaciones_spi.php"); require_once("../shared/class_folder/ddlb_conceptos.php"); require_once("../shared/class_folder/grid_param.php"); require_once("class_funciones_banco.php"); require_once("class_folder/sigesp_scb_c_disponibilidad_financiera.php"); $msg = new class_mensajes(); $fun = new class_funciones(); $sig_inc = new sigesp_include(); $con = $sig_inc->uf_conectar(); $obj_spg = new ddlb_operaciones_spg($con); $io_function_db = new class_funciones_db($con); $obj_spi = new ddlb_operaciones_spi($con); $obj_con = new ddlb_conceptos($con); $io_grid = new grid_param(); $funciones_banco= new class_funciones_banco(); $io_disfin = new sigesp_scb_c_disponibilidad_financiera("../"); $ls_tipvaldis = $io_disfin->uf_load_tipo_validacion(); $ls_empresa = $_SESSION["la_empresa"]["codemp"]; $as_estmodest = $_SESSION["la_empresa"]["estmodest"]; $li_estciespg = $io_fun_banco->uf_load_estatus_cierre($li_estciespi,$li_estciescg); $li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"]; $li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"]; $li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"]; $li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"]; $li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"]; require_once("sigesp_scb_c_movbanco.php"); $in_classmovbco=new sigesp_scb_c_movbanco($la_seguridad); require_once("sigesp_scb_c_config.php");
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $dat=$_SESSION["la_empresa"]; require_once("class_funciones_banco.php"); $io_fun_banco = new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_concilerror.php",$ls_permisos,&$la_seguridad,$la_permisos); if( array_key_exists("operacion",$_POST)) { $ls_nombre=$_POST["nombre"]; $ls_mesano=$_POST["mesano"]; $ls_tip_mov=$_POST["tip_mov"]; } else { $ls_nombre=$_GET["nombre"]; $ls_tip_mov=$_GET["tip_mov"]; $ls_codban=$_GET["txtcodban"]; $ls_denban=$_GET["txtdenban"]; $ls_cuenta_banco=$_GET["txtcuenta"]; $ls_dencuenta_banco=$_GET["txtdenominacion"]; $ls_cuenta_scg=$_GET["txtcuenta_scg"]; $ldec_disponible=$_GET["txtdisponible"]; $ls_mesano=$_GET["mesano"];
<?php session_start(); require_once "../../shared/class_folder/grid_param.php"; $io_grid = new grid_param(); require_once "../class_funciones_banco.php"; $io_funciones_scb = new class_funciones_banco("../../"); // Tipo del catalogo que se requiere pintar $ls_origen = uf_obtenervalor("origen", ""); $ls_catalogo = uf_obtenervalor("catalogo", ""); switch ($ls_catalogo) { case "RETENCIONIVA": uf_print_retencioniva(); break; case "PROVEEDOR": uf_print_proveedor(); break; case "BENEFICIARIO": uf_print_beneficiario(); break; case "SOLICITUDPAGO": uf_print_solicitudespago(); break; case "OTROSCREDITOS": uf_print_otroscreditos(); break; case "DEDUCCIONES": uf_print_deducciones(); break; case "ORDENESMINISTERIO": uf_print_ordenespago($ls_origen);
<?php session_start(); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_ano=date('Y'); $ls_mes=date('m'); $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_retencionesislr.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte=$io_fun_banco->uf_select_config("CXP","REPORTE","FORMATO_ISLR","sigesp_cxp_rpp_retencionislr.php","C"); $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';
<?php session_start(); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco=new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_declaracionxml.php",$ls_permisos,$la_seguridad,$la_permisos); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// //-------------------------------------------------------------- function uf_limpiarvariables() { ////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiarvariables // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang // Fecha Creación: 17/03/2007 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////// global $io_fun_banco,$ls_operacion,$ls_codtipsol,$ld_fecregdes,$ld_fecreghas,$ld_fecaprord,$li_totrow; $ls_operacion=$io_fun_banco->uf_obteneroperacion(); $ls_codtipsol=""; $ld_fecregdes=date("01/m/Y"); $ld_fecreghas=date("d/m/Y");
<?php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr = $_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_r_documentos.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte = $io_fun_banco->uf_select_config("SCB","REPORTE","LISTADO_MOVBCO","sigesp_scb_rpp_documentos_pdf.php","C"); $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; } ?>
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_orden_pago_directo.php",$ls_permisos,&$la_seguridad,$la_permisos); ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>Catálogo Deducciones</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- a:link { color: #006699; } a:visited { color: #006699; } a:active { color: #006699; } -->
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_pago_directo.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte = $io_fun_banco->uf_select_config("SCB","REPORTE","CHEQUE_VOUCHER","sigesp_scb_rpp_voucher_pdf.php","C");//print $ls_reporte; $ls_empresa = $_SESSION["la_empresa"]["codemp"]; $li_estmodest = $_SESSION["la_empresa"]["estmodest"]; $li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"]; $li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"]; $li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"]; $li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"]; $li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"]; $li_estciespg = $io_fun_banco->uf_load_estatus_cierre($li_estciespi,$li_estciescg); $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';
// Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang // Fecha Creación: 19/04/2007 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////// global $ls_codprovben,$ls_nomprovben,$ls_tipodestino,$ls_operacion,$io_fun_scb; require_once("../shared/class_folder/class_generar_id_process_sol.php"); $io_id_process= new class_generar_id_process_sol(); $ls_codprovben=""; $ls_nomprovben=""; $ls_tipodestino=""; $ls_operacion=$io_fun_scb->uf_obteneroperacion(); } require_once("class_funciones_banco.php"); $io_fun_scb=new class_funciones_banco(); uf_limpiarvariables(); $ls_tipo=$io_fun_scb->uf_obtenertipo(); unset($io_fun_scb); $ld_fecdes="01/".date("m")."/".date("Y"); $ld_fechas=date("d/m/Y"); ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>Catálogo de Solicitudes de Pago </title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- a:link {
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "close();"; print "opener.document.formulario.submit();"; print "</script>"; } require_once("class_funciones_banco.php"); $io_fun_scb = new class_funciones_banco(); $ls_tipo = $io_fun_scb->uf_obtenertipo(); $ls_numrecdoc = $io_fun_scb->uf_obtenervalor_get("numrecdoc",""); $li_subtotal = $io_fun_scb->uf_obtenervalor_get("subtotal","0,00"); $ls_procede = $io_fun_scb->uf_obtenervalor_get("procede","0,00"); unset($io_fun_scb); ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>Otros Créditos</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- a:link { color: #006699; } a:visited { color: #006699; }
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_pago_caficultores.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
require_once("sigesp_scb_c_emision_chq.php"); require_once("../shared/class_folder/class_sql.php"); require_once("../shared/class_folder/grid_param.php"); require_once("../shared/class_folder/class_mensajes.php"); require_once("../shared/class_folder/sigesp_include.php"); require_once("../shared/class_folder/ddlb_conceptos.php"); require_once("../shared/class_folder/class_funciones.php"); $io_msg = new class_mensajes(); $io_funcion = new class_funciones(); $io_include = new sigesp_include(); $ls_conect = $io_include->uf_conectar(); $obj_con = new ddlb_conceptos($ls_conect); $io_grid = new grid_param(); $io_emiche = new sigesp_scb_c_emision_chq(); $io_update = new class_funciones_banco(); $ls_codemp = $_SESSION["la_empresa"]["codemp"]; $li_estciespg = $io_fun_banco->uf_load_estatus_cierre($li_estciespi,$li_estciescg); require_once("sigesp_scb_c_movbanco.php"); $in_classmovbco=new sigesp_scb_c_movbanco($la_seguridad); if( array_key_exists("operacion",$_POST)) { $ls_operacion= $_POST["operacion"]; $ls_estdoc=$_POST["status_doc"]; $ls_mov_operacion="CH"; $ls_numdoc=$_POST["txtdocumento"]; $ls_codban=$_POST["txtcodban"]; $ls_denban=$_POST["txtdenban"]; $ls_ctaban=$_POST["txtcuenta"]; $ls_dencuenta_banco=$_POST["txtdenominacion"];
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $dat=$_SESSION["la_empresa"]; $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_carta_orden.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_report = $io_fun_banco->uf_select_config("SCB","REPORTE","CARTA_ORDEN","sigesp_scb_rpp_cartaorden_pdf.php","C"); $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; }
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $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_recuperacion_creditos.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } function uf_limpiar_variables()
<?php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "close();"; print "opener.document.form1.submit();"; print "</script>"; } require_once ("class_funciones_banco.php"); $io_scb= new class_funciones_banco(); $ls_orden=$io_scb->uf_obtenervalor("orden","ASC"); $ls_campoorden=$io_scb->uf_obtenervalor("campoorden","codtipfon"); ?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Catálogo de Tipos de Fondos</title> <link href="../shared/css/general.css" rel="stylesheet" type="text/css" /> <link href="../shared/css/tablas.css" rel="stylesheet" type="text/css" /> <link href="../shared/css/ventanas.css" rel="stylesheet" type="text/css" /> <script type="text/javascript" language="JavaScript1.2" src="js/funcion_scb.js"></script> <script type="text/javascript" language="JavaScript1.2" src="../shared/js/valida_tecla.js"></script> <style type="text/css"> <!-- a:link { color: #006699; } a:visited { color: #006699;
function uf_procesar_cobranza($as_rutfil, $ai_totrows, $aa_seguridad) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_procesar_cobranza. // Access: private // Arguments: $aa_datos // Returns: Arreglo cargado con la cabecera para ser procesado el movimiento bancario. // Description: . // Creado Por: Ing. Néstor Falcón. // Fecha Creación: 07/07/2008. Fecha Última Modificación : 07/07/2008. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// require_once "class_funciones_banco.php"; $io_funciones_scb = new class_funciones_banco(); $lb_valido = true; for ($li_i = 1; $li_i <= $ai_totrows; $li_i++) { if (array_key_exists("chk" . $li_i, $_POST)) { $this->io_sql->begin_transaction(); $ls_filnam = trim($io_funciones_scb->uf_obtenervalor("txtfilnam" . $li_i, "")); if (!empty($ls_filnam)) { $ls_rutori = $as_rutfil . '/' . $ls_filnam; //Ruta Completa de Ubicación del Archivo xml. $ls_rutdes = "../scc/cobranza/procesados/"; $la_datmov = $this->io_xml->uf_cargar_scb_movbco($ls_rutori, 'C'); $li_totdat = count($la_datmov); for ($li_z = 1; $li_z <= $li_totdat; $li_z++) { $ls_numdoc = $la_datmov[$li_z]["numdoc"]; $ls_codban = $la_datmov[$li_z]["codban"]; $lb_existe = $this->io_xml->uf_validar_banco($this->ls_codemp, $ls_codban); if (!$lb_existe) { $ls_errmsg = "{$ls_filnam}.- Codigo del Banco no encontrado !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } if ($lb_valido) { $ls_ctaban = $la_datmov[$li_z]["ctaban"]; $lb_existe = $this->io_xml->uf_validar_cuenta_bancaria($this->ls_codemp, $ls_codban, $ls_ctaban); if (!$lb_existe) { $ls_errmsg = "{$ls_filnam}.- Cuenta Bancaria no encontrada !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } } if ($lb_valido) { $ls_codope = $la_datmov[$li_z]["codope"]; if ($ls_codope != 'DP' && $ls_codope != 'NC') { $ls_errmsg = "{$ls_filnam}.- Error en Tipo de Operacion, solo estan permitidos DP=Depositos y NC=Notas de Credito !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } } $lb_existe = false; if ($lb_valido) { $lb_existe = $this->io_xml->uf_load_movimiento_bancario($this->ls_codemp, $ls_numdoc, $ls_codban, $ls_ctaban, $ls_codope); } if (!$lb_existe && $lb_valido) { $lb_valido = $this->uf_insert_movimiento_banco($ls_filnam, $ls_numdoc, $ls_codban, $ls_ctaban, $ls_codope, $la_datmov, $ls_errmsg, $aa_seguridad); if ($lb_valido) { $la_datscg = $this->io_xml->uf_cargar_scb_movbco_scg($ls_rutori); if (!empty($la_datscg)) { $lb_valido = $this->uf_insert_movimiento_banco_scg($ls_filnam, $ls_numdoc, $ls_codban, $ls_ctaban, $ls_codope, $la_datscg, $ls_errmsg, $aa_seguridad); unset($la_datscg); } else { $ls_errmsg = "{$ls_filnam}.- Movimiento Bancario sin Detalle Contable !!!"; $this->io_msg->message($ls_errmsg); return false; } } if ($lb_valido) { $la_datspi = $this->io_xml->uf_cargar_scb_movbco_spi($ls_rutori); if (!empty($la_datspi)) { $lb_valido = $this->uf_insert_movimiento_banco_spi($ls_filnam, $ls_numdoc, $ls_codban, $ls_ctaban, $ls_codope, $la_datspi, $ls_errmsg, $aa_seguridad); unset($la_datspi); } } } elseif ($lb_existe) { $ls_errmsg = "{$ls_filnam}.- Movimiento Bancario ya esta registrado !!!"; $this->io_msg->message($ls_errmsg); return false; } unset($la_datmov); } if ($lb_valido) { $this->io_sql->commit(); $this->io_msg->message("Documento {$ls_filnam}, procesado con Éxito !!!"); } else { $this->io_sql->rollback(); $this->io_msg->message("Documento {$ls_filnam}, Registro No Incluido !!!"); } $lb_copval = $this->io_xml->uf_mover_xml($ls_filnam, $ls_rutori, $ls_rutdes); if ($lb_copval) { $this->io_xml->uf_update_xml_procesado($ls_filnam, $ls_rutdes, "SCB_MOVBCO", $lb_valido, $ls_errmsg); } } } } }
<?php session_start(); if(!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_progpago.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
<?php session_start(); if (!array_key_exists("la_logusr",$_SESSION)) { print "<script language=JavaScript>"; print "location.href='../sigesp_inicio_sesion.php'"; print "</script>"; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_conf_select_cartaorden.php",$ls_permisos,$la_seguridad,$la_permisos); $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; } ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
function uf_load_detalles_spg($as_filnam, &$li_totdet, &$la_datscg, &$ld_totmonspg) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_load_detalles_desembolso // Access: private // Arguments: $as_filnam = Nombre del archivo xml a procesar con toda su ruta de ubicación. // $la_object = Matriz cargada con la información de los detalles de la liquidación. // $li_totdet = Número total de filas de los detalles de la liquidación contenidos en el xml. // Returns: Arreglo cargado con los archivos xml ubicados en $as_rutfil para ser procesados. // Description: Carga los detalles de la liquidación a partir del archivo xml $as_filnam. // Creado Por: Ing. Nestor Falcón. // Fecha Creación: 07/07/2008. Fecha Última Modificación : 07/07/2008. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// require_once "class_funciones_banco.php"; $io_funciones_scb = new class_funciones_banco(); $ld_montotmov = $io_funciones_scb->uf_obtenervalor("txtmonmov", 0); $ld_montotmov = str_replace(".", "", $ld_montotmov); $ld_montotmov = str_replace(",", ".", $ld_montotmov); $lb_valido = true; $li_totdet = $li_y = 0; $li_estmodest = $_SESSION["la_empresa"]["estmodest"]; $li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"]; $li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"]; $li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"]; $li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"]; $li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"]; if (!empty($as_filnam)) { $la_datmov = $this->io_xml->uf_cargar_detalles_spg($as_filnam); if (!empty($la_datmov)) { $li_totdet = count($la_datmov); $la_datscg = array(); $ld_totmonspg = 0; //Acumulador para la sumatoria de los Detalles de la Liquidación. for ($li_i = 1; $li_i <= $li_totdet; $li_i++ && $lb_valido) { $ls_spgcta = $la_datmov[$li_i]['spgcta']; //Cuenta Presupuestaria. $ls_estcla = $la_datmov[$li_i]['estcla']; if ($ls_estcla == 'A') { $ls_denestcla = "Acción"; } elseif ($ls_estcla == 'P') { $ls_denestcla = "Proyecto"; } else { $ls_errmsg = "{$as_filnam}.- Modalidad Presupuestaria Invalida, P=Proyecto y A=Acción !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } $ls_denctaspg = ""; $ls_codestpro1 = $la_datmov[$li_i]['codestpro1']; $ls_codestpro2 = $la_datmov[$li_i]['codestpro2']; $ls_codestpro3 = $la_datmov[$li_i]['codestpro3']; $ls_codestpro4 = $la_datmov[$li_i]['codestpro4']; $ls_codestpro5 = $la_datmov[$li_i]['codestpro5']; $lb_valido = $this->uf_validar_presupuesto($ls_spgcta, $ls_codestpro1, $ls_codestpro2, $ls_codestpro3, $ls_codestpro4, $ls_codestpro5, $ls_estcla, $ls_denctaspg); if ($lb_valido) { $ls_denestpro1 = $this->uf_load_denestpro1($ls_codestpro1, $ls_estcla); $ls_scgcta = $this->uf_load_scgcta($ls_spgcta, $ls_codestpro1, $ls_codestpro2, $ls_codestpro3, $ls_codestpro4, $ls_codestpro5, $ls_estcla, $ls_denctascg); if (empty($ls_scgcta)) { $ls_errmsg = "{$as_filnam}.- Cuenta Contable no encontrada para {$ls_spgcta} !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } else { $li_y++; $ls_codestpre = $ls_codestpro1 . $ls_codestpro2 . $ls_codestpro3 . $ls_codestpro4 . $ls_codestpro5; $ls_codestpro1 = substr($ls_codestpro1, -$li_loncodestpro1); $ls_codestpro2 = substr($ls_codestpro2, -$li_loncodestpro2); $ls_codestpro3 = substr($ls_codestpro3, -$li_loncodestpro3); $ls_codestpro = $ls_codestpro1 . '-' . $ls_codestpro2 . '-' . $ls_codestpro3; if ($li_estmodest == 2) { $ls_codestpro4 = substr($ls_codestpro4, -$li_loncodestpro4); $ls_codestpro5 = substr($ls_codestpro5, -$li_loncodestpro5); $ls_codestpro = $ls_codestpro . '-' . $ls_codestpro4 . '-' . $ls_codestpro5; } $li_estmodest = $_SESSION["la_empresa"]["estmodest"]; $ld_mondetspg = $la_datmov[$li_i]['monto']; $la_datscg["scgcta"][$li_y] = $ls_scgcta; // Armado de la Información Contable $la_datscg["denctascg"][$li_y] = $ls_denctascg; // asociada a la Cuenta y Estructura $la_datscg["mondetscg"][$li_y] = $ld_mondetspg; // presupuestaria. $ld_totmonspg += $ld_mondetspg; $ld_mondetspg = number_format($ld_mondetspg, 2, ',', '.'); $la_object[$li_i][1] = "<input type=text name=txtspgcta" . $li_i . " id=txtspgcta" . $li_i . " value='" . $ls_spgcta . "' \t class=sin-borde readonly style=text-align:center size=15 maxlength=25>"; $la_object[$li_i][2] = "<input type=text name=txtdenctaspg" . $li_i . " id=txtdenctaspg" . $li_i . " value='" . $ls_denctaspg . "' class=sin-borde readonly style=text-align:left size=45 maxlength=500 title='" . $ls_denctaspg . "'>"; $la_object[$li_i][3] = "<input type=text name=txtcodestpro" . $li_i . " id=txtcodestpro" . $li_i . " value='" . $ls_codestpro . "' class=sin-borde readonly style=text-align:center size=30 maxlength=129 title='" . $ls_denestpro1 . "'>"; $la_object[$li_i][4] = "<input type=text name=txtcodtipest" . $li_i . " id=txtcodtipest" . $li_i . " value='" . $ls_denestcla . "' class=sin-borde readonly style=text-align:center size=10 maxlength=8>"; $la_object[$li_i][5] = "<input type=text name=txtmondetspg" . $li_i . " id=txtmondetspg" . $li_i . " value='" . $ld_mondetspg . "' class=sin-borde readonly style=text-align:right size=17 maxlength=24>\n\t\t\t\t\t\t\t\t\t\t\t\t\t <input type=hidden name=hidcodestpre" . $li_i . " id=hidcodestpre" . $li_i . " value='" . $ls_codestpre . "'>"; } } else { $li_totdet = 1; $la_object[$li_totdet][1] = "<input type=text name=txtspgcta" . $li_totdet . " id=txtspgcta" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=15 maxlength=25>"; $la_object[$li_totdet][2] = "<input type=text name=txtdenctaspg" . $li_totdet . " id=txtdenctaspg" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=45 maxlength=254>"; $la_object[$li_totdet][3] = "<input type=text name=txtcodestpro" . $li_totdet . " id=txtcodestpro" . $li_totdet . " value='' class=sin-borde readonly style=text-align:left size=30 maxlength=254>"; $la_object[$li_totdet][4] = "<input type=text name=txtcodtipest" . $li_totdet . " id=txtcodtipest" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=10 maxlength=254>"; $la_object[$li_totdet][5] = "<input type=text name=txtmondetspg" . $li_totdet . " id=txtmondetspg" . $li_totdet . " value='' class=sin-borde readonly style=text-align:right size=17 maxlength=23>\n\t\t\t\t\t\t\t\t\t\t\t\t\t <input type=hidden name=txtfilnam" . $li_totdet . " id=txtfilnam" . $li_totdet . " value=''>"; $la_datscg = ""; $ls_errmsg = "{$as_filnam}.- Error en datos de la Afectación Presupuestaria !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } } $ld_montotsep = $io_funciones_scb->uf_obtenervalor("txtmonmov", 0); $ld_montotsep = str_replace('.', '', $ld_montotsep); $ld_montotsep = str_replace(',', '.', $ld_montotsep); if ($ld_montotsep != $ld_totmonspg && $lb_valido) { $li_totdet = 1; $la_object[$li_totdet][1] = "<input type=text name=txtspgcta" . $li_totdet . " id=txtspgcta" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=15 maxlength=25>"; $la_object[$li_totdet][2] = "<input type=text name=txtdenctaspg" . $li_totdet . " id=txtdenctaspg" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=45 maxlength=254>"; $la_object[$li_totdet][3] = "<input type=text name=txtcodestpro" . $li_totdet . " id=txtcodestpro" . $li_totdet . " value='' class=sin-borde readonly style=text-align:left size=30 maxlength=254>"; $la_object[$li_totdet][4] = "<input type=text name=txtcodtipest" . $li_totdet . " id=txtcodtipest" . $li_totdet . " value='' class=sin-borde readonly style=text-align:center size=10 maxlength=254>"; $la_object[$li_totdet][5] = "<input type=text name=txtmondetspg" . $li_totdet . " id=txtmondetspg" . $li_totdet . " value='' class=sin-borde readonly style=text-align:right size=17 maxlength=23>\n\t\t\t\t\t\t\t\t\t\t\t <input type=hidden name=txtfilnam" . $li_totdet . " id=txtfilnam" . $li_totdet . " value=''>"; $la_datscg = ""; $ls_errmsg = "{$as_filnam}.- Descuadre entre el monto del Movimiento Bancario y su Detalle Presupuestario !!!"; $this->io_msg->message($ls_errmsg); $lb_valido = false; } if (!$lb_valido) { $ls_rutdes = "../scc/liquidacion/procesados/"; $ls_filnam = trim(substr($as_filnam, 30, 254)); $lb_copval = $this->io_xml->uf_mover_xml($ls_filnam, $as_filnam, $ls_rutdes); if ($lb_copval) { $this->io_xml->uf_update_xml_procesado($ls_filnam, $ls_rutdes, "SCB_MOVBCO", $lb_valido, $ls_errmsg); } } } if (isset($la_datmov)) { unset($la_datmov); } } return $la_object; }