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

Ask/Clarify the questions on TSO, CLIST & REXX

Moderators: Veera, Moderator Group

Post Reply
shiva7582
Member
Posts: 4
Joined: Sun Jan 29, 2012 3:50 am

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

Post by shiva7582 » Fri Feb 03, 2012 3:02 pm

Thanks Arun... I posted in forum.... Like below...

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

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others