La Tabla 1 muestra cómo los generadores de conversores XML derivan tipos XML de tipos COBOL.
| Tipo COBOL | Propiedades COBOLUsageValue+ COBOL ModelType | Tipo XSD correspondiente |
|---|---|---|
| Tipo alfabético COBOL 05 Fname PIC A(20).) |
<xsd:simpleType>
<restriction base="xsd:string">
<length value="n"/>
</restriction>
</simpleType>
|
|
| Tipo alfanumérico COBOL | <xsd:simpleType>
<restriction base="xsd:string">
<length value="n"/>
</restriction>
</simpleType>
|
|
| Tipo numérico COBOL display, binary, comp, comp-4, comp-5 ->display/binary |
Display/binary +decimal | <xsd:simpleType> <xsd:restriction base="xsd:decimal"> <xsd:minInclusive value="xx.x"/> <xsd:maxInclusive value="yy.y"/> </xsd:restriction> </xsd:simpleType> |
| Display/binary +~decimal + number of nines <= 4 + sign | <xsd:simpleType> <xsd:restriction base="xsd:short"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
|
| Display/binary +~decimal + 4 <number of nines <= 9+ sign | <xsd:simpleType> <xsd:restriction base="xsd:int"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
|
| Tipo numérico COBOL Display, binary, comp, comp-4, comp-5 ->display/binary |
Display/binary +~decimal + 9 <number of nines +sign | <xsd:simpleType> <xsd:restriction base="xsd:long"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
| Display/binary +~decimal + number of nines <= 4 + no sign | <xsd:simpleType> <xsd:restriction base="xsd:short"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
|
| Display/binary +~decimal + 4 <number of nines <= 9+ no sign | <xsd:simpleType> <xsd:restriction base="xsd:int"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
|
| Display/binary +~decimal + 9 <number of nines + nosign | <xsd:simpleType> <xsd:restriction base="xsd:long"> <xsd:minInclusive value="xx"/> <xsd:maxInclusive value="yy"/> </xsd:restriction> </xsd:simpleType> |
|
| packed-decimal, comp-3 -> packedDecimal | packedDecimal | Si se especifica el separador decimal:
<xsd:simpleType> <xsd:restriction base="xsd:decimal"> <xsd:minInclusive value="xx.x"/> <xsd:maxInclusive value="yy.y"/> </xsd:restriction> </xsd:simpleType> Si no se especifica el separador
decimal:
<xsd:simpleType>
<xsd:restriction base="xsd:short">
<xsd:minInclusive value="xxx"/>
<xsd:maxInclusive value="yyy"/>
</xsd:restriction>
</xsd:simpleType>
|
| comp-1 -> float | float | <xsd:simpleType> <xsd:restriction base="xsd:float"> <xsd:minInclusive value="xx.x"/> <xsd:maxInclusive value="yy.y"/> </xsd:restriction> </xsd:simpleType> |
| comp-2 -> double | double | xsd:simpleType> <xsd:restriction base="xsd:double"> <xsd:minInclusive value="xx.x"/> <xsd:maxInclusive value="yy.y"/> </xsd:restriction> </xsd:simpleType> |
| Tipo alfanumérico editado COBOL | <xsd:simpleType>
<restriction base="string">
<length value="n"/>
</restriction>
</simpleType>
|
|
| Tipo numérico editado COBOL | <xsd:simpleType>
<restriction base="string">
<length value="n"/>
</restriction>
</simpleType>
|
|
| Tipo DBCS COBOL | DBCS | <xsd:simpleType>
<restriction base="string">
<length value="n"/>
</restriction>
</simpleType>
|
| Tipo de coma flotante externo COBOL | <xsd:simpleType>
<restriction base="string">
<length value="n"/>
</restriction>
</simpleType>
|
|
| Tipo Nacional (Unicode) COBOL | Datos almacenados en formato Unicode | |
| Tipo de dirección COBOL | - no soportado - | |
| Tipo de referencia de objeto COBOL | - no soportado - | |
COBOL |
<xsd:element name="TXN_Resp_Code">
<xsd:annotation>
<xsd:appinfo>
<level88>Business_Code value "AAA" THRU "XXX"
</level88>
<level88>Business_Error value "XYX" THRU "ZYX"
</level88>
<level88>Completed_Code value "COM"</level88>
<level88></level88>
<level88></level88>
</xsd:appinfo>
</xsd:annotation>
<xsd:simpleType>
<xsd:restriction base="xsd:string">
<xsd:length value="3"/>
</xsd:restriction>
</xsd:simpleType>
</xsd:element>
|