My first question is why are you relying on the console logs?...   Here's
what I would do:

/* */
cpulog = 'CPU LOG A'
maxlog = 'MAX LOG A'

Do Forever
  'PIPE CP INDICATE | TAKE FIRST | VAR CPU'
  If rc <> 0 Then Exit rc
  Parse VAR CPU . '-' cpu '%'
  out = Date('s') time() 'CPU is at' cpu'%'
  If cpu = 100 Then 'PIPE VAR OUT | >>' maxlog
  'PIPE VAR OUT | >>' cpulog
  'CP SLEEP 5 MIN'
End

Scott


<Tue, Apr 7, 2009 at 10:56 AM, Suleiman Shahin <s_s_sha...@hotmail.com>wrote:

>  Hello Scott,
>
> Here is my crude example put ogether from two execs. I want to see the CPU
> % every 5 minutes and want to see those times when it hits 100 %. and want
> these two pieces of info on 2 separate logs.
>
> /*            */
>  TRACE O
>  'CP SPOOL CONS START TO SULEIMAN'
> PART1:
>  DO FOREVER
>     TODAY=DATE('W')
>        'PIPE CP IND | TAKE 1  | CONS'
>  CALL   PART2
>        'CP SLEEP 5 MIN'
>        IF TODAY¬=DATE('W') THEN LEAVE
>        END
>  'CP SPOOL CONS START TO SULEIMAN'
>
>       END
>           END
>  END
>
> /* SECOND EXEC */
>
>  PART2:
>     'PIPE CP IND  |    TAKE 1  | STACK'
>          PARSE PULL LINE
>          CPUU=SUBSTR(LINE,09,3)
>      IF CPUU  =  100  THEN DO
>         SAY 'CPU IS AT' CPUU TIME()
>          END
>     RETURN
> :
>
>
>
> Suleiman Shahin
>
>
>
> ------------------------------
> Date: Tue, 7 Apr 2009 09:18:15 -0600
> From: scott.rohl...@gmail.com
>
> Subject: Re: Creating two logs from an exec
> To: IBMVM@LISTSERV.UARK.EDU
>
> Still gonna need some more here to help you..   Post some code and explain
> what you want to do.
>
> Scott
>
> On Tue, Apr 7, 2009 at 9:15 AM, Suleiman Shahin <s_s_sha...@hotmail.com>wrote:
>
>  Hello Dave and all,
>
> The exec IS REXX.
> It runs 'forever' and generates a file extracted from the console log and I
> need to create a second file/report from a series of instructions within the
> same exec.
>
>
>
> Suleiman Shahin
>
>
>
> > Date: Tue, 7 Apr 2009 10:06:41 -0500
> > From: d...@vsoft-software.com
> > Subject: Re: Creating two logs from an exec
> > To: IBMVM@LISTSERV.UARK.EDU
>
> >
> > Hi, Suleiman.
> >
> > Can you be a bit more specific about what you are trying to accomplish
> > with your exec? Is it written in Rexx?
> >
> > it could be as simple as:
> >
> > /* generate some data and put it into stem LOG1. with LOG1.0 */
> > /* containing the number of lines....*/
> > Address command
> > 'PIPE stem LOG1. | > LOG1 DATA A'
> > /* generate some different data and put it into stem LOG2. */
> > /* with LOG2.0 containing the number of lines....*/
> > Address command
> > 'PIPE stem LOG2. | > LOG2 DATA A'
> >
> > Suleiman Shahin wrote:
> > > Hello,
> > >
> > > I need a "trick' to generate two reports from within a CMS exec.
> > > How do I do that?
> > >
> > > Thanks.
> > >
> > > Suleiman Shahin
> > >
> > >
> > > _________________________________________________________________
> > > Rediscover Hotmail®: Get quick friend updates right in your inbox.
> > >
> http://windowslive.com/RediscoverHotmail?ocid=TXT_TAGLM_WL_HM_Rediscover_Updates1_042009
> >
> > --
> > Dave Jones
> > V/Soft
> > www.vsoft-software.com
> > Houston, TX
> > 281.578.7544
>
> ------------------------------
> Rediscover Hotmail®: Now available on your iPhone or BlackBerry Check it
> out.<http://windowslive.com/RediscoverHotmail?ocid=TXT_TAGLM_WL_HM_Rediscover_Mobile1_042009>
>
>
>
> ------------------------------
> Rediscover Hotmail®: Get quick friend updates right in your inbox. Check
> it 
> out.<http://windowslive.com/RediscoverHotmail?ocid=TXT_TAGLM_WL_HM_Rediscover_Updates1_042009>
>

Reply via email to