database marmotech   
screen size 24 by 80
{

 Fecha Inicial  [f1        ]
 Fecha Final    [f2        ]
 Suplidor       [c1]
}
end
tables
cptb00001
attributes
f1 = formonly.fecha1 TYPE DATE, format="dd/mm/yyyy";
f2 = formonly.fech2 TYPE  DATE,format="dd/mm/yyyy";
c1 = cptb00001.cod_sp,autonext;

end