Files
MBS/PROYECTO/codir/cofmwd018.per
T

65 lines
2.6 KiB
Plaintext

{
---------------------------------------------------------------------------
FORMULARIO : COFMWD018
OBJETIVO : CONSULTAR Y/O MODIFICAR INFORMACIONES DE LOS EMBARQUES
DISENADO POR: JUAN F. SOTO
FECHA : MARZO 19, 1997.
---------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
INFORMACION EMBARQUE [f00 ]
\g-------------------------------------------------------------\g
Codigo Descripcion Embarcar Recibida
[a][g][t ][se ][f3 ][f8 ][f6 ][f7 ]
[a][g][t ][se ][f3 ][f8 ][f6 ][f7 ]
\g------------------- Datos Generales Del Embarque -------------\g
Fecha Salida Estimada [f10 ] Fecha De Salida Confirmada [f11 ]
Dias En Transito [k1] Dias De Llegada A Planta [k2 ] Fecha Confirnada
No. Pfi [k3 ] Valor Fob [k4 ] C/ Dias Tran.[pk ]
Valor Cif [k5 ] No. Ft. [k6 ]
Fletes Ft.[k9 ] Impuesto[k7 ] Acarreo [k8 ]
Fecha Solicitud Pago [k10 ] Fecha Del Pago [k11 ]
\g-------------------- Comentarios -----------------------------\g
[f1 ]
[f1 ]
}
end
tables
intb00001
attributes
f00 = formonly.p_cod_emb,noentry;
a = intb00001.cod_n,noentry,comments=
"<Esc> Se Dirige A Fecha De Salida Confirmada Y Datos Complementarios";
g = intb00001.cod_grupo,noentry;
t = intb00001.cod_tipo,noentry;
se = intb00001.cod_sec,noentry;
f3 = intb00001.descrip_esp,noentry;
f8 = intb00001.unidad_med,noentry;
f6 = formonly.cantidad,noentry;
f7 = formonly.recibido,noentry;
f10 = formonly.fecha_e_salida type date,format="dd/mm/yy";
f11 = formonly.fecha_con type date,format="dd/mm/yy";
k1 = formonly.dias_tran;
k2 = formonly.dia_planta;
k3 = formonly.numero_pr,comments = "Digite Numero Pro-Forma";
k4 = formonly.fob;
k5 = formonly.cif;
k6 = formonly.numero_ft;
k9 = formonly.p_fletes;
k7 = formonly.p_impuesto;
k8 = formonly.p_acarreo;
k10 = formonly.fech_s_pa type date,format = "dd/mm/yy";
k11 = formonly.fech_pa type date,format = "dd/mm/yy";
f1 = formonly.detalles,comments = "<Esc> Actualiza Comentarios";
pk = formonly.dia_faltan type date,format = "dd/mm/yy";
instructions
screen record informa[2] (cod_n,cod_grupo,cod_tipo,cod_sec,descrip_esp,
unidad_med,cantidad,recibido)
screen record detalla[2] (detalles)
end