引数の説明
System.UInt8, System.Int16, System.Int32, System.Int64, System.Single, System.DoubleまたはSystem.Char. |
例
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5259. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS I4 AS "System.Int32". 000007 OBJECT. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 WK OBJECT REFERENCE I4. *>ERROR 000011 PROCEDURE DIVISION. 000012 METHOD-ID. OBJM. 000013 DATA DIVISION. 000014 WORKING-STORAGE SECTION. 000015 01 MET-WK OBJECT REFERENCE I4. *>OK 000016 PROCEDURE DIVISION. 000017 END METHOD OBJM. 000018 END OBJECT. 000019 END CLASS C5259.
C5259.cob (10) : JMN5259I-S System.Int32クラスのオブジェクト参照データ項目は,プログラム定義の作業場所節,局所記憶節およびメソッド定義の作業場所節にだけ記述できます.
詳細な説明
指定された型について,COBOLでは以下のマッピングを用意していますのでこちらを使用してください.
System.Byte = USAGE BINARY-CHAR UNSIGNED
System.Int16 = USAGE BINARY-SHORT SIGNED(推奨.ただしPIC S9(4) USAGE COMP-5も可)
System.Int32 = USAGE BINARY-LONG SIGNED(推奨.ただしPIC S9(9) USAGE COMP-5も可)
System.Int64 = USAGE BINARY-SHORT SIGNED(推奨.ただしPIC S9(18) USAGE COMP-5も可)
System.Single = USAGE COMP-1
System.Double = USAGE COMP-2
System.Char = PIC N(1)