Files
MBS/PROYECTO/tedir/tefmcs001.per
T

51 lines
2.2 KiB
Plaintext

database rayovac
screen size 24 by 80
{
Fecha Inicial [a ] Fecha Final [b ]
Cliente : [c1]-[c2 ] [n1 ]
[d1 ]
[d2 ]
Limite Credito [lc ] Prima [pr ] Balance Inicial [ba ]
\g------------------------------------------------------------------------------\g
D O C U M E N T O A F E C T A
Numero Tipo Fecha Numero Debito Credito Balance
\g------------------------------------------------------------------------------\g
[nm ][tp] [f1 ] [nm1 ] [db ][cr ][bf ]
[nm ][tp] [f1 ] [nm1 ] [db ][cr ][bf ]
[nm ][tp] [f1 ] [nm1 ] [db ][cr ][bf ]
[nm ][tp] [f1 ] [nm1 ] [db ][cr ][bf ]
[nm ][tp] [f1 ] [nm1 ] [db ][cr ][bf ]
}
end
tables
cctb00001
vetb00002
vetb00004
attributes
a = formonly.fecha_inicial type date,color=blue,format = "dd/mm/yyyy",autonext,
comments = "Fecha inicial del recibo de pago";
b = formonly.fecha_final type date,color=blue,format = "dd/mm/yyyy",autonext,
comments = "Fecha final del recibo de pago";
c1 = cctb00001.tipo_cliente,autonext,color=blue;
c2 = cctb00001.sec_cliente,color=blue;
n1 = vetb00004.nombre,noentry,color=blue;
d1 = formonly.direccion,noentry,color=blue;
d2 = formonly.ciudad,noentry,color=blue;
lc = formonly.limite,noentry,color=blue;
ba = formonly.balance type decimal(12,2),noentry,color=blue;
pr = formonly.prima,color=blue,
comments= "Introduzca Prima Para Valorizar Estados";
nm = cctb00001.num_doc,color=blue;
tp = cctb00001.tipo_doc,noentry,color=blue;
f1 = cctb00001.fecha_orig,noentry,format = "dd/mm/yyyy",color=blue;
nm1 = cctb00001.aplica_a,noentry,color=blue;
db = formonly.debito type decimal(12,2),noentry,color=blue;
cr = formonly.credito type decimal(12,2),noentry,color=blue;
bf = formonly.balance1 type decimal(12,2),noentry,color=blue;
INSTRUCTIONS DELIMITERS " "
screen record cuenta[5] (num_doc,tipo_doc,fecha_orig,aplica_a, debito,
credito,balance1)
end