database smarmotech 
screen size 24 by 80
{
Codigo              [b   ]
Descripcion         [f004                          ]
[j]

Usuario Creador     [f006     ]           Usuario Modificador [f008     ]
Fecha Creacion      [f007            ]    Fecha Modificacion  [f009            ]
}
end
tables
  prtb00005
attributes
b   =prtb00005.codigo, autonext,comments = "Digite el Codigo de Operacion";
f004=prtb00005.descripcion,upshift,comments="Digite el nombre de la Operacion";
f006=prtb00005.us_crea, noentry;
f007=prtb00005.fech_crea, noentry;
f008=prtb00005.us_mod, noentry;
f009=prtb00005.fech_mod, noentry;
j   =prtb00005.status_t, noentry;
instructions
delimiters " "
end