What statements are used in TPX Batch Administration to list and update user's assigned keys (CMDKEY, JUMP, MENU, PRINT AND CMDCHAR)?
Following you will find the JCL sample to fulfil that request.
1) Run the following report first, so a list is created with all ids including their CMDKEY, JUMP, MENU, PRINT AND CMDCHAR.
Update the parts marked in RED below.
//JOBCARD
//*
//* LIST ALL USERIDS WITH CMDKEY, JUMP, MENU, PRINT AND CMDCHAR
//*
//*
//BATCHADM EXEC tpxprocname,VNODE='*BATCH*'
//EXTFILE DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//RPTFILE DD SYSOUT=*
//SYSIN DD *
EXTRACT GIVING(EXTFILE) USER AND NO SESSIONS
(UIDXNAME(--------))
SET RTITLE1
' USERID CMDKEY JUMP MENU PRINT CMDCHAR '
SET RTITLE2
' ======== ======== ======== ======== ======== ======== '
REPORT GIVING(RPTFILE) USING (EXTFILE)
((' &UIDXNAME ' '&UIDXESCK' ' &UIDXJKEY' ' &UIDXMKEY' ' &UIDXPKEY'
' &UIDXCHAR '))
//
2) Run the following job which will UPDATE and then create a report with the new values. **Use with careful**
Update the parts marked in RED below accordingly.
//JOBCARD
//*
//* UPDATE and then LIST ALL USERIDS WITH CMDKEY, JUMP, MENU, PRINT AND CMDCHAR
//*
//*
//BATCHADM EXEC tpxprocname,VNODE='*BATCH*'
//EXTFILE DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//RPTFILE DD SYSOUT=*
//SYSIN DD *
UPDATE USER (user01 (UIDXESCK(PF1) UIDXJKEY(PF2))
user02 (UIDXMKEY(PF3))
user03 (UIDXPKEY(PF4) UIDXCHAR(PF5)))
EXTRACT GIVING(EXTFILE) USER AND NO SESSIONS
(UIDXNAME(--------))
SET RTITLE1
' USERID CMDKEY JUMP MENU PRINT CMDCHAR '
SET RTITLE2
' ======== ======== ======== ======== ======== ======== '
REPORT GIVING(RPTFILE) USING (EXTFILE)
((' &UIDXNAME ' '&UIDXESCK' ' &UIDXJKEY' ' &UIDXMKEY' ' &UIDXPKEY'
' &UIDXCHAR '))
//
Note the variables:
UIDXESCK = Command key
UIDXJKEY = Jump key
UIDXMKEY = Menu key
UIDXPKEY = Print key
UIDXCHAR = Command character
Where:
- user01, user02, user03 = those are the users being updated
- PF1, PF2, PF3, PF4 and PF5 = those are the new values to the variables
In case more variables are needed, or check their meaning, please refer to TPX User Variables (by Variable Name)
In case there is any question, contact TPX support at Broadcom.