IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

rexx code to create a ps file


IBM Mainframe Forums -> CLIST & REXX
Post new topic   This topic is locked: you cannot edit posts or make replies.
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
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: 865
Location: The Universe

PostPosted: Mon Aug 07, 2017 10:49 am
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

Global Moderator


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

PostPosted: Mon Aug 07, 2017 11:08 pm
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
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: 2432
Location: Hampshire, UK

PostPosted: Tue Aug 08, 2017 3:59 pm
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. View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts FILE STATUS - 39 ON VARIABLE LENGTH V... COBOL Programming 1
No new posts JCL for replacing code in Cobol JCL & VSAM 8
No new posts Calling Assembler from REXX PL/I & Assembler 5
No new posts COBOL VS SORT Utility for file format... COBOL Programming 6
No new posts REXX/CLIST tool for BCSR and EDSR CLIST & REXX 2

Back to Top