Page tree
Skip to end of metadata
Go to start of metadata

The following is an RPG example of how to retrieve environment variables:

Fixed Format
     D getenv          PR              *   ExtProc('getenv')
     D   name                          *   Value Options(*String)
	
	 D varptr          s               *
     D ipaddress       s             25A

      /Free
		varptr = getenv('REMOTE_ADDR');
		if varptr = *null;
			// no REMOTE_ADDR was set
		else;
            ipaddress = %str(varptr);
		endif;
**FREE
DCL-PR GETENV POINTER EXTPROC('getenv');
  NAME POINTER VALUE OPTIONS(*STRING);
END-PR; 
DCL-S IPADDRESS CHAR(25);
DCL-S VARPTR POINTER; 

VARPTR = GETENV('REMOTE_ADDR');
IF (VARPTR = *NULL);
  // No REMOTE_ADDR was set.
ELSE;
  IPADDRESS = %STR(VARPTR);
ENDIF; 

 

Environment variables set by Profound UI include:

PROFOUNDUI = Always set to '1' if running in the Profound UI session controller.
PUI_LANG = language ID that Profound UI is using (see International Language Support (Translations) for details)

Environment variables set in the HTTP server configuration using the SetEnv directive are also available, as are the environment variables set by the HTTP server. See documentation here.

If you are using Genie, you must run the PUISETENV utility to set the environment variables in the job.

  • No labels