Rational Developer for System z
PL/I for Windows, Version 7.6, プログラミング・ガイド

ネストされたプロシージャーの例

   a: proc;

     dcl (i,j,k) fixed bin;
     dcl ib      based fixed bin;
         .
         .
         .
     call b( addr(i) );
         .
         .
         .
     b: proc( px );
       dcl px      pointer;
       display( px->ib );
     end;
   end;
パッケージ化されたプロシージャーの例
   p: package exports( a );

     dcl ib      based fixed bin;

     a: proc;

       dcl (i,j,k) fixed bin;
         .
         .
         .
       call b( addr(i) );
         .
         .
         .
     end;

     b: proc( px );
       dcl px      pointer;
       display( px->ib );
     end;

   end p;

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)