Re: Anyone written CL based "ping" checks ?

Marco,

Thanks for the example.

We are at V4R1 and *ESCAPE is not allowed on the ping command. Am I missing
something or it that a change in OS's about V4R1 ?

Thanks !

Chuck

Marco Facchinetti wrote:

> ****** Inizio dati **********************************
>  PGM        PARM(&IP &MSG)
>  DCL        VAR(&IP) TYPE(*CHAR) LEN(20)
>  DCL        VAR(&MSG) TYPE(*CHAR) LEN(60)
>  PING       RMTSYS(&IP) MSGMODE(*VERBOSE *ESCAPE)
>  MONMSG     MSGID(TCP3210) EXEC(SNDMSG MSG(&MSG) +
>               TOUSR(*SYSOPR))
>     ENDPGM
> ******** Fine dati **********************************
> --- Chuck Lewis <clewis@iquest.net> wrote:
> > Hi Folks,
> >
> > Just wondering if anyone had written any CL based "ping"
> > checks that
> > they would want to share ? OR any good ideas on how to do
> > this ?
> >
> > I started to do this but of course instantly ran up
> > against the fact
> > that this information is written to the "job log" and
> > haven't started
> > digging into how to get at that with the lack of an
> > output parameter on
> > the PING command...
> >
> > Thanks !
> >
> > Chuck
> >
> > +---
> > | This is the Midrange System Mailing List!
> > | To submit a new message, send your mail to
> > MIDRANGE-L@midrange.com.
> > | To subscribe to this list send email to
> > MIDRANGE-L-SUB@midrange.com.
> > | To unsubscribe from this list send email to
> > MIDRANGE-L-UNSUB@midrange.com.
> > | Questions should be directed to the list
> > owner/operator: david@midrange.com
> > +---
>
> __________________________________________________
> Do You Yahoo!?
> Yahoo! Messenger - Talk while you surf!  It's FREE.
> http://im.yahoo.com/
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---