{
=============================================================================
   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