Exemplo n.º 1
0
$ls_denominacion = $io_fun_activo->uf_obtenervalor("txtdengru", "");
switch ($ls_operacion) {
    case "NUEVO":
        uf_limpiarvariables();
        $ls_longitud = 3;
        $ls_codigo = $io_saf->uf_saf_generar_codigo("", "", "saf_grupo", "codgru");
        $ls_codigo = $io_func->uf_cerosizquierda($ls_codigo, $ls_longitud);
        break;
    case "GUARDAR":
        $lb_valido = $io_saf->uf_saf_guardar_grupo($ls_codigo, $ls_denominacion, $la_seguridad);
        uf_limpiarvariables();
        break;
    case "ELIMINAR":
        break;
    case "":
        $lb_valido = $io_saf->uf_saf_delete_grupo($ls_codigo, $la_seguridad);
        if ($lb_valido) {
            $io_msg->message("El registro fue eliminado");
            uf_limpiarvariables();
        } else {
            $io_msg->message("No se pudo eliminar el registro");
            uf_limpiarvariables();
        }
        break;
}
?>
<p>&nbsp;</p>
<div align="center">
  <table width="601" height="242" border="0" cellpadding="0" cellspacing="0" class="formato-blanco">
    <tr>
      <td width="601" height="242" valign="top"><form name="form1" method="post" action="">