Re: parsing varying length field from XML file using RPGLE program

now even after perfect corrections value in cmd looks like below in debug
mode>/

EVAL cmd

CMD =

....5...10...15...20...25...30...35...40...45...50...55...60

1 'echo 'u3VtNgfyWU9faZc3Iaa8ZWbE5UZCfmC17yA4MyW0ghflt9dNQNDpCc'

61 'gMZiG/kXPE4vv2CHL93B4iKiODHxxdVA==' ¦ openssl enc -d -aes-1'

121 '28-ecb -K 363631653237354f494d31554c594c4a -nopad -nosalt-ba'

181 'se64 -A -out record '

241 ' '

301 ' '

361 ' '

421 ' '

481 ' '

541 ' '

601 ' '


More...
bug . . .


and value getting popluated in record field in debug mode is like :--
EVAL record
RECORD =
....5...10...15...20...25...30...35...40...45...50...55...60
1 'u3VtNgfyWU9faZc3Iaa8ZWbE5UZCfmC17yA4MyW0ghflt9dNQNDpCcgMZiG/'
61 'kXPE4vv2CHL93B4iKiODHxxdVA== ¦ openssl enc -d -aes-128-ecb -'
121 'K 363631653237354f494d31554c594c4a -nopad -nosalt-base64 -A '
181 '-out record '
241 ' '
301 ' '


On Thu, Oct 31, 2019, 10:45 Rishi Seth <rishiseth99@xxxxxxxxx> wrote:

As advised ,coded like below to extract that '*encodedExchangeToken*'
value but it's ending up in multiple compilation errors like as shown in
below screen shot:

[image: image.png]

[image: image.png]


On Wed, Oct 30, 2019 at 3:20 PM Jon Paris <jon.paris@xxxxxxxxxxxxxx>
wrote:

In response to question on Midrange-L as requested by David

This code will extract the value you want if that is the only field
required. I coded it as varchar based on the OP's original subject line but
in the text he said that he wanted to extract a fixed length entry so I'm
confused. char or march - either will work.

dcl-s encodedExchangeToken varchar(50);
// end-ds;
//
xml-into encodedExchangeToken
%xml('/home/paris/xmlstuff/samplexml.xml': 'doc=file case=any -
path=TokenExchangeResponse/encodedExchangeToken');
dsply encodedExchangeToken;

*InLr = *On;


Jon Paris
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com