Files
MBS/PROYECTO/cgdir/cgfmmt006.per
T

55 lines
2.0 KiB
Plaintext

{
---------------------------------------------------------------------------
FORMULARIO : CGFMMT007
OBJETIVO : Capturar las informaciones necesarias para
la liquidacion de importacion
PROGRAMA UTILI : cgprmt007
REALIZADO POR : Ing. Juan F. Soto
FECHA : Marzo 22, 1994.
---------------------------------------------------------------------------
}
SCHEMA smarmotech
screen size 24 by 80
{
Orden No.[t1][f1 ] Suplidor [f2][f3 ][a ]
Fecha [f4 ] Reporte de Entrada [f10 ]
Status Orden:[b ][c ][d ]
Factura Comercial [k1 ]
\g---------------------------------------------------------------------------\g
Cantidad Costo &
Materiales... Ordenada F O B Flete
\g---------------------------------------------------------------------------\g
[f5 ][e ][f6 ][f7 ][f8 ]
[f5 ][e ][f6 ][f7 ][f8 ]
[f5 ][e ][f6 ][f7 ][f8 ]
[f5 ][e ][f6 ][f7 ][f8 ]
}
tables
cgtb00017,
cgtb00018
attributes
t1 = cgtb00017.tipo,comments =
"01- Generales 02- Rov-Ltd 03- Locales 04- Miscelaneas",
include = ("01","02","03","04"),autonext;
f1 = cgtb00017.num_oc,autonext;
a = formonly.nombre_sp,noentry;
f2 = cgtb00017.cod_sp,noentry;
f3 = cgtb00017.cod_sp_sec,noentry;
f10 = cgtb00017.rep_entrada,autonext;
f4 = cgtb00017.fecha,noentry,format = "dd/mm/yyyy";
c = formonly.s_liqui,noentry;
d = formonly.s_cerrada,noentry;
b = formonly.s_pagada,noentry;
k1 = cgtb00017.factura,autonext;
f5 = formonly.codigo type char,noentry;
e = formonly.descripcion type char,noentry;
f6 = cgtb00018.cantidad_oc,noentry;
f7 = cgtb00018.fob,noentry;
f8 = cgtb00018.costo_flete;
instructions
screen record s_lq[4](codigo,descripcion,cantidad_oc,fob,costo_flete)
delimiters " "
end