Not able to capture ADDRESS TSO "NSLOOKUP " output

Products

• OPS/MVS Event Management & Automation

Issue/Introduction

Using the following REXX code:

ip = '10.10.10.10'        
address tso                 
 "NSLOOKUP "ip              
                            
 say 'rc = ' rc             
 say 'queued() ' queued()   
 do while queued() > 0      
  PULL RECORD               
   say queued()             
 end                        

and am not capturing any output in the queue.  

                                               
OPS1098I *-* 29: say 'rc = ' rc                
OPS0996I rc =  0                               
OPS1098I *-* 30: say 'queued() ' queued()      
OPS0996I queued()  0                           
OPS1098I *-* 31: do while queued() > 0         
                                            

 

 

Environment

Release : 13.5

Component : OPS/MVS

Resolution

It seems the IBM command NSLOOKUP does not put any information in the REXX EDQ.

Using the a call to the function "bpxwunix" may be an alternative:

/* REXX */                             
ip = '10.10.10.10'                   
call bpxwunix 'nslookup 'ip '',,REC.   
Do z = 1 to REC.0                      
say Rec.z                              
End                                    
exit                                   

This program must be run as a TSO/E REXX. It cannot be executed as an OPS/REXX program. So, from a rule you should use:

ADDRESS OSF 'rexxpgm' 

Instead of ADDRESS OSF 'OI rexxpgm