uf_conectar(); $io_sql=new class_sql($io_connect); $io_msg = new class_mensajes(); $ddlb_operaciones=new ddlb_generic_bd($io_connect); require_once("sigesp_spi_c_mod_presupuestarias.php"); $in_classcmp=new sigesp_spi_c_mod_presupuestarias(); require_once("../shared/class_folder/sigesp_c_seguridad.php"); $io_seguridad= new sigesp_c_seguridad(); /////////////////////////////////////Parametros necesarios para seguridad//////////////////////////// $ls_empresa=$dat["codemp"]; $li_estpreing = $dat["estpreing"]; $li_estmodest = $dat["estmodest"]; $li_loncodestpro1 = $dat["loncodestpro1"]; $li_loncodestpro2 = $dat["loncodestpro2"]; $li_loncodestpro3 = $dat["loncodestpro3"]; $li_loncodestpro4 = $dat["loncodestpro4"]; $li_loncodestpro5 = $dat["loncodestpro5"]; $li_nomestpro1 = $dat["nomestpro1"]; $li_nomestpro2 = $dat["nomestpro2"]; $li_nomestpro3 = $dat["nomestpro3"]; $li_nomestpro4 = $dat["nomestpro4"]; $li_nomestpro5 = $dat["nomestpro5"]; if(array_key_exists("la_logusr",$_SESSION)) { $ls_logusr=$_SESSION["la_logusr"]; } else { $ls_logusr=""; } $ls_sistema="SPI"; $ls_ventana="sigesp_spi_p_disminucion.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_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"]; $ld_monto = $_POST["txtmonto"]; if($li_estpreing==1) { $ls_estpro1 = $_POST["codestpro1"]; $ls_estpro2 = $_POST["codestpro2"]; $ls_estpro3 = $_POST["codestpro3"]; if($li_estmodest==2) { $ls_estpro4 = $_POST["codestpro4"]; $ls_estpro5 = $_POST["codestpro5"]; } } $ls_estcla= $_POST["hidtipestpro"]; } else { $ls_operacion=""; $ls_documento="000000000000001"; $ls_cuentaplan=""; $ls_denominacion=""; $ls_procedencia="SPIDIS"; $ls_descripcion=""; $ld_monto=""; if($li_estpreing==1) { $ls_estpro1 = ""; $ls_estpro2 = ""; $ls_estpro3 = ""; $ls_denestpro1 = ""; $ls_denestpro2 = ""; $ls_denestpro3 = ""; if($li_estmodest==2) { $ls_estpro4 = ""; $ls_estpro5 = ""; $ls_denestpro4 = ""; $ls_denestpro5 = ""; } } $ls_estcla = ""; $ls_comprobante=$_GET["comprobante"]; $ls_proccomp =$_GET["procede"]; $ls_desccomp =$_GET["descripcion"]; $ld_fecha =$_GET["fecha"]; $ls_tipo =$_GET["tipo"]; $ls_provbene =$_GET["provbene"]; } if($ls_operacion=="GUARDARPRE") { $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_estcla = trim($_POST["hidtipestpro"]); $ls_estcla = trim($_POST["estcla"]); if($ls_tipo=="P") { $ls_prov=$ls_provbene; $ls_bene="----------"; } else { $ls_bene=$ls_provbene; $ls_prov="----------"; } $ld_previsto=0; $ld_aumento=0; $ld_disminucion=0; $ld_devengado=0; $ld_cobrado=0; $ld_cobrado_ant=0; $ls_cuenta = $_POST["txtcuenta"]; $ld_monto = $_POST["txtmonto"]; $ldec_monto=str_replace(".","",$ld_monto); $ldec_monto=str_replace(",",".",$ldec_monto); //-------------RELACIÓN DE ESTRUCTURA CON EL PRESUPUESTO DE INGRESOS------------------------------------------ if ($li_estpreing==1) { $ls_estcla = trim($_POST["estcla"]); $ls_codestpro1 = str_pad(trim($_POST["codestpro1"]),25,0,0); $ls_codestpro2 = str_pad(trim($_POST["codestpro2"]),25,0,0); $ls_codestpro3 = str_pad(trim($_POST["codestpro3"]),25,0,0); if ($li_estmodest==2) { $ls_codestpro4 = str_pad(trim($_POST["codestpro4"]),25,0,0); $ls_codestpro5 = str_pad(trim($_POST["codestpro5"]),25,0,0); } else { $ls_codestpro4 = $ls_codestpro5 = str_pad("",25,0,0); } } else { $ls_estcla = '-'; $ls_codestpro1 = $ls_codestpro2 = $ls_codestpro3 = $ls_codestpro4 = $ls_codestpro5 = str_pad("",25,"-",0); } //--------------------------------------------------------------------------------------------------------------------- $lb_valido=$in_classcmp->uf_spi_saldo_select($dat["codemp"],$ls_cuenta,$ld_previsto,$ld_aumento, $ld_disminucion,$ld_devengado,$ld_cobrado,$ld_cobrado_ant); $ld_previsto_disponible=$ld_previsto-$ld_devengado; if($ld_previsto_disponible>=$ldec_monto){ $lb_pasar=true; } else { $lb_pasar=false; } if(($lb_pasar)&&($lb_valido)) { $lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_proccomp,$ls_desccomp,$ls_prov,$ls_bene,$ls_tipo,2,0); $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"] =2; if($lb_valido) { $ls_cuenta = $_POST["txtcuenta"]; $ls_documento = $_POST["txtdocumento"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["ddlb_operacion"]; //$ld_monto = $_POST["txtmonto"]; //$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_cuenta,$ls_procede,$ls_descripcion,$ls_documento,$ls_operacionpre,0,$ldec_monto,"C",$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla); if($lb_valido) { ///////////////////////////////// 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." "; } 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." ; 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 ////////////////////////////// $in_classcmp->io_int_spi->io_sql->commit(); $io_msg->message("El Movimiento fue registrado."); } else { $in_classcmp->io_int_scg->io_sql->rollback(); $io_msg->message("El Movimiento no fue registrado."); } } } else { $io_msg->message(" Intenta Disminuir mas de Previsto..."); $ls_cuenta = $_POST["txtcuenta"]; $ls_documento = $_POST["txtdocumento"]; $ls_descripcion = $_POST["txtdescripcion"]; $ls_denominacion= $_POST["txtdenominacion"]; $ls_procede = $_POST["txtprocedencia"]; $ls_operacionpre= $_POST["ddlb_operacion"]; if($li_estpreing==1) { $ls_estpro1 = $_POST["codestpro1"]; $ls_estpro2 = $_POST["codestpro2"]; $ls_estpro3 = $_POST["codestpro3"]; if($li_estmodest==2) { $ls_estpro4 = $_POST["codestpro4"]; $ls_estpro5 = $_POST["codestpro5"]; } } $ls_estcla = $_POST["hidtipestpro"]; } ?>
Entrada de Comprobante de Ingresos
   
Documento
Descripción
Procedencia
Cuenta
 Catálogo de Cuentas de Gastos
Operación
Monto Agregar Detalle Presupuestario Cancelar Registro de Detalle Presupuestario