|
p myProcedurefiletoextractinformation...
p b export
p myProcedurefiletoextractinformation...
p pi N
... other parms ...
d DS_xml Likeds(xmlds_template) dim(9999)
d DSoutput likeds(File1:*output) inz
d qualified
...
chain(en) (parm1:parm2:parm3) File1;
if %found(File1) and not %error;
eval-corr DSoutput = DS_xml ;
return *on;
...
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.