ADSM-L

Re: Rexx Needed

1999-12-13 11:51:51
Subject: Re: Rexx Needed
From: "Wayne T. Smith" <ADSM AT MAINE DOT EDU>
Date: Mon, 13 Dec 1999 11:51:51 -0500
SamuelP wrote, in part..
>  I am looking for a REXX routine that will let me parse the ACTLOG
>  report. When it is created the first thing displayed is the date and
>  the message for each node can be from 2 to 5 or 6 line. I need to
>  create a single line per node to find the errors and report to the
>  appropriate parties. Any one has something that could help me? I am
>  running on an MVS system OS/390.

If you have CMS/TSO Pipelines available, it's trivial to fix these up as
you wish.  For example, if your ACTLOG data looks like ...

12/13/1999 09:06:45  ANR0422W Session 18240 for node RUMFORD1
(NetWare)
refused
                      - node name not registered.
12/13/1999 09:06:45  ANR0403I Session 18240 ended for node
RUMFORD1
(NetWare). 12/13/1999 09:09:27  ANR0406I Session 18241 started for
node
                      FRONTDESK.XXXXXX.MAINE.EDU (Win95) (Tcp/Ip
                      130.111.120.154(1027)).
12/13/1999 09:09:29  ANR0403I Session 18241 ended for node
                      FRONTDESK.XXXXXX.MAINE.EDU (Win95).

then the following PIPE filter will do the trick ...

   'callpipe *:|change /                     //',
      '|joincont leading / / keep|brw'
   exit rc*(rc<>12)

cheers, wayne

Wayne T. Smith                          ADSM AT Maine DOT edu
ADSM Technical Coordinator - UNET       University of Maine System

Wayne T. Smith                          ADSM AT Maine DOT edu
ADSM Technical Coordinator - UNET       University of Maine System
<Prev in Thread] Current Thread [Next in Thread>