require_once("sigesp_snorh_c_tablavacacion.php");
$io_tablavac=new sigesp_snorh_c_tablavacacion();
require_once("../shared/class_folder/grid_param.php");
$io_grid=new grid_param();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "NUEVO":
$li_totrows=1;
uf_agregarlineablanca($lo_object,1);
break;
case "GUARDAR":
$ls_codtabvac=$_POST["txtcodtabvac"];
$ls_dentabvac=$_POST["txtdentabvac"];
$ls_pertabvac=$io_fun_nomina->uf_obtenervalor("cmbpertabvac","");
$li_adequitabvac=$io_fun_nomina->uf_obtenervalor("chkadequitabvac","0");
$li_aderettabvac=$io_fun_nomina->uf_obtenervalor("chkaderettabvac","0");
$li_bonauttabvac=$io_fun_nomina->uf_obtenervalor("chkbonauttabvac","0");
$li_anoserpre=$io_fun_nomina->uf_obtenervalor("chkanoserpre","0");
$io_tablavac->io_sql->begin_transaction();
$lb_valido=$io_tablavac->uf_guardar($ls_existe,$ls_codtabvac,$ls_dentabvac,$ls_pertabvac,$li_adequitabvac,$li_aderettabvac,
$li_bonauttabvac,$li_anoserpre,$la_seguridad);
if($lb_valido)
{
for($li_i=1;$li_i<$li_totrows&&$lb_valido;$li_i++)
{
$li_lappervac=$_POST["txtlappervac".$li_i];
$li_diadisvac=$_POST["txtdiadisvac".$li_i];
$li_diaadidisvac=$_POST["txtdiaadidisvac".$li_i];
$li_diabonvac=$_POST["txtdiabonvac".$li_i];
$io_metodobanco=new sigesp_sno_c_metodo_banco();
$ls_codconc="";
switch ($ls_operacion)
{
case "GENDISK":
$ld_monto=0; // ojo monto a pagar
$ld_fecdes=$_SESSION["la_nomina"]["fecdesper"];
$ld_fechas=$_SESSION["la_nomina"]["fechasper"];
$ls_suspendidos=$_POST["txtsuspendidos"];
$ls_quincena=$_POST["cmdquincena"];
$ls_desmet=rtrim("FONZ03");
$ls_codmet="";
$ld_fecpro=$_POST["txtfecpro"];
$ls_ref=$_POST["txtref"];
$ls_codcue="";
$ls_pagtaqnom=$io_fun_nomina->uf_obtenervalor("chkpagtaqnom","0");
$ls_codconc=$_POST["txtcodconc"];
switch ($ls_codconc)
{
case "0000020007":
$ls_ruta2=$ls_ruta."/fonz03-20007.txt";
break;
case "0000020014":
$ls_ruta2=$ls_ruta."/fonz03-20014.txt";
break;
case "0000020003":
$ls_ruta2=$ls_ruta."/fonz03-20003.txt";
break;
$io_grid=new grid_param();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "NUEVO":
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "PROCESAR":
uf_load_variables();
$lb_valido=true;
$io_conceptopersonal->io_sql->begin_transaction();
for($li_i=1;($li_i<=$li_totrows)&&($lb_valido);$li_i++)
{
$ls_codper=$_POST["txtcodper".$li_i];
$li_aplcon=$io_fun_nomina->uf_obtenervalor("chkaplcon".$li_i,"0");
$lb_valido=$io_conceptopersonal->uf_update_aplicaconcepto($ls_codconc,$ls_codper,$li_aplcon,$la_seguridad);
}
if ($lb_valido)
{
$lb_valido=$io_conceptopersonal->uf_load_aplicaconcepto($ls_codcar,$ls_codasicar,$ls_codconc,$li_totperfil,$li_totrows,$lo_object);
}
if($lb_valido)
{
$io_conceptopersonal->io_sql->commit();
$io_conceptopersonal->io_mensajes->message("El concepto fué aplicado.");
}
else
{
$_SESSION["ls_data_des"] = $ls_dbdestino;
global $ls_operacion, $ls_codprov1, $ls_codprov2, $ls_rifprov, $ls_nomprov, $io_fun_nomina, $io_proveedor;
global $li_totrows, $ls_titletable, $li_widthtable, $ls_nametable, $lo_title, $ls_anoserpre;
$ls_operacion = "";
$ls_codprov1 = "";
$ls_codprov2 = "";
$ls_nomprov = "";
$ls_rifprov = "";
$ls_titletable = "Proveedores";
$li_widthtable = 550;
$ls_nametable = "grid";
$lo_title[1] = "Código";
$lo_title[2] = "Denominación";
$lo_title[3] = "RIF";
$lo_title[4] = "Seleccionar";
$li_totrows = $io_fun_nomina->uf_obtenervalor("totalfilas", 1);
//---------------------------------------------------------------------------------------------------------------------------
function uf_cargar_dt($li_i)
{
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_limpiarvariables
// Access: private
// Description: Función que limpia todas las variables necesarias en la página
// Creado Por: María Beatriz Unda
// Fecha Creación: 27/11/2007 Fecha Última Modificación :
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $ls_codpro, $ls_nompro, $ls_rifpro, $ls_selpro;
$ls_codpro = $_POST["txtcodprov" . $li_i];
$ls_nompro = $_POST["txtdenprov" . $li_i];
$ls_rifpro = $_POST["txtrifprov" . $li_i];
$ls_selpro = $_POST["txtselprov" . $li_i];
<link href="../shared/css/tablas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/ventanas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/cabecera.css" rel="stylesheet" type="text/css">
<link href="../shared/css/general.css" rel="stylesheet" type="text/css">
</head>
<body>
<?php
require_once("sigesp_sno_c_transferirpersonal.php");
$io_transferir=new sigesp_sno_c_transferirpersonal();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "PROCESAR":
$li_totper=0;
$li_totcon=0;
$ls_codnombus=$io_fun_nomina->uf_obtenervalor("txtcodnombus","");
$ls_desnombus=$io_fun_nomina->uf_obtenervalor("txtdesnombus","");
$ls_tiptra=$io_fun_nomina->uf_obtenervalor("cmbtiptra","");
$ls_codperi=$io_fun_nomina->uf_obtenervalor("txtcodperi","");
$ld_fecdesper=$io_fun_nomina->uf_obtenervalor("txtfecdesper","");
$ld_fechasper=$io_fun_nomina->uf_obtenervalor("txtfechasper","");
$ls_anocur=$io_fun_nomina->uf_obtenervalor("txtanocur","");
$io_fun_nomina->uf_seleccionarcombo("1-2",$ls_tiptra,$la_tiptra,2);
$lb_valido=$io_transferir->uf_verificar_rac($ls_codnombus,$li_racnombus);
if ($li_racnombus==$li_rac)
{
$lb_valido=$io_transferir->uf_transferir_personal($ls_codnombus,$ls_tiptra,$ls_codperi,$ls_anocur,$la_seguridad);
}
else
{
$io_transferir->io_mensajes->message("No se puede transferir el personal, porque una de las nóminas maneja RAC.");
$ls_codmet=$_POST["txtcodmet"];
$ls_desmet=rtrim($_POST["txtdesmet"]);
$ls_codban=$_POST["txtcodban"];
$ls_nomban=$_POST["txtnomban"];
$ld_fecpro=$_POST["txtfecpro"];
$ls_codcue=$_POST["txtcodcue"];
$ls_quincena=$_POST["cmdquincena"];
$ls_sc_cuenta=$_POST["txtsc_cuenta"];
$ls_ctaban=$_POST["txtctaban"];
$ls_ref=$_POST["txtref"];
$ld_monto=0; // ojo monto a pagar
$ls_suspendidos=$_POST["txtsuspendidos"];
$ld_fecdes=$_SESSION["la_nomina"]["fecdesper"];
$ld_fechas=$_SESSION["la_nomina"]["fechasper"];
$ls_tipocuenta=$_POST["cmbtipcueban"];
$ls_pagtaqnom=$io_fun_nomina->uf_obtenervalor("chkpagtaqnom","0");
$ls_otrosbancos=$io_fun_nomina->uf_obtenervalor("chkotros","0");
switch(substr($ld_fechas,5,2))
{
case "01":
$ls_mes="ENERO";
break;
case "02":
$ls_mes="FEBRERO";
break;
case "03":
$ls_mes="MARZO";
break;
case "04":
$ls_mes="ABRIL";
break;
<link href="../shared/css/ventanas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/cabecera.css" rel="stylesheet" type="text/css">
<link href="../shared/css/general.css" rel="stylesheet" type="text/css">
<link href="../shared/js/css_intra/datepickercontrol.css" rel="stylesheet" type="text/css">
</head>
<body>
<?php
require_once("sigesp_sno_c_movimientonominas.php");
$io_movimiento=new sigesp_sno_c_movimientonominas();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "GUARDAR":
$li_totnomnor=0;
$li_totnomesp=0;
$ls_codper=$io_fun_nomina->uf_obtenervalor("txtcodper","");
$ls_nomper=$io_fun_nomina->uf_obtenervalor("txtnomper","");
$ls_egenom=$io_fun_nomina->uf_obtenervalor("chkegenom","0");
$ld_fecegrper=$io_fun_nomina->uf_obtenervalor("txtfecegrper","1900-01-01");
$ls_cauegrper=$io_fun_nomina->uf_obtenervalor("txtcauegrper","");
$la_nominanormal=$io_fun_nomina->uf_obtenervalor("txtnominanormal","");
$la_nominaespecial=$io_fun_nomina->uf_obtenervalor("txtnominaespecial","");
$ls_codsubnom=$io_fun_nomina->uf_obtenervalor("txtcodsubnom","0000000000");
$ls_codcar=$io_fun_nomina->uf_obtenervalor("txtcodcar","0000000000");
if (array_key_exists('session_activa',$_SESSION))
{
$ls_codasicar=$io_fun_nomina->uf_obtenervalor("txtcodasicar","0000000000");
}
else
{
$ls_codasicar=$io_fun_nomina->uf_obtenervalor("txtcodasicar","0000000");
$ls_codper=$_POST["txtcodper"];
$ls_nomper=$_POST["txtnomper"];
$li_porisrper=$_POST["txtporisrper"];
$li_codconret=$_POST["txtcodconret"];
$io_isr->io_sql->begin_transaction();
$lb_valido=$io_isr->uf_update_global($ls_codper,$li_porisrper,$la_seguridad);
if ($lb_valido)
{
for($li_i=1;$li_i<13;++$li_i)
{
$ls_codisr=$li_i."";
if(strlen($ls_codisr)==1)
{
$ls_codisr="0".$ls_codisr;
}
$la_porisr[$li_i]=$io_fun_nomina->uf_obtenervalor("txtporisr".$li_i,"");
if($la_porisr[$li_i]!="")
{
$lb_valido=$io_isr->uf_guardar($ls_codper,$ls_codisr,$la_porisr[$li_i],$li_codconret,$la_seguridad);
}
}
}
if($lb_valido)
{
$io_isr->io_sql->commit();
$io_isr->io_mensajes->message("El isr fue registrado.");
}
else
{
$io_isr->io_sql->rollback();
$io_isr->io_mensajes->message("Ocurrio un error al registra el isr.");
$ls_presupuesto="style='visibility:hidden'";
$ls_contable="style='visibility:visible'";
break;
default:
$ls_presupuesto="style='visibility:hidden'";
$ls_contable="style='visibility:hidden'";
break;
}
}
break;
case "BUSCAR":
$ls_codconc=$_POST["txtcodconc"];
$ls_intprocon=$io_fun_nomina->uf_obtenervalor("chkintprocon","0");
$lb_valido=$io_concepto->uf_load_concepto($ls_existe,$ls_codconc,$ls_nomcon,$ls_titcon,$ls_forcon,$li_acumaxcon,$li_valmincon,
$li_valmaxcon,$ls_concon,$ls_cueprecon,$ls_cueconcon,$ls_codpro,$ls_sigcon,
$ls_glocon,$ls_aplisrcon,$ls_sueintcon,$ls_intprocon,$ls_forpatcon,$ls_cueprepatcon,
$ls_cueconpatcon,$ls_titretempcon,$ls_titretpatcon,$li_valminpatcon,$li_valmaxpatcon,
$ls_denprecon,$ls_denconcon,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,
$ls_codestpro5,$ls_denestpro1,$ls_denestpro2,$ls_denestpro3,$ls_denestpro4,$ls_denestpro5,
$ls_dencueconpat,$ls_dencueprepat,$li_conprenom,$ls_sueintvaccon,$ls_descon,
$ls_coddescon,$ls_desdescon,$ls_aplarccon,$ls_aplconprocon,$ls_estcla1,$ls_estcla2,
$ls_estcla3,$ls_estcla4,$ls_estcla5,$ls_intingcon,$ls_cueingcon,$ls_dencueing,$li_poringcon,
$ls_repacucon,$ls_repconsunicon,$ls_consunicon,$ls_quirepcon,$ls_frevarcon,$ls_asifidper,$ls_asifidpat,$ls_persalnor,$ls_perenc, $ls_aplresenc,$ls_guard, $ls_codente, $ls_txtente);
$ls_concepto=" readonly";
$ls_signo=" disabled";
$ls_personal="";
if($ls_glocon=="1")
{
{
$io_calcularprenomina->io_mensajes->message("Ocurrio un error al eliminar la prenómina.");
}
}
else
{
$io_calcularprenomina->io_mensajes->message("La Nómina ya se proceso. Reverse la Nómina y elimine la prenómina.");
}
$lb_valido=$io_calcularprenomina->uf_load_resumenprenomina($ls_peractnom,$ls_codperdes,$ls_codperhas,$li_totasiprenom,
$li_totdedprenom,$li_totapoempprenom,$li_totapopatprenom,$li_totprenom,
$li_nropro,$li_totasinomant,$li_totdednomant,$li_totapoempnomant,
$li_totapopatnomant,$li_totnomant);
break;
case "PROCESAR":
$ls_codperdes=$io_fun_nomina->uf_obtenervalor("txtcodperdes","");
$ls_nomperdes=$io_fun_nomina->uf_obtenervalor("txtnomperdes","");
$ls_codperhas=$io_fun_nomina->uf_obtenervalor("txtcodperhas","");
$ls_nomperhas=$io_fun_nomina->uf_obtenervalor("txtnomperhas","");
if(!($io_calcularprenomina->uf_select_salida()))
{
$lb_valido=$io_calcularprenomina->uf_procesarprenomina($ls_codperdes,$ls_codperhas,$la_seguridad);
}
else
{
$io_calcularprenomina->io_mensajes->message("La Nómina ya se proceso. Reverse la Nómina y vuelva a calcular.");
}
$lb_valido=$io_calcularprenomina->uf_load_resumenprenomina($ls_peractnom,$ls_codperdes,$ls_codperhas,$li_totasiprenom,
$li_totdedprenom,$li_totapoempprenom,$li_totapopatprenom,$li_totprenom,
$li_nropro,$li_totasinomant,$li_totdednomant,$li_totapoempnomant,
$li_totapopatnomant,$li_totnomant);
<link href="../shared/css/tablas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/ventanas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/cabecera.css" rel="stylesheet" type="text/css">
<link href="../shared/css/general.css" rel="stylesheet" type="text/css">
</head>
<body>
<?php
require_once("sigesp_sno_c_importardefiniciones.php");
$io_importar=new sigesp_sno_c_importardefiniciones();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "PROCESAR":
$li_totper=0;
$li_totcon=0;
$ls_codnombus=$io_fun_nomina->uf_obtenervalor("txtcodnombus","");
$ls_desnombus=$io_fun_nomina->uf_obtenervalor("txtdesnombus","");
$ls_infrel=$io_fun_nomina->uf_obtenervalor("chkinfrel","0");
$la_personalsele=$io_fun_nomina->uf_obtenervalor("txtpersonalsele","");
$la_conceptosele=$io_fun_nomina->uf_obtenervalor("txtconceptosele","");
$ls_codcar=str_pad($io_fun_nomina->uf_obtenervalor("txtcodcar","0000000000"),10,"0",0);
if (array_key_exists('session_activa',$_SESSION))
{
$ls_codasicar=str_pad($io_fun_nomina->uf_obtenervalor("txtcodasicar","0000000000"),10,"0",0);
}
else
{
$ls_codasicar=str_pad($io_fun_nomina->uf_obtenervalor("txtcodasicar","0000000"),7,"0",0);
}
$ls_capfid,$ls_capantcom,$ld_fecconpreant,$ls_conpreant,$li_porintcap);
if($lb_valido)
{
$ls_existe="TRUE";
}
$io_fun_nomina->uf_seleccionarcombo("S-N",$ls_capfid,$la_capfid,2);
$io_fun_nomina->uf_seleccionarcombo("1-0",$ls_capantcom,$la_capantcom,2);
if($ls_conpreant=="1")
{
$ls_conpreant="checked";
}
break;
case "GUARDAR":
uf_load_variables();
$ls_conpreant=$io_fun_nomina->uf_obtenervalor("chkconpreant","0");
$lb_valido=$io_fideicomiso->uf_guardar($ls_codper,$ls_codfid,$ls_ficfid,$ls_ubifid,$ls_cuefid,$ld_fecingfid,$ls_capfid,
$ls_capantcom,$ld_fecconpreant,$ls_conpreant,$li_porintcap,$la_seguridad);
$io_fun_nomina->uf_seleccionarcombo("S-N",$ls_capfid,$la_capfid,2);
$io_fun_nomina->uf_seleccionarcombo("1-0",$ls_capantcom,$la_capantcom,2);
if($ls_conpreant=="1")
{
$ls_conpreant="checked";
}
break;
case "ELIMINAR":
uf_load_variables();
$ls_conpreant=$io_fun_nomina->uf_obtenervalor("chkconpreant","0");
$lb_valido=$io_fideicomiso->uf_delete_fideicomiso($ls_codper,$la_seguridad);
if($lb_valido)
$ls_codnom=$_GET["codnom"];
$ls_desnom=$_GET["desnom"];
$lb_valido=$io_nomina->uf_load_periodo_establecer($ls_codnom,$li_totrows,$lo_object);
break;
case "GUARDAR":
$ls_codnom=$_POST["txtcodnom"];
$ls_desnom=$_POST["txtdesnom"];
$lb_valido=true;
$io_nomina->io_sql->begin_transaction();
for($li_i=1;$li_i<=$li_totrows&&$lb_valido;$li_i++)
{
$ls_codperi=$_POST["txtcodperi".$li_i];
$ls_fecdesper=$_POST["txtfecdesper".$li_i];
$ls_fechasper=$_POST["txtfechasper".$li_i];
$li_aplica=$io_fun_nomina->uf_obtenervalor("chkaplica".$li_i."","0");
if($li_aplica=="1")
{
$lb_valido=$io_nomina->uf_update_periodo($ls_codnom,$ls_codperi,$la_seguridad);
}
}
if($lb_valido)
{
$io_nomina->io_sql->commit();
$li_totrows=0;
$io_nomina->io_mensajes->message("El Período fue establecido.");
}
else
{
$io_nomina->io_sql->rollback();
$io_nomina->io_mensajes->message("Ocurrio un error al establecer el período.");
<link href="../shared/js/css_intra/datepickercontrol.css" rel="stylesheet" type="text/css">
<link href="css/nomina.css" rel="stylesheet" type="text/css">
<link href="../shared/css/tablas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/ventanas.css" rel="stylesheet" type="text/css">
<link href="../shared/css/cabecera.css" rel="stylesheet" type="text/css">
<link href="../shared/css/general.css" rel="stylesheet" type="text/css">
</head>
<body>
<?php
require_once("../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
$ls_operacion=$io_fun_nomina->uf_obteneroperacion();
switch ($ls_operacion)
{
case "REPORTAR":
$_SESSION["ls_titulo"]=$io_fun_nomina->uf_obtenervalor("txttituloreporte","LISTADO DE PERSONAL");
$ls_criterio="";
$ls_criterio2="0";
$li_tope=$_POST["tope"];
$ls_reporte=$_POST["reporte"];
uf_load_filtros(&$ls_criterio,$ls_criterio2);
$_SESSION["ls_criterio"]=$ls_criterio;
$_SESSION["ls_criterio2"]=$ls_criterio2;
$ls_campo="";
uf_load_campos(&$li_total,&$ls_campo);
$_SESSION["li_total"]=$li_total-1;
$_SESSION["ls_campo"]=$ls_campo;
$la_titulos="";
uf_load_configuracion_campos($la_titulos);
$_SESSION["la_titulos"]=$la_titulos;
switch($li_total)
<?php
require_once("sigesp_snorh_c_archivotxt.php");
$io_archivo=new sigesp_snorh_c_archivotxt();
require_once("../shared/class_folder/grid_param.php");
$io_grid=new grid_param();
uf_limpiarvariables();
$ls_codarch=$io_archivo->uf_nuevo_codigo();
switch ($ls_operacion)
{
case "MOSTRAR_GRID":
$li_totrows=1;
$ls_codarch=$_POST["txtcodarch"];
$ls_denarch=$_POST["txtdenarch"];
$ls_tiparch=$_POST["cmbtiparch"];
$io_fun_nomina->uf_seleccionarcombo("I-E",$ls_tiparch,$la_tiparch,2);
$ls_acumon=$io_fun_nomina->uf_obtenervalor("chkacumon","0");
uf_agregarlineablanca($lo_object,$ls_tiparch,1);
$ls_mostrar="display:compact";
break;
case "GUARDAR":
$ls_codarch=$_POST["txtcodarch"];
$ls_denarch=$_POST["txtdenarch"];
$ls_tiparch=$_POST["cmbtiparch"];
$io_fun_nomina->uf_seleccionarcombo("I-E",$ls_tiparch,$la_tiparch,2);
$ls_acumon=$io_fun_nomina->uf_obtenervalor("chkacumon","0");
$io_archivo->io_sql->begin_transaction();
$lb_valido=$io_archivo->uf_guardar($ls_existe,$ls_codarch,$ls_denarch,$ls_tiparch,$ls_acumon,$la_seguridad);
if($lb_valido)
{
$io_fun_nomina->uf_load_seguridad_nomina("SNO","sigesp_sno_r_listadoconcepto.php",$ls_codnom,$ls_permisos,$la_seguridad,$la_permisos);
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
require_once("sigesp_sno.php");
$io_sno=new sigesp_sno();
$lb_valido=$io_sno->uf_crear_sessionnomina();
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
$ls_desnom=$_SESSION["la_nomina"]["desnom"];
$ls_peractnom=$_SESSION["la_nomina"]["peractnom"];
$ls_desper=$_SESSION["la_nomina"]["descripcionperiodo"];
$ls_subnom=$_SESSION["la_nomina"]["subnom"];
$ls_reporte=$io_sno->uf_select_config("SNO","REPORTE","LISTADO_CONCEPTO","sigesp_sno_rpp_listadoconcepto.php","C");
unset($io_sno);
///////////////// PAGINACION /////////////////////
$ls_codperdes="";
$ls_codperhas="";
$ls_codconcdes=$io_fun_nomina->uf_obtenervalor("txtcodconcdes","");
$ls_codconchas=$io_fun_nomina->uf_obtenervalor("txtcodconchas","");
$ls_codente=$io_fun_nomina->uf_obtenervalor("txtcodente","");
$ls_operacion=$io_fun_nomina->uf_obtenervalor("operacion","");
if ($ls_operacion=="")
{
$ls_operacion=$io_fun_nomina->uf_obtenervalor_get("operacion","");
if ($ls_codconcdes=='')
{
$ls_codconcdes=$io_fun_nomina->uf_obtenervalor_get("codconcdes","");
}
if ($ls_codconchas=='')
{
$ls_codconchas=$io_fun_nomina->uf_obtenervalor_get("codconchas","");
}
if ($ls_codente=='')
