Re: Using COBOL for CGI Programming

["Haas, Matt (CL Tech Sv)" <matt.haas@xxxxxxxxxxx>]

Did you check the authority on QZBHCGI to make sure that QTMHHTP1 can use it?

Matt

-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On Behalf Of Rich Loeber
Sent: Wednesday, September 24, 2008 1:43 PM
To: web400@xxxxxxxxxxxx
Subject: [WEB400] Using COBOL for CGI Programming

   I've been playing with using COBOL to develop a CGI application, but I
   keep hitting a stone wall.  I have a simple test program to create a
   "Hello World" scenario and by all indications it should be working.  But,
   when I run it, I get the following joblog entries in the Apache server
   job:

   MCH0601    Escape                  40   09/24/08  13:31:07.277816
   QZHBCGI      CGILIB      *STMT    QZHBCGI     CGILIB      *STMT
                                        From user . . . . . . . . . :
   QTMHHTP1
                                        From module . . . . . . . . :
   QZHBCGI
                                        From procedure  . . . . . . :
   QtmhWrStout
                                        Statement . . . . . . . . . :
   81
                                        To module . . . . . . . . . :
   QZHBCGI
                                        To procedure  . . . . . . . :
   QtmhWrStout
                                        Statement . . . . . . . . . :
   81
                                        Message . . . . :   Space offset
   X'0006D000' or X'0000000000000000' is outside
                                          current limit for object APACHEDFT
   QTMHHTTP  366722.
                                        Cause . . . . . :   A program tried
   to set a space pointer or use storage
                                          outside a space, or tried to use an
   unallocated page in teraspace. The space
                                          class is X'03'. The space class
   designates the type of space: 00-primary
                                          associated space (includes space
   objects). 01-secondary associated space 0.
                                          02-implicit process space for
   automatic storage. 03-implicit process space
                                          for static storage in activation
   group mark X'00000015'. 04-implicit process
                                          space for heap identifier
   X'00000000' in activation group mark X'00000015'.
                                          05-constant space. 06-space for
   handle-based heap identifier X'00000000'.
                                          07-teraspace offset
   X'0000000000000000'. 08-teraspace for OS/400 PASE memory
                                          address X'0000000000000000'. Offset
   X'0006D000' only applies to storage
                                          outside teraspace.
   X'8000000000000000D03CBE5648001000' is a pointer to the
                                          teraspace page or the start of the
   implicit process space for the

   allocation.
   CPI93CA    Information             20   09/24/08  13:31:07.343624
   QPDLOGER     QSYS        0252     QZHBCGI     CGILIB      *STMT
                                        From user . . . . . . . . . :
   QTMHHTP1
                                        To module . . . . . . . . . :
   QZHBCGI
                                        To procedure  . . . . . . . :
   qzhbcgi_ExceptionHandler__FP21_INTRPT_Hndlr_Pa

   rms_T
                                        Statement . . . . . . . . . :
   41
                                        Message . . . . :   Suspected program
   QZHBCGI not found.
                                        Cause . . . . . :   The suspected
   program QZHBCGI was not found.  The reported
                                          error was logged, with the
   reporting program specified as the suspected
                                          program. Recovery  . . . :   Change
   the suspected program name to an
                                          existing program
   name.
   CPF2105    Information             40   09/24/08  13:31:07.428600
   QPDSERR      QSYS        0BA4     QPDLOGER    QSYS        008A
                                        From user . . . . . . . . . :
   QTMHHTP1
                                        Message . . . . :   Object QZHBCGI in
   *LIBL type *PGM not found.
                                        Cause . . . . . :   No object was
   found for the name or type specified.
                                          Recovery  . . . :   Specify the
   correct name or type of the object. Then try
                                          the request
   again.

   The QZHBCGI program is not a *PGM object but rather a *SRVPGM object and
   it is, in fact, in the correct library.  The program has been successfully
   bound with this program reference.

   I've searched the archives and Google and see some hints at several things
   that this might be, but all attempts to resolve this have failed.

   Has anyone successfully created a COBOL CGI program?  And, what's your
   secret?  All I'm doing is issuing a procedure call to the standard output
   routine.

   Rich Loeber
   Kisco Information Systems
   http://www.kisco.com