View previous topic :: View next topic
|
Author |
Message |
vasco ferreira
New User
Joined: 12 Jul 2008 Posts: 32 Location: sintra - portugal
|
|
|
|
I need to insert a comment in a PDS without any input file, should I use SORT? I tried below but doesn't work.
Code: |
//NAO EXEC PGM=ICEMAN
//SORTIN DD DISP=SHR,DSN=CERGR1.LISTA
//SORTOUT DD DISP=SHR,DSN=CERGR1.LISTA
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,1,CH,A)
OUTREC FIELDS=(1,1,X,C'O CCID NAO ESTA')
//*
|
|
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
First of all, where's the member name that you're adding the comment to? |
|
Back to top |
|
|
vasco ferreira
New User
Joined: 12 Jul 2008 Posts: 32 Location: sintra - portugal
|
|
|
|
Just want the comment (outrec) in the sortout. |
|
Back to top |
|
|
guptae
Moderator
Joined: 14 Oct 2005 Posts: 1208 Location: Bangalore,India
|
|
|
|
Hello Sintra,
It should be in CERGR1.LISTA |
|
Back to top |
|
|
vasco ferreira
New User
Joined: 12 Jul 2008 Posts: 32 Location: sintra - portugal
|
|
|
|
Hi Guptae, yes it should...
the sortin is empty, and the sortout should appears with: O CCID NAO ESTA. This is what i want to do. Many thanks. |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
Why would you expect any output when there is no input?
Have you tried the HEADERs or TRAILERs? |
|
Back to top |
|
|
vasco ferreira
New User
Joined: 12 Jul 2008 Posts: 32 Location: sintra - portugal
|
|
|
|
No, colud you help me? |
|
Back to top |
|
|
vasco ferreira
New User
Joined: 12 Jul 2008 Posts: 32 Location: sintra - portugal
|
|
|
|
Many thanks you all, i already found a way. |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
vasco ferreira wrote: |
Many thanks you all, i already found a way. |
That's great, would you care to share?
Please post your solution. |
|
Back to top |
|
|
|