入れ子の集団項目は、Javaプログラム側からはクラスをメンバ変数としてもつクラスとして見えます。
アプリケーション情報入力ファイル
<apfw-app>
…
<operation name="SAMPLE07">
<parameter direction="IN">PERSONAL_DATA</parameter>
<parameter direction="OUT">RESULT-CODE</parameter>
</operation>
…
</apfw-app> |
COBOL登録集
01 PERSONAL_DATA.
02 ADRES PIC X(100).
02 TEL PIC X(20).
02 PERSON.
03 FIRSTNAME PIC X(10).
03 LASTNAME PIC X(10).
01 RESULT-CODE PIC S9(9) COMP-5. |
クラスに対応するJavaソース
// PERSON.java
final public class PERSON
{
public java.lang.String firstname;
public java.lang.String lastname;
public PERSON() {}
public PERSON(
java.lang.String firstname,
java.lang.String lastname) {
this.firstname = firstname;
this.lastname = lastname;
}
}
// PERSONAL_DATA.java
final public class PERSONAL_DATA
{
public java.lang.String adoresu;
public java.lang.String tel;
public PERSON person;
public PERSONAL_DATA() {}
public PERSONAL_DATA(
java.lang.String adoresu,
java.lang.String tel,
PERSON person) {
this.adoresu = adoresu;
this.tel = tel;
this.person = person;
}
} |
生成されるbean
// SAMPLE07Bean.java
public class SAMPLE07Bean
implements com.fujitsu.interstage.apfw.bean.ApfwBean
{
private int apfw_result;
private PERSONAL_DATA personal_data;
private int result_code;
public SAMPLE07Bean() {}
public void setApfw_result(int apfw_result)
{
this.apfw_result = apfw_result;
}
public int getApfw_result()
{
return this.apfw_result;
}
public void setPersonal_data(PERSONAL_DATA personal_data)
{
this.personal_data = personal_data;
}
public PERSONAL_DATA getPersonal_data()
{
return this.personal_data;
}
public void setResult_code(int result_code)
{
this.result_code = result_code;
}
public int getResult_code()
{
return this.result_code;
}
} |