10 lines
213 B
Plaintext
10 lines
213 B
Plaintext
|
|
DEFINE arr_prod ARRAY[500] OF RECORD
|
|
cod_n INTEGER,
|
|
cod_grupo INTEGER,
|
|
cod_tipo INTEGER,
|
|
cod_sec INTEGER,
|
|
descrip_esp CHAR(30),
|
|
unidad_med CHAR(5)
|
|
END RECORD
|