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

  Bodega [b1]

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

}
tables
intb00001,
intb00006
intb00002
attributes
f1 = formonly.fecha type date,reverse,format = "dd/mm/yyyy",
       comments = "Digite Fecha Del Conteo Fisico";
a  = intb00001.cod_n,reverse,autonext,required,
        comments = "Digite NIVEL Codificacion";
b  = intb00001.cod_grupo,reverse,autonext,required,
        comments = "Digite GRUPO Codificacion";
c  = intb00001.cod_tipo,reverse,autonext,required,
        comments = "Digite TIPO Codificacion";
d  = intb00001.cod_sec,reverse,autonext,required,
        comments = "Digite SECUENCIA Codificacion";
k1  = formonly.descrip_esp,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