Hallo,


Ich habe im XML Tabellen in Tabellen
Innerhalb mehrere Artikel und es gibt jeweils mehrere Optionen dazu .


Ich habe brav und fleißig die Datenstrukturen definiert.


Leider bekomme ich Umwandlungsfehler.
Z.B. wenn ich den Index zum Auslesen definieren will.
*RNF5343 30 120 007900 Feldgruppe LINE hat zu viele übergangene Indizes.
LocInd = Orders.Head.Cnt_Line;
LocInd2 = Orders.Head.Cnt_Nad;
LocInd3 = Orders.Head.Line.Cnt_Opt;




0001.00 ctl-opt dftactgrp(*no);
0002.00 dcl-f order02pf usage(*output);
0003.00 dcl-f order03pf usage(*output);
0004.00 // Root .................................................. ......
0005.00 dcl-ds Orders qualified;
0006.00 Head likeds(Head);
0007.00 end-ds;
0008.00 // Template Head.............................................. ..
0009.00 dcl-ds Head template qualified;
0010.00 VersionNumber likeds(VersionNumber);
0011.00 TechnicalReceiver char(20);
0012.00 TechnicalSender char(20);
0013.00 OrderNumber char(20);
0014.00 Nad likeds(Nad) dim(04);
0015.00 Cnt_Nad int(10);
0016.00 Line likeds(Line) dim(10);
0017.00 Cnt_Line int(10);
0018.00 end-ds;
0019.00 dcl-ds VersionNumber template qualified;
0020.00 VersionName char(20);
0021.00 VersionNo char(20);
0022.00 end-ds;
0023.00 // Template Nad............................................... ..
0024.00 dcl-ds Nad template qualified;
0025.00 FlagOfParty char(02);
0026.00 AdressGLN char(20);
0027.00 end-ds;
0028.00 // Template Line.............................................. ..
0029.00 dcl-ds Line template qualified;
0030.00 LineItemNumber char(03);
0031.00 ProductNumber char(10);
0032.00 Opt likeds(Opt) dim(10);
0033.00 Cnt_Opt int(10);
0034.00 end-ds;
0035.00 // Template Opt............................................... ..
0036.00 dcl-ds Opt template qualified;
0037.00 FeatureLineNumber char(01);
0038.00 FeatureNumber char(01);
0039.00 FeatureDescription char(20);
0040.00 OptionNumber char(01);
0041.00 OptionDescription char(20);
0042.00 end-ds;


*RNF5343 30 120 007900 Feldgruppe LINE hat zu viele übergangene Indizes.

Grüsse F D H Franco