RE: Programmatically Pull the IP Address of The iSeries

Note that the SNA system name returned by the RTVNETA command has
absolutely, positively _NOTHING_ to do with the TCP/IP system name used
by PING or gethostbyname.

Now, _normally_ if the TCP/IP system name if different than the SNA
system, most admins would have a alias set p in DNS so that you SNA name
points to the TCP/IP name.

But you can not expect that to be the case.

Just an FYI 

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
  

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx 
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Terry Anderson
Sent: Wednesday, July 19, 2006 3:42 PM
To: midrange-l@xxxxxxxxxxxx
Subject: RE: Programmatically Pull the IP Address of The iSeries

message: 7
date: Wed, 19 Jul 2006 15:08:14 -0400
from: rob@xxxxxxxxx
subject: RE: Programmatically Pull the IP Address of The iSeries

<snip>
When we are role swapped, the file needs to go to the DR iSeries.
</snip>
Excuse me, but we're looking at DR also.  Wouldn't the DR 
iSeries change in some other fashion? 

Yes it does. I wound up using the RTVNETA anyway to get the 
name of the
iSeries. I ping that and it returns the IP address of the one they are
working on. See the code snippet below.

RTVNETA    SYSNAME(&SYSNAME)

PING       RMTSYS(&SYSNAME)                            
RCVMSG     MSGTYPE(*INFO) MSG(&MSGDTA)                 
CHGVAR     VAR(&IPADDR) VALUE(%SST(&MSGDTA 57 12))     
                                                       
CHGVAR     VAR(&PATH) VALUE('net use T: \\' *TCAT +    
             &IPADDR *TCAT '\CMTEMP')                  
                 

Like I said, its not pretty but it works. The divisions are swapping
back tomorrow. After we get through with that, I am going to look into
using gethostbyname. 

Terry Anderson.

-- 
This is the Midrange Systems Technical Discussion 
(MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.