Registro de Orden de Compra

"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; $li_estmodest = $_SESSION["la_empresa"]["estmodest"]; require_once("class_folder/class_funciones_soc.php"); $io_fun_soc=new class_funciones_soc(); $io_fun_soc->uf_load_seguridad("SOC","sigesp_soc_p_registro_orden_compra.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_reporte=$io_fun_soc->uf_select_config("SOC","REPORTE","FORMATO_SOC","sigesp_soc_rfs_registro_orden_compra.php","C"); $ruta = '../'; require_once($ruta."cfg/class_folder/covensol_cfg_c_configuracion.php"); $ObjCfg = new covensol_cfg_c_configuracion(); $param['codsis'] = 'SOC'; $param['seccion'] = 'CONFIG'; $param['entry'] = 'MODIFICAR_UNIEJE_OC'; $ObjCfg->ModUniEjeOC = $ObjCfg->select_config($param); if(!$ObjCfg->ModUniEjeOC){$ObjCfg->ModUniEjeOC='0';} $param['codsis'] = 'SOC'; $param['seccion'] = 'CONFIG'; $param['entry'] = 'MODIFICAR_UNIEJE_OS'; $ObjCfg->ModUniEjeOS = $ObjCfg->select_config($param); if(!$ObjCfg->ModUniEjeOS){$ObjCfg->ModUniEjeOS='0';} $param['codsis'] = 'SOC'; $param['seccion'] = 'CONFIG'; $param['entry'] = 'MODIFICAR_PROV_OC'; $ObjCfg->ModProvOC = $ObjCfg->select_config($param); if(!$ObjCfg->ModProvOC){$ObjCfg->ModProvOC='0';} $param['codsis'] = 'SOC'; $param['seccion'] = 'CONFIG'; $param['entry'] = 'MODIFICAR_PROV_OS'; $ObjCfg->ModProvOS = $ObjCfg->select_config($param); if(!$ObjCfg->ModProvOS){$ObjCfg->ModProvOS='0';} ////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////// $li_diasem = date('w'); switch ($li_diasem) { case '0': $ls_diasem='Domingo'; break; case '1': $ls_diasem='Lunes'; break; case '2': $ls_diasem='Martes'; break; case '3': $ls_diasem='Miércoles'; break; case '4': $ls_diasem='Jueves'; break; case '5': $ls_diasem='Viernes'; break; case '6': $ls_diasem='Sábado'; break; } //------------------------------------------------------------------------------------------------------------------------------ function uf_limpiarvariables() { //////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiarvariables // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yozelin Barragan // Fecha Creación: 15/04/2007 Fecha Última Modificación : //////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_estatus,$ld_fecordcom,$ls_numordcom,$ls_numordcomser,$ls_numordcombie,$ls_tipordcom,$ls_disbie,$ls_disser; global $ls_tipsol,$ls_codprov,$ls_coduniadm,$ls_denuniadm,$ls_codfuefin,$ls_denfuefin,$ls_forpag,$ld_antpag,$ls_rb_nacional; global $ls_rb_exterior,$ls_concom,$ls_codtipmod,$ls_denmodcla,$ls_conordcom,$ls_obscom,$ls_lugentnomdep,$ls_lugentdir,$ls_conordcomanu; global $ls_diaplacom,$ld_porsegcom,$ld_monsegcom,$ls_despai,$ls_desest,$ls_codpai,$ls_denmun,$ls_denpar,$ls_uniejeaso; global $ls_codest,$ls_codmun,$ls_codpar,$ls_codmon,$ls_denmon,$ld_tascamordcom,$ld_montotdiv,$ls_nomprov,$ls_tipo,$ls_readonly; global $ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_rb_lugcom,$ls_tipconpro; global $ls_operacion,$ls_existe,$io_fun_soc,$li_totrowbienes,$li_totrowservicios,$li_totrowcargos,$ls_estsegcom; global $ls_parametros,$ls_estcom,$ls_estapro,$ls_codtipsol,$li_totrowcuentascargo,$li_totrowcuentas,$li_estsegcom; global $ls_perentdesde,$ls_perenthasta,$ls_distipmat,$ls_distipact,$ls_chkmat,$ls_chkact,$ls_selbie,$ls_selser; global $ls_distipordcom,$li_estciespg,$li_estciespi,$ls_disabled,$ls_tipafeiva,$ls_rifpro,$ls_numanacot; require_once("../shared/class_folder/sigesp_c_generar_consecutivo.php"); $io_id_process_soc= new sigesp_c_generar_consecutivo(); $ls_estatus="REGISTRO"; $ls_estcom="R"; $ld_fecordcom=date("d/m/Y"); $ls_numordcom=""; $ls_selbie = ""; $ls_selser = ""; $ls_distipordcom = ""; $ls_logusr = $_SESSION["la_logusr"]; $ls_codemp = $_SESSION["la_empresa"]["codemp"]; $ls_tipafeiva = $_SESSION["la_empresa"]["confiva"]; $lb_valido=$io_fun_soc->uf_soc_select_administrador($ls_codemp,$ls_logusr,$ls_administrativo); if (($lb_valido)&&($ls_administrativo==1)) { $ls_readonly = ""; } else { $ls_readonly = "readonly"; } $ls_numordcombie = $io_id_process_soc->uf_generar_numero_nuevo('SOC','soc_ordencompra','numordcom','SOCCOC',15,'numordcom','estcondat','B'); $ls_numordcomser = $io_id_process_soc->uf_generar_numero_nuevo('SOC','soc_ordencompra','numordcom','SOCCOS',15,'numordser','estcondat','S'); $ls_tipordcom = "-"; $ls_tipsol=""; $ls_codprov=""; $ls_nomprov=""; $ls_coduniadm=""; $ls_denuniadm=""; $ls_codfuefin=""; $ls_denfuefin=""; $ls_forpag=""; $ld_antpag="0,00"; $ls_rb_nacional="checked"; $ls_rb_exterior=""; $ls_concom=""; $ls_codtipmod=""; $ls_denmodcla=""; $ls_conordcom=""; $ls_conordcomanu=""; $ls_obscom=""; $ls_lugentnomdep=""; $ls_lugentdir=""; $ls_diaplacom=""; $ld_porsegcom="0,00"; $ld_monsegcom="0,00"; $ls_despai=""; $ls_desest=""; $ls_denmun=""; $ls_denpar=""; $ls_codpai=""; $ls_codest=""; $ls_codmun=""; $ls_codpar=""; $ls_codmon=""; $ls_denmon=""; $ld_tascamordcom="0,00"; $ld_montotdiv="0,00"; $ls_tipo="OC"; $li_estsegcom=""; $ls_codestpro1=""; $ls_codestpro2=""; $ls_codestpro3=""; $ls_codestpro4=""; $ls_codestpro5=""; $ls_estcla=""; $ls_codtipsol=""; $ls_parametros=""; $ls_operacion=$io_fun_soc->uf_obteneroperacion(); $ls_existe=$io_fun_soc->uf_obtenerexiste(); $li_totrowbienes=0; $li_totrowservicios=0; $li_totrowcargos=0; $li_totrowcuentas=0; $li_totrowcuentascargo=0; $ls_estapro=""; $ls_codtipsol=""; $ls_tipconpro=""; $ls_uniejeaso=""; $ls_perentdesde=""; $ls_perenthasta=""; $ls_disbie = $ls_disser = ""; $ls_distipmat = "disabled"; $ls_distipact = "disabled"; $ls_tipbieordcom = "-";//Tipo de Bienes Incluidos en la Orden de Compra, Materiales y/o Suministros ó Activos. if (!array_key_exists("radiotipbieordcom",$_POST)) { $ls_chkmat = $ls_chkact = ""; } $li_estciespg = $io_fun_soc->uf_load_estatus_cierre($li_estciespi,$li_estciescg); $ls_disabled = ""; if ($li_estciespg==1 || $li_estciespi==1) { $ls_disabled = "disabled"; } $ls_rifpro=""; $ls_numanacot=""; } //------------------------------------------------------------------------------------------------------------------------------ //------------------------------------------------------------------------------------------------------------------------------ function uf_load_variables() { ////////////////////////////////////////////////////////////////////////////////////// // Function: uf_load_variables // Access: private // Description: Función que carga todas las variables necesarias en la página // Creado Por: Ing. Yozelin Barragan // Fecha Creación: 19/04/2007 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////////////// global $ls_estatus,$ld_fecordcom,$ls_numordcom,$ls_selbie,$ls_selser,$ls_tipsol,$ls_codprov,$ls_nomprov,$ls_tipordcom; global $ls_coduniadm,$ls_denuniadm,$ls_codfuefin,$ls_denfuefin,$ls_forpag,$ld_antpag,$ls_rb_nacional,$ls_rb_exterior; global $ls_concom,$ls_codtipmod,$ls_denmodcla,$ls_conordcom,$ls_conordcomanu,$ls_obscom,$ls_lugentnomdep,$ls_lugentdir,$ls_diaplacom; global $ld_porsegcom,$ld_monsegcom,$ls_despai,$ls_desest,$ls_codpai,$ls_denmun,$ls_denpar,$ls_codpai,$ls_codest,$li_estciespi; global $ls_codmun,$ls_codpar,$ls_codmon,$ls_denmon,$ld_tascamordcom,$ld_montotdiv,$li_estsegcom,$ls_distipordcom; global $ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_rb_lugcom,$ls_tipsol; global $ls_codtipsol,$li_totrowservicios,$li_totrowcargos,$li_subtotal,$li_cargos,$li_total,$li_totrowbienes,$ls_uniejeaso; global $li_totrowcuentas,$ls_estcom,$io_fun_soc,$li_totrowconceptos,$li_totrowcuentascargo,$ls_numsoldel,$ls_tipconpro; global $ls_perentdesde,$ls_perenthasta,$ls_distipmat,$ls_distipact,$ls_chkmat,$ls_chkact,$ls_tipbieordcom,$li_estciespg,$ls_tipafeiva; global $ls_rifpro,$ls_numanacot; $ls_estcom=$_POST["txtestcom"]; $ld_fecordcom=$io_fun_soc->uf_obtenervalor("txtfecordcom",$_POST["txtfecha"]); $ls_numordcom=$_POST["txtnumordcom"]; $ls_tipsol=$_POST["txttipsol"]; $ls_coduniadm=$_POST["txtcodunieje"]; $ls_denuniadm=$_POST["txtdenunieje"]; $ls_codfuefin=$_POST["txtcodfuefin"]; $ls_denfuefin=$_POST["txtdenfuefin"]; $ls_tipordcom = $_POST["tipord"]; if ($ls_tipordcom=='B') { $ls_selbie = "selected"; $ls_selser = ""; $ls_distipordcom = "disabled"; } elseif($ls_tipordcom=='S') { $ls_selbie = ""; $ls_selser = "selected"; $ls_distipordcom = "disabled"; } else { $ls_selbie = ""; $ls_selser = ""; $ls_distipordcom = ""; } $ls_codprov=$_POST["txtcodprov"]; $ls_nomprov=$_POST["txtnomprov"]; $ls_forpag=$_POST["cmbforpag"]; $ld_antpag=$_POST["txtantpag"]; $ls_rb_lugcom=$_POST["rblugcom"]; if($ls_rb_lugcom=="N") { $ls_rb_nacional="checked"; } if($ls_rb_lugcom=="E") { $ls_rb_exterior="checked"; } $ls_concom=$_POST["cbmconcom"]; $ls_codtipmod=$_POST["txtcodtipmod"]; $ls_denmodcla=$_POST["txtdenmodcla"]; $ls_conordcom=$_POST["txtconordcom"]; $ls_conordcomanu=$_POST["txtconordanu"]; $ls_obscom=$_POST["txtobscom"]; $ls_lugentnomdep=$_POST["txtlugentnomdep"]; $ls_lugentdir=$_POST["txtlugentdir"]; $ls_diaplacom=$_POST["txtdiaplacom"]; $ld_porsegcom=$_POST["txtporsegcom"]; $ld_monsegcom=$_POST["txtmonsegcom"]; $ls_codpai=substr($_POST["cmbpais"],0,3); $ls_despai=$_POST["despai"]; $ls_codest=substr($_POST["cmbestado"],0,3); $ls_desest=$_POST["desest"]; $ls_codmun=substr($_POST["cmbmunicipio"],0,3); $ls_denmun=$_POST["desmun"]; $ls_codpar=substr($_POST["cmbparroquia"],0,3); $ls_denpar=$_POST["cmbparroquia"]; $ls_codmon=$_POST["txtcodmon"]; $ls_denmon=$_POST["txtdenmon"]; $ld_tascamordcom=$_POST["txttascamordcom"]; $ld_montotdiv=$_POST["txtmontotdiv"]; if (array_key_exists("chkbestsegcom",$_POST)) { $li_estsegcom = $_POST["chkbestsegcom"]; $ls_chkbestsegcom = "checked"; } else { $li_estsegcom = 0; $ls_chkbestsegcom = ""; } $ls_tipsol = $_POST["txttipsol"]; $ls_codestpro1 = $_POST["txtcodestpro1"]; $ls_codestpro2 = $_POST["txtcodestpro2"]; $ls_codestpro3 = $_POST["txtcodestpro3"]; $ls_codestpro4 = $_POST["txtcodestpro4"]; $ls_codestpro5 = $_POST["txtcodestpro5"]; $ls_estcla = $_POST["hidestcla"]; $li_totrowbienes=$_POST["totrowbienes"]; $li_totrowservicios=$_POST["totrowservicios"]; $li_totrowcargos=$_POST["totrowcargos"]; $li_totrowcuentas=$_POST["totrowcuentas"]; $li_totrowcuentascargo=$_POST["totrowcuentascargo"]; if (array_key_exists("txtsubtotal",$_POST)) { $li_subtotal=$_POST["txtsubtotal"]; } else { $li_subtotal=""; } if (array_key_exists("txtcargos",$_POST)) { $li_cargos=$_POST["txtcargos"]; } else { $li_cargos=""; } if (array_key_exists("txttotal",$_POST)) { $li_total=$_POST["txttotal"]; } else { $li_total=""; } $ls_numsoldel=$_POST["numsoldel"]; $ls_tipconpro=$_POST["tipconpro"]; $ls_uniejeaso=$_POST["txtuniejeaso"]; $ls_perentdesde = $_POST["txtperentdesde"]; $ls_perenthasta = $_POST["txtperenthasta"]; $ls_distipmat = $ls_distipact = ""; if (array_key_exists("radiotipbieordcom",$_POST)) { $ls_tipbieordcom = $_POST["radiotipbieordcom"]; $ls_chkmat = $ls_chkact = ""; if ($ls_tipbieordcom=='M') { $ls_chkmat = 'checked'; } elseif($ls_tipbieordcom=='A') { $ls_chkact = 'checked'; } } else { $ls_tipbieordcom = "-"; } $li_estciespg = $_POST["hidestciespg"];//Estatus del Cierre Presupuestario de Gasto. $li_estciespi = $_POST["hidestciespi"];//Estatus del Presupuestario de Ingresos. $ls_tipafeiva = $_POST["hidtipafeiva"]; $ls_rifpro= $_POST["txtrifpro"]; $ls_numanacot=$_POST["numanacot"]; } //------------------------------------------------------------------------------------------------------------------------------ //------------------------------------------------------------------------------------------------------------------------------ function uf_load_data(&$as_parametros) { //////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_load_variables // Access: private // Description: Función que carga todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang //Modificador Por: Ing. Yozelin Barragan // Fecha Creación: 17/03/2007 Fecha Última Modificación : 19/04/2007 /////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $li_subtotal,$li_cargos,$li_total,$li_totrowbienes,$li_totrowservicios,$li_totrowcargos,$li_totrowcuentas; global $li_totrowservicios,$li_totrowconceptos,$li_totrowcuentascargo; for($li_i=1;($li_i<$li_totrowbienes);$li_i++) { $ls_codart=$_POST["txtcodart".$li_i]; $ls_denart=$_POST["txtdenart".$li_i]; $li_canart=$_POST["txtcanart".$li_i]; $ls_unidad=$_POST["cmbunidad".$li_i]; $li_preart=$_POST["txtpreart".$li_i]; $li_subtotart=$_POST["txtsubtotart".$li_i]; $li_carart=$_POST["txtcarart".$li_i]; $li_totart=$_POST["txttotart".$li_i]; $ls_spgcuenta=$_POST["txtspgcuenta".$li_i]; $ls_unidadfisica=$_POST["txtunidad".$li_i]; $ls_numsolord=$_POST["txtnumsolord".$li_i]; $ls_coduniadmsep=$_POST["txtcoduniadmsep".$li_i]; $ls_codestpro=$_POST["hidcodestpro".$li_i]; $ls_estcla=$_POST["estcla".$li_i]; $as_parametros=$as_parametros."&txtcodart".$li_i."=".$ls_codart."&txtdenart".$li_i."=".$ls_denart."". "&txtcanart".$li_i."=".$li_canart."&cmbunidad".$li_i."=".$ls_unidad."". "&txtpreart".$li_i."=".$li_preart."&txtsubtotart".$li_i."=".$li_subtotart."". "&txtcarart".$li_i."=".$li_carart."&txttotart".$li_i."=".$li_totart."". "&hidcodestpro".$li_i."=".$ls_codestpro."&estcla".$li_i."=".$ls_estcla."". "&txtspgcuenta".$li_i."=".$ls_spgcuenta."&txtunidad".$li_i."=".$ls_unidadfisica."". "&txtnumsolord".$li_i."=".$ls_numsolord."&txtcoduniadmsep".$li_i."=".$ls_coduniadmsep; } $as_parametros=$as_parametros."&totalbienes=".$li_totrowbienes.""; for($li_i=1;($li_i<$li_totrowservicios);$li_i++) { $ls_codser=$_POST["txtcodser".$li_i]; $ls_denser=$_POST["txtdenser".$li_i]; $li_canser=$_POST["txtcanser".$li_i]; $li_preser=$_POST["txtpreser".$li_i]; $li_subtotser=$_POST["txtsubtotser".$li_i]; $li_carser=$_POST["txtcarser".$li_i]; $li_totser=$_POST["txttotser".$li_i]; $ls_spgcuenta=$_POST["txtspgcuenta".$li_i]; $ls_numsolord=$_POST["txtnumsolord".$li_i]; $ls_coduniadmsep=$_POST["txtcoduniadmsep".$li_i]; $ls_codestpro=$_POST["hidcodestpro".$li_i]; $ls_estcla=$_POST["estcla".$li_i]; $as_parametros=$as_parametros."&txtcodser".$li_i."=".$ls_codser."&txtdenser".$li_i."=".$ls_denser."". "&txtcanser".$li_i."=".$li_canser."&txtpreser".$li_i."=".$li_preser."". "&txtsubtotser".$li_i."=".$li_subtotser."&txtcarser".$li_i."=".$li_carser."". "&txttotser".$li_i."=".$li_totser."&txtspgcuenta".$li_i."=".$ls_spgcuenta."". "&hidcodestpro".$li_i."=".$ls_codestpro."&estcla".$li_i."=".$ls_estcla."". "&txtnumsolord".$li_i."=".$ls_numsolord."&txtcoduniadmsep".$li_i."=".$ls_coduniadmsep; } $as_parametros=$as_parametros."&totalservicios=".$li_totrowservicios.""; for($li_i=1;($li_i<=$li_totrowcargos);$li_i++) { $ls_codart = $_POST["txtcodservic".$li_i]; $ls_codcar = $_POST["txtcodcar".$li_i]; $ls_dencar = $_POST["txtdencar".$li_i]; $li_bascar = $_POST["txtbascar".$li_i]; $li_moncar = $_POST["txtmoncar".$li_i]; $li_subcargo = $_POST["txtsubcargo".$li_i]; $ls_formulacargo = $_POST["formulacargo".$li_i]; $ls_cuentacargo = $_POST["cuentacargo".$li_i]; $ls_numsep = $_POST["hidnumsepcar".$li_i]; $ls_codprog = $_POST["codprogcargo".$li_i]; $ls_estcla = $_POST["estclacargo".$li_i]; $as_parametros=$as_parametros."&txtcodservic".$li_i."=".$ls_codart."&txtcodcar".$li_i."=".$ls_codcar. "&txtdencar".$li_i."=".$ls_dencar."&txtbascar".$li_i."=".$li_bascar. "&txtmoncar".$li_i."=".$li_moncar."&txtsubcargo".$li_i."=".$li_subcargo. "&cuentacargo".$li_i."=".$ls_cuentacargo."&formulacargo".$li_i."=".$ls_formulacargo. "&hidnumsepcar".$li_i."=".$ls_numsep."&codprogcargo".$li_i."=".$ls_codprog. "&estclacargo".$li_i."=".$ls_estcla; } $as_parametros=$as_parametros."&totalcargos=".$li_totrowcargos; for($li_i=1;($li_i<$li_totrowcuentas);$li_i++) { $ls_codpro=$_POST["txtcodprogas".$li_i]; $ls_cuenta=$_POST["txtcuentagas".$li_i]; $li_moncue=$_POST["txtmoncuegas".$li_i]; $ls_estcla=$_POST["estclapre".$li_i]; $as_parametros=$as_parametros."&txtcodprogas".$li_i."=".$ls_codpro."&txtcuentagas".$li_i."=".$ls_cuenta. "&txtmoncuegas".$li_i."=".$li_moncue."&estclapre".$li_i."=".$ls_estcla; } $as_parametros=$as_parametros."&totalcuentas=".$li_totrowcuentas; for($li_i=1;($li_i<$li_totrowcuentascargo);$li_i++) { $ls_codcargo=$_POST["txtcodcargo".$li_i]; $ls_codpro=$_POST["txtcodprocar".$li_i]; $ls_cuenta=$_POST["txtcuentacar".$li_i]; $li_moncue=$_POST["txtmoncuecar".$li_i]; $ls_estcla=$_POST["estclacar".$li_i]; $as_parametros=$as_parametros."&txtcodcargo".$li_i."=".$ls_codcargo."&txtcodprocar".$li_i."=".$ls_codpro. "&txtcuentacar".$li_i."=".$ls_cuenta."&txtmoncuecar".$li_i."=".$li_moncue."&estclacar".$li_i."=".$ls_estcla; } $as_parametros=$as_parametros."&totalcuentascargo=".$li_totrowcuentascargo; $as_parametros=$as_parametros."&subtotal=".$li_subtotal."&cargos=".$li_cargos."&total=".$li_total; } //------------------------------------------------------------------------------------------------------------------------------ ?> Registro de Orden de Compra ')"> uf_buscar_sep(&$ls_numsol,&$ls_coduni,&$ls_denoadm,&$ls_consol); $ls_uniejeasoaux=$ls_uniejeasoaux." "."Nro. SEP:".$ls_numsol." Unidad Ejecutora: ".$ls_coduni." - ".$ls_denoadm.";"; if(@ereg($ls_uniejeaso,$ls_uniejeasoaux)) { $ls_uniejeaso=$ls_uniejeaso." ".$ls_uniejeasoaux; } else { $ls_uniejeaso=$ls_uniejeaso; } $ls_conordcomaux=strcmp($ls_conordcom1,$ls_consol); $ls_concepto=strlen($ls_consol); $ls_numconcepto=strlen($ls_conordcom1); $ls_cadencontrada=substr($ls_conordcom1,$ls_concepto,$ls_numconcepto); $ls_cadencontrada=trim($ls_cadencontrada); if($ls_cadencontrada!=0) { $ls_conordcom=$ls_conordcom." ".$ls_consol." ".$ls_cadencontrada; } else { $ls_conordcom=$ls_conordcom1; } } else { $ls_conordcom=$ls_conordcom1; } } for($li_i=1;($li_i<$li_totrowservicios);$li_i++) { $ls_numsol=$_POST["txtnumsolord".$li_i]; $ls_conordcom=$_POST["txtconordcom"]; if($ls_tipsol=="SEP") { $io_soc->uf_buscar_sep($ls_numsol,&$ls_coduni,&$ls_denoadm,&$ls_consol); $ls_uniejeasoaux=$ls_uniejeasoaux." "."Nro. SEP:".$ls_numsol." Unidad Ejecutora: ".$ls_coduni." - ".$ls_denoadm.";"; if(ereg($ls_uniejeaso,$ls_uniejeasoaux)) { $ls_uniejeaso=$ls_uniejeaso." ".$ls_uniejeasoaux; } else { $ls_uniejeaso=$ls_uniejeaso; } $ls_conordcomaux=strcmp($ls_conordcom1,$ls_consol); $ls_concepto=strlen($ls_consol); $ls_numconcepto=strlen($ls_conordcom1); $ls_cadencontrada=substr($ls_conordcom1,$ls_concepto,$ls_numconcepto); $ls_cadencontrada=trim($ls_cadencontrada); if($ls_cadencontrada!=0) { $ls_conordcom=$ls_conordcom." ".$ls_consol." ".$ls_cadencontrada; } else { $ls_conordcom=$ls_conordcom1; } } else { $ls_conordcom=$ls_conordcom1; } }*/ $lb_valido=$io_soc->uf_guardar($ls_estcom,$ld_fecordcom,$li_estsegcom,$ls_numordcom,$ls_coduniadm,$ls_codfuefin, $ls_tipordcom,$ls_codprov,$ls_forpag,$ld_antpag,$ls_rb_lugcom,$ls_concom,$ls_codtipmod, $ls_conordcom,$ls_obscom,$ls_lugentnomdep,$ls_lugentdir,$ls_diaplacom,$ld_porsegcom, $ld_monsegcom,$ls_codpai,$ls_codest,$ls_codmun,$ls_codpar,$ls_codmon,$ld_tascamordcom, $ld_montotdiv,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4, $ls_codestpro5,$ls_estcla,$li_totrowbienes,$li_totrowservicios,$li_totrowcargos,$li_totrowcuentas, $li_totrowcuentascargo,$li_subtotal,$li_cargos,$li_total,$la_seguridad,$ls_existe, $ls_tipsol,$ls_numsoldel,$ls_uniejeaso,$ls_perentdesde,$ls_perenthasta,$ls_tipbieordcom,$la_permisos["administrador"]); uf_load_data($ls_parametros); switch($ls_estcom) { case "0": // R $ls_estatus="REGISTRO"; break; case "1": // E $ls_estatus="EMITIDA"; break; } if($lb_valido) { $ls_existe="TRUE"; } break; case "ELIMINAR"; uf_load_variables(); $lb_valido=$io_soc->uf_delete_orden_compra($ls_numordcom,$ls_tipordcom,$la_seguridad,$la_permisos["administrador"]); if(!$lb_valido) { uf_load_data($ls_parametros); switch($ls_estcom) { case "0": // R $ls_estatus="REGISTRO"; break; case "1": // E $ls_estatus="EMITIDA"; break; } $ls_existe="TRUE"; } else { uf_limpiarvariables(); $ls_chkmat = $ls_chkact = ""; $ls_existe="FALSE"; } break; } ?>

Ordenes de Compra

uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_soc); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>

Registro de Orden de Compra
Reporte en
Estatus			Fecha		onKeyDown="javascript:ue_formato_fecha(this,'/',patron,true,event);" onBlur="javascript: ue_validar_formatofecha(this);">
Tipo de Orden	value="M" onchange="uf_load_catalogo();" /> Materiales y/o Suministros. value="A" onchange="uf_load_catalogo();" /> Activos.
Número de Orden	onBlur="javascript: ue_rellenarcampo(this,15);">
Proveedor
Rif
	Solicitud de Ejecución Presupuestaria
Unidad Ejecutora
Fuente de Financiamiento
Lugar de la Compra	> Nacional > Extranjero	Condición
Forma de Pago		Anticipo de Pago	>
Modalidad de la Clausula
Concepto	name="txtconordcom" cols="90" wrap="physical" id="txtconordcom" style="text-align:left" onKeyPress="return keyRestrict(event,'1234567890'+'abcdefghijklmnñopqrstuvwxyzáéíóú '+'¡!:;_°#@/?¿%&$*-,.+(){}[]='); "><?php print $ls_conordcom; ?>
Unidades Asociadas	<?php print $ls_uniejeaso; ?>
Observación	id="txtobscom" onKeyPress="return keyRestrict(event,'1234567890'+'abcdefghijklmnñopqrstuvwxyzáéíóú '+'¡!:;_°#@/?¿%&$*-,.+(){}[]='); "><?php print $ls_obscom ?>
Concepto de Anulación	<?php print $ls_conordcomanu ?>
CONDICIONES DE LA ENTREGA			SEGURO
Dependencia	>			Seguro	>
Dirección	>			Porcentaje	>
Plazo en Días	>			Monto	>
Período de Entrega Desde	onKeyDown="javascript:ue_formato_fecha(this,'/',patron,true,event);" onBlur="javascript: ue_validar_formatofecha(this);">	Hasta	onKeyDown="javascript:ue_formato_fecha(this,'/',patron,true,event);" onBlur="javascript: ue_validar_formatofecha(this);">
UBICACION GEOGRAFICA			MONEDA EXTRANJERA
Pais	uf_soc_combo_paises($ls_codpai."-".$ls_despai); ?>		Tipo Moneda
Estado	uf_soc_combo_estado($ls_desest,$ls_codpai);?>		Tasa de Cambio
Municipio	uf_soc_combo_municipio($ls_denmun,$ls_codpai,$ls_codest);?>		Monto en Divisas		>
Parroquia	uf_soc_combo_parroquia($ls_denpar,$ls_codpai,$ls_codest,$ls_codmun);?>

uf_destructor(); unset($io_soc); ?>