IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

DB2 commit occured after abend in pgm


IBM Mainframe Forums -> DB2
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 5:28 pm
Reply with quote

I have PLI DB2 pgm, which updated the table. The problem is : if pgm failed, there is no DB2 rollback. I don't use commit comand in my pgm. I've forced abend in pgm right after first update in test. The result - DB2 commit occured, row was updated. Please advice, what may cause this problem.
Thanks
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Apr 29, 2011 5:33 pm
Reply with quote

kind of hard to believe!

not likely to be solved remotely ...
too many questions to ask
too much data to be collected posted and analyzed

the road to go is Your support!
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 5:44 pm
Reply with quote

I agree, it is like I doubt that 2*2=4 , but it is test result and I have it. Test was simple - abend right after first update and ...ops. I can provide any aditional info, just want to believe again, that 2+2 = 4
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Apr 29, 2011 5:48 pm
Reply with quote

since You are sure, no reason for anybody to waste time on a DB2 error icon_cool.gif

odd that You are the first one to notice

time to get Your support involved and escalate the issue to IBM
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada

PostPosted: Fri Apr 29, 2011 6:35 pm
Reply with quote

Are you 100% sure that the program really abended? i.e. that no other process intercepted the abend request and turned it into something else?
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 9:42 pm
Reply with quote

I've usedh STOP comand ( pgm is PLI) after sql update... it abended with 1000 and commit the update
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Fri Apr 29, 2011 9:51 pm
Reply with quote

anatol wrote:
I've usedh STOP comand ( pgm is PLI) after sql update... it abended with 1000 and commit the update

That is not an abend! icon_evil.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Apr 29, 2011 10:02 pm
Reply with quote

as I imagined You wasted everybodys time

I just run a quick test with the hello world
Code:
000049 //HELLO1  EXEC IBMZCPL
000050 //C.SYSIN   DD *
000051  HELLO: PROCEDURE OPTIONS(MAIN);
000052    PUT SKIP LIST ("HELLO, WORLD FROM PL/I !");
000053  END HELLO;
000054 //HELLO2  EXEC IBMZCPL
000055 //C.SYSIN   DD *
000056  HELLO: PROCEDURE OPTIONS(MAIN);
000057    PUT SKIP LIST ("HELLO, WORLD FROM PL/I !");
000058    STOP ;
000059  END HELLO;
....
IEF142I ENRICO1 GO HELLO1 - STEP WAS EXECUTED - COND CODE 0000
....
IEF142I ENRICO1 GO HELLO2 - STEP WAS EXECUTED - COND CODE 1000



hello1 ended with a cond code 0
hello2 ended with a cond code 1000

it would be wise, to review Your perception of Your skill level
from Your profile
Quote:
Mainframe Skills: good


too high for somebody who cannot distinguish a non zero return code from an abend
let' s not talk about Your self confidence icon_evil.gif
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 10:30 pm
Reply with quote

sorry, Enrico... you suggest ME not wasting anybody time ... and then question MVS knowled level of Akatsukami - I hope icon_smile.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Fri Apr 29, 2011 10:49 pm
Reply with quote

I suggested that You wasted everybody' s time, yes very true

but... where in my post, by grace, did I question Akatsukami' s competence

am I questioning Your attitude ? certainly yes

the quick test I run was intended to show You the difference between return/cond code and abend
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Fri Apr 29, 2011 10:57 pm
Reply with quote

If you want to force an abend then signal error.
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 11:07 pm
Reply with quote

ok, now you convinced me ... I've changed the profile lol
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada

PostPosted: Fri Apr 29, 2011 11:14 pm
Reply with quote

Akatsukami wrote:
anatol wrote:
I've usedh STOP comand ( pgm is PLI) after sql update... it abended with 1000 and commit the update

That is not an abend! icon_evil.gif
LOL! I knew it had to be something like that. I am not a PLI guy or I would have asked the TS a more specific question. icon_lol.gif
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Fri Apr 29, 2011 11:28 pm
Reply with quote

btw... signal error right after insert ( ON error block has only ON ERROR SYSTEM) :
Current Condition:
IBM0280S The ERROR condition was raised by a SIGNAL statement.

checking table - row inserted ... no need to answer this topic, just for fyi before close the topic.[/code]
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DB2

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
No new posts Need to get an DLI abend like U0200 IMS DB/DC 2
Search our Forums:

Back to Top