database marmotech   
screen size 24 by 80
{
         Acumulado        [a]     Tasa Actual   [tc     ]
         Moneda de Cambio [m]     Tasa Anterior [ta     ]
         Mes de venta     [m1]    Tasa Presup.  [tp     ]
}
end
tables
vetb00002,
vetb00010
attributes
a   = formonly.acumulado type char,
      comments = "S - Acumulado   N - No Acumulado",
      include = ("S","N"),upshift;
m   = formonly.moneda type smallint,comments = "1- RD$     2- US$",
                      include = (1,2);
m1  = formonly.p_mes type smallint,include=(1 to 12);
tc  = formonly.tasa1 type decimal;
ta  = formonly.tasa2 type decimal;
tp  = formonly.tasa3 type decimal;
  instructions
     delimiters " "
end