Rexx Script is need to pull the logon ids on couple of mask



IBM's Command List programming language & Restructured Extended Executor

Rexx Script is need to pull the logon ids on couple of mask

Postby shiva7582 » Fri Feb 03, 2012 3:26 pm

Hi Friends,
Could you please help me how to check & pull the logoinds which starts with GEE-, G*I, G1BV & G1YZ only.. .
I have a dataset record of all logon ids....
Logon Id length is 7 character....
Ex:
LOGONID NAME
******* ****
XXXXXXX YYYYY

########################################################
//DELIT EXEC PGM=IDCAMS,REGION=5M
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE G1VTSPT.SY44.ACFLIST
SET MAXCC=0
/*
//STEP01 EXEC PGM=ACFRPTSL
//SYSPRINT DD DSN=G1VTSPT.SY44.ACFLIST,
// DCB=(LRECL=120,RECFM=FB,BLKSIZE=27960),
// SPACE=(CYL,(1,1),RLSE),
// UNIT=3390,
// DISP=(,CATLG,DELETE)
//SYSIN DD *
INPUT(ACF2)
IF((NOT STC) AND (SPECIAL ¬= 'H') -
AND (SPECIAL ¬= 'S') -
AND (SPECIAL ¬= 'C') AND (BUSINESS =C'@%%') -
OR (BUSINESS =C'PMO'))
REPORT(SHORT)
SFLDS(ACC-DATE,CRE-DATE,BUSINESS,LOA,SPECIAL)
MASK(G******) //* HERE I WANT TO SEARCH ON MASK...GEE-, G*I, G1BV & G1YZ
##########################################################

Could you please help me on this

Thanks,
Shivaji Patil

--------------------------------------------------------------------------------
shiva7582
 
Posts: 8
Joined: Fri Feb 03, 2012 4:13 am
Has thanked: 0 time
Been thanked: 0 time

Re: Rexx Script is need to pull the logon ids on couple of mask

 

Re: Rexx Script is need to pull the logon ids on couple of m

Postby NicC » Fri Feb 03, 2012 3:36 pm

So where does the rexx come in? You have shown an IDCAMS step and ACFRPTSL step. Where is this Rexx step going to run? What have you tried so far? What Rexx functions are you thinking of using?
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 2690
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisys (almost)
Has thanked: 4 times
Been thanked: 105 times

Re: Rexx Script is need to pull the logon ids on couple of m

Postby shiva7582 » Fri Feb 03, 2012 7:52 pm

I tried to do it in JCL it self but, I could not.....
Then I thought we may achive this by using Rexx
Using Function like SUBSTR and IF condition etc....
Can you help me on this....
shiva7582
 
Posts: 8
Joined: Fri Feb 03, 2012 4:13 am
Has thanked: 0 time
Been thanked: 0 time

Re: Rexx Script is need to pull the logon ids on couple of m

Postby enrico-sorichetti » Fri Feb 03, 2012 8:03 pm

what about reading the ACFRPTSL manual to see how the MASK statement works ???
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2643
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 130 times

Re: Rexx Script is need to pull the logon ids on couple of m

Postby steve-myers » Fri Feb 03, 2012 8:30 pm

Enrico - I suspect ACFRPTSL is some sort of ACF2 report program, but with no knowledge of what its output looks like, no one can help the TS.
steve-myers
Global moderator
 
Posts: 1885
Joined: Thu Jun 03, 2010 6:21 pm
Has thanked: 4 times
Been thanked: 197 times

Re: Rexx Script is need to pull the logon ids on couple of m

Postby shiva7582 » Fri Feb 03, 2012 10:48 pm

Report Looks like...
-------------------------------
LOGONID NAME DATE TIME CHANGER ACC-DATE

GATSY44 AUTO/OPS 02/03/12-06:14 01/26/03
GEEAJM0 MORENO/ART/J. 02/03/12-10:16 02/03/12
GEERCP0 PURNELL/RANDY/C. 01/31/12-22:14 01/31/12
GFT071B FUNCTIONAL ID 04/12/10-10:05 00/00/00


Here we need pull the logon ids which starts with only GEE-, G*I, G1BV & G1YZ only.. .
shiva7582
 
Posts: 8
Joined: Fri Feb 03, 2012 4:13 am
Has thanked: 0 time
Been thanked: 0 time

Re: Rexx Script is need to pull the logon ids on couple of m

Postby enrico-sorichetti » Fri Feb 03, 2012 11:13 pm

can You read ??? :evil:

from Your post ( YOU WROTE IT )
You are running a program called ACFRPTSL
one of its parameters is MASK(....)

read the frigging ACF manual about the ACFRPTSL control cards
and about the format of the operands of the MASK keyword
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2643
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 130 times

Re: Rexx Script is need to pull the logon ids on couple of m

Postby shiva7582 » Sat Feb 04, 2012 3:10 am

Sorry Enrico for wasting your time on this.......
Thank you
shiva7582
 
Posts: 8
Joined: Fri Feb 03, 2012 4:13 am
Has thanked: 0 time
Been thanked: 0 time


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post