37 lines
1.1 KiB
Plaintext
37 lines
1.1 KiB
Plaintext
{
|
|
=============================================================================
|
|
FORMULARIO : INFMWD001
|
|
OBJETIVO : Desplegar los codigos y nombres de la maestra de
|
|
compania aseguradoras
|
|
PROGRAMA Q. LO USA : INPRMT020
|
|
AUTOR : Tadeo A. Ferreras
|
|
FECHA : Agosto 30, 1993
|
|
=============================================================================
|
|
}
|
|
DATABASE exterior
|
|
SCREEN
|
|
{
|
|
\g-------------------------------------------\g
|
|
Codigo Nombre
|
|
\g-------------------------------------------\g
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
[cod ] [nom ]
|
|
}
|
|
end
|
|
tables
|
|
cotb00022
|
|
attributes
|
|
cod = cotb00022.cod_ca;
|
|
nom = cotb00022.nom_ca,noentry;
|
|
instructions delimiters " "
|
|
screen record datos_comp1[8](cod_ca,nom_ca)
|
|
end
|
|
|
|
|