[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: ABL keyword as fieldname in a dynamic temp-table and READ-XML

Status
Not open for further replies.
M

Mike Fechner

Guest
(Please visit the site to view this file) Here's my repro (12.1).: BLOCK-LEVEL ON ERROR UNDO, THROW. DEFINE VARIABLE hDataset AS HANDLE NO-UNDO. DEFINE VARIABLE hBuffer AS HANDLE NO-UNDO. DEFINE VARIABLE i AS INTEGER NO-UNDO. /* *************************** Main Block *************************** */ CREATE DATASET hDataset . hDataset:READ-XML ("file", "Repository/Cache/Default/CustomerForm.xml", ?, ?, ?) . ASSIGN hBuffer = hDataset::MetaForm . DO i = 1 TO hBuffer:NUM-FIELDS: DISPLAY hBuffer:BUFFER-FIELD (i):NAME FORMAT "x(40)" WITH DOWN. DOWN 1 . END.

Continue reading...
 
Status
Not open for further replies.
Top