Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=00000000

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
Adrian Stern

New User


Joined: 13 Feb 2008
Posts: 12
Location: Sweden

PostPosted: Wed Dec 09, 2009 6:52 pm    Post subject: IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=00000000
Reply with quote

An extremely simple rexx program I try and run in batch dumps BEFORE STARTING with:
IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=00000000

SYSTSPRINT says:
IKJ56641I MATCH ENDED DUE TO ERROR+
IKJ56641I USER ABEND CODE 1000 REASON CODE 00000000

The tso program run is IKJEFT1B

The extraordinary thing is when this job step is run on it's own there's no problem but when one of multiple steps (i've tried both first and last) it dumps.

Anyone any ideas?

I even tried executil ts before it but that just got a ready reply!

I've been writing rexx for over 25 years and never seen anything like it
Back to top
View user's profile Send private message

MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Thu Dec 10, 2009 10:47 am    Post subject: Reply to: IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=
Reply with quote

Are you calling IKJEFT1b directly from an EXEC PGM= in the JCL or is there another program calling IKJEFT1B? There are cases where the some authorization at the job step TCB changes so that one can't invoke additional authorized programs, but unfortunately I don't have the details. This problem just looks familiar to me. I suspect there may be info in the authorized assembler services guide. In any event, what is the program before the IKJEFT1B invocation?

(update: I missed the part about it fails even if it IKJEFT1B is the 1st step. Still, what else is being called?)
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2433
Location: Netherlands, Amstelveen

PostPosted: Thu Dec 10, 2009 12:55 pm    Post subject:
Reply with quote

If a command or program being processed by IKJEFT1B ends with a system or user abend, IKJEFT1B causes the job step to terminate with a X'04C' system completion code. IKJEFT1B also returns to the caller the completion code from the command or program in register 15.

Maybe you show the simple rexx code for soem clarification whats happening?
Back to top
View user's profile Send private message
Adrian Stern

New User


Joined: 13 Feb 2008
Posts: 12
Location: Sweden

PostPosted: Thu Dec 10, 2009 2:15 pm    Post subject:
Reply with quote

The step is:
//MATCH02 EXEC PGM=IKJEFT1B
//SYSEXEC DD DISP=SHR,DSN=KONS89.REXX.EXEC.BATCH
//SYSTSIN DD *
MATCH 10,1,80
/*
couldn't be simpler.

I could post the rexx code but there's no point as the program doesn't even start! Trace in the rexx shews nothing and executil ts as I sais just gets a ready prompt which is also incredible!
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2433
Location: Netherlands, Amstelveen

PostPosted: Thu Dec 10, 2009 2:20 pm    Post subject:
Reply with quote

I guess MATCH is a function, and yes that function call is simple enough.
But not knowing what happens inside that function will make it impossible
to find anything erroneous in that function.

I wish you good luck.
Back to top
View user's profile Send private message
Adrian Stern

New User


Joined: 13 Feb 2008
Posts: 12
Location: Sweden

PostPosted: Thu Dec 10, 2009 3:26 pm    Post subject: Reply to: IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=
Reply with quote

Well I was obviously running in stupid mode! MATCH is such a common name that I should have realised that there was another program with the same name! The complete jcl had a joblib card which was not present when I ran the single step! So renaming my program solved the problem.

Maybe age does imply degeneration?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Dec 10, 2009 3:32 pm    Post subject: Re: Reply to: IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REA
Reply with quote

Adrian Stern wrote:
Maybe age does imply degeneration?

I would agree with that ................ if I could remember what you said icon_lol.gif

Yes, we all do sillies from time to time, just proves that us old codgers are not always infallible icon_cry.gif
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2433
Location: Netherlands, Amstelveen

PostPosted: Thu Dec 10, 2009 6:42 pm    Post subject:
Reply with quote

Adrian, expat thats so true.
Happens to me all the time, even after i retired (or was it retarded?) icon_eek.gif
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Dec 10, 2009 9:23 pm    Post subject: Reply to: IEF450I SECUR02 MATCH01 - ABEND=S04C U0000 REASON=
Reply with quote

Quote:
MATCH is such a common name that I should have realised that there was another program with the same name!
Yup, long, long ago, established the rule that no data name or module name that "we" create may be any "real" word - let alone an IT-related word. . . icon_smile.gif

Many "crash and burns". . . Especially when "stuff" was consolidated. Worked for years sometimes and then - thud. . .

d
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Thu Dec 10, 2009 10:24 pm    Post subject:
Reply with quote

that's why for 25 years I always used a test clist called BLAB... then one day I created a load module of that name and *poof* -- same problem and same "why doesn't this work?" icon_smile.gif ... happens to us all. But it is a good way to get you into the habit of using the % (eg: %MATCH) to avoid this problem.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us