database marmotech   
screen
{

         Fecha             [fe       ]
         Numero de Factura [f1        ]
         Codigo Suplidor [cs]-[cs1 ]

}
end
tables
cptb00001
attributes
f1 = cptb00001.num_doc;
fe = cptb00001.fecha_orig;
cs = cptb00001.cod_sp;
cs1 = cptb00001.cod_sp_sec;
instructions delimiters " "
end