Source (IMS):
DLR_PCB1 PCB TYPE=DB,DBDNAME=DEALERDB,PROCOPT=GO,KEYLEN=42
SENSEG NAME=MODEL,PARENT=DEALER
SENSEG NAME=ORDER,PARENT=MODEL
SENSEG NAME=SALES,PARENT=MODEL
SENSEG NAME=STOCK,PARENT=MODEL
PSBGEN PSBNAME=DLR_PSB,MAXQ=200,LANG=JAVA
DBD NAME=DEALERDB,ACCESS=(HDAM,OSAM),RMNAME=(DFSHDC40.1.10)
SEGM NAME=DEALER,PARENT=0,BYTES=94,
FIELD NAME=(DLRNO,SEQ,U),BYTES=4,START=1,TYPE=C
FIELD NAME=DLRNAME,BYTES=30,START=5,TYPE=C
SEGM NAME=MODEL,PARENT=DEALER,BYTES=43
FIELD NAME=(MODTYPE,SEQ,U),BYTES=2,START=1,TYPE=C
FIELD NAME=MAKE,BYTES=10,START=3,TYPE=C
FIELD NAME=MODEL,BYTES=10,START=13,TYPE=C
FIELD NAME=YEAR,BYTES=4,START=23,TYPE=C
FIELD NAME=MSRP,BYTES=5,START=27,TYPE=P
SEGM NAME=ORDER,PARENT=MODEL,BYTES=127
FIELD NAME=(ORDNBR,SEQ,U),BYTES=6,START=1,TYPE=C
FIELD NAME=LASTNME,BYTES=25,START=50,TYPE=C
FIELD NAME=FIRSTNME,BYTES=25,START=75,TYPE=C
SEGM NAME=SALES,PARENT=MODEL,BYTES=113
FIELD NAME=(SALDATE,SEQ,U),BYTES=8,START=1,TYPE=C
FIELD NAME=LASTNME,BYTES=25,START=9,TYPE=C
FIELD NAME=FIRSTNME,BYTES=25,START=34,TYPE=C
FIELD NAME=STKVIN,BYTES=20,START=94,TYPE=C
SEGM NAME=STOCK,PARENT=MODEL,BYTES=62
FIELD NAME=(STKVIN,SEQ,U),BYTES=20,START=1,TYPE=C
FIELD NAME=COLOR,BYTES=10,START=37,TYPE=C
FIELD NAME=PRICE,BYTES=5,START=47,TYPE=C
FIELD NAME=
<?xml
version="1.0" encoding="UTF-8"?>
<kdm:Segment xmi:version="2.1"
xmlns:xmi="http://www.omg.org/XMI"
xmlns:code="http://kdm.omg.org/code"
xmlns:data="http://kdm.omg.org/data"
xmlns:kdm="http://kdm.omg.org/kdm"
name="IMS
Example">
<model xmi:id="id.0"
xmi:type="data:DataModel">
<dataElement xmi:id="id.1"
xmi:type="data:Catalog"
name="DEALERDB">
<dataElement
xmi:id="id.2" xmi:type="data:DataSegment"
name="Dealer">
<dataElement
xmi:id="id.3" xmi:type="data:DataSegment"
name="Model">
<dataElement
xmi:id="id.4" xmi:type="data:DataSegment"
name="Order">
<dataElement
xmi:id="id.5" xmi:type="data:UniqueKey"
implementation="id.6"/>
<itemUnit
xmi:id="id.6"
name="ORDNBR" type="id.30" size="2"/>
<itemUnit
xmi:id="id.7"
name="LASTNME" type="id.30" size="25"/>
<itemUnit
xmi:id="id.8"
name="FIRSTNME" type="id.30" size="25"/>
</dataElement>
<dataElement
xmi:id="id.9" xmi:type="data:DataSegment"
name="Sales">
<dataElement
xmi:id="id.10" xmi:type="data:UniqueKey"
implementation="id.11"/>
<itemUnit
xmi:id="id.11"
name="SALDATE" type="id.30" size="8"/>
<itemUnit
xmi:id="id.12"
name="LASTNME" type="id.30" size="25"/>
<itemUnit
xmi:id="id.13"
name="FIRSTNME" type="id.30" size="25"/>
<itemUnit
xmi:id="id.14"
name="STKVIN" type="id.30" size="20"/>
</dataElement>
<dataElement
xmi:id="id.15" xmi:type="data:DataSegment"
name="Stock">
<dataElement
xmi:id="id.16" xmi:type="data:UniqueKey"
implementation="id.17"/>
<itemUnit
xmi:id="id.17"
name="STKVIN" type="id.30" size="20"/>
<itemUnit
xmi:id="id.18"
name="COLOR" type="id.30" size="10"/>
<itemUnit
xmi:id="id.19" name="PRICE"
type="id.30" size="5"/>
<itemUnit
xmi:id="id.20"
name="LOT" type="id.30" size="10"/>
</dataElement>
<dataElement
xmi:id="id.21" xmi:type="data:UniqueKey"
implementation="id.22"/>
<itemUnit
xmi:id="id.22"
name="MODTYPE" type="id.30" size="2"/>
<itemUnit
xmi:id="id.23"
name="MAKE" size="10"/>
<itemUnit
xmi:id="id.24"
name="YEAR" size="4"/>
<itemUnit
xmi:id="id.25"
name="MSRP" type="id.31" size="5"/>
</dataElement>
<dataElement xmi:id="id.26" xmi:type="data:UniqueKey"
implementation="id.27"/>
<itemUnit
xmi:id="id.27"
name="DRLNO" type="id.30" size="4"/>
<itemUnit
xmi:id="id.28"
name="DLRNAME" size="30"/>
</dataElement>
</dataElement>
</model>
<model xmi:id="id.29" xmi:type="code:CodeModel" name="Common IMS datatypes">
<codeElement
xmi:id="id.30" xmi:type="code:StringType"
name="IMS type c"/>
<codeElement
xmi:id="id.31" xmi:type="code:DecimalType"
name="IMS type packeddecimal"/>
</model>
</kdm:Segment>