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

EXECIO DISKW problem


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
amitava
Warnings : 1

Active User


Joined: 30 Oct 2005
Posts: 186
Location: India

PostPosted: Wed Mar 29, 2006 10:55 pm
Reply with quote

Hi All,
I faced a very silly problem. I tried to write the stem RECD to a PDS though EXECIO DISKW. But there I found the following error -
I am also attaching my code to help you analyzing -
Please help me, I am seriously in real need.
Code:

"alloc da('"copymem"') f(cpydd) shr reuse"
"execio * diskw cpydd  (finis stem recd.)"
queue ''                                   
"free file(cpydd)"                         


Code:

IRX0250E System abend code B14, reason code 00000016.                   
IRX0255E Abend in host command execio or address environment routine TSO.
IEA995I SYMPTOM DUMP OUTPUT                                             
SYSTEM COMPLETION CODE=B14  REASON CODE=00000010                         
 TIME=12.20.17  SEQ=07593  CPU=0000  ASID=02D9                           
 PSW AT TIME OF ERROR  475C1000   80E5DCBE  ILC 2  INTC 0D               
   NO ACTIVE MODULE FOUND                                               
   NAME=UNKNOWN                                                         
   DATA AT PSW  00E5DCB8 - 41003846  0A0DB20A  00509808                 
   GR 0: 00000001_00E5DEC8   1: 00000000_A4B14000                       
      2: 00000000_0000E2D0   3: 00000000_00E5D682                       
      4: 00000000_00848178   5: 00000000_00E73000                       
      6: 00000000_008484B4   7: 00000000_0084850C                       
      8: 00000000_008484D4   9: 00000000_0084AC10                       
      A: 00000000_00828F68   B: 00000000_0000E340
      C: 00000000_0084AC10   D: 00000000_00000080
      E: 00000000_00E5DAE4   F: 00000000_00000010
 END OF SYMPTOM DUMP                             
IRX0671E EXECIO error while trying to close a DD.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Mar 29, 2006 11:22 pm
Reply with quote

The B14 error with reason code 10 indicates:

Quote:

10 An I/O error occurred trying to update the directory of a
partitioned data set.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Mar 29, 2006 11:24 pm
Reply with quote

I'd like to see your TRACE output.

And that "queue" statement is unnecessary, so you can remove it.
Back to top
View user's profile Send private message
amitrath

New User


Joined: 30 Apr 2004
Posts: 28
Location: Carmel, USA.

PostPosted: Thu Mar 30, 2006 12:01 am
Reply with quote

MVS QUICKREF explains:

A likely cause of this error is attempting to close a file that was opened
by a higher-level task. You may have specified the EXECIO "FINIS" option
or the "linenum" positional parameter for a file (ddname) that was opened
under another task. However, you should specify only a file that has not
yet been opened, or that was opened at the current task level when using
the "FINIS" option or the "linenum" parameter.

Note: Both "FINIS" and "linenum" cause EXECIO to attempt to close the
specified file. However, EXECIO can only close files that were
opened at the same task level as that of the currently executing
exec.
Back to top
View user's profile Send private message
jon_s_rice

Active User


Joined: 24 Mar 2005
Posts: 102
Location: Douglasville, GA USA

PostPosted: Thu Mar 30, 2006 4:21 am
Reply with quote

This EXECIO will only work if copymem is equal to a member in the data set. For example copymem = "HLQ.TYPE.LIBRARY(PDSMEM)"
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Mar 30, 2006 6:28 am
Reply with quote

That's why I'd like to see the TRACE output.
Back to top
View user's profile Send private message
amitava
Warnings : 1

Active User


Joined: 30 Oct 2005
Posts: 186
Location: India

PostPosted: Thu Mar 30, 2006 9:43 am
Reply with quote

Nop sorry for such a silly mistake. Actually when I used EXECIO, I used it with SHR option. If I used it with the MOD option, then there will be no problem. But take a scenario for example, my PDS library is - AAAA.BBBB.PDS(MYMEM). If the MYMEM already exists, that EXECIO with MOD option just appends the data. So therefore, now I am keep track whether the member is present or not. If yes, raise an error otherwise write it down.
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts z/vm installation problem All Other Mainframe Topics 0
No new posts Job scheduling problem. JCL & VSAM 9
No new posts Problem with IFTHEN=(WHEN=GROUP,BEGIN... DFSORT/ICETOOL 5
No new posts Need to add field to copybook, proble... COBOL Programming 14
Search our Forums:

Back to Top