53 lines
2.0 KiB
Plaintext
53 lines
2.0 KiB
Plaintext
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
|
|
|
|
Cliente [c1][c12 ][des ]
|
|
Producto [a]-[b]-[c ]-[d ][l ]
|
|
Ventas [e]
|
|
Fecha Inicial [f ] Fecha Final [g ]
|
|
-------------------------------------------------------------------------------
|
|
Cantidad Precio Valor
|
|
Fecha Factura En Unidades Unitario Monetario
|
|
-------------------------------------------------------------------------------
|
|
[f1 ][f2 ] [m ][f3 ][n ]
|
|
[f1 ][f2 ] [m ][f3 ][n ]
|
|
[f1 ][f2 ] [m ][f3 ][n ]
|
|
[f1 ][f2 ] [m ][f3 ][n ]
|
|
}
|
|
end
|
|
tables
|
|
vetb00002,
|
|
vetb00003
|
|
attributes
|
|
c1 = vetb00002.tipo_cliente,required;
|
|
c12 = vetb00002.sec_cliente,required;
|
|
des = formonly.nombre,noentry;
|
|
a = vetb00003.cod_n,
|
|
comments = "Digite el codigo del producto";
|
|
b = vetb00003.cod_grupo,
|
|
comments = "Digite el codigo del producto";
|
|
c = vetb00003.cod_tipo,
|
|
comments = "Digite el codigo del producto";
|
|
d = vetb00003.cod_sec,
|
|
comments = "Digite el codigo del producto";
|
|
e = vetb00002.ventas, include = ("1","2","3"), autonext,
|
|
comments = "1 = Ventas Locales 2 = Ventas de Exportacion 3= Ventas Local USD$";
|
|
f = formonly.fech_in type date, format = "dd/mm/yy", autonext,
|
|
comments = "Digite la Fecha Inicial";
|
|
g = formonly.fech_fi type date, format = "dd/mm/yy", autonext,
|
|
comments = "Digite la Fecha Final";
|
|
f1 = vetb00002.fecha_factura,format="dd/mm/yy";
|
|
f2 = vetb00002.factura;
|
|
f3 = vetb00003.precio;
|
|
l = formonly.descrip1, noentry;
|
|
m = formonly.unidades1, noentry;
|
|
n = formonly.valor1, noentry;
|
|
|
|
instructions
|
|
screen record cs_101[4] (fecha_factura, factura, unidades1, precio, valor1)
|
|
delimiters " "
|
|
|
|
end
|