{
------------------------------------------------------------------------
 FORMULARIO        : NOFMCS004
 OBJETIVO          : Pantalla para desplegar informacion referente al
                     acumulado por movimiento de los empleados.
 PROGRAMA Q. LO USA: NOPRCS004
 PROGRAMADOR       : Tadeo A. Ferreras F. 
 FECHA REALIZACION : Agosto 23, 1993  
------------------------------------------------------------------------
}
schema smarmotech
screen size 24 by 80
{

  Codigo del Empleado [empl]-[dept]-[a1]-[a2]
                      [nomb                           ]
                      [dpto                           ]
\g----------------------------------------------------------\g
   Movimiento                                    Acumulado 
\g----------------------------------------------------------\g
   [f00]   [des                            ][val          ]
   [f00]   [des                            ][val          ]
   [f00]   [des                            ][val          ]
   [f00]   [des                            ][val          ]
}
end
attributes
empl = formonly.num_emp type integer,comments =
       "Digite el numero del empleado";
dept = formonly.departamento,noentry;
a1   = formonly.nivel_emp,noentry;
a2   = formonly.cod_puesto,noentry;
nomb = formonly.nombre type char,noentry;
dpto = formonly.nom_dpto type char,noentry;
f00  = formonly.cod_mov;
des  = formonly.descrip_mov type char,noentry;
val  = formonly.valor,noentry;
instructions
  delimiters " "
  screen record acumul1(cod_mov,descrip_mov,valor)
end