Files
MBS/PROYECTO/ccdir/ccfmmt005.per
T

43 lines
1.6 KiB
Plaintext

{
-----------------------------------------------------------------------------
FORMULARIO : CCFMMT005
OBJETIVO : Eliminar Registro de movimientos (CCPRMT001)
REALIZADO POR : Tadeo A. ferreras
FECHA : Febrero 01, 1995
-----------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Documento..:[f001 ] | EL Rango de Documentos
Tipo.......:[a0] | Para la Fecha [f1 ]
Cliente No.:[f003] | Es Del[r1 ]Al[r2 ]
Nombre.....:[b ]|--------------------------------
Vendedor...:[f004] |
Nombre.....:[c ][d ]| Ultima Secuencia [uss ]
Fecha......:[f005 ] |
Valor......:[vr ] |
}
end
tables
cctb00001
attributes
a0 = cctb00001.tipo_doc,upshift,include = ("NC","PG","ND","RC"),
comments = "PG-Pago ND-Nota Dr. NC-Nota Cr. RC- Reclasificacion Doctos.";
f001 = cctb00001.num_cheque;
f003 = cctb00001.sec_cliente,noentry;
f004 = cctb00001.cod_emp_sec,noentry;
f005 = cctb00001.fecha_orig,format = "dd/mm/yyyy",noentry;
vr = formonly.valor type decimal,noentry;
b = formonly.nombre1 type char,noentry;
c = formonly.nombre,noentry;
d = formonly.apellido,noentry;
uss = formonly.ult_numero type integer,noentry;
f1 = formonly.fecha type date,format = "dd/mm/yyyy",noentry;
r1 = formonly.sec_de type integer,noentry;
r2 = formonly.sec_a type integer,noentry;
instructions
delimiters " "
end