Here is what I use. All note I call exit(); at the end of my programs.

ctl-opt DEBUG(*yes) DFTACTGRP(*no) ACTGRP('WebAPIs');
ctl-opt OPTION(*srcstmt:*nodebugio);
ctl-opt BNDDIR('YAJL') DECEDIT('0.');
ctl-opt BNDDIR('CGI');

dcl-pr Exit extproc('exit');
*n int(10) const;
end-pr;



On 12/10/18, 1:56 PM, "WEB400 on behalf of Jon Paris" <web400-bounces@xxxxxxxxxxxx on behalf of jon.paris@xxxxxxxxxxxxxx> wrote:

Apologies if this was covered earlier but this thread is har to follow now.

Are the programs being used defined as DftActGroup(*No) ActGrp(xxxx) (where xxxx = a named AG - not *Caller or *New)

I believe that persistent CGI only works in Apache with programs compiled with these directives.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

> On Dec 10, 2018, at 11:33 AM, Slanina, John <jslanina@xxxxxxxxxx> wrote:
>
> Rob,
>
> Here is our setup is works fine.
> I don’t undertstand why you have the wildcard * after it.
>
>
> 21 SetEnv QIBM_CGI_CHANGE_CURLIB N
> 22 SetEnv QIBM_CGI_LIBRARY_LIST "QTEMP;D1BRCOBJ;D1BRFILESU;D1BRCPGMSU;D1BRFILESN;D1BRCPGMSN;D1GENNEW;D1BRFILES;D1BRCPGMS;D1PENWORK;D1PENFILES;D1NIFILES;D1TRFILES;D1IC08XXCP;D1IC08XXP;D1MW08XXCP;D1MW08XXP;D1NI08XXCP;D1NI08XXP;D1TR08XXCP;D1TR08XXP;D1BRCPGMS1;GPL;QGPL;RDB40;"
> 23
> 24 <Directory />
> 25 Order Deny,Allow
> 26 Deny From all
> 27 </Directory>
> 28
> 29 <Directory /www/brctivod1/htdocs>
> 30 Order Allow,Deny
> 31 Allow From all
> 32 </Directory>
> 33
> 34 ScriptAlias /webapi /qsys.lib/D1BRCPGMS.lib/wsrpgm02.pgm
> 35
> 36 <Directory /qsys.lib/D1BRCPGMS.lib>
> 39 Allow From all
> 40 order allow,deny
> 41 Require valid-user
> 42 DefaultNetCCSID 819
> 43 AuthType Basic
> 44 AuthName ****
> 45 CGIJobCCSID 37
> 46 CGIConvMode EBCDIC
> 47 PasswdFile %%SYSTEM%%
>
>
> 48 </Directory>On 12/10/18, 11:24 AM, "WEB400 on behalf of Buck Calabro" <web400-bounces@xxxxxxxxxxxx on behalf of kc2hiz@xxxxxxxxx> wrote:
>
> On 12/8/2018 11:48 AM, Rob Dixon wrote:
>> The header is correct for the initial display. Having got that screen, I
>> then started a service program for the job and set a breakpoint at the
>> beginning of the calc specs for my CGI program, which, as I have said, is
>> the same program that displayed my first screen. But when I pressed Enter
>> to get the second screen, there was no breakpoint. There was nothing in
>> CGIDEBUG for the second screen. but the log said
>>
>> [Sat Dec 08 14:18:19 2018] [error] [client 192.168.2.210] ZSRV_MSG0018:
>> File /QSYS.LIB/E310PRDOBJ.LIB/E31RPP.PGM/081780817443836/ does not exist,
>> referer: http://192.168.2.70/cgi-bin/erros
>> [Sat Dec 08 14:18:19 2018] [error] [client 192.168.2.210] ZSRV_MSG0016: URI
>> in request POST /cgi-bin/E31RPP.PGM/081780817443836/ HTTP/1.1 is not valid,
>> referer: http://192.168.2.70/cgi-bin/erros
>>
>> The relevant config lines seem to be
>> * 7* * ScriptAlias /cgi-bin/erros
>> /QSYS.LIB/E310PRDOBJ.LIB/E310H00000.PGM*
>> * 8* * Alias "/cgi-bin/" "/QSYS.LIB/E310PRDOBJ.LIB/"*
>> * 9* * ScriptAliasMatch ^/cgi-bin/(.*) /$1*
>> * 10*
>> * 11* * # ScriptAliasMatch ^/cgi-bin/(.*) /qsys.lib/E310PRDOBJ.LIB/$1*
>>
>> Line 7 executes correctly with the display of the first screen. I have
>> tried it with line 11 instead of line 9 and the result is the same.
>
> What's the URI after the first screen displays? Is it
> http://192.168.2.70/cgi-bin/E31RPP.PGM/081780817443836 If so, wouldn't
> that assert ScriptAliasMatch and try to fire off program
> 081780817443836, which doesn't exist?
>
> --
> --buck
>
> http://wiki.midrange.com
> Your updates make it better!
>
> --
> This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/web400.
>
>
>
> --
> This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/web400.
>

--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/web400.




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

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