database smarmotech    
screen size 24 by 80
{


         Ano             [f001]              
         Mes             [p ] [f          ] 
         Codigo Repuesto [a]-[b]-[c ]-[d  ]
}
end
tables
irtb00002
attributes
f001 = formonly.ano_c;
p   = formonly.p_mes,required;
f   = formonly.nomb1,noentry;
a   = irtb00002.cod_n;
b   = irtb00002.cod_grupo;
c   = irtb00002.cod_tipo;
d   = irtb00002.cod_sec;
  instructions
     delimiters " "
end