uf_limpiarvariables();
switch ($ls_operacion)
{
case "NUEVO":
$io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4);
$io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4);
$io_fun_nomina->uf_seleccionarcombo("OC",$ls_confidnom,$la_confidnom,1);
$io_fun_nomina->uf_seleccionarcombo(" -P-B",substr($ls_descomnom,0,1),$la_descomnom,3);
break;
case "GUARDAR":
uf_load_variables();
$lb_valido=$io_nomina->uf_guardar_nomina($ls_existe,$ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom,
$ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom,$ls_racnom,$ls_adenom,
$ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,substr($ls_descomnom,0,1),$ls_codpronom,
$ls_codbennom,$ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom,
$ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$ls_conpernom,
$ls_conpronom,$ls_titrepnom,$ls_codorgcestic,$ls_confidnom,$ls_recdocfid,$ls_tipdocfid,
$ls_codbenfid,$ls_cueconfid,$ls_divcon,$ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche,
$li_estctaalt,$ls_racobrnom,$la_seguridad);
if($lb_valido)
{
uf_limpiarvariables();
$ls_existe="FALSE";
}
else
{
$io_fun_nomina->uf_seleccionarcombo("0-1-2-3",$ls_tippernom,$la_tippernom,4);
$io_fun_nomina->uf_seleccionarcombo("1-2-3-4-5-6-7-8-9-10-11-12-13-14",$ls_tipnom,$la_tipnom,14);
}
$io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4);
$io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4);
