QtmhWrStout API stdout CGI TCP/IP ILE COBOL/400

m...@nowhere.com

unread,

Jul 21, 1996, 3:00:00 AM7/21/96

to

Has anyone used the API QtmhWrStout? This API is needed to produce data in
the stdout that is formated according to the CGI interface specification.

I am trying to write an ILE COBOL/400 CPI program. I get the following
message:
CPD5D02 "Definition not found for symbol 'QtmhWrStout'".

I issued the command:

CRTBNDCBL CGIBIN/CGIPGM CGISRC/QCBLLESRC OPTION(*NOMONOPRC)

Is there a PTF I need to load or install procedure to perform before I can
use this API?

Thanx, Patrick L Archibald
Patrick....@HomeTelco.com

The TEAMIBM Network

unread,

Jul 21, 1996, 3:00:00 AM7/21/96

to

I don't know if there is a bind directory for this
ILE procedure, however, on my machine it exists in
service program QTMHCGI in QTCP, so to use this you
would have to use CRTCBLMOD, and then use CRTPGM
with QTMHCGI in the BNDSRVPGM parameter.

Chris Tandy, ILE COBOL/400

Ed Smith

unread,

Jul 24, 1996, 3:00:00 AM7/24/96

to eds...@scvnet.com

m...@nowhere.com wrote:
>
> Has anyone used the API QtmhWrStout? This API is needed to produce data in
> the stdout that is formated according to the CGI interface specification.
>
> I am trying to write an ILE COBOL/400 CPI program. I get the following
> message:
> CPD5D02 "Definition not found for symbol 'QtmhWrStout'".
>
> I issued the command:
>
> CRTBNDCBL CGIBIN/CGIPGM CGISRC/QCBLLESRC OPTION(*NOMONOPRC)
>
> Is there a PTF I need to load or install procedure to perform before I can
> use this API?

I've only used ILE RPG for CGI scripts, but since it's ILE stuff, maybe
this will help. Did you copy the QTMHCGI service program from QTCP to
your script library? I created a BNDDIR, named CGI, then added the
service program to it. When creating ILE RPG programs, I name the
Binding Directory and specify *NO for the default activation group. It
may be very similar for COBOL. (But then again...)

Hope this helps.

--
-=<( ! )>=-
Ed Smith.. mailto:eds...@scvnet.com http://www.scvnet.com/~edsmith/
ATS....... mailto:eds...@ibmuser.com http://www.ibmuser.com
SMUG...... http://solar.rtd.utk.edu/~mtaylor/smug/smughome.htm

Patrick....@hometelco.com

unread,

Jul 25, 1996, 3:00:00 AM7/25/96

to

Thanx! I got it working. If you want, click on the "411 Server"
link at http://HomeTelco.Com

Thanx again, Patrick

Jeffrey S. Stevens

unread,

Jul 26, 1996, 3:00:00 AM7/26/96

to

To use the CGI API with the AS/400 HTTP Server, the cobol program must
be compiled in 2 steps.
-CRTCBLMOD MODULE(CGIBIN/CGIPGM) SRCFILE(CGIBIN/QCBLLESRC)
OPTION(*NOMONOPRC)
-CRTPGM PGM(CGIBIN/CGIPGM BNDSRVPGM(QTCP/QTMHCGI)
To Read Standard Input(QtmhRdStin) and Write Standard
Output(QtmhWrStout) you must bind the QTCP/QTMHCGI service program.

--
J.S. Stevens AS/400 TCP/IP Endicott, NY Fax: (607) 752-5421
Internet: holo...@vnet.ibm.com IBM Mail: USIB3NTQ at IBMMAIL
-----------------------------------------------------------------------
It said "Insert disk #3", but only 2 will fit!