{ ------------------------------------------------------------------------ FORMULARIO : NOFMRP008 OBJETIVO : Pantalla para Impresion de Cheques PROGRAMA Q. LO USA: NOPRRP008 PROGRAMADOR : Ing. Juan Soto. FECHA REALIZACION : Noviembre 10, 1993. ------------------------------------------------------------------------ } database smarmotech screen size 24 by 80 { Fecha Aplicacion [fe ] PLANILLA TSS Nomina No. [num ] [a ] Tipo de Nomina [t][de ] Fecha del [f1 ] al [f2 ] Departamento: [f01 ] Empleado: [f02 ] 0 50 100 | | | [p1 ] } end tables notb00008 attributes PROGRESSBAR p1 = formonly.progreso,VALUEMIN=0,VALUEMAX=100,COLOR=GREEN; a = formonly.imp_form,default="N", --# widget="RADIO", config="S Formulario N noFormularios"; DATEEDIT fe = formonly.fecha type date, format = "dd/mm/yyyy", comments = "Introduzca la Fecha Que debe ser aplicada la nomina en el banco"; num = notb00008.num_nomi ,comments = "Digite el numero de la nomina"; t = formonly.tipo_emp type char,upshift,include = ("Q","S","V","J"),comments = "Digite el tipo de nomina: Q=Quincenal S=Semanal V=Vendedores J- Jornales"; de = formonly.nombre_tipo,noentry; f1 = formonly.fecha_d type date,noentry,format="dd/mm/yyyy"; f2 = formonly.fecha_a type date,noentry,format="dd/mm/yyyy"; 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