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
 

 

Not able to write in member

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

New User


Joined: 03 Dec 2007
Posts: 58
Location: Bangalore

PostPosted: Mon Dec 03, 2007 4:47 pm    Post subject: Not able to write in member
Reply with quote

I need to write lines into a member which is already existing in the same pds. I queued the lines using 'queue' command:

queue '.......'
queue '.......'
...
"execio "queued()" diskw membername (finis"
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Dec 03, 2007 5:16 pm    Post subject:
Reply with quote

and...?
Back to top
View user's profile Send private message
Sikkandhar

New User


Joined: 03 Dec 2007
Posts: 58
Location: Bangalore

PostPosted: Mon Dec 03, 2007 5:17 pm    Post subject:
Reply with quote

am not able to write anything into the file.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1232
Location: Israel

PostPosted: Mon Dec 03, 2007 8:35 pm    Post subject:
Reply with quote

The error is certainly in the EXECIO.

In this example, the member will be replaced by the new data:
Code:
queue '.......'
queue '.......'
...
"execio "queued()" diskw FILEW (finis"

Unfortunately, there is no APPEND function. The book says (somewhere):
Quote:
"To append information to a member of a PDS, rewrite the member with the additional records added."

To do so, you must first read the member and place the line in stack, then add your own lines then rewrite everything:
Code:

"execio * diskr FILEW (finis"
queue '.......'
queue '.......'
...
"execio "queued()" diskw FILEW (finis"
Back to top
View user's profile Send private message
Sikkandhar

New User


Joined: 03 Dec 2007
Posts: 58
Location: Bangalore

PostPosted: Tue Dec 04, 2007 8:46 am    Post subject:
Reply with quote

THANKS MAN
ITS NOT WORKING STILL
Back to top
View user's profile Send private message
superk

Moderator Team Head


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

PostPosted: Tue Dec 04, 2007 4:10 pm    Post subject: Reply to: Not able to write in member
Reply with quote

Then how about posted your runtime TRACE output.
Back to top
View user's profile Send private message
Sikkandhar

New User


Joined: 03 Dec 2007
Posts: 58
Location: Bangalore

PostPosted: Tue Dec 04, 2007 4:10 pm    Post subject:
Reply with quote

thanx maxro..its workin now..am able to write now..
i used stem to store the lines i need to write n used
execio * diskw filew (stem var.
and then i closed the flat file
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 Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to write Specific Fields from Mul... Padhu SYNCSORT 6 Thu Jul 06, 2017 10:26 am
No new posts Need to write record of PS File in ex... Chandan1993 JCL & VSAM 1 Wed Jun 07, 2017 1:35 am
No new posts member list compare jzhardy TSO/ISPF 6 Fri May 12, 2017 3:18 pm
No new posts Browsing member from any PDS shiitiizz CLIST & REXX 7 Wed Mar 08, 2017 1:17 am


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