parsing into octets was--RE:

That's pretty slick.  Til I just looked it up, I had no idea RPG had one
byte integers.  Makes sense in retrospect.  

> -----Original Message-----
> From: DeLong, Eric [mailto:EDeLong@Sallybeauty.com]
> Sent: Monday, April 16, 2001 1:25 PM
> To: 'RPG400-L@midrange.com'
> Subject: RE:
> 
> 
> Here's a ridiculously simple conversion..... it wins no style 
> awards, but it
> will show you somewhat what you're getting.....
> 
> 
> D TestValue       S             10u 0 Inz(3504248331)   
> D TestOut         S             40A                     
> D TestDS          DS                                   
> D  IPA                          10U 0                   
> D  IP1                           3U 0 Overlay(IPA:1)    
> D  IP2                           3U 0 Overlay(IPA:2)    
> D  IP3                           3U 0 Overlay(IPA:3)    
> D  IP4                           3U 0 Overlay(IPA:4)    
>                                                         
> C                   Eval      IPA = TestValue           
> C                                                       
> C                   Eval      TestOut = %char(ip1)+'.'+ 
> C                                       %char(ip2)+'.'+ 
> C                                       %char(ip3)+'.'+ 
> C                                       %char(ip4)      
> C                                                       
> C     TestOut       Dsply                               
> 
> 
> 
> The answer is: 208.222.150.11
> 
> hth,
> Eric DeLong
> 
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---