* %GOTO IFAL80; /* 00010043 MACRO 00100004 &NAME IFASMFR9 &RECTYPE 00120004 .* * * 00160004 .* * $MAC(IFASMFR9) COMP(SC1BN) PROD(RACF): * 00190000 .* * * 00220000 .* * COPYRIGHT = 5740-XYN, 5740-XYS COPYRIGHT IBM CORP 1980, 1982 * 00223700 .* * LICENSED MATERIAL - PROGRAM PROPERTY OF IBM * 00227400 .* * REFER TO COPYRIGHT INSTRUCTIONS FORM * 00231100 .* * NUMBER G120-2083 * 00234800 .* * * 00238500 .* * STATUS = OS/VS2 EBB1102 @L6A* 00242200 .* * * 00245900 .* * MACMEAN IFASMFR9 MEANS SYSTEM MANAGEMENT FACILITY RECORD MAPPING * 00250004 .* * MACCOMP Y-2 SC1BN/BL27P * 00290000 .* * MACSTAT Y-2 73298/42020 * 00330004 .* * METHOD OF ACCESS * 00370004 .* * PL/S - INCLUDE MACRO FROM LIBRARY * 00450004 .* * EXAMPLE - %INCLUDE SYSLIB(IFASMFR9) * 00490004 .* * * 00530004 .* * THIS MACRO EXPANDS RECORDS 80-93 * 00570004 .* * * 00650004 .* * CHANGE ACTIVITY = * 00669800 .* * $L4=HRF1402,RACF/140,810701,SJRDSD: @L4A* 00676400 .* * $L5=HRF1502,RACF/150,820302,CNTDSD: @L5A* 00679700 .* * OZ73241 @ZA73241* 00681300 .* * $L6=HRF1602,RACF/160,830914,CNTDSD: @L6A* 00681600 .* * UZ90283 @ZA90283* 00681900 .* * UZ90284 @ZA90284* 00682200 .* * UZ90285 @ZA90285* 00682500 .* * * 00683000 .* * 00690004 .* THIS IS AN SMF MACRO WHICH BUILDS SMF RECORDS 80-93. THE REQUIRED 00730004 .* FORMAT IS - 00770004 .* 00850004 .* IFASMFR9 &RECTYPE 00890004 .********************************************************************** 00930004 AIF (&RECTYPE EQ 80).IFAS080 @G32FPRL 00940043 AIF (&RECTYPE EQ 81).IFAS081 @G32FPRL 00950043 .E5 ANOP 00970004 SPACE 3 01050004 MNOTE 4,'&RECTYPE INVALID RECORD TYPE SPECIFIED' 01090004 .CONTB ANOP 01130004 MEXIT 01170004 .IFAS080 ANOP @Z40RPPE 01210043 EJECT @Z40RPPE 01260043 * RACF OPERATOR RECORD @Z40RPPE 01310043 DS 0F ALIGN TO FULL WORD BOUNDARY @Z40RPPE 01360043 SMFRCD80 EQU * HEADER SEGMENT @Z40RPPE 01410043 SMF80LEN DS BL2 RECORD LENGTH @Z40RPPE 01460043 SMF80SEG DS BL2 SEGMENT DESCRIPTOR @Z40RPPE 01510043 SMF80FLG DS BL1 HEADER FLAG BYTE - SYSTEM @Z40RPPE 01560043 * BIT MEANING WHEN SET @Z40RPPE 01610043 * BIT 6 - VS2 @Z40RPPE 01660043 SMF80RTY DS BL1 RECORD TYPE(80), ONLY HEADER FIELD SET @Z40RPPE 01710043 * BY GENERATOR OF RECORD @Z40RPPE 01760043 SMF80TME DS BL4 TOD FROM TIME MACRO - BINARY @Z40RPPE 01810043 SMF80DTE DS PL4 DATE FROM TIME MACRO @Z40RPPE 01860043 SMF80SID DS CL4 SYSTEM IDENTIFICATION @Z40RPPE 01910043 SMF80DES DS BL2 DESCRIPTOR FLAGS @Z40RPPE 01960043 * BIT MEANING WHEN SET @Z40RPPE 02010043 * BIT 0 - THIS EVENT IS A VIOLATION @Z40RPPE 02060043 * BIT 1 - USER NOT DEFINED TO RACF @Z40RPPE 02110043 * BIT 2 - RCD CONTAINS VERSION INDICATOR @PC003LS 02160000 * BIT 3 - THIS EVENT IS A WARNING @L6A 02176600 * BITS 4-15 - RESERVED @L6A 02193200 SMF80EVT DS BL1 EVENT CODE @Z40RPPE 02210043 * 1 - JOB INITIATION/TSO LOGON @Z40RPPE 02260043 * 2 - RESOURCE ACCESS @G32FPRL 02310043 * 3 - END OF VOLUME @G32FPRL 02340043 * 4 - RENAME DATASET @Z40RPPE 02410043 * 5 - SCRATCH DATASET OR TAPE VOLUME @G32FPRL 02460043 * 6 - DELETE 1 VOLUME OF MULTIVOLUME @Z40RPPE 02510043 * DATASET OR TAPE VOLUME SET @G32FPRL 02560043 * 7 - DEFINE DATASET OR TAPE VOLUME SET @G32FPRL 02564043 * 8 - ADDSD @G32FPRL 02568043 * 9 - ADDGROUP @G32FPRL 02572043 * 10- ADDUSER @G32FPRL 02576043 * 11- ALTDSD @G32FPRL 02580043 * 12- ALTGROUP @G32FPRL 02584043 * 13- ALTUSER @G32FPRL 02588043 * 14- CONNECT @G32FPRL 02592043 * 15- DELDSD @G32FPRL 02596043 * 16- DELGROUP @G32FPRL 02600043 * 17- DELUSER @G32FPRL 02604043 * 18- PASSWORD @G32FPRL 02608043 * 19- PERMIT @G32FPRL 02612043 * 20- RALTER @G32FPRL 02616043 * 21- RDEFINE @G32FPRL 02620043 * 22- RDELETE @G32FPRL 02624043 * 23- REMOVE @G32FPRL 02628043 * 24- SETROPTS @G32FPRL 02632043 * 25- RVARY @G32FPRL 02636043 SMF80EVQ DS BL1 EVENT CODE QUALIFIER @Z40RPPE 02660043 SMF80USR DS CL8 USER ID FOR WHICH THIS EVENT RECORDED @Z40RPPE 02710043 SMF80GRP DS CL8 GROUP TO WHICH USER WAS CONNECTED @Z40RPPE 02760043 SMF80REL DS BL2 OFFSET OF FIRST RELOCATE SECTION FROM @Z40RPPE 02810043 * BEGINNING OF THE RECORD HEADER @Z40RPPE 02860043 SMF80CNT DS BL2 NUMBER OF RELOCATE SECTIONS @Z40RPPE 02910043 SMF80ATH DS BL1 SPECIAL AUTHORITIES USED @G32FPRS 02960043 * BIT MEANINGS WHEN SET - @G32FPRS 03010043 * BIT 0 - NORMAL AUTHORITY CHECK @G32FPRS 03060043 * BIT 1 - SPECIAL ATTRIBUTE @G32FPRS 03110043 * BIT 2 - OPERATIONS ATTRIBUTE @G32FPRS 03160043 * BIT 3 - AUDITOR ATTRIBUTE @G32FPRS 03210043 * BIT 4 - INSTALLATION EXIT ACTION @G32FPRL 03260043 * BIT 5 - FAILSOFT PROCESSING @L6A 03276600 * BIT 6-7 - RESERVED @G32FPRL 03293200 SMF80REA DS BL1 REASON FOR LOGGING @G32FPRS 03310043 * BIT MEANINGS WHEN SET: @G32FPRS 03360043 * BIT 0 - CHANGES TO THIS CLASS OF @G32FPRS 03410043 * PROFILE BEING AUDITED @G32FPRS 03460043 * BIT 1 - USER BEING AUDITED @G32FPRS 03510043 * BIT 2 - SPECIAL USERS BEING AUDITED @G32FPRS 03560043 * BIT 3 - ACCESS TO ENTITY BEING AUDITED 03580000 * DUE TO AUDIT OPTION 03600000 * OR RACHECK INSTALLATION EXIT 03620000 * REQUESTED LOGGING, OR TO 03633300 * FAILSOFT PROCESSING @L6A 03646600 * BIT 4 - *RACINIT* FAILURE @G32FPRS 03660043 * BIT 5 - THIS COMMAND IS ALWAYS AUDITED @G32FPRL 03710043 * BIT 6 - VIOLATION DETECTED AND CMDVIOL @G32FPRL 03718043 * IN EFFECT @G32FPRL 03726043 * BIT 7 - ACCESS TO ENTITY BEING AUDITED 03731300 * DUE TO GLOBALAUDIT OPTION @L5A 03736600 SMF80TLV DS BL1 TERMINAL LEVEL NUMBER OF FOREGROUND @G32FPRL 03742043 * USER (ZERO IF NOT AVAILABLE OR NOT @G32FPRL 03760043 * VERIFIED) @G32FPRL 03770043 SMF80ERR DS BL1 COMMAND PROCESSING ERROR FLAG @G32FPRS 03960043 * BIT MEANINGS WHEN SET: @G32FPRS 04010043 * BIT 0 - COMMAND HAD ERROR AND COULD @G32FPRS 04060043 * NOT BACKOUT SOME CHANGES @G32FPRS 04110043 * BIT 1 - NO PROFILE UPDATES MADE @G32FPRL 04160043 * BECAUSE OF ERROR IN PROCESSING @G32FPRL 04170043 * BIT 2-7 - RESERVED @G32FPRL 04180043 SMF80TRM DS CL8 TERMINAL ID OF FOREGROUND USER @G32FPRS 04210043 * (ZEROES IF NOT AVAILABLE) @G32FPRS 04260043 SMF80JBN DS CL8 JOB NAME @G32FPRL 04267043 SMF80RST DS BL4 TIME READER RECOGNIZED JOB CARD @G32FPRL 04274043 * IN HUNDREDTHS OF SECONDS @G32FPRL 04281043 SMF80RSD DS PL4 DATE READER RECOGNIZED JOB CARD @G32FPRL 04288043 * 00YYDDDF FORMAT @G32FPRL 04295043 SMF80UID DS CL8 USER IDENTIFICATION @G32FPRL 04302043 SMF80VER DS XL1 VERSION INDICATOR 04304000 * 5 = VERSION 1 RELEASE 5 @L5A 04306000 ***************************************************************@Z40RPPE 04310043 * RELOCATE SECTION @Z40RPPE 04360043 ***************************************************************@Z40RPPE 04410043 SMF80DTP DS BL1 DATA TYPE @Z40RPPE 04460043 SMF80DLN DS BL1 LENGTH OF DATA THAT FOLLOWS @Z40RPPE 04510043 SMF80DTA DS CL255 DATA @Z40RPPE 04560043 AGO .CONTB @Z40RPPE 04610043 .IFAS081 ANOP @Z40RPPE 04660043 EJECT @Z40RPPE 04710043 * RACF INITIALIZATION RECORD @Z40RPPE 04760043 DS 0F ALIGN TO FULL WORD BOUNDARY @Z40RPPE 04810043 SMFRCD81 EQU * HEADER SEGMENT @Z40RPPE 04860043 SMF81LEN DS BL2 RECORD LENGTH @Z40RPPE 04910043 SMF81SEG DS BL2 SEGMENT DESCRIPTOR @Z40RPPE 04960043 SMF81FLG DS BL1 HEADER FLAG BYTE - SYSTEM @Z40RPPE 05010043 * BIT MEANING WHEN SET @Z40RPPE 05060043 * BIT 6 - VS2 @Z40RPPE 05110043 SMF81RTY DS BL1 RECORD TYPE(81), ONLY HEADER FIELD SET @Z40RPPE 05160043 * BY GENERATOR OF RECORD @Z40RPPE 05210043 SMF81TME DS BL4 TOD FROM TIME MACRO - BINARY @Z40RPPE 05260043 SMF81DTE DS PL4 DATE FROM TIME MACRO @Z40RPPE 05310043 SMF81SID DS CL4 SYSTEM IDENTIFICATION @Z40RPPE 05360043 SMF81RDS DS CL44 DSN OF RACF DATASET FOR THIS IPL @Z40RPPE 05410043 SMF81RVL DS CL6 VOLID OF RACF DATASET @Z40RPPE 05460043 SMF81RUN DS CL3 UNIT NAME OF RACF DATASET @Z40RPPE 05510043 SMF81UDS DS CL44 DSN OF UADS DATASET FOR THIS IPL @Z40RPPE 05560043 SMF81UVL DS CL6 VOLID OF UADS DATA SET @Z40RPPE 05610043 SMF81OPT DS BL1 OPTIONS INDICATOR @Z40RPPE 05660043 * BIT MEANING WHEN SET @Z40RPPE 05710043 * BIT 0 - NO RACINIT STATISTICS @Z40RPPE 05760043 * BIT 1 - NO DATASET STATISTICS @Z40RPPE 05810043 * BIT 2 - RACINIT PRE-PROCESSING @G32FPRL 05860043 * INSTALLATION EXIT ACTIVE @G32FPRL 05868043 * BIT 3 - RACHECK PRE-PROCESSING @G32FPRL 05876043 * INSTALLATION EXIT ACTIVE @G32FPRL 05884043 * BIT 4 - RACDEF PRE-PROCESSING @G32FPRL 05892043 * INSTALLATION EXIT ACTIVE @G32FPRL 05910043 * BIT 5 - RACINIT POST PROCESSING @G32FPRL 05918043 * INSTALLATION EXIT IS ACTIVE @G32FPRL 05926043 * BIT 6 - RACHECK POST PROCESSING @G32FPRL 05934043 * INSTALLATION EXIT IS ACTIVE @G32FPRL 05942043 * BIT 7 - NEW PASSWORD VERIFICATION @L4A 05981300 * INSTALLATION EXIT IS ACTIVE. @L4A 06020600 SMF81OP2 DS BL1 OPTIONS INDICATOR 2 @G32FPRS 06060043 * BIT MEANINGS WHEN SET: @G32FPRS 06110043 * BIT 0 - NO TAPE VOL. STATS ARE BEING @G32FPRS 06160043 * RECORDED @G32FPRS 06210043 * BIT 1 - NO DASD VOLUME STATISTICS ARE @G32FPRS 06260043 * BEING RECORDED @G32FPRS 06310043 * BIT 2 - NO TERMINAL STATISTICS ARE 06321100 * BEING RECORDED @L5A 06332200 * BIT 3 - REGULAR NAMING CONVENTION EXIT 06343300 * IS ACTIVE @L5A 06354400 * BIT 4 - DELETE NAMING CONVENTION EXIT 06365500 * IS ACTIVE @L5A 06376600 * BIT 5 - ADSP IS NOT ACTIVE @L5A 06387700 * BIT 6 - ICHDEX01 IS ACTIVE @L6A 06395100 * BIT 7 - ICHNCV00 IS ACTIVE @L6A 06402500 SMF81OP3 DS BL1 OPTIONS INDICATOR 3 @G32FPRS 06410043 * BIT MEANINGS WHEN SET: @G32FPRS 06460043 * BIT 0 - TAPE VOLUME PROTECTION IS IN @G32FPRS 06510043 * EFFECT @G32FPRS 06560043 * BIT 1 - NO DUPLICATE DATA SET PROTEC- @PC003LS 06570000 * TION @PC003LS 06575000 * BIT 2 - DASD VOLUME PROTECTION IS IN @PC003LS 06580000 * EFFECT @PC003LS 06585000 * BIT 3 - RCD CONTAINS VERSION INDICATOR @PC003LS 06590000 * BIT 4 - FRACHACK INSTALLATION EXIT IS @PC003LS 06595000 * ACTIVE @PC003LS 06600000 * BIT 5 - RACLIST PRE-PROCESSING INSTAL- @PC003LS 06605000 * LATION EXIT IS ACTIVE @PC003LS 06610000 * BIT 6 - RACLIST SELECTION INSTALLATION @PC003LS 06615000 * EXIT IS ACTIVE @PC003LS 06620000 * BIT 7 - RACDEF POST-PROCESSING 06633300 * INSTALLATION EXIT IS ACTIVE @L5A 06646600 SMF81AOP DS BL1 AUDIT OPTIONS @G32FPRS 06660043 * BIT MEANINGS FOR AUDIT OPTIONS: @G32FPRS 06710043 * BIT 0 - USER CLASS PROFILE @G32FPRL 06720043 * CHANGES BEING LOGGED @G32FPRL 06730043 * BIT 1 - GROUP CLASS PROFILE @G32FPRL 06740043 * CHANGES BEING LOGGED @G32FPRL 06750043 * BIT 2 - DATA SET CLASS PROFILE @G32FPRL 06760043 * CHANGES BEING LOGGED @G32FPRL 06768043 * BIT 3 - TAPEVOL CLASS PROFIEL @G32FPRL 06776043 * CHANGES BEING LOGGED @G32FPRL 06784043 * BIT 4 - DASDVOL CLASS PROFILE @G32FPRL 06792043 * CHANGES BEING LOGGED @G32FPRL 06810043 * BIT 5 - TERMINAL CLASS PROFILE @G32FPRL 06818043 * CHANGES BEING LOGGED @G32FPRL 06826043 * BIT 6 - *RACF* COMMAND VIOLATIONS @G32FPRL 06834043 * BEING LOGGED @G32FPRL 06842043 * BIT 7 - *SPECIAL* USER ACTIVITY @G32FPRL 06860043 * BEING LOGGED @G32FPRL 06870043 SMF81AO2 DS BL1 RESERVED @G32FPRL 07310043 SMF81TMO DS BL1 TERMINAL VERIFICATION OPTION @G32FPRL 07340043 * BIT MEANINGS FOR TERM. VER. OPTION: @G32FPRS 07410043 * BIT 0 - TERMINAL AUTHORIZATION @G32FPRL 07460043 * CHECKING IS IN EFFECT @G32FPRL 07490043 * BIT 1 - UNIVERSAL ACCESS FOR @G32FPRS 07560043 * UNDEFINED TERMINALS IS *NONE* @G32FPRS 07610043 * BIT 2 - REALDSN IS IN EFFECT @L6A 07618700 * BIT 3 - JES-XBMALLRACF IS IN EFFECT @L6A 07627400 * BIT 4 - JES-EARLYVERIFY IS IN EFFECT @L6A 07636100 * BIT 5 - JES-BATCHALLRACF IS IN EFFECT @L6A 07644800 * BIT 6 - FRACHECK POST PROCESSING EXIT ACTIVE 07653500 * @L6A 07662200 * BIT 7 - RESERVED @L6A 07670900 SMF81PIV DS BL1 MAXIMUM PASSWORD INTERVAL @G32FPRL 07680043 SMF81REL DS XL2 OFFSET FROM BEGINNING OF THE RECORD @PC003LS 07685000 * HEADER TO THE FIRST RELOCATE SECTION @PC003LS 07690000 SMF81CNT DS XL2 NUMBER OF RELOC. SECTIONS IN THIS RCD @PC003LS 07695000 SMF81VER DS XL1 VERSION INDICATOR 07700000 * 5 = VERSION 1, RELEASE 5 @L5A 07702000 SMF81QL DS CL8 INSTALLATION CONTROLLED PREFIX FOR SINGLE 07704000 * LEVEL DATASET NAME @ZA73241 07706000 DS CL16 RESERVED @L5A 07708000 ***************************************************************@Z40RPPE 07710000 * RELOCATE SECTION @Z40RPPE 07715000 ***************************************************************@Z40RPPE 07720000 SMF81DTP DS BL1 DATA TYPE @PC003LS 07725000 SMF81DLN DS BL1 LENGTH OF DATA THAT FOLLOWS @PC003LS 07730000 SMF81DTA DS CL255 DATA @PC003LS 07735000 AGO .CONTB @PC003LS 07740000 MEND */ 07760043 %IFAL80: IF IFAR80='' %THEN %GOTO IFAL81; /*@Z40RPPE*/ 07810043 DCL 1 SMFRCD80 BASED(SMF80PTR) BDY(WORD), /*@Z40RPPE*/ 07860043 /* RECORD TYPE 80 - RACF OPERATOR RECORD @Z40RPPE*/ 07910043 /* WRITTEN IF REQUESTED BY THE ADDSD OR ALTDSD COMMAND @Z40RPPE*/ 07960043 3 SMF80LEN FIXED(15), /*RECORD LENGTH @Z40RPPE*/ 08010043 3 SMF80SEG FIXED(15), /*SEGMENT DESCRIPTOR @Z40RPPE*/ 08060043 3 SMF80FLG BIT(8), /*HEADER FLAG BYTE-SYSTEM @Z40RPPE*/ 08110043 /*BIT 6 ON MEANS VS2 @Z40RPPE*/ 08160043 3 SMF80RTY FIXED(8), /*RECORD TYPE 80 @Z40RPPE*/ 08210043 3 SMF80TME FIXED(31) BDY(BYTE), /*TOD RECORD WRITTEN@Z40RPPE*/ 08260043 3 SMF80DTE CHAR(4), /*DATE RECORD WRITTEN @Z40RPPE*/ 08310043 3 SMF80SID CHAR(4), /*SYSTEM ID @Z40RPPE*/ 08360043 3 SMF80DES BIT(16), /*DESCRIPTOR FLAGS 08410043 BIT MEANING WHEN SET 08460043 BIT 0 - THIS EVENT IS A 08510043 VIOLATION 08560043 BIT 1 - USER NOT DEFINED 08610043 TO RACF 08660043 BIT 2 - RECORD CONTAINS VERSION 08710000 INDICATOR @PC003LS 08720000 BIT 3 - THIS EVENT IS A WARNING 08730000 @L6A 08740000 BITS 4-15 - RESERVED @L6A*/ 08750000 3 SMF80EVT BIT(8), /*EVENT CODE @Z40RPPE*/ 08760043 /*1 - JOB INITIATION 08810043 TSO LOGON 08860043 2 - RESOURCE ACCESS 08910043 3 - END OF VOLUME 08960043 4 - RENAME DATASET 09060043 5 - SCRATCH DATASET OR TAPE VOLUME 09110043 6 - DELETE 1 VOLUME OF MULTIVOLUME 09118043 DATASET OR TAPE VOLUME SET 09126043 7 - DEFINE DATASET OR TAPE 09134043 VOLUME SET 09142043 8 - ADDSD 09150043 9 - ADDGROUP 09158043 10- ADDUSER 09166043 11- ALTDSD 09174043 12- ALTGROUP 09182043 13- ALTUSER 09190043 14- CONNECT 09198043 15- DELDSD 09206043 16- DELGROUP 09214043 17- DELUSER 09222043 18- PASSWORD 09230043 19- PERMIT 09238043 20- RALTER 09246043 21- RDEFINE 09254043 22- RDELETE 09262043 23- REMOVE 09270043 24- SETROPTS 09278043 25- RVARY @G32FPRL*/ 09286043 3 SMF80EVQ BIT(8), /*EVENT CODE QUALIFIER @Z40RPPE*/ 09310043 3 SMF80USR CHAR(8), /*USER ID FOR WHICH THIS 09360043 EVENT IS RECORDED @Z40RPPE*/ 09410043 3 SMF80GRP CHAR(8), /*GROUP TO WHICH USER WAS 09460043 CONNECTED @Z40RPPE*/ 09510043 3 SMF80REL FIXED(15), /*OFFSET OF FIRST RELOCATE 09560043 SECTION FROM BEGINNING 09610043 OF THE RECORD HEADER @Z40RPPE*/ 09660043 3 SMF80CNT FIXED(15), /*NUMBER OF RELOCATE 09710043 SECTIONS @Z40RPPE*/ 09760043 3 SMF80ATH BIT(8), /*SPECIAL AUTHORITIES USED @G32FPRS*/ 09810043 /*BIT 0 - NORMAL AUTHORITY 09860043 CHECK 09910043 BIT 1 - SPECIAL ATTRIBUTE 09960043 BIT 2 - OPERATIONS 10010043 ATTRIBUTE 10060043 BIT 3 - AUDITOR 10110043 ATTRIBUTE 10160043 BIT 4 - INSTALLATION EXIT ACTION 10180043 BIT 5 - FAILSOFT PROCESSING 10206600 BIT 6-7 RESERVED @L6A*/ 10233200 3 SMF80REA BIT(8), /* REASON FOR LOGGING @G32FPRS*/ 10260043 /* BIT 0 - CHANGES TO THIS 10310043 CLASS OF PROFILE BEING 10360043 AUDITED 10410043 BIT 1 - USER BEING 10460043 AUDITED 10510043 BIT 2 - SPECIAL USERS 10560043 BEING AUDITED 10610043 BIT 3 - ACCESS TO 10660043 ENTITY BEING AUDITED 10710043 DUE TO AUDIT OPTION 10722500 OR RACHECK INSTALLATION EXIT 10735000 REQUESTED LOGGING, OR TO 10743300 FAILSOFT PROCESSING 10751600 BIT 4 - *RACINIT* 10760043 FAILURE 10810043 BIT 5 - THIS COMMAND IS 10860043 ALWAYS AUDITED 10960043 BIT 6 - VIOLATION DETECTED AND 11010043 CMDVIOL IN EFFECT 11020043 BIT 7 - ACCESS TO ENTITY BEING 11030000 AUDITED DUE TO GLOBALAUDIT OPTION 11040000 @L6A*/ 11050000 3 SMF80TLV FIXED(8), /* TERMINAL LEVEL NUMBER OF 11060043 FOREGROUND USER (ZERO IF NOT 11100043 AVAILABLE OR NOT VERIFIED) 11140043 @G32FPRL*/ 11180043 3 SMF80ERR BIT(8), /* COMMAND PROCESSING ERROR 11260043 FLAG 11310043 BIT 0 - COMMAND HAD 11360043 ERROR AND COULD NOT BE 11410043 BACK OUT SOME CHANGES 11460043 BIT 1 - NO PROFILE UPDATES MADE 11510043 BECAUSE OF ERROR IN PROCESSING 11520043 BIT 2-7: RESERVED @G32FPRL*/ 11530043 3 SMF80TRM CHAR(8), /* TERMINAL ID OF FOREGRND. 11560043 USER (0 IF NOT AVAIAL. @G32FPRS*/ 11610043 3 SMF80JBN CHAR(8), /* JOBNAME @G32FPRL*/ 11616043 3 SMF80RST FIXED(31) BDY(BYTE), /* TIME, IN HUNDREDTHS OF A 11622043 A SECOND, READER RECOGNIZED CARD 11628043 FOR THIS JOB @G32FPRL*/ 11634043 3 SMF80RSD CHAR(4), /* DATE READER RECOGNIZED THE JOB 11640043 CARD, IN FORM 00YYDDDF @G32FPRL*/ 11646043 3 SMF80UID CHAR(8), /* USER IDENTIFICATION @G32FPRL*/ 11652000 3 SMF80VER FIXED(8); /* VERSION INDICATOR 11654000 5 = VERSION 1 RELEASE 5 @L5A*/ 11656000 /***********************************************************@Z40RPPE*/ 11660043 /* RELOCATE SECTION @Z40RPPE*/ 11710043 /***********************************************************@Z40RPPE*/ 11760043 DCL 1 SMF80VAR BASED, /* @Z40RPPE*/ 11810043 3 SMF80DTP FIXED(8), /*DATATYPE @Z40RPPE*/ 11860043 3 SMF80DLN FIXED(8), /*LENGTH OF FOLLOWING DATA @Z40RPPE*/ 11910043 3 SMF80DTA CHAR(255); /*DATA @Z40RPPE*/ 11960043 %IFAL81: IF IFAR81='' %THEN %GOTO IFAL82; /*@Z40RPPE*/ 12010043 DCL 1 SMFRCD81 BASED(SMF81PTR) BDY(WORD), /*@Z40RPPE*/ 12060043 /* RECORD TYPE 81 - RACF INITIALIZATION RECORD @Z40RPPE*/ 12110043 /* WRITTEN WHEN RACF HAS COMPLETED ITS INITIALIZATION @Z40RPPE*/ 12160043 3 SMF81LEN FIXED(15), /*RECORD LENGTH @Z40RPPE*/ 12210043 3 SMF81SEG FIXED(15), /*SEGMENT DESCRIPTOR @Z40RPPE*/ 12260043 3 SMF81FLG BIT(8), /*HEADER FLAG BYTE-SYSTEM @Z40RPPE*/ 12310043 /*BIT 6 ON MEANS VS2 @Z40RPPE*/ 12360043 3 SMF81RTY FIXED(8), /*RECORD TYPE 81 @Z40RPPE*/ 12410043 3 SMF81TME FIXED(31) BDY(BYTE), /*TOD RECORD WRITTEN@Z40RPPE*/ 12460043 3 SMF81DTE CHAR(4), /*DATE RECORD WRITTEN @Z40RPPE*/ 12510043 3 SMF81SID CHAR(4), /*SYSTEM ID @Z40RPPE*/ 12560043 3 SMF81RDS CHAR(44), /*DSN OF RACF DATASET FOR 12610043 THIS IPL @Z40RPPE*/ 12660043 3 SMF81RVL CHAR(6), /*VOLID OF RACF DATASET @Z40RPPE*/ 12710043 3 SMF81RUN CHAR(3), /*UNIT NAME OF RACF DATASET@Z40RPPE*/ 12760043 3 SMF81UDS CHAR(44), /*DSN OF UADS DATASET FOR 12810043 THIS IPL @Z40RPPE*/ 12860043 3 SMF81UVL CHAR(6), /*VOLID OF UADS DATASET @Z40RPPE*/ 12910043 3 SMF81OPT BIT(8), /*OPTIONS INDICATOR 12960043 BIT MEANING WHEN SET 13010043 BIT 0 - NO RACINIT STATISTICS 13060043 BIT 1 - NO DATASET STATISTICS 13110043 BIT 2 - RACINIT PREPROCESSING 13120043 INSTALLATION EXIT ACTIVE 13130043 BIT 3 - RACHECK PREPROCESSING 13140043 INSTALLATION EXIT ACTIVE 13150043 BIT 4 - RACDEF PREPROCESSING 13160043 INSTALLATION EXIT ACTIVE 13168043 BIT 5 - RACINIT POSTPROCESSING 13176043 INSTALLATION EXIT ACTIVE 13184043 BIT 6 - RACHECK POSTPROCESSING 13192043 INSTALLATION EXIT ACTIVE 13210043 BIT 7 - NEW PASSWORD VERIFY 13247500 INSTALLATION EXIT ACTIVE 13285000 @L4A*/ 13322500 3 SMF81OP2 BIT(8), /* OPTIONS INDICATOR 13360043 BIT MEANING WHEN SET 13410043 BIT 0 - NO TAPE VOLUME 13460043 STATISTICS ARE RECORDED 13510043 BIT 1 - NO DASD VOLUME 13560043 STATISTICS ARE RECORDED 13610043 BIT 2 - NO TERMINAL STATISTICS 13621100 ARE RECORDED 13632200 BIT 3 - REGULAR NAMING 13643300 CONVENTION EXIT IS ACTIVE 13654400 BIT 4 - DELETE NAMING 13665500 CONVENTION EXIT IS ACTIVE 13676600 BIT 5 - ADSP IS NOT ACTIVE 13687700 BIT 6 - ICHDEX01 IS ACTIVE 13695100 BIT 7 - ICHNCV00 IS ACTIVE @L6A*/ 13702500 3 SMF81OP3 BIT(8), /* OPTIONS INDICATOR 13710043 BIT 0 - TAPE VOLUME 13760043 PROTECTION IS IN EFFECT 13810043 BIT 1 - NO DUPLICATE DATA SET 13820043 PROTECTION 13830000 BIT 2 - DASD VOLUME PROTECTION 13835000 IS IN EFFECT 13840000 BIT 3 - RECORD CONTAINS VERSION 13845000 INDICATOR 13850000 BIT 4 - FRACHECK INSTALLATION EXIT 13855000 IS ACTIVE 13860000 BIT 5 - RACLIST PRE-PROCESSING 13865000 INSTALLATION EXIT IS 13870000 ACTIVE 13875000 BIT 6 - RACLIST SELECTION INSTAL- 13880000 LATION EXIT IS ACTIVE 13885000 BIT 7 - RACDEF POST-PROCESSING 13891200 EXIT IS ACTIVE 13897400 @L5A*/ 13903600 3 SMF81AOP BIT(8), /* AUDIT OPTIONS 13910043 BIT 0 - USER CLASS PROFILE 13960043 CHANGES BEING LOGGED 14010043 BIT 1 - GROUP CLASS PROFILE 14060043 CHANGES BEING LOGGED 14110043 BIT 2 - DATA SET CLASS PROFILE 14160043 CHANGES BEING LOGGED 14210043 BIT 3 - TAPEVOL CLASS PROFILE 14260043 CHANGES BEING LOGGED 14310043 BIT 4 - DASDVOL CLASS PROFILE 14360043 CHANGES BEING LOGGED 14410043 BIT 5 - TERMINAL CLASS PROFILE 14460043 CHANGES BEING LOGGED 14510043 BIT 6 - *RACF* COMMAND VIOLATIONS 14560043 BEING LOGGED 14610043 BIT 7 - *SPECIAL* USER ACTIVITY 14660043 BEING LOGGED @G32FPRS*/ 14710043 3 SMF81AO2 BIT(8), /* RESERVED @G32FPRS*/ 14760043 3 SMF81TMO BIT(8), /* TERMINAL VERIFICATION 14810043 OPTION 14860043 BIT 0 - TERMINAL AUTHORIZATION 14910043 CHECKING IS IN EFFECT 14960043 BIT 1 - UNIVERSAL ACCESS FOR 15010043 UNDEFINED TERMINALS IS *NONE* 15060043 BIT 2 - REALDSN IS IN EFFECT 15069000 BIT 3 - JES-XBMALLRACF IS IN 15078000 EFFECT 15087000 BIT 4 - JES-EARLYVERIFY IS IN 15096000 EFFECT 15105000 BIT 5 - JES-BATCHALLRACF IS IN 15114000 EFFECT 15123000 BIT 6 - FRACHECK POST PROCESSING 15132000 EXIT IS ACTIVE 15141000 BIT 7 - RESERVED @L6A*/ 15150000 3 SMF81PIV FIXED(8), /* MAX. PASSWORD INTERVAL @G32FPRS*/ 15160000 3 SMF81REL FIXED(16)UNSIGNED,/* OFFSET FROM START OF RECORD 15210000 HEADER TO FIRST RELOCATE 15260000 BLOCK @PC003LS*/ 15310000 3 SMF81CNT FIXED(16)UNSIGNED,/* NUMBER OF RELOCATE BLOCKS 15360000 @PC003LS*/ 15410000 3 SMF81VER FIXED(8), /* VERSION INDICATOR 15431400 5 = VERSION 1 RELEASE 5 @L5A*/ 15452800 3 SMF81QL CHAR(8), /* INSTALLATION CONTROLLED PREFIX 15474200 FOR SINGLE LEVEL DATASET NAMES 15495600 @L5A*/ 15517000 3 * CHAR(16); /* RESERVED @L5A*/ 15538400 /***********************************************************@PC003LS*/ 15560000 /* RELOCATE SECTION @PC003LS*/ 15610000 /***********************************************************@PC003LS*/ 15660000 DCL 1 SMF81VAR BASED, /* @PC003LS*/ 15710000 3 SMF81DTP FIXED(8), /*DATATYPE @PC003LS*/ 15760000 3 SMF81DLN FIXED(8), /*LENGTH OF FOLLOWING DATA @PC003LS*/ 15810000 3 SMF81DTA CHAR(255); /*DATA @PC003LS*/ 15860000 %IFAL82: ; 15910003