database smarmotech
screen size 24 by 80
{
  Fecha Del Conteo [f1        ]

  Bodega [b1]

  Producto  [a ]-[b ]-[c  ]-[d   ] 
            [k1                                           ][k2  ]
  Conteo [f3          ]   Existencia S/Movimientos [f4             ]
 \g------------------------------------------------------------------ 
  Diferencia  [p1          ]
  Movimiento  [b2][b3                                      ]
  Documento   [k20   ]                                 

}
tables
iptb00002,
iptb00006
intb00002
attributes
f1 = formonly.fecha type date,reverse,format = "dd/mm/yyyy",
       comments = "Digite Fecha Del Conteo Fisico";
a  = iptb00002.cod_n,reverse,autonext,required,
        comments = "Digite NIVEL Codificacion";
b  = iptb00002.cod_grupo,reverse,autonext,required,
        comments = "Digite GRUPO Codificacion";
c  = iptb00002.cod_tipo,reverse,autonext,required,
        comments = "Digite TIPO Codificacion";
d  = iptb00002.cod_sec,reverse,autonext,required,
        comments = "Digite SECUENCIA Codificacion";
k1  = formonly.descripcion,noentry;
k2 = formonly.unidad_med,noentry;
b1 = intb00002.bodega,reverse,autonext,required,  
        comments = "Digite BODEGA Materia Prima";
f3  = formonly.cantidad,reverse,required,
        comments = "Digite Cantidad Del Conteo Fisico";
f4  = formonly.ex_mov,noentry;
b2  = formonly.cod_mov,noentry; 
b3  = formonly.descrip_mov,noentry;
p1  = formonly.diferencia,noentry;
k20  = formonly.num_doc;
instructions
   delimiters " "
end