25
© 2002. Reproduction prohibited. Please inform Xephon of any infringement.
* SPECIAL FIELDS *
* *
* USERDATA: *
* *
* *
* THE USERDATA FIELD IN A RACF TEMPLATE IS A REPEAT-GROUP WHERE *
* EACH OCCURRENCE WITHIN THE REPEAT-GROUP IS MADE UP OF 3 FIELDS: *
* USRNM : 8 CHARACTERS - USED AS THE NAME OF THE ENTRY *
* USRDATA : 1-255 CHARACTERS - CONTAINS THE DATA *
* USRFLG : 1 CHAR - CAN BE USED AS A FLAG *
* *
* THIS PROGRAM CAN BE USED TO MAINTAIN THESE FIELDS WHILE *
* PROVIDING SELECTIVE CONTROL OVER WHO CAN READ/UPDATE WHICH *
* INDIVIDUAL ENTRIES. *
* *
* *
* HIDDEN FIELDS: *
* *
* THESE ARE SUPPORTED TO ALLOW DATA TO BE STORED IN A USERDATA *
* ENTRY THAT IS NOT TO BE DISPLAYED. *
* THE FIELD NAME SHOULD START WITH AN @ SIGN. *
* IN THIS CASE THIS PROGRAM WILL DISPLAY EACH CHARACTER OF THE *
* FIELD AS A ? TO INDICATE THE LENGTH AND PRESENCE OF THE FIELD *
* WHILE NOT DISCLOSING THE CONTENTS. *
* *
* EXAMPLE: INTY ADD PR(FRED) CL(USER) FI(@PW) DA(1234567) *
* *
* *
* REPEAT GROUPS *
* *
* TO SELECT A SPECIFIC OCCURRENCE WITHIN A REPEAT-GROUP (E.G. TO *
* RETRIEVE CONNECT INFORMATION FROM A USER PROFILE FOR A SPECIFIC *
* RACF GROUP) THEN SPECIFY IN THE DATA() PARAMETER A VALUE TO BE *
* COMPARED TO THE FIRST NAMED FIELD IN FIELD(). WHEN AN OCCURRENCE *
* IS FOUND WITH THIS FIELD MATCHING THEN VALUES FOR THE SAME *
* RELATIVE OCCURRENCE WILL BE RETRIEVED FOR ALL OTHER FIELDS NAMED *
* IN FIELD(). THIS IS BEST EXPLAINED BY EXAMPLE!.... *
* *
* GET PR(FRED) FI(CGGRPNM,CGAUTHOR,CGAUTHDA.P) DATA(SYS1) @MC7
* *
* EACH OCCURRENCE OF THE CGGRPNM REPEAT GROUP IS SCANNED FOR A *
* MATCH WITH SYS1. WHEN ONE IS FOUND THE REMAINING REPEAT-GROUP *
* FIELDS (CGAUTHOR AND CGAUTHDA) ARE SCANNED AND THE VALUES FROM *
* THE SAME RELATIVE OCCURRENCE ARE RETRIEVED. *
* THIS EFFECTIVELY RETRIEVES THE GROUP NAME, CONNECT OWNER AND *
* CONNECT DATE (CONVERTED FROM PACKED TO CHAR) FOR THE CONNECT *
* ENTRY SYS1 IN FREDS USER PROFILE (DEFAULT CLASS=USER). *
* *
********************************************************************
* OUTPUT *
Kommentare zu diesen Handbüchern