H.6.5 集団項目の要素のCOBOLの型がJavaの型と対応していない場合

データ交換に使用される集団項目の要素が基本項目であり、そのCOBOLの型がJavaの型に対応しない型である場合、その要素はJavaからはString型として扱われます。

入力ファイル

アプリケーション情報入力ファイル

<apfw-app>
  …
  <operation name="SAMPLE05">
    <parameter direction="IN">DATA1</parameter>
    <parameter direction="OUT">RESULT-CODE</parameter>
  </operation>
  …
</apfw-app>

COBOL登録集

01  DATA1.
    02  DATA1-1    PIC S9(9).
    02  DATA1-2    PIC S9(9)V99.
    02  DATA1-3    COMP-1.
01  RESULT-CODE    PIC S9(9) COMP-5.

出力ファイル

クラスに対応するJavaソース

// DATA1.java
final public class DATA1
{
    public java.lang.String data1_1;
    public java.lang.String data1_2;
    public float data1_3;
    public DATA1() {}
    public DATA1(
        java.lang.String data1_1,
        java.lang.String data1_2,
        float data1_3) {
        this.data1_1 = data1_1;
        this.data1_2 = data1_2;
        this.data1_3 = data1_3;
    }
}

生成されるbean

// SAMPLE05Bean.java
public class SAMPLE05Bean
    implements com.fujitsu.interstage.apfw.bean.ApfwBean
{
    private int apfw_result;
    private DATA1 data1;
    private int result_code;
    public SAMPLE05Bean() {}
    public void setApfw_result(int apfw_result)
    {
        this.apfw_result = apfw_result;
    }
    public int getApfw_result()
    {
        return this.apfw_result;
    }
    public void setData1(DATA1 data1)
    {
        this.data1 = data1;
    }
    public DATA1 getData1()
    {
        return this.data1;
    }
    public void setResult_code(int result_code)
    {
        this.result_code = result_code;
    }
    public int getResult_code()
    {
        return this.result_code;
    }
}