"; print "close();"; print "opener.document.form1.submit();"; print ""; } $la_empresa = $_SESSION["la_empresa"]; $li_estmodest = $la_empresa["estmodest"]; $li_loncodestpro1 = $la_empresa["loncodestpro1"]; $li_loncodestpro2 = $la_empresa["loncodestpro2"]; $li_loncodestpro3 = $la_empresa["loncodestpro3"]; $li_loncodestpro4 = $la_empresa["loncodestpro4"]; $li_loncodestpro5 = $la_empresa["loncodestpro5"]; $li_size1 = $li_loncodestpro1+10; $li_size2 = $li_loncodestpro2+10; $li_size3 = $li_loncodestpro3+10; $li_size4 = $li_loncodestpro4+10; $li_size5 = $li_loncodestpro5+10; $ls_contintmovban= $_SESSION["la_empresa"]["contintmovban"]; require_once("../shared/class_folder/sigesp_include.php"); require_once("../shared/class_folder/class_mensajes.php"); require_once("../shared/class_folder/class_datastore.php"); require_once("../shared/class_folder/class_funciones.php"); require_once("../shared/class_folder/class_sql.php"); $io_include = new sigesp_include(); $ls_connect = $io_include->uf_conectar(); $io_funcion = new class_funciones(); $io_msg = new class_mensajes(); $io_sql = new class_sql($ls_connect); ?> Entrada de Comprobante de Gastos uf_load_seguridad("SCB",$ls_opener,$ls_permisos,$la_seguridad,$la_permisos); $in_classmovbanco=new sigesp_scb_c_movbanco($la_seguridad); if ($ls_operacion=="GUARDARPRE") { $ldec_monto = $_POST["txtmonto"]; $ls_estmov = "N"; if ($ls_tipo=="P") { $ls_codpro = $ls_provbene; $ls_cedbene = "----------"; } else { $ls_cedbene=$ls_provbene; $ls_codpro ="----------"; } $in_classmovbanco->io_sql->begin_transaction(); $li_estcob=0; $lb_valido = $in_classmovbanco->uf_guardar_automatico($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ld_fecha,$ls_mov_descripcion,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_monto_mov,$ldec_objret,$ldec_retenido,$ls_chevau,$ls_estmov,$li_estint,$li_cobrapaga,$ls_estbpd,$ls_mov_procede,$ls_estreglib,$ls_estdoc,$ls_tipo,$ls_codfuefin,$ls_numordpagmin,$ls_codtipfon,$li_estcob,$ls_numconint,$ls_reglibro); $arr_movbco["codban"] = $ls_codban; $arr_movbco["ctaban"] = $ls_ctaban; $arr_movbco["mov_document"] = $ls_mov_document; $ld_fecdb=$io_funcion->uf_convertirdatetobd($ld_fecha); $arr_movbco["codope"]=$ls_codope; $arr_movbco["fecha"]=$ld_fecha; $arr_movbco["codpro"]=$ls_codpro; $arr_movbco["cedbene"]=$ls_cedbene; $arr_movbco["monto_mov"]=$ldec_monto_mov; $arr_movbco["objret"] =$ldec_objret; $arr_movbco["retenido"] =$ldec_retenido; $arr_movbco["estmov"]=$ls_estmov; if ($lb_valido) { if (($ls_codope=="ND")||($ls_codope=="RE")||($ls_codope=="CH")) { $ls_operacioncon="H"; } else { $ls_operacioncon="D"; } $lb_valido = $in_classmovbanco->uf_procesar_dt_contable($arr_movbco,$ls_cuenta_scg,$ls_procedencia,$ls_mov_descripcion,$ls_mov_document,$ls_operacioncon,$ldec_monto_mov,$ldec_objret,true,'00000'); $ls_cuenta = $_POST["txtcuentascg"]; $ls_denominacion = $_POST["txtdescripcion"]; $ls_operacioncon = "D"; $ld_monto = $_POST["txtmonto"]; $ldec_monto = str_replace(".","",$ld_monto); $ldec_monto = str_replace(",",".",$ldec_monto); if ($lb_valido) { $lb_valido = $in_classmovbanco->uf_procesar_dt_contable($arr_movbco,$ls_cuenta,$ls_procedencia,$ls_descripcion,$ls_mov_document,$ls_operacioncon,$ldec_monto,$ldec_objret,false,'00000'); $ls_spgcuenta = $_POST["txtcuenta"]; $ls_est1 = str_pad($_POST["codestpro1"],25,0,0); $ls_est2 = str_pad($_POST["codestpro2"],25,0,0); $ls_est3 = str_pad($_POST["codestpro3"],25,0,0); if ($li_estmodest=='2') { $ls_est4 = str_pad($_POST["codestpro4"],25,0,0); $ls_est5 = str_pad($_POST["codestpro5"],25,0,0); } else { $ls_est4 = str_pad("",25,0,0); $ls_est5 = str_pad("",25,0,0); } $ls_programa = $ls_est1.$ls_est2.$ls_est3.$ls_est4.$ls_est5; $ls_desmov = $_POST["txtdescripcion"]; $ls_operacion = $_POST["txtafectacion"]; $ldec_monto = $_POST["txtmonto"]; $ldec_monto = str_replace(".","",$ldec_monto); $ldec_monto = str_replace(",",".",$ldec_monto); $lb_valido=$in_classmovbanco->uf_procesar_dt_gasto($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ls_estmov,$ls_programa,$ls_spgcuenta,$ls_mov_document,$ls_desmov,$ls_procedencia,$ldec_monto,$ls_operacion,$ls_estcla); if ($lb_valido) { $in_classmovbanco->io_sql->commit(); $ls_estdoc='C'; print ""; } else { $in_classmovbanco->io_sql->rollback(); $io_msg->message($in_classmovbanco->is_msg_error); } } else { $io_msg->message($in_classmovbanco->is_msg_error); $in_classmovbanco->io_sql->rollback(); } } else { $io_msg->message($in_classmovbanco->is_msg_error); $in_classmovbanco->io_sql->rollback(); ?>
uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_banco); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>
Entrada de Comprobante de Gastos
   
Documento
Descripción
Procedencia
Catálogo de Estructura Programatica 1
Catálogo de Estructura Programatica 2
Catálogo de Estructura Programatica 3
Catálogo de Estructura Programatica 4
Catálogo de Estructura Programatica 5
Cuenta
 Catálogo de Cuentas de Gastos
Operación
Monto Agregar Detalle Presupuestario Cancelar Registro de Detalle Presupuestario