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

insert a comment in a PDS


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Fri Mar 12, 2010 8:12 pm
Reply with quote

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
View user's profile Send private message
superk

Global Moderator


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

PostPosted: Fri Mar 12, 2010 8:22 pm
Reply with quote

First of all, where's the member name that you're adding the comment to?
Back to top
View user's profile Send private message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Fri Mar 12, 2010 8:33 pm
Reply with quote

Just want the comment (outrec) in the sortout.
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1208
Location: Bangalore,India

PostPosted: Fri Mar 12, 2010 8:43 pm
Reply with quote

Hello Sintra,

It should be in CERGR1.LISTA
Back to top
View user's profile Send private message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Fri Mar 12, 2010 8:48 pm
Reply with quote

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
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Fri Mar 12, 2010 9:30 pm
Reply with quote

Why would you expect any output when there is no input?
Have you tried the HEADERs or TRAILERs?
Back to top
View user's profile Send private message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Fri Mar 12, 2010 9:35 pm
Reply with quote

No, colud you help me?
Back to top
View user's profile Send private message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Fri Mar 12, 2010 9:53 pm
Reply with quote

Many thanks you all, i already found a way.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table

PostPosted: Fri Mar 12, 2010 9:59 pm
Reply with quote

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
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Insert header record with record coun... DFSORT/ICETOOL 14
No new posts Insert system time/date (timestamp) u... DFSORT/ICETOOL 5
No new posts Identify Program Insert DB2 7
No new posts Insert trailer for non empty file only DFSORT/ICETOOL 6
No new posts Merge files with a key and insert a b... DFSORT/ICETOOL 6
Search our Forums:

Back to Top