105 lines
4.5 KiB
Plaintext
105 lines
4.5 KiB
Plaintext
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
[p2 ]
|
|
|
|
Compania:[p1]Ventas:[t][e8 ]Ubicac.:[l ][g1 ]
|
|
Factura :[f1 ] Fecha:[fef ]
|
|
Cliente :[c1]-[c2 ] Sub-total :[f10 ]
|
|
Nombre :[n1 ] Descuento : [f11 ]
|
|
Direccion :[d1 ] ITBIS :[f12 ]
|
|
Ciudad :[c01 ] Total :[f13 ]
|
|
Prima US[pri ]%Descuento[po1 ][nom ]
|
|
Condicion Orden Fecha Conduce Fecha ITBIS
|
|
[co][co2 ] [or1 ][feo ][co01 ][feco ][f16 ]
|
|
Vendedor Transportista [nom3 ]
|
|
[ve1 ][n2 ] [tr][tr1 ]Tarifa[f ][dt ]
|
|
Fecha Embarque:[fe ] Placa :[pl1 ] [dt1 ]
|
|
ARTICULOS Cantidad Unidades Despacho Existencia Precio Monto
|
|
[a][b][c ][d ][ca ][uni ][de1 ][ex ][pr ][mo ]
|
|
[a][b][c ][d ][ca ][uni ][de1 ][ex ][pr ][mo ]
|
|
[a][b][c ][d ][ca ][uni ][de1 ][ex ][pr ][mo ]
|
|
[a][b][c ][d ][ca ][uni ][de1 ][ex ][pr ][mo ]
|
|
[des ]
|
|
}
|
|
tables
|
|
vetb00002,
|
|
vetb00003,
|
|
iptb00006
|
|
attributes
|
|
g1 = formonly.descrip1,noentry;
|
|
p1 = vetb00002.cod_cia,autonext,include = (1 to 2),
|
|
comments = "Digite 01- Ray-o-vac 02- Distribuidora";
|
|
p2 = formonly.compania,noentry;
|
|
t = vetb00002.ventas,autonext,include = ("1","2"),
|
|
comments = " 1- LOCAL 2- EXPORTACION ";
|
|
l = vetb00002.zona,autonext,
|
|
comments = "Entre Zona o Pais del Cliente o Presione Ctrl-W";
|
|
f1 = vetb00002.factura,noentry;
|
|
fef = vetb00002.fecha_factura,format = "dd/mm/yy";
|
|
c1 = vetb00002.tipo_cliente,autonext,
|
|
comments = "Digite Codigo Cliente o Presione Ctrl-W Para Ayuda";
|
|
c2 = vetb00002.sec_cliente,autonext,
|
|
comments = "Digite Codigo Cliente o Presione Ctrl-W Para Ayuda";
|
|
n1 = formonly.nombre,noentry;
|
|
d1 = formonly.direccion,noentry;
|
|
c01 = formonly.ciudad,noentry;
|
|
co = vetb00002.cond_pago,autonext,
|
|
comments = "Digite el Codigo de la Condicion o Presione Ctrl-W Para Ayuda";
|
|
po1 = formonly.porc_desc,autonext,comments =
|
|
"Digite Porciento descuento si la factura es local, Cargos si es de exportacion";
|
|
nom = formonly.nombre_desc,reverse;
|
|
co2 = formonly.descrip,noentry;
|
|
pri = vetb00002.prima_us,noentry;
|
|
or1 = vetb00002.orden,autonext;
|
|
feo = vetb00002.fecha_orden,format = "dd/mm/yy",
|
|
comments = "Digite La Fecha de La Orden";
|
|
co01= vetb00002.conduce,autonext;
|
|
feco = vetb00002.fecha_conduce,format = "dd/mm/yy",
|
|
comments = "Digite La Fecha del Conduce";
|
|
f16 = vetb00002.porc_itbi,noentry;
|
|
ve1 = vetb00002.sec_vend,autonext,
|
|
comments = "Digite Codigo Vendedor o Presione Ctrl-W Para Ayuda";
|
|
n2 = formonly.nombre_vend,noentry;
|
|
tr = iptb00006.cod_transp,autonext,
|
|
comments = "Digite el Codigo del transportista o Presione Ctrl-W Para Ayuda";
|
|
tr1 = iptb00006.sec_transp,autonext,
|
|
comments = "Digite el Codigo del transportista o Presione Ctrl-W Para Ayuda";
|
|
nom3 = formonly.nombre_tran,noentry;
|
|
fe = vetb00002.fecha_embarque,format = "dd/mm/yy";
|
|
pl1 = formonly.placa_transp,autonext;
|
|
f = formonly.cod_tarifa,autonext,comments =
|
|
"Digite Codigo Tarifa apagar al transportista";
|
|
dt = formonly.descrip5,noentry;
|
|
dt1 = formonly.descrip6,noentry;
|
|
|
|
f10 = formonly.sub_total,noentry;
|
|
f11 = formonly.desc_valor,noentry;
|
|
f12 = formonly.itbi,noentry;
|
|
f13 = formonly.total_fact,noentry;
|
|
e8 = formonly.nombre_tipo,noentry;
|
|
|
|
a = vetb00003.cod_n,autonext,
|
|
comments =
|
|
"Digite Codigo de la Pila o Ctrl-W Para Ayuda";
|
|
b = vetb00003.cod_grupo,autonext,
|
|
comments = "Digite Codigo de la Pila o Ctrl-W Para Ayuda";
|
|
c = vetb00003.cod_tipo,autonext,
|
|
comments = "Digite Codigo de la Pila o Ctrl-W Para Ayuda";
|
|
d = vetb00003.cod_sec,autonext,
|
|
comments = "Digite Codigo de la Pila o Ctrl-W Para Ayuda";
|
|
des = formonly.descrip2,noentry;
|
|
ca = vetb00003.cantidad,autonext;
|
|
uni = formonly.unidades,noentry;
|
|
de1 = formonly.despacho,autonext,comments =
|
|
"Digite Cantidad de Cajas a despachar para este ARTICULO";
|
|
ex = formonly.existencia,noentry;
|
|
pr = vetb00003.precio;
|
|
mo = formonly.monto_fact,noentry;
|
|
|
|
instructions
|
|
screen record s_fact[4](cod_n,cod_grupo,cod_tipo,cod_sec,cantidad,unidades,
|
|
despacho,existencia,precio, monto_fact)
|
|
delimiters " "
|
|
end
|