×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




I'm trying to compile this service program with the 'PCML' info in it
so that I can use the IBM Web Services Wizard to materialize the rpg
srvpgm
as a web service. I have only a single function in it.
(I have already made one (web service) using an RPG ile pgm object.)

The module compiles fine -without- the PGMINFO(*PCML:*MODULE) in the
H-spec.

When I add it to the H-spec, I get a very generic message in the
compiler
listing...

RNF0203 - ERRORS WERE FOUND WHILE GENERATING THE PROGRAM INFORMATION TO
BE PLACED IN THE MODULE

Not very much to go on (to my mind anyway).

I added the infostmf to the compile command (for s & giggles) as per
below...

CRTRPGMOD MODULE(JRPERS/FRKEY_F) SRCFILE(JRPERS/QSRVSRC) SRCMBR(FRKEY_F)
PGMINFO
(*PCML) INFOSTMF('/tmp/pcml/frkey_f.txt')

It still didn't compile, but, when I looked in the stream file it
generated, I found...

************Beginning of data**************

<pcml version="4.0">

<!-- RPG module: FRKEY_F -->

<!-- created: 2009-05-08-08.40.02 -->

<!-- source: JRPERS/QSRVSRC(FRKEY_F) -->

<!-- 23 -->

<program name="GETFOREIGNKEY" entrypoint="GETFOREIGNKEY"
returnvalue=" ">
<!-- Error: return value must have type="int" and length="4". (E)
-->
<data name="ACTION" type="char" length="2" usage="input" />

</program>

</pcml>

************End of Data********************

So, okay, the return value must be integer.

Uuummm why? Why can't the return value be character?

This won't work ---
d getForeignKey...
d pr 20
d Action 2 const

But this will work ---
d getForeignKey...
d pr
d Action 2 const
d Action 20

And so will this ---
d getForeignKey...
d pr 10i 0
d Action 2 const
d Action 20

Is their (ibms) intent- to use the 'return value' as a lot of apis
generally do,
as an indication of success or failure..? ..??

John B

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.