40 lines
1.2 KiB
Plaintext
40 lines
1.2 KiB
Plaintext
|
|
|
|
{
|
|
=============================================================================
|
|
FORMULARIO : IPFMWD009
|
|
OBJETIVO : Desplegar los codigos y nombres de la maestra de
|
|
clientes
|
|
PROGRAMA Q. LO USA : IPPRMT044
|
|
AUTOR : JUAN F. SOTO
|
|
FECHA : FEBRERO 6, 1999
|
|
=============================================================================
|
|
}
|
|
DATABASE marmotech
|
|
SCREEN
|
|
{
|
|
\g-----------------------------------------------\g
|
|
Codigo Nombre
|
|
\g-----------------------------------------------\g
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
}
|
|
end
|
|
tables
|
|
vetb00004
|
|
attributes
|
|
sp = vetb00004.tipo_cliente,comments = "Digite tipo Cliente";
|
|
cod = vetb00004.sec_cliente;
|
|
nom = vetb00004.nombre;
|
|
instructions delimiters " "
|
|
screen record s_cliente[8](tipo_cliente,sec_cliente,nombre)
|
|
end
|
|
|
|
|