Cobol で解析したい次の xml 構造があります。
<LDO>
<OD>1</OD> //OD 1'st occurrence
<OLD>1</OLD> //OLD 1'st occurrence
<OLD>2</OLD> //OLD 2'nd occurrence
<OLD>3</OLD> //OLD 3'rd occurrence
<OD>2</OD> //OD 2'nd occurrence
<OLD>4</OLD> //OLD 4'th occurrence
</LDO>
ご覧のとおり、OD タグの後にいくつかの OLD タグがあります。私がやりたいことは、このxmlファイルを段階的に読み込んで、次の方法で属性を表示することです:
1 1 2 3 2 4
READ xml-stream.
START xml-stream KEY IS OD.
*>check status
START xml-stream KEY IS OLD.
*> check stream status
PERFORM UNTIL EXIT
READ xml-stream next key is
old
IF stream-status = -7
EXIT PERFORM
END-IF
*> check stream status less than 0
display od-value
display old-value
しかし、プログラムを実行しても od-value は変わりません。次の値を返します
1 1 2 3 1 4
2 番目のオカレンスで、最初の要素ではなく 2 番目の要素 OD の値を返すようにします。
これを達成するための助けが欲しいです。