56 lines
1.8 KiB
Plaintext
56 lines
1.8 KiB
Plaintext
{
|
|
==============================================================================
|
|
FORMULARIO : CGFMMT016
|
|
SISTEMA : Sistema de Seguro Medico
|
|
OBJETIVO : Pantalla para captura de datos referentes a un pago
|
|
por medio a un cheque del seguro medico
|
|
PROGRAMA Q. USA : SMPRMT013
|
|
PROGRAMADOR : Ing. Juan F. Soto
|
|
=============================================================================
|
|
}
|
|
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Cheque No.[a1 ] Cuenta Del Banco [f010 ][a ]
|
|
No. Solicitud [s1 ]
|
|
Portador [f003][b ]
|
|
Fecha [f005 ] Monto Cheque[ck ]
|
|
Codigo Partida [p4 ][bc ]
|
|
\g-----------------------------------------------------------------------------\g
|
|
Numero de Valor De La
|
|
Reclamacion(es) Reclamacion
|
|
[f006 ] [f009 ]
|
|
[f006 ] [f009 ]
|
|
\g-----------------------------------------------------------------------------\g
|
|
}
|
|
end
|
|
tables
|
|
cgtb00005,
|
|
tetb00003,
|
|
smtb00013,
|
|
smtb00014,
|
|
cgtb00001
|
|
|
|
attributes
|
|
s1 = smtb00013.num_sol,comments =
|
|
"Digite Numero de Solicitud a Pagar";
|
|
a1 = formonly.numero,noentry;
|
|
f010 = formonly.cuenta_p type char,default="1106",include = ("1106"),
|
|
comments =
|
|
"Digite El numero de la cuenta del banco que esta en catalogo";
|
|
a = cgtb00001.descripcion ;
|
|
f003 = formonly.beneficia,noentry;
|
|
b = formonly.nombre,color=yellow,upshift;
|
|
f005 = smtb00013.fecha,format = "dd/mm/yy",required;
|
|
ck = formonly.monto,noentry;
|
|
|
|
f006 = smtb00014.num_serv;
|
|
f009 = formonly.valor,noentry;
|
|
|
|
p4 = tetb00003.codigo,autonext;
|
|
bc = formonly.p_descrip;
|
|
instructions
|
|
screen record s_cheque[2] (num_serv,valor)
|
|
|
|
end
|