2.3.437 JMN2732I-S

'@1@'特殊レジスタの一意名は連絡節中で定義されたレベル番号が01または77の項目でなければなりません．

引数の説明

@1@:

ADDRESS OF．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2732.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WPX         POINTER.
      000007 01 WBUF1       PIC X(20).
      000008 LINKAGE         SECTION.
      000009 01 WBUF2       PIC X(20).
      000010 PROCEDURE      DIVISION.
      000011     SET ADDRESS OF WBUF1 TO WPX
      000012     SET ADDRESS OF WBUF2 TO WPX
      000013 END PROGRAM    P2732.

P2732.cob (11) : JMN2732I-S 'ADDRESS OF'特殊レジスタの一意名は連絡節中で定義されたレベル番号が01または77の項目でなければなりません．