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

-----Original Message-----
From: ram babu [mailto:rbkalidindi@yahoo.com]
Sent: Monday, April 16, 2001 2:30 PM
To: RPG400-L@midrange.com
Subject: 


Hi Klement,

Thanks for your valuable information.I tried with the
code.I'm one step forward i.e. i'm getting IPAddr
values as follows.Suppose when i pass string
like(www.ibm.COM) IPAddr value is 3504248331.I have no
idea why is was like that.It should be like
xxx.xxx.xxx.xxx format.How do i convert IPAddr value
into XXX.XXX.XXX.XXX format.Please advise me.
Thanks in advance.

Regards,
Rambabu Kalidindi. 

__________________________________________________
Do You Yahoo!?
Get email at your own domain with Yahoo! Mail. 
http://personal.mail.yahoo.com/
+---
| 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
+---

+---
| 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
+---