Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
rexx code to create a ps file

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
Bharath Vikraman

New User


Joined: 06 Aug 2017
Posts: 9
Location: India

PostPosted: Mon Aug 07, 2017 10:30 am    Post subject: rexx code to create a ps file
Reply with quote

Can any one give a rexx code to create a ps file by getting the LRECL from user and the input file name should be saved in a format with current date and time?

For eg -- aaaa.t(date).h(time)
Back to top
View user's profile Send private message

steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 765
Location: The Universe

PostPosted: Mon Aug 07, 2017 10:49 am    Post subject:
Reply with quote

You need lots more than the LRECL: RECFM and an initial data set size. for starters.

In any event, you will learn much more by using the TSO/E REXX Reference and TSO/E REXX User's Guide manuals for your z/OS release and doing it yourself.

Your other option is to hire a consultant, at the appropriate compensation, of course.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2137
Location: Silicon Valley

PostPosted: Mon Aug 07, 2017 11:08 pm    Post subject: Reply to: rexx code to create a ps file
Reply with quote

Study the rexx manual. Learn how to:
1. user PARSE ARG to get user specified parameter (the LRECL)
2. use Address TSO to issue the ALLOCATE command
3. use DATE() built in function to get the current. You probably want the Julian date.
4. Use TIME() built in function to get the current time. You will need to strip out the ':' characters. So also learn the TRANSLATE() function.
5. concatenate the data and time with fixed portions of the name.

I am not sure of your convention, re: t(date) and h(time)
Normally, I would expect to see D for date and T for time:
Code:
PEDRO.D17219.T103701
Back to top
View user's profile Send private message
Bharath Vikraman

New User


Joined: 06 Aug 2017
Posts: 9
Location: India

PostPosted: Tue Aug 08, 2017 3:35 pm    Post subject: Re: Reply to: rexx code to create a ps file
Reply with quote

Pedro wrote:
Study the rexx manual. Learn how to:
1. user PARSE ARG to get user specified parameter (the LRECL)
2. use Address TSO to issue the ALLOCATE command
3. use DATE() built in function to get the current. You probably want the Julian date.
4. Use TIME() built in function to get the current time. You will need to strip out the ':' characters. So also learn the TRANSLATE() function.
5. concatenate the data and time with fixed portions of the name.

I am not sure of your convention, re: t(date) and h(time)
Normally, I would expect to see D for date and T for time:
Code:
PEDRO.D17219.T103701


thanks for the information Pedro.
I have created it. Now i want have a new TSO command like example "TSO ps 80" which means it will create a ps file with LRECL 80.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2249
Location: Hampshire, UK

PostPosted: Tue Aug 08, 2017 3:59 pm    Post subject:
Reply with quote

Well, go and write it. This is the experts forum so you should know how to do such a simple task. We help solve problems, not write/give program specifications. Locked.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 Running rexx on zOS with JCL Rajesh_98 CLIST & REXX 3 Wed Nov 20, 2019 5:19 pm
No new posts File transfer issue with end of line ... VINAY PALLELA TSO/ISPF 4 Thu Nov 14, 2019 12:01 am
No new posts File compare, where file has header a... VINAY PALLELA SYNCSORT 8 Thu Nov 07, 2019 5:05 pm
No new posts Can you manually set an EOF marker in... Don Allard CLIST & REXX 5 Sat Nov 02, 2019 12:30 am
No new posts OMIT first and last column of a pipe-... karthikb_itpro DFSORT/ICETOOL 1 Fri Nov 01, 2019 8:24 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us