-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Jan MOEYERSONS
Sent: Thursday, November 30, 2006 4:12 AM
To: [email protected]
Subject: Re: MB to Cyl Conversion

>Is there a formula for this ? Also Gb to cyl.
>Thanks

Here is a little REXX exec that does the trick for us.

/*  Rexx */
ARG N1                              
CYL = ((N1*1024*1024) / 849960)     
SAY 'THE NUMBER OF CYLINDERS IS' CYL

For GB to tracks --

/*  Rexx  */
ARG N1                           
TRK = ((N1*1024*1024) / 56664)   
SAY 'THE NUMBER OF TRACKS IS' TRK

We also have execs to convert the other direction.  All of these are in
our SYSEXEC concatenation, so we just have to say "TSO GB2CYL nnn" on
any command line.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to