I am not sure what you are trying to accomplish so this may or may not be 
useful.  I have a routine that displays a Unix directory converting the file 
sizes from bytes to GB, MB or KB:

/* convert bytes to nnn.n KB, MB, or GB */                                      
            
Select                                                                          
      
  When bytes >= 1024*1024*1024 Then filesize = Trunc(bytes/(1024*1024*1024),1) 
'GB';  
  When bytes >= 1024*1024 Then filesize = Trunc(bytes/(1024*1024),1) 'MB'; 
  When bytes >= 1024 Then filesize = Trunc(bytes/1024,1) 'KB';                  
                    
  Otherwise filesize = bytes 'bytes';
End  

It would be easy enough to add 80 to bytes before this segment or as part of 
the formulae.                                                                   
              

--
 
Donald Grinsell
State of Montana
406-444-2983
dgrins...@mt.gov

"The power of accurate observation is often mistaken for cynicism by those who 
have not got it."
~ George Bernard Shaw

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Grinsell, Don
Sent: Wednesday, 20 June 2012 15:23
To: IBM-MAIN@listserv.ua.edu
Subject: Re: convert Decimal to bytes

I'm not sure what you're asking.  It would be helpful to provide more 
information to put the problem in context. 


--
 
Donald Grinsell
State of Montana
406-444-2983
dgrins...@mt.gov

"A wonderful fact to reflect upon, that every human creature is constituted to 
be that profound secret and mystery to every other."
~ Charles Dickens (1812-70)

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Art
Sent: Wednesday, 20 June 2012 15:16
To: IBM-MAIN@listserv.ua.edu
Subject: convert Decimal to bytes

Hi would anyone know of a calculator and/or formal via rexx that I could 
use/setup to convert decimal to bytes. I would like to multiply xxxxx (decimal) 
by 80 and add an extra 80 bytes. 
Regards

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to