30 lines
878 B
Plaintext
30 lines
878 B
Plaintext
DATABASE marmotech
|
|
SCREEN SIZE 24 by 80
|
|
{
|
|
Busqueda de Productos Terminados
|
|
\g------------------------------------------------\g
|
|
Codigo Nombre
|
|
\g------------------------------------------------\g
|
|
[f1 ] [f2 ]
|
|
[f1 ] [f2 ]
|
|
[f1 ] [f2 ]
|
|
[f1 ] [f2 ]
|
|
[f1 ] [f2 ]
|
|
[f1 ] [f2 ]
|
|
}
|
|
end
|
|
|
|
tables
|
|
intb00001
|
|
attributes
|
|
f1 = formonly.codigo,noentry,
|
|
comments = "Elegir Este Registro Con La Tecla <Esc>";
|
|
f2 = intb00001.descrip_esp, upshift,
|
|
comments = " <Esc> Busca todos los Productos Terminados ";
|
|
|
|
instructions
|
|
screen record s_desp2[6] (codigo,descrip_esp)
|
|
delimiters " "
|
|
end
|
|
|