Files

49 lines
1.7 KiB
Plaintext

database marmotech
screen size 24 by 80
{
Consulta de Descuentos
\g-----------------------------------------------------\g
Codigo Descuento [f0]
Descripcion [f001 ]
Codigo de la Pila [g]-[h]-[i ]-[j ]
[k ]
Porciento de Descuento [f006 ]%
Cantidad Minima de Pilas [f007 ]Cajas
Cantidad Maxima de Pilas [f008 ]Cajas
Cantidad de Cajas Bonificadas [f009 ]Cajas
}
end
tables
intb00001
vetb00013
attributes
f0 = vetb00013.tipo_desc,autonext,
comments=" <Esc> Selecciona todos los descuentos";
f001 = vetb00013.descrip, upshift, autonext,
comments=" <Esc> Selecciona todos los descuentos";
g = vetb00013.cod_n,autonext,
comments=" <Esc> Selecciona todos los descuentos";
h = vetb00013.cod_grupo,autonext,
comments=" <Esc> Selecciona todos los descuentos";
i = vetb00013.cod_tipo,autonext,
comments=" <Esc> Selecciona todos los descuentos";
j = vetb00013.cod_sec,autonext,
comments=" <Esc> Selecciona todos los descuentos";
k = intb00001.descrip_esp, noentry,
comments=" <Esc> Selecciona todos los descuentos";
f006 = vetb00013.porc_desc,autonext,
comments=" <Esc> Selecciona todos los descuentos";
f007 = vetb00013.cantidad_1,autonext,
comments=" <Esc> Selecciona todos los descuentos";
f008 = vetb00013.cantidad_2,autonext,
comments=" <Esc> Selecciona todos los descuentos";
f009 = vetb00013.cajas_bonif,autonext,
comments=" <Esc> Selecciona todos los descuentos";
end
INSTRUCTIONS
delimiters " "