{
------------------------------------------------------------------------
 FORMULARIO        : NOFMCS003
 OBJETIVO          : Pantalla para desplegar informacion referente a los
                     cheques emitidos a travez de la nomina.
 PROGRAMA Q. LO USA: NOPRCS003
 PROGRAMADOR       : Tadeo A. Ferreras F. 
 FECHA REALIZACION : Agosto 23, 1993  
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{

  Numero de la Nomina [nom   ] Tipo de Nomina [t]
\g---------------------------------------------------------------------\g
   Cheque No.  Empleado                                 Monto Cheque
\g---------------------------------------------------------------------\g
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
   [f000  ]   [f001] [f005           ][f006           ] [valor     ]
}
end
tables
notb00009
attributes
nom  = formonly.numero_nom type integer,comments =
       "Digite el numero de la nomina a que se aplicaron los cheques";
t    = formonly.tipo_emp,upshift;
f000 = notb00009.cheque_no;
f001 = notb00009.num_emp;
f005 = formonly.nombre type char,noentry;
f006 = formonly.apellido type char,noentry;
valor= notb00009.monto,noentry;
instructions
  screen record cheque1[8] (cheque_no,num_emp,nombre,apellido,monto) 
  delimiters " "
end