40 lines
1.7 KiB
Plaintext
40 lines
1.7 KiB
Plaintext
{
|
|
==============================================================================
|
|
FORMULARIO: CGFMCS003
|
|
OBJETIVO : DESPLEGAR INFORMACIONES DE LAS FACTURAS AFECTADAS POR CHEQUES
|
|
DISENADO : JUAN F. SOTO
|
|
FECHA : FEBRERO 28, 1996.
|
|
==============================================================================
|
|
}
|
|
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Factura(s) : [k1 ]
|
|
==============================================================================
|
|
Numero Fecha Cuenta Monto
|
|
Suplidor(es) Cheque Cheque Bancaria Cheque
|
|
==============================================================================
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
[p4 ][a1 ][f3 ][f6 ][f7 ][f8 ]
|
|
}
|
|
tables
|
|
cgtb00031,cgtb00032,cgtb00005,cgtb00021
|
|
attributes
|
|
k1 = formonly.p_factura,upshift,comments = "Digite Numero(s) de Factura(s)";
|
|
f3 = cgtb00032.cheque_no;
|
|
p4 = cgtb00032.cod_cro;
|
|
a1 = cgtb00031.beneficiario;
|
|
f6 = cgtb00005.fecha,format = "dd/mm/yy";
|
|
f7 = cgtb00032.banco;
|
|
f8 = formonly.monto;
|
|
instructions
|
|
delimiters " "
|
|
screen record scr_ent[8](cod_cro,beneficiario,cheque_no,fecha,banco,monto)
|
|
end
|