DATABASE marmotech
 SCREEN SIZE 24 by 80
{
           Busqueda Marcas De Productos
   \g-----------------------------------------------------\g
         Codigo          Nombre             
   \g-----------------------------------------------------\g
        [k1 ]        [f2                            ]
        [k1 ]        [f2                            ]
        [k1 ]        [f2                            ]
        [k1 ]        [f2                            ]
        [k1 ]        [f2                            ]

}
end
tables
iptb00019
attributes
k1   = formonly.cod_marca;
f2   = formonly.nombre;
instructions
   screen record s_pilas[5] (cod_marca,nombre)
   delimiters " "
end