26 lines
852 B
Plaintext
26 lines
852 B
Plaintext
database rayovac
|
|
screen size 24 by 80
|
|
{
|
|
Seleccione Impresor
|
|
\g------------------------------------------------------------------------
|
|
Impresora Codigo Puerto Prog Pipe Codigo
|
|
\g------------------------------------------------------------------------
|
|
[f0 ][c1 ][p1 ][b ][a] [p]
|
|
[f0 ][c1 ][p1 ][b ][a] [p]
|
|
[f0 ][c1 ][p1 ][b ][a] [p]
|
|
}
|
|
end
|
|
tables
|
|
prttb00001
|
|
attributes
|
|
f0 = prttb00001.nombre;
|
|
c1 = prttb00001.codigo;
|
|
p1 = prttb00001.puerto;
|
|
p = prttb00001.prtcodigo;
|
|
a = prttb00001.lppipe;
|
|
b = prttb00001.lpprog;
|
|
instructions
|
|
screen record s_prt[3] (nombre,codigo,puerto,lpprog,lppipe,prtcodigo)
|
|
delimiters " "
|
|
end
|