53 lines
2.3 KiB
Plaintext
53 lines
2.3 KiB
Plaintext
{
|
|
------------------------------------------------------------------------
|
|
FORMULARIO : NOFMCS005
|
|
OBJETIVO : Pantalla que consulta los empleados atado al
|
|
movimiento que genera el prog. GENERACION NOMINA
|
|
Es utilizada por: NOFMCS005
|
|
PROGRAMADOR : Ing. Juan Soto
|
|
FECHA REALIZACION : Diciembre 17, 1993
|
|
------------------------------------------------------------------------
|
|
}
|
|
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
|
|
Codigo Movimiento [c1][ca ]
|
|
\g--------------------------------------------------------------------------
|
|
Empleados Cantidad Valor
|
|
\g--------------------------------------------------------------------------
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
[f4 ][b ][f005 ][f006 ]
|
|
Total [t4 ]
|
|
}
|
|
end
|
|
tables
|
|
notb00008,notb00002,
|
|
adtb00003
|
|
attributes
|
|
f002 = notb00008.num_nomi,autonext,
|
|
comments = "Digite el numero de nomina";
|
|
c = notb00008.tipo_emp,autonext,upshift,
|
|
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
|
|
te = formonly.descr,noentry;
|
|
c1 = notb00008.cod_mov,autonext,
|
|
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
|
|
ca = formonly.descripcion,noentry;
|
|
f4 = notb00008.num_emp;
|
|
t4 = formonly.p_total;
|
|
b = formonly.nombre;
|
|
f005 = notb00008.cantidad,noentry;
|
|
f006 = notb00008.valor,noentry;
|
|
instructions
|
|
screen record consart[10] (num_emp,nombre,cantidad,valor)
|
|
delimiters " "
|
|
end
|