$ls_codintper=$la_codintper[$li_j];
if($ls_codintper!="")
{
$lb_existe=$io_sss->uf_sss_select_derecho_usuario($ls_codemp,$ls_codusu,$ls_codsis,$ls_nomven,
$ls_codintper);
if($lb_existe)
{
$lb_valido=$io_sss->uf_sss_update_derecho_usuario($ls_codemp,$ls_codusu,$ls_codsis,$ls_nomven,
$li_visible,$li_habilitada,$li_leer,$li_incluir,
$li_cambiar,$li_eliminar,$li_imprimir,
$li_administrador,$li_anular,$li_ejecutar,
$ls_codintper,$la_seguridad);
}
else
{
$lb_existe=$io_sss->uf_sss_select_ventana($ls_codsis,$ls_nomven);
if(!$lb_existe)
{
$ls_descripcion="";
$lb_valido=$io_sss->uf_sss_insert_ventana($ls_codsis,$ls_nomven,$ls_pantalla,$ls_descripcion);
}//end->else si existe ventana
$lb_valido=$io_sss->uf_sss_insert_derecho_usuario($ls_codemp,$ls_codusu,$ls_codsis,$ls_nomven,
$li_visible,$li_habilitada,$li_leer,$li_incluir,
$li_cambiar,$li_eliminar,$li_imprimir,
$li_administrador,$li_anular,$li_ejecutar,
$ls_codintper,$la_seguridad);
}//end->else si existe usuario
}
}
}
else
