database marmotech
 screen
{ 
 
     Codigo   [a][b][c ][d  ]
              [uni           ][nf1                           ]
     Mes      [me]
     Ano      [an  ] 
     Cantidad [ct          ]

     Usuario Creador [f11      ]        Usuario Modificador [f12      ]
     Fecha Creacion  [f10              ]Fecha Modificacion  [f13             ]
}
end
tables
cttb00015
attributes
a = cttb00015.cod_n,autonext,include=(1); 
b = cttb00015.cod_grupo,autonext; 
c = cttb00015.cod_tipo,autonext; 
d = cttb00015.cod_sec,autonext; 
uni= formonly.unidad type char,noentry,color=yellow;
nf1= formonly.descrip type char,noentry,color=yellow;
an = cttb00015.ano,comments = "Digite el Ano del Periodo Para el Inventario";
me = cttb00015.mes,comments = "Digite el mes del Periodo Para el Inventario";
ct = cttb00015.cantidad; 
f11 = formonly.usuario_c,noentry;
f10 = formonly.fecha_c,noentry;
f12 = formonly.usuario_m,noentry;
f13 = formonly.fecha_m,noentry;
instructions 
delimiters " "
end