For clarity sake, I've reworked my procedures/srvpgm to be a stand alone RPG pgm. I tried in the PCML both CACTST (object) and RETRIEVE which is the MainProcedure. I'm still getting ZUI_53179. Reference notes below...
Nadir.. Where are you getting your information from? Is there a reference or white paper? I'd like to not have to bug the group so much but I find documentation lacking from IBM. I appreciate your help. My one wish would be for 7.3 but stuck on 7.1 for a while.
Modified PCML on IFS...
</struct>
<!-- 50 -->
<program name="CACTST" path="/QSYS.LIB/CCLIB.LIB/CACTST.PGM">
<data name="INECOMMORDERNO" type="varchar" length="50" usage="input">
<data name="HTTPSTATUS" type="int" length="4" precision="31" usage="inputoutput" />
<data name="HTTPHEADERS" type="char" length="100" count="10" usage="inputoutput" />
<data name="RTNORDER" type="struct" struct="RTNORDERINFO" usage="inputoutput" />
</program>
</pcml>
Prototype below...
dcl-pr retrieve extpgm('CACTST');
rtnECommOrderNo varchar(50) const;
httpStatus int(10);
httpHeaders char(100) dim(10);
rtnOrder likeds(rtnOrderInfo);
End-Pr;
From: Stephen Piland
Sent: Thursday, April 4, 2019 7:11 PM
To: 'web400@xxxxxxxxxxxxxxxxxx' <web400@xxxxxxxxxxxxxxxxxx>
Subject: Re: IWS REST GET Variable Length PATH_PARM Input
Finally have the necessary PTFs installed and I've created PCML 6.0 to the IFS for a module that contains 2 procedures. One would be for a POST and one for a GET. I have tried to deploy the web service and when I pick the modified or unmodified PCML in IWS, I get the error message below. Any ideas? Thanks!
ZUI_53179: The PCML file is not valid for the program object specified. Click on the Browse button to navigate the directory and find the correct PCML file. Correct the path and try the request again or specify another program object
Originally generated PCML for varchar InECommOrderNo...
<program name="RETRIEVE" entrypoint="RETRIEVE">
<struct name="INECOMMORDERNO" usage="input">
<data name="length" type="int" length="2" precision="16" usage="inherit" />
<data name="string" type="char" length="length" usage="inherit" />
</struct>
<data name="HTTPSTATUS" type="int" length="4" precision="31" usage="inputoutput" />
<data name="HTTPHEADERS" type="char" length="100" count="10" usage="inputoutput" />
<data name="RTNORDER" type="struct" struct="RTNORDERINFO" usage="inputoutput" />
</program>
Modified PCML for varchar inECommOrderNo...
<program name="RETRIEVE" entrypoint="RETRIEVE">
<data name="INECOMMORDERNO" type="varchar" length="50" usage="input">
<data name="HTTPSTATUS" type="int" length="4" precision="31" usage="inputoutput" />
<data name="HTTPHEADERS" type="char" length="100" count="10" usage="inputoutput" />
<data name="RTNORDER" type="struct" struct="RTNORDERINFO" usage="inputoutput" />
</program>
midrange.com
