Thank you Mike and Mark,
I did use the REXX code I was sent off list. I just enter "PINGP 'localhost
80'". I changed the logic to use 127.0.0.1 as a fixed IP address. Now all we
need to supply is the port number.
Thank you, Dave
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Mike Wawiorko
Sent: Thursday, April 02, 2015 5:31 AM
To: [email protected]
Subject: Re: IP Sockets Application Programming Question
If you have z/OS NetView have a look at the TESTPORT command.
Mike Wawiorko
P Please consider the environment before printing this e-mail
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Hansen, Dave L - Eagan, MN
Sent: 01 April 2015 21:45
To: [email protected]
Subject: IP Sockets Application Programming Question
Dear Group,
I get calls about CICS sockets and TN3270 sockets. When all I needed to do
was find out if an IP Address was up I just did a PING. Back when PING went
through the network end-to-end.
I have been reading the z/OS V1R12.0 Comm Svr: IP Sockets Application
Programming Interface Guide and Reference. We now have z/OS V2R1. My REXX
EXEC can do a: src = socket("VERSION"); <== Figure 170. VERSION command example.
To use the socket commands provided by the REXX socket function, a socket
set must be active. To allocate a socket set, use the INITIALIZE socket
command. The INITIALIZE command creates a socket set and can support multiple
socket calls.
In the book are a bunch of REXX socket sample programs <== Table 21. REXX
socket sample programs. In the book it says: "The LISTEN command applies only
to stream sockets". I would like to verify if I can hit my CICS Web Services
socket. My TCPIPSERVICE shows OPEN for PORT 1492.
Q). Are CICS Web Services port 1492 and TN3270 port 23 "Stream sockets"?
Currently all is working. I would like my REXX EXEC to be non-disruptive
(and not cause a denial of service). The REXX socket sample programs use
INITIALIZE. It says it will preallocate a socket set. A socket set is a
number of pre allocated sockets available to a single REXX application.
Q). Does my REXX EXEC need to have a socket to determine if one CICS socket
is working? The VERSION worked without specifying a socket number. If anyone
has done this before, are REXX socket functions the best way to "PING" a TCP/IP
PORT?
Thank you, Dave
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
This e-mail and any attachments are confidential and intended solely for the
addressee and may also be privileged or exempt from disclosure under applicable
law. If you are not the addressee, or have received this e-mail in error,
please notify the sender immediately, delete it from your system and do not
copy, disclose or otherwise act upon any part of this e-mail or its attachments.
Internet communications are not guaranteed to be secure or virus-free. The
Barclays Group does not accept responsibility for any loss arising from
unauthorised access to, or interference with, any Internet communications by
any third party, or from the transmission of any viruses. Replies to this
e-mail may be monitored by the Barclays Group for operational or business
reasons.
Any opinion or other information in this e-mail or its attachments that does
not relate to the business of the Barclays Group is personal to the sender and
is not given or endorsed by the Barclays Group.
Barclays Bank PLC. Registered in England and Wales (registered no. 1026167).
Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom.
Barclays Bank PLC is authorised by the Prudential Regulation Authority and
regulated by the Financial Conduct Authority and the Prudential Regulation
Authority (Financial Services Register No. 122702).
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
