Resources



Problem Fix Number: 4765

For SYSTEM 2000 Version: 12.0

Problem Status: ZC (Zap Coded) -- Fix has received limited testing

Description of Problem:

R12.0 CICS 3.3 COMMAND LEVEL PROGRAMS GET RC=88 FOR NON-PRIVILEGED USERSAFTER MULTI-USER S2KCOM FILE DATA CHANGES (I.E. MULTI-USER IS BROUGHT D OWN AN


Download Fix:

Note:   Please send email to s2k@sas.com telling us which problem fixes you have downloaded so we can keep track of the fixes at your site in case questions or problems arise.


Top of Zap Deck:

 *  IBM V12.0   BUG 4765  OS                                                     
 *  IBM R12.0   BUG 4765  OS                                                     
 *                                                                               
 * REQUIRES B4707 TO APPLY PROPERLY                                              
 *                                                                               
 * PLEX COMMANDS GET RC=88 WHEN S2KCOM FILE MUST BE READ OR RE-READ              
 * SET DATASET AND SET FILE COMMANDS ARE PRIVILEGED COMMANDS AND FAIL            
 *                                                                               
 * APPLY FIX TO S2KADRC AND PLXFRMT MODULES FROM THE CICS IFSOURCE LIBRARY       
 * THEN RUN IFSOURCE JOBS JCLCSCF AND JCLCPLEX TO COMPILE THESE MODULES          
 *                                                                               
 * APPLY FIX TO MACXAUTH MACRO IN THE MULTI-USER TEST LIBRARY                    
 * AFTER APPLYING MACXAUTH CHANGE:                                               
 *       RUN JCLMUIV TO UPDATE JCLXAUTH JOB                                      
 *       DELETE CURRENT S2KCOM FILE                                              
 *       CREATE NEW S2KCOM FILE WITH JCLXAUTH JOB                                
 *                                                                               
 ./ CHANGE NAME=S2KADRC,SEQFLD=738                                               
 * *06* 18MAR94 JGS B4765 REMOVE PRIVILEGED 'SET DATASET' COMMANDS  *06* 00009980
 *06* EXEC CICS SET DATASET(S2KCOM) CLOSED WAIT                     *06* 00123000
 *06* EXEC CICS SET DATASET(S2KCOM) OPEN                            *06* 00124000
 ./ CHANGE NAME=PLXFRMT,SEQFLD=738                                               
 * *23* 18MAR94 JGS B4765 REMOVE PRIVILEGED 'SET FILE' COMMANDS     *23* 00010930
 * *23*18* CHANGE DATASET TO FILE IN SET COMMANDS                   *23* 01390990
 *23* EXEC CICS SET FILE(S2KCOM) CLOSED WAIT                        *23* 01391000
 *23* EXEC CICS SET FILE(S2KCOM) OPEN                               *23* 01392000
 ./ CHANGE NAME=MACXAUTH,SEQFLD=736                                              
 .* *04* JGS 3-18-94 B4765 CHANGE S2KCOM FILE SHR OPTION TO 4            001010  
  PUNCH '         SHR(4) )                                             ' 006800  

End of Zap Deck