25 lines
642 B
Plaintext
25 lines
642 B
Plaintext
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Zonas
|
|
\g------------------------------------------
|
|
Zona Descripcion
|
|
\g------------------------------------------
|
|
[f0 ] [f001 ]
|
|
[f0 ] [f001 ]
|
|
[f0 ] [f001 ]
|
|
[f0 ] [f001 ]
|
|
}
|
|
end
|
|
tables
|
|
vetb00008
|
|
attributes
|
|
f0 = vetb00008.cod_zona,noentry,
|
|
comments = "<Esc> Busca las zonas";
|
|
f001 = vetb00008.descrip, upshift,
|
|
comments = "<Esc> Busca las zonas";
|
|
instructions
|
|
screen record consart[4] (cod_zona,descrip)
|
|
delimiters " "
|
|
end
|