入出力データ情報定義機能を使用した場合,XMLアクセス用データ定義の名称としてBaseElement要素に対応した01レベルの集団項目が生成されます。
集団項目名は,BaseElement要素のcobName属性に指定した名称(省略時はelemName属性)に"-BASE"を追加した名称になります。
"-BASE"を追加した名称は,一意である必要があります。一意でない名称を指定した場合,COBOL原始プログラムの生成時にエラーとなります。
BaseElement要素に対応した集団項目の下位レベルには,次に示す入出力データ項目と入出力データ項目に対応する入出力データ情報項目が生成されます。
<?xml version="1.0" encoding="Shift_JIS"?>
<!DOCTYPE root [
<!ELEMENT root (item01, item02)>
<!ELEMENT item01 (#PCDATA)>
<!ELEMENT item02 (#PCDATA)>
]>
<root/>
<?xml version="1.0" encoding="Shift_JIS"?>
<Interface interfaceName="EXAMPLE">
<BaseElement elemName="root" accessInfo="yes">
<Group elemName="root">
<Item elemName="item01" type="alphanumeric"
size="10" />
<Item elemName="item02" type="alphanumeric"
size="10" />
</Group>
</BaseElement>
</Interface>
01 root-BASE.
02 root.
03 item01 PIC X(10).
03 item02 PIC X(10).
* Access Information
02 root-FLG PIC 1(32) USAGE BIT.
02 root-GROUP.
03 item01-FLG PIC 1(32) USAGE BIT.
03 item01-LEN PIC 9(9) USAGE COMP.
03 item02-FLG PIC 1(32) USAGE BIT.
03 item02-LEN PIC 9(9) USAGE COMP.