49 lines
2.0 KiB
Plaintext
49 lines
2.0 KiB
Plaintext
{
|
|
-----------------------------------------------------------------------------
|
|
FORMULARIO : CPFMMT004
|
|
OBJETIVO : Captura Informacion para la reclacificacion de las partidas
|
|
REALIZADO POR : Ing. Juan F. Soto
|
|
FECHA : Agosto 28, 1996.
|
|
-----------------------------------------------------------------------------
|
|
}
|
|
database smarmotech
|
|
screen size 24 by 80
|
|
{
|
|
Fecha [f005 ]
|
|
Suplidor [f2]-[f003] [b ]
|
|
Numero documento [n1 ]
|
|
\g----------------------------------------------------------------------------\g
|
|
Factura(s) Debito Credito
|
|
\g----------------------------------------------------------------------------\g
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
[f1 ] [v1 ][v2 ]
|
|
================ ===============
|
|
Total Transaccion [t1 ] [t2 ]
|
|
}
|
|
end
|
|
tables
|
|
cptb00001
|
|
attributes
|
|
f2 = cptb00001.cod_sp,autonext,
|
|
comments = "Presione Ctrl-W o Digite el codigo del suplidor";
|
|
f003 = cptb00001.cod_sp_sec ,autonext,
|
|
comments = "Presione Ctrl-W o Digite el codigo del suplidor";
|
|
b = formonly.nom_sup,noentry;
|
|
f005 = cptb00001.fecha_orig,format = "dd/mm/yy";
|
|
f1 = formonly.p_aplica_a, comments =
|
|
"Presione Ctrl-W Para Buscar Facturas";
|
|
v1 = formonly.debito;
|
|
v2 = formonly.credito;
|
|
n1 = cptb00001.num_doc,noentry;
|
|
t1 = formonly.t_debito;
|
|
t2 = formonly.t_credito;
|
|
instructions
|
|
screen record s_limpia[7](p_aplica_a,debito,credito)
|
|
delimiters " "
|
|
end
|