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

2.2.263 JMN1535I-S

@1@句は順ファイル以外に指定できません.

引数の説明

@1@:

PADDING,RECORD DELIMITER

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    C1535.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT RLFILE ASSIGN TO SYS006
      000007       ORGANIZATION IS RELATIVE
      000008       PADDING CHARACTER IS WPC.
      000009 DATA           DIVISION.
      000010 FILE            SECTION.
      000011 FD RLFILE.
      000012 01 RLREC.
      000013   02           PIC 9(4).
      000014   02           PIC X(66).
      000015 WORKING-STORAGE SECTION.
      000016 01 WPC         PIC X(1).
      000017 PROCEDURE      DIVISION.
      000018 END PROGRAM    C1535.
    

C1535.cob (8) : JMN1535I-S PADDING句は順ファイル以外に指定できません.