After the 'CP SLEEP 5 MIN':
Parse VALUE TIME() With hh ':' mm ':' ss .
If hh = '23' & mm >= '55' Then Do
'EXEC SENDFILE' cpulog 'SULEIMAN'
'ERASE' cpulog
'EXEC SENDFILE' maxlog 'SULEIMAN'
'ERASE' maxlog
End
Not perfect, but should send you the logs just before midnight and clear
them.. you can also SPOOL PUN and PUNCH the files, but I tend to just use
SENDFILE.
Scott
On Tue, Apr 7, 2009 at 11:35 AM, Suleiman Shahin <s_s_sha...@hotmail.com>wrote:
> Thanks Scott!
>
> I did not want to write to disk as I wanted to receive the data in my RDR.
> I will try your tip!
>
>
>
> Suleiman Shahin
>
>
>
> ------------------------------
> Date: Tue, 7 Apr 2009 11:28:01 -0600
>
> From: scott.rohl...@gmail.com
> Subject: Re: Creating two logs from an exec
> To: IBMVM@LISTSERV.UARK.EDU
>
> 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>
>
>
>
> ------------------------------
> Rediscover Hotmail®: Get e-mail storage that grows with you. Check it
> out.<http://windowslive.com/RediscoverHotmail?ocid=TXT_TAGLM_WL_HM_Rediscover_Storage1_042009>
>
