database rayovac   
screen
{
   Ano             [f1      ]    [e           ]
   Mes             [f2      ]
   Vendedor        [v   ]

   Producto        [n][g][t ][s  ]
   Cliente         [t1]-[t2  ]
   
 
}
end 
tables 
vetb00002,vetb00003
attributes
t1    = vetb00002.tipo_cliente;
t2    = vetb00002.sec_cliente;
f1    = formonly.p_ano type smallint;
f2    = formonly.p_mes type smallint;
v     = vetb00002.sec_vend,comments="Digite Codigo de Vendedor";
n     = vetb00003.cod_n,autonext;           
g     = vetb00003.cod_grupo;     
t     = vetb00003.cod_tipo;     
s     = vetb00003.cod_sec;       
e     = formonly.elije,  
  --# widget="RADIO", config="C Cliente  K Vendedor", DEFAULT="C";

instructions delimiters " "
end