MVSFORUMS.com

[gdenunzio]

Hi again!
Still struggling in IMS&DB2, I'd like to resume the situation, which is now clearer even if I have no solution for my problem yet.
I have put my SSM in the right catalogued procedure (SSM = XDB2, where XDB2 is the 2nd half of the name of PROCLIB member for the subsystem), so now IMS knows that it has to connect to DB2 as soon as it starts.

When this happens, IMS says...

DSNM001I IMS/VS IVP4 CONNECTED TO SUBSYSTEM DSN
DFS0801I SUBSYSTEM CONNECTION FOR DSN COMPLETE
DFS3620I REQUIRED RESOURCE UNAVAILABLE - RC = 0028 - FC = 0504 - RESOURCE ID
IMOD-LD - SUBSYS NAME= DSN - JOBNAME = IVP51F41

Resuming what I said in a preceding letter, this message means: "when I tried to load module IMODULE, even if the caller was authorized, IMODULE was in an anauthorized library".

What is IMODULE? where is it?

Then if I try and use SQL from my transaction, then and only then IMS abends:

DFS555I TRAN TESTT ABEND S000,U3042 ; MSG IN PROCESS:
TESTT 1 DE NUNZIO GIORGIO
97/302 19:54:59

DFS554A IVP51M41 00002 REGION TEST (1) TESTT 000,3042 PSB SMB
97/302 19:54:59 LTERM: USER1

Now, in a manual which is not a DB2 or IMS one, I read:

(SAA Cross System Product Messages, Codes, and Problem Diagnosis)

IMS 3042 Access to DB2 cannot be obtained. Possible causes of this are:

 The terminal ID is not defined to DB2.
 The DB2 application plan is not valid or cannot be accessed.

This can be a hint...

Possibilities:

1) security: how do I define the terminal ID or the user ID to DB2? A simple GRANT EXECUTE ON PLAN TEST TO USER1? I dont remember, I have to check it.

2) security 2: maybe this is a RACF problem? I read, in DB2 Installation Guide:
If RACF is installed, you also need to define the
IMS-to-DB2 connection to RACF. For information
on how to do this, see Section 3 (Volume 1) of
Administration Guide.
In IMS I did nothing for RACF, and in fact I got a message (when /MODIFY PREPAREing a change, if I remember correctly) about RACF not working/being defined/something like that. May I P RACF just to see how things go? I am no RACF expert, moreover...

3) resources: when normally I run a DB2 application by DSN RUN command (not in IMS, of course), I say:

RUN PROGRAM(DSNTIAD) PLAN(DSNTIA31) -
LIB('DB2.RUNLIB.LOAD')

I have to say do DB2 about DB2.RUNLIB.LOAD explicitly.
Perhaps I have to say it now some way?

4) resources 2: my PROCLIB member points to DSNMIN10 as the ESMT, as said in DB2 manuals. This is in SDSNLOAD which is authorized. Nothing else to do?

Sorry for my long posts, but I am really getting mad with my problem.
I hope someone will have a hint for me...

Thanks!!
Giorgio, more or less desperate...

[Bithead]

Check that the MATRIX and MODBLKS libraries (A and B) are APF authorized (SYS1.PARMLIB(PROGxx).