uf_conectar(); $io_sql=new class_sql($io_connect); $io_msg = new class_mensajes(); require_once("sigesp_spg_c_comprobante.php"); $in_classcmp=new sigesp_spg_c_comprobante(); require_once("../shared/class_folder/sigesp_c_seguridad.php"); $io_seguridad= new sigesp_c_seguridad(); /////////////////////////////////////Parametros necesarios para seguridad//////////////////////////// $ls_empresa=$dat["codemp"]; $li_estmodest=$dat["estmodest"]; if(array_key_exists("la_logusr",$_SESSION)) { $ls_logusr=$_SESSION["la_logusr"]; } else { $ls_logusr=""; } $ls_sistema="SPG"; $ls_ventana="sigesp_spg_p_comprobante.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_redfon =$_POST["renfon"]; $ls_codfuefin = $_POST["txtcodfuefin"]; $ls_denfuefin = $_POST["txtdenfuefin"]; if($li_estmodest==2) { $ls_estpro4=$_POST["codestpro4"]; $ls_estpro5=$_POST["codestpro5"]; } } else { $ls_operacion=""; $ls_estpro1=""; $ls_estpro2=""; $ls_estpro3=""; $ls_cuentaplan=""; $ls_denominacion=""; $ls_procedencia="SPGCMP"; $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_codfuefin = ""; $ls_denfuefin = ""; if($li_estmodest==2) { $ls_estpro4=""; $ls_estpro5=""; } //------------------------------------------ $ls_redfon=$_GET["renfon"]; if ($ls_redfon=='0') { $ls_documento=$_GET["comprobante"]; $ls_valor=""; } else { $ls_comprobante=$_GET["comprobante"]; $ls_numero=$in_classcmp->uf_buscar_documento($ls_empresa,$ls_comprobante,$ld_fecha); if ($ls_numero>0) { $ls_documento=$ls_numero+1; $ls_documento=str_pad($ls_documento,15,"0",0); } else { $ls_documento=str_pad(1,15,"0",0); } $ls_valor="readonly"; } //------------------------------------------ } if($ls_operacion=="GUARDARPRE") { $ls_cuenta = $_POST["txtcuenta"]; $ls_est1 = $_POST["codestpro1"]; $ls_est2 = $_POST["codestpro2"]; $ls_est3 = $_POST["codestpro3"]; $ls_estcla = $_POST["estcla"]; if($li_estmodest==2) { $ls_est4 = $_POST["codestpro4"]; $ls_est5 = $_POST["codestpro5"]; $ls_est1 = $io_function->uf_cerosizquierda($ls_est1,25); $ls_est2 = $io_function->uf_cerosizquierda($ls_est2,25); $ls_est3 = $io_function->uf_cerosizquierda($ls_est3,25); $ls_est4 = $io_function->uf_cerosizquierda($ls_est4,25); $ls_est5 = $io_function->uf_cerosizquierda($ls_est5,25); } else { $ls_est1 = $io_function->uf_cerosizquierda($ls_est1,25); $ls_est2 = $io_function->uf_cerosizquierda($ls_est2,25); $ls_est3 = $io_function->uf_cerosizquierda($ls_est3,25); $ls_est4 = $io_function->uf_cerosizquierda(0,25); $ls_est5 = $io_function->uf_cerosizquierda(0,25); } $ld_monto = $_POST["txtmonto"]; $ldec_monto=str_replace(".","",$ld_monto); $ldec_monto=str_replace(",",".",$ldec_monto); $ls_operacionpre= $_POST["txtoperacion"]; $ld_disponible=0; $lb_valido=$in_classcmp->uf_spg_select_disponibilidad($ls_cuenta,$ls_est1,$ls_est2,$ls_est3,$ls_est4,$ls_est5,$ld_disponible,$ls_operacionpre,$ldec_monto,$ls_estcla); //$lb_valido=false; // se cambio para fudeco if(($ld_disponible<$ldec_monto)&&($lb_valido)) { $io_msg->message(" La Cuenta ".trim($ls_cuenta)." no tiene disponibilidad " ); $ls_cuentaplan= ""; $ls_denominacion= ""; $ls_descripcion= ""; } else { $ldec_monto=0; $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_codban = "---"; $ls_ctaban = "-------------------------"; $ls_redfon =$_POST["renfon"]; $ls_codfuefin =$_POST["codfuefin"]; if($ls_tipo=="P") { $ls_prov=$ls_provbene; $ls_bene="----------"; } else { $ls_bene=$ls_provbene; $ls_prov="----------"; } //$in_classcmp->io_int_scg->io_sql->begin_transaction(); //$in_classcmp->io_int_int->uf_int_init_transaction_begin(); $lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_proccomp,$ls_desccomp,&$ls_prov,&$ls_bene,$ls_tipo,1,$ls_codban,$ls_ctaban,$ls_redfon,$ls_codfuefin); $arr_cmp["comprobante"]=$ls_comprobante; $ld_fecdb=$io_function->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 = $io_function->uf_cerosizquierda($ls_est1,25); $ls_est2 = $io_function->uf_cerosizquierda($ls_est2,25); $ls_est3 = $io_function->uf_cerosizquierda($ls_est3,25); $ls_est4 = $io_function->uf_cerosizquierda($ls_est4,25); $ls_est5 = $io_function->uf_cerosizquierda($ls_est5,25); } else { $ls_est1 = $io_function->uf_cerosizquierda($ls_est1,25); $ls_est2 = $io_function->uf_cerosizquierda($ls_est2,25); $ls_est3 = $io_function->uf_cerosizquierda($ls_est3,25); $ls_est4 = $io_function->uf_cerosizquierda(0,25); $ls_est5 = $io_function->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"]; $ldec_monto=str_replace(".","",$ld_monto); $ldec_monto=str_replace(",",".",$ldec_monto); $ls_codfuefin = $_POST["txtcodfuefin"]; //$in_classcmp->io_int_scg->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,"C",$ls_codban,$ls_ctaban,$ls_estcla,$ls_codfuefin); if($lb_valido) { $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $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_update_bsf_sigespcmp(0,$ls_codemp,$ls_procede,$ls_comprobante, $ld_fecdb,$ls_codban,$ls_ctaban,$la_security); if($lb_valido) { $lb_valido=$in_classcmp->uf_update_bsf_spgdtcmp($ldec_monto,$ls_codemp,$ls_procede,$ls_comprobante, $ld_fecdb,$ls_codban,$ls_ctaban,$ls_codestpro, $ls_cuenta,$ls_procede,$ls_documento, $ls_operacionpre,$la_security); } if($lb_valido) { $lb_valido=$in_classcmp->uf_update_bsf_spgcuentas($ldec_monto,$ls_operacionpre,$ls_codemp, $ls_codestpro,$ls_cuenta,$ld_fecha,$la_security); }*/ if($lb_valido) { $in_classcmp->io_int_scg->io_sql->commit(); ///////////////////////////////// SEGURIDAD ///////////////////////////// $ls_evento="INSERT"; if($in_classcmp->io_int_scg->is_log_transacciones!="") { $ls_desc_event=$in_classcmp->io_int_scg->is_log_transacciones."Inserto el movimiento presupuestario ".$ls_documento." con operacion".$ls_operacionpre." por un monto de ".$ldec_monto." para la cuenta ".$ls_cuenta." correspondiente a la estructura programatica ".$ls_est1."-".$ls_est2."-".$ls_est3."-".$ls_est4."-".$ls_est5; } else { $ls_desc_event="Inserto el movimiento presupuestario ".$ls_documento." con operacion".$ls_operacionpre." por un monto de ".$ldec_monto." para la cuenta ".$ls_cuenta." correspondiente a la estructura programatica ".$ls_est1."-".$ls_est2."-".$ls_est3."-".$ls_est4."-".$ls_est5."; para el comprobante ".$ls_comprobante." de fecha ".$ld_fecha; } $ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event); //////////////////////////////// SEGURIDAD ////////////////////////////// } else { $in_classcmp->io_int_scg->io_sql->rollback(); } } else { $in_classcmp->io_int_scg->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_documento = $_POST["txtdocumento"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["txtoperacion"]; $ld_monto = $_POST["txtmonto"]; } $in_classcmp->io_int_int->uf_sql_transaction($lb_valido); ?> uf_buscar_documento($ls_empresa,$ls_comprobante,$ld_fecha); if ($ls_numero>0) { $ls_documento=$ls_numero+1; $ls_documento=str_pad($ls_documento,15,"0",0); } else { $ls_documento=str_pad(1,15,"0",0); } $ls_valor="readonly"; $_POST["txtdocumento"]=$ls_documento; } else { $ls_documento=$_POST["txtdocumento"]; $ls_valor=""; } //---------------------------------------------------------------------------------------- } } if($ls_operacion=="VALIDAR_CUENTA_PRESUPUESTARIA") { $ls_cuenta = $_POST["txtcuenta"]; $ls_est1 = $_POST["codestpro1"]; $ls_est2 = $_POST["codestpro2"]; $ls_est3 = $_POST["codestpro3"]; $arr_cmp["codemp"] = $dat["codemp"]; $ls_estcla = $_POST["estcla"]; if($li_estmodest==2) { $ls_est4 = $_POST["codestpro4"]; $ls_est5 = $_POST["codestpro5"]; $ls_est1=$io_function->uf_cerosizquierda($ls_est1,25); $ls_est2=$io_function->uf_cerosizquierda($ls_est2,25); $ls_est3=$io_function->uf_cerosizquierda($ls_est3,25); $ls_est4=$io_function->uf_cerosizquierda($ls_est4,25); $ls_est5=$io_function->uf_cerosizquierda($ls_est5,25); } else { $ls_est4 = $io_function->uf_cerosizquierda(0,25); $ls_est5 = $io_function->uf_cerosizquierda(0,25); } $lb_valido=$in_classcmp->uf_validar_cuenta_presupuestaria($arr_cmp,$ls_est1,$ls_est2,$ls_est3,$ls_est4,$ls_est5,$ls_cuenta); if (!$lb_valido) { $io_msg->message(" La Cuenta ".$ls_cuenta." no existe" ); $$ls_cuentaplan = ""; } else { $$ls_cuentaplan = $_POST["txtcuenta"]; $ls_est1 = $_POST["codestpro1"]; $ls_est2 = $_POST["codestpro2"]; $ls_est3 = $_POST["codestpro3"]; $ls_estcla = $_POST["estcla"]; $ls_redfon =$_POST["renfon"]; $ls_codfuefin =$_POST["codfuefin"]; if($li_estmodest==2) { $ls_est4 = $_POST["codestpro4"]; $ls_est5 = $_POST["codestpro5"]; } $ls_documento = $_POST["txtdocumento"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["txtoperacion"]; $ld_monto = $_POST["txtmonto"]; } } switch ($ls_operacion) { case 'AAP': $ls_apertura="selected"; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'AU': $ls_apertura=""; $ls_aumento="selected"; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'DI': $ls_apertura=""; $ls_aumento=""; $ls_disminucion="selected"; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'PC': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso="selected"; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'CS': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso="selected"; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'CG': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado="selected"; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'GC': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado="selected"; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'CP': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago="selected"; $ls_pago=""; $ls_compromisocausasopago=""; break; case 'PG': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago="selected"; $ls_compromisocausasopago=""; break; case 'CCP': $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado=""; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago="selected"; break; default: $ls_apertura=""; $ls_aumento=""; $ls_disminucion=""; $ls_precompromiso=""; $ls_compromiso=""; $ls_compromisogastocausado="selected"; $ls_gastocausado=""; $ls_causadopago=""; $ls_pago=""; $ls_compromisocausasopago=""; break; } ?>
Catalogo de Cuentas
   
Catálogo de Estructura Programatica 1
Catálogo de Estructura Programatica 2
Catálogo de Estructura Programatica 3
Catálogo de Estructura Programatica 3
Catálogo de Estructura Programatica 3
Fuente de Financiamiento
 Catálogo de Fuentes de Financiamiento
Cuenta
 Catálogo de Cuentas de Gastos
Operación
Monto Agregar Detalle Presupuestario Cancelar Registro de Detalle Presupuestario