"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_ingreso.php"); $io_fun_ingreso=new class_funciones_ingreso(); $io_fun_ingreso->uf_load_seguridad("SPI","sigesp_spi_p_aumento.php",$ls_permisos,$la_seguridad,$la_permisos); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?> Comprobante de Aumento
Sistema de Presupuesto de Ingreso
 
                     
Nuevo Grabar Buscar Eliminar Salir            
uf_conectar(); $io_sql=new class_sql($io_connect); $io_function=new class_funciones(); $io_fecha=new class_fecha(); $io_msg = new class_mensajes(); $io_function_db=new class_funciones_db($io_connect); $in_classcmp=new sigesp_spi_c_mod_presupuestarias(); $io_int_scg=new class_sigesp_int_scg(); $io_int_spi=new class_sigesp_int_spi(); $io_msg=new class_mensajes(); $io_grid=new grid_param(); $io_seguridad= new sigesp_c_seguridad(); $la_emp=$_SESSION["la_empresa"]; $li_estmodest=$la_emp["estmodest"]; if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_procede = $_POST["txtproccomp"]; $ls_comprobante = $_POST["txtcomprobante"]; $ls_fecha = $_POST["txtfecha"]; $ls_provbene = $_POST["txtprovbene"]; $ls_desproben = $_POST["txtdesproben"]; $ls_tipo = $_POST["tipo"]; $ls_descripcion = $_POST["txtdesccomp"]; $ls_status = $_POST["status_actual"]; $li_fila = 0; $li_estapro = $_POST["estapro"]; $totpre= $_POST["totpre"]; $totcon= $_POST["totcon"]; } else { $ls_operacion="NUEVO"; $_SESSION["ACTUALIZAR"]="NO"; $_SESSION["ib_new"] =true; $ls_fecha=date("d/m/Y"); $li_fila = 0; $li_estapro = 0; } if($ls_operacion=="VALIDAFECHA") { $readonly=""; $ldec_mondeb=0; $ldec_diferencia=0; $ldec_monhab=0; $ls_comprobante = $_POST["txtcomprobante"]; $ls_procede = $_POST["txtproccomp"]; $ls_fecha = $_POST["txtfecha"]; $ls_tipo = $_POST["tipo"]; $ls_provbene = $_POST["txtprovbene"]; $ls_desproben = $_POST["txtdesproben"]; $ls_descripcion = $_POST["txtdesccomp"]; $ls_codemp=$la_emp["codemp"]; $lb_valido=$io_fecha->uf_valida_fecha_periodo($ls_fecha,$ls_codemp); if(!($lb_valido)) { $io_msg->message($io_fecha->is_msg_error); $ls_fecha="01/01/1900"; } else { $lb_existe=$in_classcmp->uf_verificar_comprobante($ls_codemp,$ls_procede,$ls_comprobante); if($lb_existe) { $io_msg->message(" El Comprobante ya existe. El Sistema generara un nuevo numero de Comprobante"); $ls_comprobante = $in_classcmp->uf_generar_num_cmp($la_emp["codemp"],'SPIAUM'); } } $li_fila = 0; $prov_sel= ""; $bene_sel= ""; $ning_sel= "selected"; $totalpre= 1; $totalcon= 1; $li_estpreing = $la_emp["estpreing"]; if ($li_estpreing==0) { $object[1][1] = ""; $object[1][2] = ""; $object[1][3] = ""; $object[1][4] = ""; $object[1][5] = ""; $object[1][6] = ""; $object[1][7] = ""; } else { $object[1][1] = ""; $object[1][2] = ""; $object[1][3] = ""; $object[1][4] = ""; $object[1][5] = ""; $object[1][6] = ""; $object[1][7] = ""; $object[1][8] = ""; } $object2[1][1] = ""; $object2[1][2] = ""; $object2[1][3] = ""; $object2[1][4] = ""; $object2[1][5] = ""; $object2[1][6] = ""; $object2[1][7] = ""; uf_cargar_dt($ls_codemp,$ls_procede,$ls_comprobante,$ls_fecha); } //Titulos de la tabla de Detalle Presupuestario. $li_estpreing = $la_emp["estpreing"]; if ($li_estpreing==0) { $title[1]="Cuenta"; $title[2]="Documento"; $title[3]="Descripción"; $title[4]="Procede"; $title[5]="Operación"; $title[6]="Monto"; $title[7]="Edición"; $grid1="grid_SPI"; } else { $title[1]="Cuenta"; if($li_estmodest==1) { $title[2]="Imputación Presupuestaria"; } else { $title[2]="Programatica"; } $title[3]="Documento"; $title[4]="Descripción"; $title[5]="Procede"; $title[6]="Operación"; $title[7]="Monto"; $title[8]="Edición"; $grid1="grid_SPI"; } //Titulos de la tabla de Detalle Contable $title2[1]="Cuenta"; $title2[2]="Documento"; $title2[3]="Descripción"; $title2[4]="Procede"; $title2[5]="D/H"; $title2[6]="Monto"; $title2[7]="Edición"; $grid2="grid_SCG"; if($ls_operacion=="NUEVO")//Acciones para un comprobante nuevo { $ls_procede = "SPIAUM"; $ls_status = "N"; $ls_comprobante = $in_classcmp->uf_generar_num_cmp($la_emp["codemp"],'SPIAUM'); $ls_provbene = "----------"; $ls_desproben = ""; $ls_tipo = ""; $ls_descripcion = ""; $ls_tipo = ""; $li_fila = 0; $ldec_mondeb = 0; $ldec_diferencia=0; $ldec_monhab = 0; $ldec_totspi = 0; $prov_sel = ""; $bene_sel = ""; $ning_sel = "selected"; $totalpre = 1; $totalcon = 1; $li_estapro = 0; $li_estpreing = $la_emp["estpreing"]; if ($li_estpreing==0) { $object[1][1] = ""; $object[1][2] = ""; $object[1][3] = ""; $object[1][4] = ""; $object[1][5] = ""; $object[1][6] = ""; $object[1][7] = ""; } else { $object[1][1] = ""; $object[1][2] = ""; $object[1][3] = ""; $object[1][4] = ""; $object[1][5] = ""; $object[1][6] = ""; $object[1][7] = ""; $object[1][8] = ""; } $object2[1][1] = ""; $object2[1][2] = ""; $object2[1][3] = ""; $object2[1][4] = ""; $object2[1][5] = ""; $object2[1][6] = ""; $object2[1][7] = ""; } if($ls_operacion=="CARGAR_DT") { $ls_comprobante=$_POST["txtcomprobante"]; $ld_fecha =$_POST["txtfecha"]; $ls_proccomp =$_POST["txtproccomp"]; $ls_desccomp =$_POST["txtdesccomp"]; $ls_provbene =$_POST["txtprovbene"]; $ls_desproben = $_POST["txtdesproben"]; $ls_tipo =$_POST["tipo"]; $ldec_mondeb=0; $ldec_diferencia=0; $ldec_monhab=0; if($ls_tipo=="P") { $ls_prov=$ls_provbene; $ls_bene="----------"; $prov_sel="selected"; $bene_sel=""; $ning_sel=""; } else { $ls_bene=$ls_provbene; $ls_prov="----------"; $prov_sel=""; $bene_sel="selected"; $ning_sel=""; } uf_cargar_dt($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha); } if($ls_operacion=="GUARDAR") { $ls_codemp=$la_emp["codemp"]; $ls_comprobante=$_POST["txtcomprobante"]; $ld_fecha=$_POST["txtfecha"]; $ls_procedencia=$_POST["txtproccomp"]; $ls_descripcion=$_POST["txtdesccomp"]; $ls_tipo=$_POST["tipo"]; $int_int->is_tipo=$ls_tipo; $int_int->is_cod_prov=$_POST["txtprovbene"]; $int_int->is_ced_ben=$_POST["txtprovbene"]; $ls_desproben = $_POST["txtdesproben"]; $int_int->ib_procesando_cmp=false; $int_int->id_fecha=$io_function->uf_convertirdatetobd($ld_fecha); if( $ls_tipo=='P') { $ls_fuente = $_POST["txtprovbene"]; $int_int->is_cod_prov=$_POST["txtprovbene"]; $int_int->is_ced_ben="----------"; $prov_sel="selected"; $bene_sel=""; $ning_sel=""; } elseif($ls_tipo=='B') { $ls_fuente = $_POST["txtprovbene"]; $int_int->is_ced_ben=$_POST["txtprovbene"]; $int_int->is_cod_prov="----------"; $prov_sel=""; $bene_sel="selected"; $ning_sel=""; } else { $ls_fuente = "-"; $int_int->is_cod_prov="----------"; $int_int->is_ced_ben="----------"; $prov_sel=""; $bene_sel=""; $ning_sel="selected"; } $ls_codemp=$la_emp["codemp"]; $lb_valido=$io_fecha->uf_valida_fecha_periodo($ls_fecha,$ls_codemp); if(!($lb_valido)) { $io_msg->message($io_fecha->is_msg_error); $ls_fecha="01/01/1900"; } else { $lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_procedencia,$ls_descripcion,$int_int->is_cod_prov,$int_int->is_ced_ben,$ls_tipo,2,0); if(!$lb_valido) { $io_msg->message($in_classcmp->is_msg_error); } else { $io_msg->message("El Movimiento fue Registrado"); } } uf_cargar_dt($la_emp["codemp"],$ls_procedencia,$ls_comprobante,$ld_fecha); } if($ls_operacion=="ELIMINAR") { $lb_valido=false; $ls_codemp=$la_emp["codemp"]; $ls_comprobante=$_POST["txtcomprobante"]; $ld_fecha=$_POST["txtfecha"]; $ld_fecha=$io_function->uf_convertirdatetobd($ld_fecha); $ls_procedencia=$_POST["txtproccomp"]; if($li_estpreing==1) { $li_totrow_det=$_POST["totpre"]; for($li_s=1;$li_s<=$li_totrow_det;$li_s++) { $codestpro1=$_POST["txtcodestpro1".$li_s]; $codestpro2=$_POST["txtcodestpro2".$li_s]; $codestpro3=$_POST["txtcodestpro3".$li_s]; $codestpro4=$_POST["txtcodestpro4".$li_s]; $codestpro5=$_POST["txtcodestpro5".$li_s]; $ls_estcla=$_POST["txtestcla".$li_s]; $lb_valido=$in_classcmp->uf_delete_all_comprobante($ls_codemp,$ls_comprobante,$ld_fecha,$ls_procedencia, $codestpro1,$codestpro2,$codestpro3,$codestpro4,$codestpro5,$ls_estcla); } } else { $codestpro1 = '-------------------------'; $codestpro2 = '-------------------------'; $codestpro3 = '-------------------------'; $codestpro4 = '-------------------------'; $codestpro5 = '-------------------------'; $ls_estcla = '-'; $lb_valido=$in_classcmp->uf_delete_all_comprobante($ls_codemp,$ls_comprobante,$ld_fecha,$ls_procedencia, $codestpro1,$codestpro2,$codestpro3,$codestpro4,$codestpro5,$ls_estcla); } if($lb_valido) { $io_msg->message("Comprobante eliminado satisfactoriamente"); $ls_comprobante = $in_classcmp->uf_generar_num_cmp($la_emp["codemp"],'SPIAUM'); $ls_fecha = date("d/m/Y"); $ls_provbene = ""; $ls_desproben = ""; $ls_tipo = "-"; $ls_descripcion = ""; $li_estapro = 0; ///////////////////////////////// SEGURIDAD ///////////////////////////// $ls_evento="DELETE"; $ls_desc_event="Elimino el comprobante presupuestario ".$ls_comprobante." de fecha ".$ld_fecha." y procedencia ".$ls_procedencia; $io_fun_ingreso->uf_log_transacion_seguridad("SPI","sigesp_spi_p_aumento.php",$ls_desc_event,$ls_evento); //$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_sql->commit(); } else { $in_classcmp->io_sql->rollback(); } uf_cargar_dt($la_emp["codemp"],$ls_procedencia,$ls_comprobante,$ld_fecha); } if($ls_operacion=="DELETESPI") { $ls_comprobante= $_POST["txtcomprobante"]; $ld_fecha = $_POST["txtfecha"]; $ls_proccomp = $_POST["txtproccomp"]; $ls_desccomp = $_POST["txtdesccomp"]; $ls_provbene = $_POST["txtprovbene"]; $ls_tipo = $_POST["tipo"]; $li_fila = $_POST["fila"]; $ls_desproben = $_POST["txtdesproben"]; if($ls_tipo=="P") { $ls_prov=$ls_provbene; $ls_bene="----------"; $prov_sel="selected"; $bene_sel=""; $ning_sel=""; } elseif($ls_tipo=="B") { $ls_bene=$ls_provbene; $ls_prov="----------"; $prov_sel=""; $bene_sel="selected"; $ning_sel=""; } else { $ls_bene="----------"; $ls_prov="----------"; $prov_sel=""; $bene_sel=""; $ning_sel="selected"; } $ls_cuenta=$_POST["txtcuenta".$li_fila]; $ls_procede_doc=$_POST["txtprocede".$li_fila]; $ls_descripcion=$_POST["txtdescripcion".$li_fila]; $ls_documento=$_POST["txtdocumento".$li_fila]; $ls_operacion=$_POST["txtoperacion".$li_fila]; $ldec_monto_anterior=$_POST["txtmonto".$li_fila]; $codestpro1 = $_POST["txtcodestpro1".$li_fila]; $codestpro2 = $_POST["txtcodestpro2".$li_fila]; $codestpro3 = $_POST["txtcodestpro3".$li_fila]; $codestpro4 = $_POST["txtcodestpro4".$li_fila]; $codestpro5 = $_POST["txtcodestpro5".$li_fila]; $estcla = $_POST["txtestcla".$li_fila]; $ldec_monto_actual=0; $li_tipo_comp=2; $ls_mensaje=$io_int_spi->uf_operacion_codigo_mensaje($ls_operacion); $io_int_spi->is_codemp = $la_emp["codemp"]; $io_int_spi->id_fecha = $io_function->uf_convertirdatetobd($ld_fecha); $io_int_spi->is_procedencia= $ls_proccomp; $io_int_spi->is_comprobante= $ls_comprobante; $io_int_spi->is_tipo = $ls_tipo; $io_int_spi->is_cod_prov = $ls_prov; $io_int_spi->is_ced_ben = $ls_bene; $io_int_spi->ib_AutoConta = true; $ls_denominacion=""; $ls_status=""; $ls_sc_cuenta=""; if ($ls_tipo=="B") { $ls_fuente = $ls_bene; } else { if ($ls_tipo=="P") { $ls_fuente = $ls_prov; } else { $ls_fuente = "----------"; } } if(!$io_int_spi->uf_spi_select_cuenta($la_emp["codemp"],$ls_cuenta,$ls_status,$ls_denominacion,$ls_sc_cuenta, $codestpro1,$codestpro2,$codestpro3,$codestpro4,$codestpro5,$estcla)) { return false; } $lb_valido=$in_classcmp->uf_int_spi_delete_movimiento($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha,$ls_tipo,$ls_fuente,$ls_prov,$ls_bene, $ls_cuenta,$ls_procede_doc,$ls_documento,$ls_descripcion,$ls_mensaje,$li_tipo_comp, $ldec_monto_anterior,$ldec_monto_actual,$ls_sc_cuenta, $codestpro1,$codestpro2,$codestpro3,$codestpro4,$codestpro5,$estcla); if($lb_valido) { ///////////////////////////////// SEGURIDAD ///////////////////////////// $ls_evento="DELETE"; $ls_desc_event="Elimino el movimiento presupuestario ".$ls_documento." con operacion".$ls_operacion." por un monto de ".$ldec_monto_anterior." para la cuenta ".$ls_cuenta."; para el comprobante ".$ls_comprobante." de fecha ".$ld_fecha; $io_fun_ingreso->uf_log_transacion_seguridad("SPI","sigesp_spi_p_aumento.php",$ls_desc_event,$ls_evento); //$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event); //////////////////////////////// SEGURIDAD ////////////////////////////// $io_int_spi->io_sql->commit(); } else { $io_int_spi->io_sql->rollback(); } uf_cargar_dt($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha); } if($ls_operacion=="DELETESCG") { $ls_comprobante=$_POST["txtcomprobante"]; $ld_fecha =$_POST["txtfecha"]; $ls_proccomp =$_POST["txtproccomp"]; $ls_desccomp =$_POST["txtdesccomp"]; $ls_provbene =$_POST["txtprovbene"]; $ls_tipo =$_POST["tipo"]; $li_fila =$_POST["fila"]; $ls_desproben = $_POST["txtdesproben"]; if($ls_tipo=="P") { $ls_prov=$ls_provbene; $ls_bene="----------"; $prov_sel="selected"; $bene_sel=""; $ning_sel=""; } else { $ls_bene=$ls_provbene; $ls_prov="----------"; $prov_sel=""; $bene_sel="selected"; $ning_sel=""; } $ls_cuenta=$_POST["txtcontable".$li_fila]; $ls_procdoc=$_POST["txtprocdoc".$li_fila]; $ls_desdoc=$_POST["txtdesdoc".$li_fila]; $ls_docscg=$_POST["txtdocscg".$li_fila]; $ls_debhab=$_POST["txtdebhab".$li_fila]; $ldec_monto_anterior=$_POST["txtmontocont".$li_fila]; $ldec_monto_actual=0; $li_tipo_comp=2; $in_classcmp->is_codemp=$la_emp["codemp"]; $in_classcmp->is_fecha=$io_function->uf_convertirdatetobd($ld_fecha); $in_classcmp->is_procedencia=$ls_proccomp; $in_classcmp->is_comprobante=$ls_comprobante; $in_classcmp->is_tipo=$ls_tipo; $in_classcmp->is_cod_prov=$ls_prov; $in_classcmp->is_ced_ben=$ls_bene; $in_classcmp->ib_AutoConta=true; $lb_valido=$in_classcmp->uf_scg_delete_movimiento($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$in_classcmp->is_fecha, $ls_cuenta, $ls_procdoc, $ls_docscg,$ls_debhab ); if($lb_valido) { ///////////////////////////////// SEGURIDAD ///////////////////////////// $ls_evento="DELETE"; $ls_desc_event="Elimino el movimiento contable ".$ls_docscg." con operacion ".$ls_debhab." por un monto de ". $ldec_monto_anterior." para la cuenta ".$ls_cuenta."; para el comprobante ".$ls_comprobante." de fecha ".$ld_fecha; $io_fun_ingreso->uf_log_transacion_seguridad("SPI","sigesp_spi_p_aumento.php",$ls_desc_event,$ls_evento); //$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event); //////////////////////////////// SEGURIDAD ////////////////////////////// $io_int_scg->io_sql->commit(); } else { $io_int_scg->io_sql->rollback(); } uf_cargar_dt($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha); } function uf_cargar_dt($ls_codemp,$ls_proccomp,$ls_comprobante,$ld_fecha) { global $in_classcmp; global $la_emp; global $totalpre; global $totalcon; global $object; global $object2; global $ldec_mondeb; global $ldec_monhab; global $ldec_diferencia; global $ldec_totspi; $ldec_totspi=0; $ldec_mondeb=0; $ldec_monhab=0; $ldec_diferencia=0; $i=0; $ls_codemp = $la_emp["codemp"]; $li_estpreing = $la_emp["estpreing"]; $ls_estmodest = $la_emp["estmodest"]; $li_loncodestpro1 = $la_emp["loncodestpro1"]; $li_loncodestpro2 = $la_emp["loncodestpro2"]; $li_loncodestpro3 = $la_emp["loncodestpro3"]; $li_loncodestpro4 = $la_emp["loncodestpro4"]; $li_loncodestpro5 = $la_emp["loncodestpro5"]; $rs_dtcmp=$in_classcmp->uf_cargar_dt_comprobante($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha); $li_numrows=$in_classcmp->io_sql->num_rows($rs_dtcmp); $totalpre=1; $totalcon=1; if($li_numrows>0) { $totalpre=$li_numrows; while($row=$in_classcmp->io_sql->fetch_row($rs_dtcmp)) { $i=$i+1; $ls_cuenta=$row["spi_cuenta"]; $ls_documento=$row["documento"]; $ls_descripcion=$row["descripcion"]; $ls_procede=$row["procede_doc"]; $ls_operacion=$row["operacion"]; $ldec_monto=$row["monto"]; //----------------estructuras asociadas al ingresos-------------------------------------------------- $ls_codestpro1=$row["codestpro1"]; $ls_codestpro2=$row["codestpro2"]; $ls_codestpro3=$row["codestpro3"]; $ls_codestpro4=$row["codestpro4"]; $ls_codestpro5=$row["codestpro5"]; $codestpro1=$row["codestpro1"]; $codestpro2=$row["codestpro2"]; $codestpro3=$row["codestpro3"]; $codestpro4=$row["codestpro4"]; $codestpro5=$row["codestpro5"]; $ls_estcla=$row["estcla"]; $ls_codestpro1 = trim(substr($ls_codestpro1,-$li_loncodestpro1)); $ls_codestpro2 = trim(substr($ls_codestpro2,-$li_loncodestpro2)); $ls_codestpro3 = trim(substr($ls_codestpro3,-$li_loncodestpro3)); if ($ls_estmodest==2) { $ls_denestcla=""; $ls_codestpro4 = trim(substr($ls_codestpro4,-$li_loncodestpro4)); $ls_codestpro5 = trim(substr($ls_codestpro5,-$li_loncodestpro5)); $ls_programatica = $ls_codestpro1."-".$ls_codestpro2."-".$ls_codestpro3."-".$ls_codestpro4."-".$ls_codestpro5; } else { if ($ls_estcla=='P') { $ls_denestcla = 'Proyecto'; } else { $ls_denestcla = 'Acción Centralizada'; } $ls_programatica=$ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3; } //-------------------------------------------------------------------------------------------------- if ($li_estpreing==0) { $object[$i][1]=""; $object[$i][2]=""; $object[$i][3]=""; $object[$i][4]=""; $object[$i][5]=""; $object[$i][6]=""; $object[$i][7]="Eliminar"; $ldec_totspi = $ldec_totspi + $ldec_monto; } else { $object[$i][1]=""; $object[$i][2]=" "; $object[$i][3]=""; $object[$i][4]=""; $object[$i][5]=""; $object[$i][6]=""; $object[$i][7]=""; $object[$i][8]="Eliminar"; $ldec_totspi = $ldec_totspi + $ldec_monto; } } $in_classcmp->io_sql->free_result($rs_dtcmp); } else { if ($li_estpreing==0) { $object[1][1]=""; $object[1][2]=""; $object[1][3]=""; $object[1][4]=""; $object[1][5]=""; $object[1][6]=""; $object[1][7]=""; } else { $object[1][1]=""; $object[1][2]=""; $object[1][3]=""; $object[1][4]=""; $object[1][5]=""; $object[1][6]=""; $object[1][7]=""; $object[1][8]=""; } } $i=0; $rs_dtscg=$in_classcmp->uf_cargar_dt_contable_cmp($la_emp["codemp"],$ls_proccomp,$ls_comprobante,$ld_fecha); $li_numrows=$in_classcmp->io_sql->num_rows($rs_dtscg); //$totalpre=$li_numrows; if($li_numrows>0) { $totalcon=$li_numrows; while($row=$in_classcmp->io_sql->fetch_row($rs_dtscg)) { $i=$i+1;+ $ls_sc_cuenta=$row["sc_cuenta"]; $ls_documento=$row["documento"]; $ls_desdoc=$row["descripcion"]; $ls_procdoc=$row["procede_doc"]; $ls_debhab=$row["debhab"]; $ldec_monto=$row["monto"]; if($ls_debhab=="D") { $ldec_mondeb=$ldec_mondeb+$ldec_monto; } else { $ldec_monhab=$ldec_monhab+$ldec_monto; } $object2[$i][1]=""; $object2[$i][2]=""; $object2[$i][3]=""; $object2[$i][4]=""; $object2[$i][5]=""; $object2[$i][6]=""; $object2[$i][7] ="Eliminar"; } $ldec_diferencia=$ldec_mondeb-$ldec_monhab; $in_classcmp->io_sql->free_result($rs_dtscg); } else { $object2[1][1]=""; $object2[1][2]=""; $object2[1][3]=""; $object2[1][4]=""; $object2[1][5]=""; $object2[1][6]=""; $object2[1][7] =""; } } if($ls_tipo=='P') { $prov_sel="checked"; $bene_sel=""; $ning_sel=""; } elseif($ls_tipo=='B') { $prov_sel=""; $bene_sel="checked"; $ning_sel=""; } else { $prov_sel=""; $bene_sel=""; $ning_sel="checked"; } if($ls_status=="C") { $readonly="readonly"; } else { $readonly=""; } ?>
uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_ingreso); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>
Comprobante Presupuestario de Aumento
     

Procedencia
Fecha datepicker="true">

Comprobante

 >  

Descripción

Tipo


 

Código/Cédula

 > Catalogo Proveedores/Beneficiarios  
     Agregar detalle Ingresos
makegrid($totalpre,$title,$object,770,'Detalles Presupuestarios',$grid1);?>
Total Ingresos
" size="28" style="text-align:right">

     Agregar detalle Contable

makegrid($totalcon,$title2,$object2,770,'Detalles Contable',$grid2);?>
       
Debe
" size="28" readonly>
       
Haber
" size="28" readonly>
     
Diferencia

" size="28" readonly>