{ ------------------------------------------------------------------------ FORMULARIO : NOFMRP008 OBJETIVO : Pantalla para Impresion de Cheques PROGRAMA Q. LO USA: NOPRRP008 PROGRAMADOR : Ing. Juan Soto. FECHA REALIZACION : Noviembre 10, 1993. ------------------------------------------------------------------------ } database marmotech screen size 24 by 80 { Nomina No. [num ] Tipo de Nomina [t][de ] Fecha del [f1 ] al [f2 ] Departamento: [f01 ] Empleado: [f02 ] } end tables notb00008 attributes num = notb00008.num_nomi ,comments = "Digite el numero de la nomina"; t = formonly.tipo_emp type char,upshift,include = ("Q","S","V"),comments = "Digite el tipo de nomina: Q=Quincenal S=Semanal V=Vendedores"; de = formonly.nombre_tipo,noentry; f1 = formonly.fecha_d type date,noentry,format="dd/mm/yy"; f2 = formonly.fecha_a type date,noentry,format="dd/mm/yy"; f01 = notb00008.departamento,comments = "Digite Rango de departamento o Deje en blanco para todos"; f02 = notb00008.num_emp,comments = "Digite Rango de empleado(s) o Deje en blanco para todos"; end