Page 1 of 1

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

PostPosted: Fri Feb 03, 2012 3:26 pm
by shiva7582
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

--------------------------------------------------------------------------------

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

PostPosted: Fri Feb 03, 2012 3:36 pm
by NicC
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?

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

PostPosted: Fri Feb 03, 2012 7:52 pm
by shiva7582
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....

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

PostPosted: Fri Feb 03, 2012 8:03 pm
by enrico-sorichetti
what about reading the ACFRPTSL manual to see how the MASK statement works ???

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

PostPosted: Fri Feb 03, 2012 8:30 pm
by steve-myers
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.

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

PostPosted: Fri Feb 03, 2012 10:48 pm
by shiva7582
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.. .

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

PostPosted: Fri Feb 03, 2012 11:13 pm
by enrico-sorichetti
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

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

PostPosted: Sat Feb 04, 2012 3:10 am
by shiva7582
Sorry Enrico for wasting your time on this.......
Thank you