{
========================================================================
FORMULARIO          : INFMMT057
SISTEMA             : Inventario Materia Prima (Inventario Perpetuo)
OBJETIVO            : Pantalla para digitar los resultados del inventario
                      fisico perpetuo realizado en determinada semana del
                      mes
PROGRAMA Q. USA     : INPRMT057
PROGRAMADOR         : Tadeo A. Ferreras
FECHA               : Mayo 9, 1993
=========================================================================
}
database smarmotech    
screen
{

Codigo      [a]-[b]-[b1]-[b2 ] 
            [b3      ] [b4                             ]  Categoria [e]
Semana Del  [c       ]                     Al [c1      ]
Existencia  Actual   [d          ] Fisica [d1          ]
[j]

Usuario Creador  [usu      ]        Usuario Modificador  [usm      ]
Fecha de Creacion[fech            ] Fecha de Modificacion[fec1            ]

}
end
tables
intb00001
intb00014
intb00015
attributes
a    = intb00015.cod_n,autonext,color = yellow,include = (1),default = 1;
b    = intb00015.cod_grupo,autonext,color = yellow;
b1   = intb00015.cod_tipo,autonext,color = yellow;
b2   = intb00015.cod_sec,autonext,color = yellow;
b3   = intb00001.unidad_med,color = yellow,noentry;
b4   = intb00001.descrip_esp,color = yellow,noentry;
e    = intb00014.categoria,color = yellow,noentry;
c    = intb00015.semana_del,autonext,color = yellow,format = "dd-mm-yy";
c1   = intb00015.semana_al,autonext,color=yellow,format="dd-mm-yy";
d    = intb00015.exis_act,color = yellow,noentry;
d1   = intb00015.exis_fisica,color = yellow;
j    = intb00015.status_t,noentry;
usu  = intb00015.us_crea,noentry;
fech = intb00015.fech_crea,noentry;
usm  = intb00015.us_mod,noentry;
fec1 = intb00015.fech_mod,noentry;
instructions delimiters " "
end