9.6.4 集団項目の要素のCOBOLの型がJavaの型と対応している場合

データ交換に使用される集団項目の要素が基本項目であり、そのCOBOLの型がJavaの型に直接対応する型である場合の例を示します。

入力ファイル

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

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

COBOL登録集

01  DATA1.
    02  DATA1-1  PIC X(5).
    02  DATA1-2  PIC X(6).
    02  DATA1-3  PIC X(7).
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 java.lang.String data1_3;
    public DATA1() {}
    public DATA1(
        java.lang.String data1_1,
        java.lang.String data1_2,
        java.lang.String data1_3) {
        this.data1_1 = data1_1;
        this.data1_2 = data1_2;
        this.data1_3 = data1_3;
    }
}

生成されるbean

// SAMPLE04Bean.java
public class SAMPLE04Bean
    implements com.fujitsu.interstage.apfw.bean.ApfwBean
{
    private int apfw_result;
    private DATA1 data1;
    private int result_code;
    public SAMPLE04Bean() {}
    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;
    }
}