COBOL登録集に記述した名前に、Javaでは使用できない“-”(ハイフン)が使用されている場合、“_”(アンダースコア)に置き換えられます。
COBOL登録集
* FROM-DATE.cbl
01 FROM-DATE.
02 YYYY PIC X(4).
02 MM PIC X(2).
02 DD PIC X(2).
* TO-DATE.cbl
01 TO-DATE.
02 YYYY PIC X(4).
02 MM PIC X(2).
02 DD PIC X(2).
* PASS-DAYS.cbl
01 PASS-DAYS PIC S9(9) COMP-5. |
アプリケーション情報入力ファイル
<apfw-app>
<server>
…
<cobol>
<base_name>sample</base_name>
<operation name="DATEDIFF">
<parameter direction="IN">FROM-DATE</parameter>
<parameter direction="IN">TO-DATE</parameter>
<parameter direction="OUT">PASS-DAYS</parameter>
</operation>
</cobol>
</server>
</apfw-app> |
生成されるJavaクラスおよびbean
// FROM_DATE.java
final public class FROM_DATE
{
public java.lang.String yyyy;
public java.lang.String mm;
public java.lang.String dd;
…
}
// TO_DATE.java
final public class TO_DATE
{
public java.lang.String yyyy;
public java.lang.String mm;
public java.lang.String dd;
…
}
// DATEDIFFBean.java
public class DATEDIFFBean
implements com.fujitsu.interstage.apfw.bean.ApfwBean
{
private int apfw_result;
private FROM_DATE from_date;
private TO_DATE to_date;
private int pass_days;
…
} |