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
 

 

Getting System Abend 0C4

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

New User


Joined: 26 Oct 2008
Posts: 9
Location: New Jersey

PostPosted: Thu Dec 03, 2009 7:25 pm    Post subject: Getting System Abend 0C4
Reply with quote

Hi,

I am allocating a new dataset using the LIKE command.

"ALLOC FI(OUTDS) DA("DATAST") NEW LIKE(AUTOINT.INT.TEMP) "

After this i am processing the input data with the DELSTR & INSERT Functions and writing it to the new dataset.

'EXECIO * DISKW OUTDS (STEM X. FINIS'

Then i am freeing both the files with "FREE F(INDS,OUTDS)"

After all this i am trying to call the new dataset for execution in the same program.

While executing this program i am getting the following Abend:-

System abend code 0C4, reason code 00000004.

Please let me know if i am missing something.
Back to top
View user's profile Send private message

Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2051
Location: Silicon Valley

PostPosted: Thu Dec 03, 2009 8:05 pm    Post subject: Reply to: Getting System Abend 0C4
Reply with quote

Can you be more specific about what you are writing and how you are calling it?

The way you posted it, it sounds like you are trying to create a load module, which I do not think you can create like that.
Back to top
View user's profile Send private message
Tushar Sood

New User


Joined: 26 Oct 2008
Posts: 9
Location: New Jersey

PostPosted: Sun Dec 06, 2009 1:46 pm    Post subject:
Reply with quote

Pedro,Thanks for the reply .

I have a permanent dataset which has REXX code in it. I am writing a rexx program which creates a new dataset from this one (with the help of Like Command), substitutes the necessary data in that (using the functions) & then i am calling the newly cmreated dataset using ADDRESS TSO comand.

When i execute this rexx program i am getting the above error.

Please let me know if you need anything else.
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: Sun Dec 06, 2009 2:33 pm    Post subject:
Reply with quote

It looks from the tiniest snippet of code that you have so generously mentioned above that there is a mixture of both CLIST and REXX.

Please explain in detail what your aim is, how you hope to achieve it, and post the code and error codes / messages you receive.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Sun Dec 06, 2009 7:11 pm    Post subject:
Reply with quote

LIKE(AUTOINT.INT.TEMP)

are you sure that this is the proper syntax. maybe enclose the dsn with quotes? to insure hlq.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2051
Location: Silicon Valley

PostPosted: Mon Dec 07, 2009 9:41 pm    Post subject: Reply to: Getting System Abend 0C4
Reply with quote

Add a trace to the rexx program you are creating and calling. And show us the pertinent part of the trace results.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2051
Location: Silicon Valley

PostPosted: Tue Dec 08, 2009 6:29 am    Post subject: Reply to: Getting System Abend 0C4
Reply with quote

Quote:
I am writing a rexx program which creates a new dataset from this one (with the help of Like Command)


The LIKE only helps with the dataset attributes (such as lrecl, blksize) and does not help at all with the contents of the dataset.

You need a copy step.
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 How system know which REXX to excute? jackzhang75 CLIST & REXX 14 Thu Jul 06, 2017 1:09 am
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 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 Overlay the system date Danielle.Filteau SYNCSORT 4 Fri Mar 03, 2017 1:16 am
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm


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