View previous topic :: View next topic
|
Author |
Message |
anishdosslin
New User
Joined: 29 Dec 2005 Posts: 1
|
|
|
|
Hi,
I am developing a REXX tool that has to find out information like LRECL, BLKSIZE et al of a set of tape datasets and write them into a file.
Please let me know how to go about this.
Regards
Anish |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
anishdosslin -
REXX is a programming language. It does not have access to datasets directly, but only through "others", like TSO commands or ISPF services.
Even the famous LISTDSI function is actually a TSO function.
Ask your system guys what kind of TMS (tape management system) you have. Then, read the manual and find the best way to interface it from within REXX.
O. |
|
Back to top |
|
|
mak_tcs
New User
Joined: 23 Nov 2005 Posts: 69 Location: Minneapolis, MN USA
|
|
|
|
Dear Anish,
I dont think you can get Tape Parameters through REXX. U need to refer Tape Management System to do the same!
But I can give you the code which helps you to find parameters of a sequential file;
Code: |
/***rexx***/
dsn='HLQ.DATA.SET'
x=listdsi(''''dsn'''')
if x=0 THEN
do
vol=SYSVOLUME
len=SYSLRECL
BLK=SYSBLKSIZE
say 'vol' vol
say 'LEN' len
say 'BLK' BLK
end
exit |
Thanks,
Mani |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
Back to top |
|
|
MGIndaco
Active User
Joined: 10 Mar 2005 Posts: 432 Location: Milan, Italy
|
|
|
|
I'm in accord with ofer71 but if you want to use rexx anyway I suggest you to run IEBANTP to retrieve every kind of information about your tape.
P.S. = I never tested it with virtual tape only with 3480/3490 |
|
Back to top |
|
|
punitsurana
New User
Joined: 17 Jan 2006 Posts: 6
|
|
|
|
Hi MGIndaco,
Could you please provide a sample REXX using the IEBANTP Command?
Thanks and Regards,
Punit Surana |
|
Back to top |
|
|
sureshrathnam
New User
Joined: 25 Mar 2005 Posts: 1 Location: Jacksonville
|
|
|
|
DSLIST can list the volume and storage device type. You may call DSLIST from either Clist or REXX.
Below is the example in REXX
X = Outtrap("OUT.",20)
LISTDS DSN DSN === Your tape or DASD dataset name
X = Outtrap("OFF")
Below is the trapped output of DSLIST
VOLSER-DEV---TYPE-----------DSN----
U84388 3490 NON-VSAM ------DSN name CATALOG: SYS1.ICFUCAT.TSTWT040
where U84388 is the volume (ignore)
3490 is storage device for tape. (3390 is for DASD datasets.) |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello and welcome to the forum,
First - please be aware that you have replied to a topic that has been inactive for 2 years. It is best to reply to current, active topics.
Second - when providing info, please provide what was requested rather than something else. The request was for "dcb" type info and what the posted code provides is catalog info. |
|
Back to top |
|
|
|