47 lines
2.1 KiB
Plaintext
47 lines
2.1 KiB
Plaintext
{
|
|
==============================================================================
|
|
FORMULARIO: CGFMCS003
|
|
OBJETIVO : DESPLEGAR INFORMACIONES DE LOS CHEQUES ENTREGADOS
|
|
DISENADO : JUAN F. SOTO
|
|
FECHA : DICIEMBRE 8, 1995.
|
|
==============================================================================
|
|
}
|
|
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Digite Rango Fecha Entrega: [f1 ] [f2 ]
|
|
Codigo Cronologico : [k1 ][a2 ]
|
|
==============================================================================
|
|
Cuenta Numero Fecha Fecha Monto
|
|
Bancaria Cheque Cheque Entrega 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
|
|
attributes
|
|
f1 = formonly.fecha1 type date,format = "dd/mm/yy",comments =
|
|
"Fecha Inicial Del Rango";
|
|
f2 = formonly.fecha2 type date,format = "dd/mm/yy",comments =
|
|
"Fecha Final Del Rango";
|
|
a2 = formonly.beneficiario;
|
|
k1 = cgtb00032.cod_cro,upshift,comments =
|
|
"Digite Codigo de Cronologico O Deje en Blanco Para Todos";
|
|
f3 = cgtb00032.cheque_no;
|
|
p4 = cgtb00032.banco;
|
|
a1 = formonly.nombre_bco;
|
|
f6 = cgtb00005.fecha,format = "dd/mm/yy";
|
|
f7 = cgtb00032.fecha_ent,format = "dd/mm/yy";
|
|
f8 = formonly.monto;
|
|
instructions
|
|
delimiters " "
|
|
screen record scr_ent[8](banco,nombre_bco,cheque_no,fecha,fecha_ent,monto)
|
|
end
|