44 lines
1.9 KiB
Plaintext
44 lines
1.9 KiB
Plaintext
database smarmotech
|
|
screen size 24 by 80
|
|
{
|
|
Suplidor [r3][r8 ] [r4 ]
|
|
Clasificacion [r]
|
|
Fecha Inicial [f1 ] Fecha Final [f2 ]
|
|
\g----------------------------------------------------------------------------\g
|
|
No.Ord Tipo Fecha Codigo Nombre Monto
|
|
\g----------------------------------------------------------------------------\g
|
|
[r1 ][a4][r2 ][b ][b1 ][r5 ]
|
|
[r1 ][a4][r2 ][b ][b1 ][r5 ]
|
|
[r1 ][a4][r2 ][b ][b1 ][r5 ]
|
|
[r1 ][a4][r2 ][b ][b1 ][r5 ]
|
|
[r1 ][a4][r2 ][b ][b1 ][r5 ]
|
|
|
|
Total General ====> [r6 ]
|
|
}
|
|
tables
|
|
cotb00014,cotb00001,
|
|
cotb00015
|
|
attributes
|
|
r3 = cotb00001.cod_sp,autonext,
|
|
comments = "Digite el codigo del suplidor o Presione <Esc> para buscar todos";
|
|
r8 = cotb00001.cod_sp_sec,autonext;
|
|
r4 = cotb00001.nom_sp,noentry;
|
|
r = formonly.pendiente type char,reverse,include = ("P","C","T"),upshift,
|
|
comments = "(P) Pendientes, (C) Cerradas, (T) Todas";
|
|
f1 = formonly.fech_in type date,reverse,format = "dd/mm/yy",
|
|
comments = "Digite Primer Rango de Fecha";
|
|
f2 = formonly.fech_fi type date,reverse,format = "dd/mm/yy",
|
|
comments = "Digite Segundo Rango de Fecha";
|
|
r1 = formonly.num_oc1 ,noentry;
|
|
a4 = formonly.tipo1,noentry;
|
|
r2 = formonly.fecha1 type date,noentry,format = "dd/mm/yy";
|
|
b = formonly.codigo_s,noentry;
|
|
b1 = formonly.nombre1,noentry;
|
|
r5 = formonly.Monto1,noentry;
|
|
r6 = formonly.total_g_e1,noentry;
|
|
instructions
|
|
screen record orden[5] (num_oc1,tipo1,fecha1,codigo_s,nombre1,monto1)
|
|
delimiters " "
|
|
end
|
|
|