uf_conectar(); $fun=new class_funciones(); $io_sql=new class_sql($con); require_once("sigesp_spg_c_mod_presupuestarias.php"); $in_classcmp=new sigesp_spg_c_mod_presupuestarias(); $int_fec=new class_fecha(); /////////////////////////////////////Parametros necesarios para seguridad//////////////////////////// $ls_empresa=$dat["codemp"]; $li_estmodest=$dat["estmodest"]; $ls_titulo=""; $ls_titulo = $in_classcmp->uf_get_nomestructura($ls_empresa); if(array_key_exists("la_logusr",$_SESSION)) { $ls_logusr=$_SESSION["la_logusr"]; } else { $ls_logusr=""; } $ls_sistema="SPG"; $ls_ventana="sigesp_spg_p_rectificaciones.php"; $la_security[1]=$ls_empresa; $la_security[2]=$ls_sistema; $la_security[3]=$ls_logusr; $la_security[4]=$ls_ventana; ////////////////////////////////////////////////////////////////////////////////////////////////// if (array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_documento=$_POST["txtdocumento"]; $ls_estpro1=$_POST["codestpro1"]; $ls_estpro2=$_POST["codestpro2"]; $ls_estpro3=$_POST["codestpro3"]; $ls_cuentaplan=$_POST["txtcuenta"]; $ls_denominacion=$_POST["txtdenominacion"]; $ls_procedencia=$_POST["txtprocedencia"]; $ls_descripcion=$_POST["txtdescripcion"]; $ls_comprobante=$_POST["comprobante"]; $ls_proccomp =$_POST["procede"]; $ls_desccomp =$_POST["descripcion"]; $ld_fecha =$_POST["fecha"]; $ls_tipo =$_POST["tipo"]; $ls_provbene =$_POST["provbene"]; $ls_operacionpre=$_POST["txtoperacion"]; $ls_codfuefindet = $_POST["txtcodfuefin"]; $ls_codfuefincab = $_POST["hidcodfuefin"]; $ls_denfuefindet = $_POST["txtdenfuefin"]; $ls_coduniadm = $_POST["hidcoduniadm"]; $ls_tipomod = $_POST["tipomod"]; $ls_codtipomod = $_POST["codtipomod"]; if($li_estmodest==2) { $ls_estpro4=$_POST["codestpro4"]; $ls_estpro5=$_POST["codestpro5"]; } } else { $ls_operacion=""; $ls_documento=$_GET["comprobante"]; $ls_estpro1=""; $ls_estpro2=""; $ls_estpro3=""; if($li_estmodest==2) { $ls_estpro4=""; $ls_estpro5=""; } $ls_cuentaplan=""; $ls_denominacion=""; $ls_procedencia=$_GET["txtprocedencia"]; $ls_descripcion=$_GET["descripcion"]; $ls_comprobante = $_GET["comprobante"]; $ls_proccomp = $_GET["procede"]; $ls_desccomp = $_GET["descripcion"]; $ld_fecha = $_GET["fecha"]; $ls_tipo = $_GET["tipo"]; $ls_provbene = $_GET["provbene"]; $ls_operacionpre= $_GET["txtoperacion"]; $ls_codfuefincab = $_GET["codfuefin"]; $ls_codfuefindet = ""; $ls_denfuefindet = ""; $ls_coduniadm = $_GET["coduniadm"]; $ls_tipomod = $_GET["tipomod"]; $ls_codtipomod = $_GET["codtipomod"]; if ($ls_tipomod==1) { $ls_read="readonly"; } else { $ls_read=""; } } if($ls_operacion=="GUARDARPRE") { if($ls_coduniadm=="---") {$ls_coduniadm="";} $ls_codemp =$dat["codemp"]; $ls_comprobante=$_POST["comprobante"]; $ld_fecha =$_POST["fecha"]; $ls_proccomp =$_POST["procede"]; $ls_desccomp =$_POST["descripcion"]; $ls_provbene =$_POST["provbene"]; $ls_tipo =$_POST["tipo"]; $ls_tipomod = $_POST["tipomod"]; $ls_codtipomod = $_POST["codtipomod"]; if ($ls_tipomod==1) { $ls_read="readonly"; } else { $ls_read=""; } $ls_bene="----------"; $ls_prov="----------"; $lb_valido=$int_fec->uf_valida_fecha_periodo($ld_fecha,$ls_codemp); if(!($lb_valido)) { $msg->message($int_fec->is_msg_error); } else { $in_classcmp->io_sql->begin_transaction(); $ls_existe=$in_classcmp->uf_select_comprobante($ls_codemp,$ls_proccomp,$ls_comprobante,$ld_fecha); if (($ls_tipomod==1)&&(!$ls_existe)) { $lb_valido=$in_classcmp->uf_update_tipo($ls_codemp,$ls_codtipomod); } $lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_proccomp,$ls_desccomp,$ls_prov, $ls_bene,$ls_tipo,2,0,$ls_codfuefincab,$ls_coduniadm); if(!$lb_valido) { $in_classcmp->io_sql->rollback(); $msg->message($in_classcmp->is_msg_error); } else { $ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha); /*$lb_valido=$in_classcmp->uf_update_bsf_sigespcmpmd(0,$ls_codemp,$ls_proccomp,$ls_comprobante, $ld_fecdb,$la_security);*/ if($lb_valido) {$in_classcmp->io_sql->commit();} else {$in_classcmp->io_sql->rollback();} } $arr_cmp["comprobante"]=$ls_comprobante; $ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha); $arr_cmp["fecha"] =$ld_fecdb; $arr_cmp["procedencia"]=$ls_proccomp; $arr_cmp["descripcion"]=$ls_desccomp; $arr_cmp["proveedor"] =$ls_prov; $arr_cmp["beneficiario"]=$ls_bene; $arr_cmp["tipo"] =$ls_tipo; $arr_cmp["codemp"] =$dat["codemp"]; $arr_cmp["tipo_comp"] =1; if($lb_valido) { $ls_cuenta = $_POST["txtcuenta"]; $ls_est1 = $_POST["codestpro1"]; $ls_est2 = $_POST["codestpro2"]; $ls_est3 = $_POST["codestpro3"]; if($li_estmodest==2) { $ls_est4 = $_POST["codestpro4"]; $ls_est5 = $_POST["codestpro5"]; $ls_est1 = $fun->uf_cerosizquierda($ls_est1,25); $ls_est2 = $fun->uf_cerosizquierda($ls_est2,25); $ls_est3 = $fun->uf_cerosizquierda($ls_est3,25); $ls_est4 = $fun->uf_cerosizquierda($ls_est4,25); $ls_est5 = $fun->uf_cerosizquierda($ls_est5,25); } else { $ls_est1 = $fun->uf_cerosizquierda($ls_est1,25); $ls_est2 = $fun->uf_cerosizquierda($ls_est2,25); $ls_est3 = $fun->uf_cerosizquierda($ls_est3,25); $ls_est4 = $fun->uf_cerosizquierda(0,25); $ls_est5 = $fun->uf_cerosizquierda(0,25); } $ls_estcla = $_POST["estcla"]; $ls_documento = $_POST["txtdocumento"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["txtoperacion"]; $ld_monto = $_POST["txtmonto"]; $ls_codfuefindet = $_POST["txtcodfuefin"]; $ldec_monto=str_replace(".","",$ld_monto); $ldec_monto=str_replace(",",".",$ldec_monto); $in_classcmp->io_sql->begin_transaction(); $lb_valido=$in_classcmp->uf_guardar_movimientos($arr_cmp,$ls_est1,$ls_est2,$ls_est3,$ls_est4,$ls_est5, $ls_cuenta,$ls_procede,$ls_descripcion,$ls_documento, $ls_operacionpre,0,$ldec_monto,"P",$ls_estcla,$ls_codfuefindet); if($lb_valido) { $ls_codestpro[0]=$ls_est1; $ls_codestpro[1]=$ls_est2; $ls_codestpro[2]=$ls_est3; $ls_codestpro[3]=$ls_est4; $ls_codestpro[4]=$ls_est5; $ls_codestpro[5]=$ls_estcla; /*$lb_valido=$in_classcmp->uf_convertir_sigespcmpmd($ls_codemp,$la_security); if($lb_valido) { $lb_valido=$in_classcmp->uf_update_bsf_spgdtmpcmp($ldec_monto,$ls_codemp,$ls_procede,$ls_comprobante,$ld_fecdb, $ls_codestpro,$ls_cuenta,$ls_procede,$ls_documento, $ls_operacionpre,$la_security); }*/ if($lb_valido) {$in_classcmp->io_sql->commit();} else {$in_classcmp->io_sql->rollback();} } else { $in_classcmp->io_sql->rollback(); } } else { $ls_cuenta = $_POST["txtcuenta"]; $ls_est1 = $_POST["codestpro1"]; $ls_est2 = $_POST["codestpro2"]; $ls_est3 = $_POST["codestpro3"]; if($li_estmodest==2) { $ls_est4 = $_POST["codestpro4"]; $ls_est5 = $_POST["codestpro5"]; } $ls_estcla = $_POST["estcla"]; $ls_documento = $_POST["txtdocumento"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["txtoperacion"]; $ld_monto = $_POST["txtmonto"]; } } ?>
ENTRADA DE SOLICITUD DE
MODIFICACION PRESUPUESTARIA POR
Documento
>
Concepto de la Modificación
Procedencia
Cuenta
Fuente de Financiamiento
Operación
Monto