database smarmotech 
screen size 24 by 80
{
          FECHA DEL DIA    : [k       ] 
          TIPO MOVIMIENTO  : [k1]
          NUMERO DOCUMENTO : [p      ]
}
end
tables
intb00006
attributes
k   = intb00006.fecha,format = "dd/mm/yy";
k1  = intb00006.cod_mov;
p   = intb00006.num_doc;     
  instructions
     delimiters " "
end