Files
MBS/PROYECTO/tedirbk/tefmrp004.per
T

27 lines
717 B
Plaintext

database rayovac
screen size 24 by 80
{
Compania [c]
Mes Comision [m1]
Ano Comision [a ]
Codigo Vendedor [b1]-[c1 ]
}
end
tables
vetb00028,
vetb00003
attributes
c = vetb00003.cod_cia,include = (1,2),comments =
"1- Rayovac 2- Distribuidora";
m1 = formonly.mes type smallint,include = (1 to 12),comments =
"Digite en formato MM eje. 01 (Enero)";
a = formonly.ano;
b1 = vetb00028.cod_vend,autonext,
comments = "Digite el codigo del vendedor o el criterio de seleccion";
c1 = vetb00028.sec_vend,
comments = "Digite el codigo del vendedor o el criterio de seleccion";
instructions
delimiters " "
end