COBOL2002 XML連携機能ガイド


3.3.1 BaseElement要素

入出力データ情報定義機能を使用した場合,XMLアクセス用データ定義の名称としてBaseElement要素に対応した01レベルの集団項目が生成されます。

集団項目名は,BaseElement要素のcobName属性に指定した名称(省略時はelemName属性)に"-BASE"を追加した名称になります。

〈この項の構成〉

(1) 規則

"-BASE"を追加した名称は,一意である必要があります。一意でない名称を指定した場合,COBOL原始プログラムの生成時にエラーとなります。

(2) 指定例

BaseElement要素に対応した集団項目の下位レベルには,次に示す入出力データ項目と入出力データ項目に対応する入出力データ情報項目が生成されます。

(DTDの例)
<?xml version="1.0" encoding="Shift_JIS"?>
<!DOCTYPE root [
  <!ELEMENT root (item01, item02)>
  <!ELEMENT item01  (#PCDATA)>
  <!ELEMENT item02  (#PCDATA)>
]>
<root/>
(DDFの例)
<?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>
(生成されるCOBOLデータ項目)
 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.