Environment variable info (42704)

[coricave]

Hello I try connect Code for IBM i to Power 7 (V7R3M0 Technology Refresh 13). Every my try end on this error:
Not connected to xxx.xxx.xxx.xxx! ENVIRONMENT_VARIABLE_INFO in QSYS2 type *FILE not found. (42704)

Can You help me with connect please?

[sebjulliand]

Hi @coricave ,
can you try running this query on your LPAR?

select * from qsys2.environment_variable_info

Alternatively, check if the environment_variable_info view exists on your LPAR in the QSYS2 library.

[coricave]

This work. But no contain any data

Position to line . . . . .
....+....1....+....2....+....3....+.
TABLE_CATALOG
******** End of data ********

[sebjulliand]

For some reason, that view doesn't exist on your LPAR...but it should 😅

Here is its source code in case you want to try to re-create it:

CREATE OR REPLACE VIEW QSYS2.ENVIRONMENT_VARIABLE_INFO FOR SYSTEM NAME ENV_VARS
(
ENVIRONMENT_VARIABLE_TYPE FOR COLUMN VAR_TYPE   ,
ENVIRONMENT_VARIABLE_NAME FOR COLUMN VAR_NAME   ,
ENVIRONMENT_VARIABLE_VALUE FOR COLUMN VAR_VALUE  ,
ENVIRONMENT_VARIABLE_BINARY_NAME FOR COLUMN VAR_BNAME  ,
ENVIRONMENT_VARIABLE_BINARY_VALUE FOR COLUMN VAR_BVALUE ,
ENVIRONMENT_VARIABLE_CCSID FOR COLUMN VAR_CCSID  )
AS
SELECT COALESCE(ENVTYPE, ''), COALESCE(NAME, ''), VALUE, COALESCE(NAME_BINARY,
BX''), VALUE_BINARY, COALESCE(CCSID, 0) FROM TABLE(QSYS2.QSQENVVAR()) AS X
RCDFMT ENV_VARS   ;

COMMENT ON TABLE QSYS2.ENVIRONMENT_VARIABLE_INFO
IS 'DB2 FOR IBM i SUPPLIED OBJECT VERSION 07300000003' ;

LABEL ON COLUMN QSYS2.ENVIRONMENT_VARIABLE_INFO
( ENVIRONMENT_VARIABLE_TYPE IS 'Environment         Variable            Type' ,

ENVIRONMENT_VARIABLE_NAME IS 'Environment         Variable            Name' ,

ENVIRONMENT_VARIABLE_VALUE IS 'Environment         Variable            Value'
,
ENVIRONMENT_VARIABLE_BINARY_NAME IS 'Environment VariableBinary Name' ,
ENVIRONMENT_VARIABLE_BINARY_VALUE IS 'Environment VariableBinary Value' ,
ENVIRONMENT_VARIABLE_CCSID IS 'Environment         Variable            CCSID'
) ;

But if I were you, I'd get in touch with your IBM i sys admin to check why it could be missing.

[coricave]

SQL command fail.
[SQL0204] QSQENVVAR in QSYS2 type *N not found.

In version 7.3, there is no QSQENVVAR table in the library QSYS2.

[sebjulliand]

Well, I check on a 7.2 system and the view exists and works (on 7.3 as well, of course).
QSQENVVAR is table function, you need to check DB2 catalog to see if it exists.

Here is its definition:

CREATE OR REPLACE FUNCTION QSYS2.QSQENVVAR ( )
RETURNS TABLE (
ENVTYPE VARCHAR(6) FOR SBCS DATA ,
NAME VARGRAPHIC(128) CCSID 1200 ,
"VALUE" VARGRAPHIC(1024) CCSID 1200 ,
NAME_BINARY VARBINARY(128) ,
VALUE_BINARY VARBINARY(1024) ,
"CCSID" INTEGER )
LANGUAGE C
SPECIFIC QSYS2.QSQENVVAR
NOT DETERMINISTIC
READS SQL DATA
CALLED ON NULL INPUT
NO EXTERNAL ACTION
SCRATCHPAD 1024
FINAL CALL
NOT FENCED
CARDINALITY 100
SECURED
EXTERNAL NAME 'QSYS/QSQSSUDF2(qsqenvvar)'
PARAMETER STYLE DB2SQL ;

COMMENT ON SPECIFIC FUNCTION QSYS2.QSQENVVAR
IS 'DB2 FOR IBM i SUPPLIED OBJECT VERSION 07300090001' ;

For some reason, these are missing from your system. Ask or warn your sys admin about it, this is strange.

[coricave]

I am login as QSEOFR but sql command end on this: Not authorized to CREATE FUNCTION.

I try contact system administrator. This is new clean LPAR only with licensed programs. (I_BASE and B_GROUP).

[chrjorgensen]

@coricave You can check whether any SQL objects in QSYS2, SYSTOOLS etc. are missing by using the QSQIBMCHK tool... The IBM Support document also describes how to recreate any missing objects...

[coricave]

Thank You.
All objects (except MISSING - VIEW-QSYS2/CONDENSEDINDEXADVICE, EXPECTED 1, FOUND 0) is validated.
QSQXRLF OBJECTS FOUND = 54
QSQXRLF OBJECTS UNKNOWN = 0
QSQXRLF OBJECTS MISSING = 0
QSQSYSIBM OBJECTS FOUND = 369
QSQSYSIBM OBJECTS UNKNOWN = 0
QSQSYSIBM OBJECTS MISSING = 1
TOTAL IBM OBJECTS FOUND = 423
TOTAL IBM OBJECTS UNKNOWN = 0
TOTAL IBM OBJECTS MISSING = 1