M
marian.edu
Guest
If you define the relations as nested there is no need to have parent’s pk fields in child table, do you have the dataset definition upfront or need to infer that from the XML data? DEF TEMP-TABLE ttparent SERIALIZE-NAME 'process' FIELD pid AS CHAR. DEF TEMP-TABLE ttchild SERIALIZE-NAME 'task' FIELD pid AS CHAR FIELD id AS CHAR. DEFINE DATASET ds SERIALIZE-NAME 'info' FOR ttparent, ttchild DATA-RELATION FOR ttparent, ttchild RELATION-FIELDS(pid, pid) NESTED. DEFINE VARIABLE lchar AS LONGCHAR INITIAL ' 123 1 2 8080 hello world '. DATASET ds:READ-XML('longchar', lchar, 'empty', ?, TRUE). FOR EACH ttparent: DISPLAY ttparent. FOR EACH ttchild WHERE ttchild.pid = ttparent.pid: DISPLAY ttchild. END. END. Marian Edu Acorn IT www.acorn-it.com www.akera.io +40 740 036 212
Continue reading...
Continue reading...