{ =========================================================================== Formulario : infmmt018 Sistema : Inventario de Material Objetivo : Formulario a usar para captura de informacion en el modulo inprmt018 (datos referentes a maestra de solicitud) Autor : Tadeo A. Ferreras Fecha : Julio 22,1993 =========================================================================== } database exterior screen { Numero de Solicitud [a ] Fecha de Solicitud [b ] \g----------------------------------------------------------------------------\g Pila Cantidad \g----------------------------------------------------------------------------\g [c]-[d] [desc1 ] [cant ] [c]-[d] [desc1 ] [cant ] [c]-[d] [desc1 ] [cant ] } end tables intb00017 attributes a = intb00017.num_sol,comments = "Digite el numero de solicitud"; b = intb00017.fecha,format = "dd/mm/yy",comments = "Digite fecha de solicitud"; c = intb00017.cod_n_p,autonext,comments = "Digite el nivel de la pila"; d = intb00017.cod_grupo_p,autonext,comments = "1 = Pila tipo D 2 = Pila tipo C 3 = Pila tipo AA"; desc1 = formonly.descrip1 type char,color = yellow,noentry; cant = intb00017.cantidad,comments = "Digite la cantidad de pila a Solicitar"; instructions delimiters " " screen record arr_form3[3](cod_n_p,cod_grupo_p,descrip1,cantidad) end