database smarmotech    
screen size 24 by 80
{

    Fecha Inicial [f1        ]
    Fecha Final   [f2        ]

    Codigo               [a][b][c ][d  ]
}
end
tables
irtb00002
attributes
f1 = formonly.fecha1 type date,format = "dd/mm/yyyy";
f2 = formonly.fecha2 type date,format = "dd/mm/yyyy";
a = irtb00002.cod_n;
b = irtb00002.cod_grupo;
c = irtb00002.cod_tipo;
d = irtb00002.cod_sec;
end