CGIConvMode is not an environment variable. The environment variable is just called CGI_MODE.
Although this is a link to V5R2 - they are pretty much unchanged I believe:
http://publib.boulder.ibm.com/iseries/v5r2/ic2924/info/rzaie/rzaieenvvar.htm
-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On Behalf Of Steve Richter
Sent: 17 September 2012 14:10
To: Web Enabling the AS400 / iSeries
Subject: [WEB400] why would QtmhGetEnv return blanks for CGIConvMode?
the QtmhGetEnv api is returning blanks for the CGIConvMode environment variable in a CGI program. I also get blanks when I use the getenv api.
Why would that be? CGIConvMode is specified in the httpd.conf file used for the instance of apache server.
-- portion of the httpd.conf file
ServerRoot /cgidev/conf
DocumentRoot /cgidev/conf/hotdocs
Listen 8014
DefaultType text/html
# CGI
CGIConvMode %%EBCDIC/EBCDIC%%
# CGIConvMode BINARY
ThreadsPerChild 53
MaxCGIJobs 100
StartCGI 2 QTMHHTP1
Timeout 120
-- my code that gets the environment variable:
convMode = hGetEnvVlu( 'CGIConvMode' ) ;
** ---------------------- hGetEnvVlu -----------------------------
** hGetEnvVlu - get environment variable value
** sVlu = hGetEnvVlu( VarName ) ;
dhGetEnvVlu pr 1024a varying
d extproc('hGetEnvVlu')
d InVarName 80a const varying
** ---------------------- hGetEnvVlu -----------------------------
** hGetEnvVlu - get environment variable value
** sVlu = hGetEnvVlu( VarName ) ;
phGetEnvVlu b export
dhGetEnvVlu pi 1024a varying
d InVarName 80a const varying
d Error ds likeds(refApiError)
d inz(*Likeds)
d buf s 9999a
d ActDataLx s 10i 0
/free
pr_QtmhGetEnv( buf: %size(buf): ActDataLx:
InVarName: %len(InVarName): Error ) ;
if ActDataLx > 1024 ;
return x'01' ;
else ;
return %subst( buf: 1: ActDataLx ) ;
endif ;
/end-free
p e
--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list To post a message email: WEB400@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/web400.
NOTICE: The information in this electronic mail transmission is intended by CoralTree Systems Ltd for the use of the named individuals or entity to which it is directed and may contain information that is privileged or otherwise confidential. If you have received this electronic mail transmission in error, please delete it from your system without copying or forwarding it, and notify the sender of the error by reply email or by telephone, so that the sender's address records can be corrected.
--------------------------------------------------------------------------------
CoralTree Systems Limited
25 Barnes Wallis Road
Segensworth East, Fareham
PO15 5TT
Company Registration Number 5021022.
Registered Office:
12-14 Carlton Place
Southampton, UK
SO15 2EA
VAT Registration Number 834 1020 74.
midrange.com
