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

Writing text into a dataset


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Senthilraj

New User


Joined: 26 Jun 2009
Posts: 5
Location: Chennai, India

PostPosted: Wed Oct 28, 2009 12:50 am
Reply with quote

I have a job scheduled on CA7 which will run on the last day of every month. I want this job to write a text "MONTHLY RUN" to a file (GDG) which will later be used by other programs for some month end processing.

Is it possible to do this with SORT by giving the text "MONTHLY RUN" in the control statements directly. I am aware that I could have this text in a sample file and then do a copy in the job. But I want to avoid creating this sample file in production. I don't want to have any other programs.
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 792
Location: Chennai, India

PostPosted: Wed Oct 28, 2009 12:57 am
Reply with quote

It looks simple to me.

With SORT,
SORTIN as MONTHLY RUN , SORTOUT as GDG Generation with SYSIN as OPTION COPY

or

With IEBGENER or IDCAMS REPRO... ?

or Am I missing something here?
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Wed Oct 28, 2009 1:01 am
Reply with quote

<Gnana beat me to to the reply!>

How about (untested code):
Code:
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
MONTHLY RUN
//SORTOUT DD DSN=YOUR.GDG(+1),DISP and other parms
//SYSIN DD *
 SORT FIELDS=COPY
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1742
Location: Tirupur, India

PostPosted: Wed Oct 28, 2009 1:16 am
Reply with quote

Hi,

I had a doubt that the above code might fail with LRECL mismatch or something when used with SORT. But it did not. It can be called as tested code. Working. icon_biggrin.gif

Thanks & Regards,
Back to top
View user's profile Send private message
Senthilraj

New User


Joined: 26 Jun 2009
Posts: 5
Location: Chennai, India

PostPosted: Wed Oct 28, 2009 10:54 am
Reply with quote

Thanks to all.....I got what I was looking for.
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts How to save SYSLOG as text data via P... All Other Mainframe Topics 4
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Allocated cylinders of a dataset DB2 12
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
Search our Forums:

Back to Top