ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.5.204 JMN3347I-S

@1@の暗黙のポインタ修飾は7段を超えてはいけません,また再帰的であってもいけません.

埋め込みの説明

@1@ : データ項目

例題

[C3347.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.  C3347.
000003 DATA DIVISION.
000004 BASED-STORAGE SECTION.
000005 01 PT2 POINTER BASED ON PTR.
000006 01 PT3 POINTER BASED ON PT2.
000007 01 PT4 POINTER BASED ON PT3.
000008 01 PT5 POINTER BASED ON PT4.
000009 01 PT6 POINTER BASED ON PT5.
000010 01 PT7 POINTER BASED ON PT6.
000011 01 PT8 POINTER BASED ON PT7.
000012 01 GRR PIC X(10)  BASED ON PT8.
000013 WORKING-STORAGE SECTION.
000014 01 PTR POINTER.
000015 01 GR  PIC X(10).
000016 PROCEDURE  DIVISION.
000017     DISPLAY GRR.
000018 END PROGRAM  C3347.

C3347.cob 17: JMN3347I-S 'GRR'の暗黙のポインタ修飾は7段を超えてはいけません,また再帰的であってもいけません.