Utility programs DFHLS2WS and DFHWS2LS support mappings between COBOL data structures and the XML Schema definitions that are included in each Web service description.
For example, two instances of year become year and year1.
For example, current-user--id becomes current_user__id.
For example, CA-REQUEST-ID becomes ca_request_id.
For example, 9A-REQUEST-ID becomes _9a_request_id.
COBOL data description | Schema simpleType |
---|---|
PIC X(n) |
|
PIC S9 DISPLAY |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
PIC S9(z) DISPLAY where 5 ≤ z ≤ 9 |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
PIC S9(z) DISPLAY where 9 < z |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
PIC 9 DISPLAY |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
PIC 9(z) DISPLAY where 5 ≤ z ≤ 9 |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
PIC 9(z) DISPLAY where 9 < z |
where n is the maximum
value that can be represented by the pattern of '9' characters. |
![]() PIC S9(n) COMP ![]() |
|
![]() PIC S9(n) COMP ![]() |
|
![]() PIC S9(n) COMP ![]() |
|
![]() PIC 9(n) COMP ![]() |
|
![]() PIC 9(n) COMP ![]() |
|
![]() PIC 9(n) COMP ![]() |
|
PIC S9(m)V9(n) COMP-3 |
where p = m + n. |
PIC 9(m)V9(n) COMP-3 |
where p = m + n. |
![]() Supported at mapping level 1.2 only ![]() |
![]()
where p = m + n.![]() |
![]() Supported at mapping level 1.2 only ![]() |
![]()
![]() |
![]() Supported at mapping level 1.2 only ![]() |
![]()
![]() |
For example, DISPLAY becomes XDISPLAY.
For example, monthly_total becomes monthlyXtotal.
For example, ca-request- becomes ca-requestX.
If the schema specifies that the variable has fixed cardinality, and the schema element name is longer than 28 characters, it is truncated to that length.
For example, three instances of year become year, year1 and year2.
For more information, see Variable arrays of elements.
The nillable attribute has special rules. The prefix attr- is added, but nil- is also added to the beginning of the attribute name. The attribute name is followed by -value. If the total length is longer than 28 characters, the attribute name is truncated.
<xsd:simpleType name="VariableStringType">
<xsd:restriction base="xsd:string">
<xsd:minLength value="1"/>
<xsd:maxLength value="10000"/>
</xsd:restriction>
</xsd:simpleType>
<xsd:element name="textString" type="tns:VariableStringType"/>
maps
to 15 textString-length PIC S9999 COMP-5 SYNC
15 textString PIC X(10000)
Schema simple type | COBOL data description at mapping levels 1.0 and 1.1 | COBOL data description at mapping level 1.2 |
---|---|---|
|
Not supported |
Not supported |
|
PIC X(255) |
PIC X(255) |
where type is one of:
|
PIC X(z) |
PIC X(z) |
where type is one of:
|
PIC X(32) |
PIC X(32) |
where type is one of:
|
PIC X DISPLAY |
PIC X DISPLAY |
|
PIC S9999 COMP-5 SYNC |
PIC S9999 COMP-5 SYNC |
|
PIC 9999 COMP-5 SYNC |
PIC 9999 COMP-5 SYNC |
![]()
![]() |
![]() PIC S9(18) COMP-3 ![]() |
![]() PIC S9(18) COMP-3 ![]() |
|
PIC S9(9) COMP-5 SYNC |
PIC S9(9) COMP-5 SYNC |
|
PIC 9(9) COMP-5 SYNC |
PIC 9(9) COMP-5 SYNC |
|
PIC S9(18) COMP-5 SYNC |
PIC S9(18) COMP-5 SYNC |
|
PIC 9(18) COMP-5 SYNC |
PIC 9(18) COMP-5 SYNC |
|
PIC 9(p)V9(n) COMP-3 where p = m - n. |
PIC 9(p)V9(n) COMP-3 where p = m - n. |
|
PIC X DISPLAY |
PIC X DISPLAY |
|
PIC X(255) |
PIC X(255) |
|
PIC X(255) |
PIC X(255) |
where the length is not defined |
PIC X(y) where y =4×(ceil(z/3)). ceil(x) is the smallest integer greater than or equal to xSupported at mapping level 1.1 |
PIC X(z) where the length is fixedPIC X(16) where the length is not defined. The field holds the 16-byte name of the container that stores the binary data. |
|
PIC X(32) |
COMP-1 |
|
PIC X(32) |
COMP-2 |
<xsd:minInclusive value="-a"/>
<xsd:maxInclusive value="a"/>
where a
is a string of 9s.<xsd:minInclusive value="0"/>
<xsd:maxInclusive value="a"/>
where a
is a string of 9s.