Ограничения PL/I

Поддержка REFER: PLI поддерживает только простые операторы REFER

Оператор REFER считается простым, если выполнены следующие условия:

• REFER должен использоваться только одним элементом структуры. Для этого элемента, а также его родительского элемента не должны быть указаны элементы уровня сестер. Кроме того, этот элемент должен быть одним из следующих элементов:
  • Скалярная строка или AREA
  • Одномерный массив символов с постоянной нижней границей
  • Массив элементов постоянного размера, в котором переменной может быть только верхняя граница первой размерности

   dcl
     1 nc1         based,
       2 ne      bin fixed(15),
       2 nx1     char( nc refer(ne) );

   dcl
     1 nc2         based,
       2 ne      bin fixed(15),
       2 nf      bin fixed(15),
       2 nx2( nc refer(ne) ) char( nd refer(nf) );

   dcl
     1 nc3         based,
       2 ne      bin fixed(15),
       2 nx3( nc refer (ne) , 2 ),
         3 nb1      char(4),
         3 nb2      char(6);