33 lines
1011 B
Plaintext
33 lines
1011 B
Plaintext
DATABASE marmotech
|
|
SCREEN SIZE 24 by 80
|
|
{
|
|
Busqueda de Repuestos
|
|
\g-----------------------------------------------------\g
|
|
Codigo Nombre
|
|
\g-----------------------------------------------------\g
|
|
[f]-[g]-[h ]-[i ][f2 ][f3 ]
|
|
[f]-[g]-[h ]-[i ][f2 ][f3 ]
|
|
[f]-[g]-[h ]-[i ][f2 ][f3 ]
|
|
[f]-[g]-[h ]-[i ][f2 ][f3 ]
|
|
[f]-[g]-[h ]-[i ][f2 ][f3 ]
|
|
|
|
}
|
|
end
|
|
|
|
tables
|
|
irtb00002
|
|
attributes
|
|
f = formonly.cod_n,noentry;
|
|
g = formonly.cod_grupo,noentry;
|
|
h = formonly.cod_tipo,noentry;
|
|
i = formonly.cod_sec,noentry;
|
|
f2 = irtb00002.descrip_esp, upshift,
|
|
comments = " <Esc> Busca todos los Productos Terminados ";
|
|
f3 = irtb00002.unidad_med,noentry;
|
|
instructions
|
|
screen record s_prod[5] (cod_n,cod_grupo,cod_tipo,cod_sec,descrip_esp,
|
|
unidad_med)
|
|
delimiters " "
|
|
end
|
|
|