{
------------------------------------------------------------------
 FORMULARIO        : ADFMMT003
 OBJETIVO          : Capturar registros de la Tabla de Puestos     
 PROGRAMADOR       : Ing. Betania Guerrero Perez
 FECHA REALIZACION : Mayo 20, 1993   
------------------------------------------------------------------
}
database rayovac   
screen size 24 by 80
{
Codigo del Puesto [f0]
Nombre del Puesto [f001                          ]
Funcion Basica [f002                                                        ]
               [f003                                                        ]
Nivel [c]    Salario Minimo  [a         ]      Salario Maximo  [b         ]

[j]
Usuario Creador  [f004     ]             Usuario Modificador  [f006     ]
Fecha Creacion   [f005            ]      Fecha Modificacion   [f007            ]
}
end
tables
adtb00004
attributes
f0 = adtb00004.cod_puesto,autonext,
   comments = "Digite el codigo del Puesto";
f001 = adtb00004.nom_puesto,upshift,
   comments = "Digite el nombre del Puesto";
f002 = adtb00004.funciones,upshift,
   comments = "Digite las funciones relacionadas al Puesto";
f003 = adtb00004.funcion1,upshift,
   comments = "Digite las funciones relacionadas al Puesto";
c = adtb00004.nivel_sal,autonext,
  comments = "Digite el nivel salarial del Puesto";
a = adtb00004.salario_min,
  comments = "Digite el Salario Minimo para el Puesto";
b = adtb00004.salario_max,
  comments = "Digite el Salario Maximo para el Puesto";
j = adtb00004.status_t,noentry;
f004 = adtb00004.us_crea,noentry;
f005 = adtb00004.fech_crea,noentry;
f006 = adtb00004.us_mod,noentry;
f007 = adtb00004.fech_mod,noentry;
instructions
   delimiters " "
end