Ograniczenia języka PL/I

Obsługa zmiennych REFER: Program importujący języka PL/I obsługuje jedynie proste zmienne REFER

Zmienna REFER jest zmienną prostą, gdy:

• Istnieje tylko jeden element struktury używający zmiennej REFER, który nie ma elementów równorzędnych i którego elementy nadrzędne również nie mają elementów równorzędnych i który jest:
  • łańcuchem skalarnym lub elementem AREA;
  • jednowymiarową tablicą typu char ze stałym kresem lbound;
  • lub tablicą elementów o stałej wielkości, w której tylko kres górny pierwszego wymiaru nie jest stały.

   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);