s0c1 abend while executing SQL statement.

dilip_kumar · New User Joined: 01 Oct 2011 Posts: 3 Location: india

Hi,

I am receiving a S0C1 abend while executing db2 sql statement in PGM-B.

EXEC SQL
SET :WS-TIMESTAMP = CURRENT TIMESTAMP
END-EXEC.

WS-TIMESTAMP is declared as ws variable with X(26).

This PGM-B is a called program in PGM-A.

I compiled PGM-B, did bind and then compiled PGM-A, did bind.

After the above steps I executed PGM-A, its abending with s0c1 in PGM-B.

Please provide your valuable suggests.

Thanks & regards,
Dilip

Pedro · Posted: Fri Oct 14, 2011 11:36 pm

There is something wrong with your compile or linkedit (or your program). Show us your linkedit output. And show us the details of your abend (PSW, registers, etc...)

dbzTHEdinosauer · Posted: Sat Oct 15, 2011 12:01 am

could be he is making a dynamic call in A (for B), but B is not compiled/linked to be dynamically called.

dilip_kumar · New User Joined: 01 Oct 2011 Posts: 3 Location: india

Yes, PGM-B is dynamically called, in the sense its initialized value with the PGM-B for ws-variable.

01 WS-PGM-B PIC X(05) VALUE 'PGM-B'.

Call PGM-B USING DFHEIBLK
DFHCOMMAREA
WS-VARIABLES.

And in PGM-B.

PROCEDURE DIVISION USING WS-VARIABLES.

I use chageman tool to compile the programs, first I compile PGM-B and bind and then compile PGM-A and bind.

Unfortunately, I cannot access internet in the machine I program, so I cannot paste the contents of registers and abend info.

Kindly advice.

dbzTHEdinosauer · Posted: Sat Oct 15, 2011 4:07 pm

this really is not a db2 problem.

the CALL USING list suggests that this is a CICS program.

the PROCEDURE DIVISION USING list,
if that is what is in the compile listing,
indicates an inproperly pre-compiled/compiled program.

we need much more infomation,
since the TS apparently has no desire to work with his co-workers
(or possibly they with him/her),
and this

Bill Woodger · Posted: Sat Oct 15, 2011 4:28 pm

There is something you are missing/doing which others at your site are doing correctly. Sit down with a colleague and go through what you are doing/they are doing.

What it "sounds" like is happening is that your B is not compiled DYNAM but your link/bind is only expecting dynam so the address for a call is not "resolved", so remains zero, so S0C1 (PSW finishes with 00000002 doesn't it?) when your program attempts the call to do the SQL. dbz already aluded to this, but it hasn't had much impact yet.

Without being able to see all the output from everything, all the libraries, and - ideally an equivalent that is working as well - then I don't see that we can get you much further with it.

In short, you're doing it different than others at your site. If you do it the same, it'll work. The best (and possibly only) way to find the difference is to talk to a colleague who has one that is working...

vasanthkumarhb · Posted: Sun Oct 16, 2011 12:46 am

It looks like Dynamic call is not proper. Check PROCEDURE DIVISION USING -------- properly.

This Issue could be linking issue.

Bill Woodger · Posted: Sun Oct 16, 2011 1:06 am

vasanthkumarhb · Posted: Sun Oct 16, 2011 1:24 am

Yes i meant linkage issue b/w two programs. Thanks Bill for more info.

dilip_kumar · New User Joined: 01 Oct 2011 Posts: 3 Location: india

Hi all,

Just to summarize the whole thing what I am trying to do,

PGM-B is a existing CICS module, PGM-A is a new batch module I have written to fetch some fields from db2 tables of other application through PGM-B.

Now, since PGM-B being a CICS module I compile it using db2 precompile and CICS pre compile and then bind it, and then compile PGM-A only with db2 pre compile only since it is a batch module.

Invoke PGM-A using JCL. To get clear picture of whats going wrong I have display statements in PGM-B just before and after this EXEC SQL statement. the before display is coming but not after display.

In listing of PGM-B, I can see PROCEDURE DIVISION USING WS-VARIABLES, WS-VARIABLES is same as the one used in PGM-A while calling PGM-B.

Please let me know if there is anything wrong with the way am doing..

Bill Woodger · Posted: Sun Oct 16, 2011 1:56 am

Dilip,

If your program B is going through the CICS pre-processor correctly, then you should see three data-names on the USING statement of the PROCEDURE DIVISION, the pre-processor should generate two items in the LINKAGE SECTION for you and insert those in the USING in front of anything that you supply on the USING.

So I don't see how you end up with just USING WS-...

How were you imagining calling CICS from batch would work?

Robert Sample · Posted: Sun Oct 16, 2011 2:57 am