支持替换组

您可以使用替换组来定义一组可互换的 XML 元素。 CICS® 助手在映射级别 2.2 和更高版本上提供对替换组的支持。

在映射级别 2.2 和更高版本上， DFHSC2LS 和 DFHWS2LS 支持使用与用于 <xsd:choice> 元素的映射类似的映射的替换组。助手在语言结构中生成枚举字段和新的容器名称。

示例

以下 XML 模式片段包含两个 subGroupParent 元素的数组，每个元素都可以替换为 replacementOption1 或 replacementOption2。

<xsd:element name="subGroupExample">
  <xsd:complexType>
    <xsd:sequence>
      <xsd:element ref="subGroupParent" maxOccurs="2" minOccurs="2" />
    </xsd:sequence>
  </xsd:complexType>
</xsd:element>
<xsd:element name="subGroupParent" type="xsd:anySimpleType" />
<xsd:element name="replacementOption1" type="xsd:int"
   substitutionGroup="subGroupParent" />
<xsd:element name="replacementOption2" type="xsd:short"
   substitutionGroup="subGroupParent" />

使用助手处理该 XML 片段会生成以下 COBOL 语言结构：

03 subGroupExample.
06 subGroupParent OCCURS2.
09 subGroupExample-enum PIC X DISPLAY.
88 empty VALUE X '00'.
88 replacementOption1 VALUE X '01'.
88 replacementOption2 VALUE X '02'.
88 subGroupParent VALUE X '03'.
09 subGroupExample-cont PIC X (16).

01 Example-replacementOption1.
03 replacementOption1 PIC S9(9) COMP-5 SYNC.

01 Example-replacementOption2.
03 replacementOption2 PIC S9999 COMP-5 SYNC.

01 Example-subGroupParent.
03 subGroupParent-length PIC S9999 COMP-5 SYNC.
03 subGroupParent PIC X(255).

有关替换组的更多信息，请参阅《 XML架构第1部分：结构（第二版）》。