|
View previous topic :: View next topic
|
| Author |
Message |
Sikkandhar
New User
Joined: 03 Dec 2007
Posts: 61
Location: Bangalore
|
|
|
|
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 |
|
 |
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
| and...? |
|
| Back to top |
|
|
Sikkandhar
New User
Joined: 03 Dec 2007
Posts: 61
Location: Bangalore
|
|
|
|
| am not able to write anything into the file. |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
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 |
|
|
Sikkandhar
New User
Joined: 03 Dec 2007
Posts: 61
Location: Bangalore
|
|
|
|
THANKS MAN
ITS NOT WORKING STILL |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| Then how about posted your runtime TRACE output. |
|
| Back to top |
|
|
Sikkandhar
New User
Joined: 03 Dec 2007
Posts: 61
Location: Bangalore
|
|
|
|
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 |
|
|
|
|
