А есть ли оператор объединения одинаковых по ширине(по nColumns) массивов(ну
типа concat какой нибудь...) или нет...
S> Hi All,
S> А есть ли оператор объединения одинаковых по ширине(по nColumns)
S> массивов(ну типа concat какой нибудь...)
Нет. Но есть функция копирования массивов ACOPY() с помощью которой (и
конечно с помощью DIMENSION для задания "новой" размерности массива) можно
решить задачу.
DIMENSION a1(2,3)
DIMENSION a2(5,3)
FOR ln1 = 1 TO 6
a1(m.ln1) = m.ln1
ENDFOR
FOR ln1 = 1 TO 15
a2(m.ln1) = m.ln1 + 6
ENDFOR
* Откуда будут располагаться данные "второго" массива в "объединённом"
ln1 = ALEN(a1) + 1
* Сначала зададим новый размер массива
DIMENSION a1(ALEN(a1, 1) + ALEN(a2, 1), ALEN(a1, 2))
* Теперь собственно копирование
? ACOPY(a2, a1, 1, -1, m.ln1)
* Результат
DISPLAY MEMORY LIKE a1
--
WBR, Igor