ILE COBOL 解説書

コーディング例

このコーディング例では、SPECIAL-NAMES 段落で一般に使用される環境名に簡略名を割り当てています

SPECIAL-NAMES.  SYSTEM-CONSOLE IS SYSTM
     REQUESTOR IS WORK-STATION
     C01 IS NEXT-PAGE
     LOCAL-DATA IS LOCAL-DATA-AREA
     ATTRIBUTE-DATA IS ATTRB-DATA
     SYSTEM-SHUTDOWN IS SHUTDOWN-SWITCH
         ON STATUS IS SHUTDOWN-PENDING
     UPSI-0 IS UPSI-SWITCH-0
         ON STATUS IS U0-ON
         OFF STATUS IS U0-OFF
     UPSI-1 IS UPSI-SWITCH-1
         ON STATUS IS U1-ON
         OFF STATUS IS U1-OFF
     IBM-ASCII IS STANDARD-1
     CURRENCY SIGN IS "Y".


[ ページのトップ | 前ページ | 次ページ | 目次 | 索引 ]