Resources



Problem Fix Number: 4750

For SYSTEM 2000 Version: 12.0

Problem Status: ZD -- ZAP DISTRIBUTED

Description of Problem:

MUSTATS COMMAND GETS AN 0C4 ABEND WHEN DOING A #USER COMMAND.


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 R12.0   BUG 4750  MVS                                                    
 *                                                                               
 * THE MUSTATS MODULE DOES NOT ALLOW FOR ALL SETTINGS OF THE JOBWAIT             
 * FLAG.  AN ADDRESS TABLE IS USED TO ACQUIRE CHARACTER REPRESENTATIONS          
 * OF THE FLAG MEANINGS.  THE TABLE IS NOT LONG ENOUGH.  INSTEAD OF              
 * PICKING UP AN ADDRESS, A CHARACTER STRING IS PICKED UP AND USED AS            
 * AN ADDRESS, THUS THE 0C4 THAT RESULTS.                                        
 *                                                                               
 * THE FOLLOWING FIX WILL CHANGE THE ALGORITHM FOR LOCATING THE CHARACTER        
 * STRINGS AND WILL REDEFINE THE CHARACTER STRINGS IN PATCH TO ALLOW FOR         
 * JOBWAIT CODES UP TO DECIMAL 48 (H'30').                                       
 *                                                                               
 NAME S2000 MUSTATS                                                              
 VER 1102 1266,4780,C0FE,5876,9A88                                               
 REP 1102 58F0,B0F0,47F0,F270                                                    
 *                                                                               
 NAME S2000 MUPATCH                                                              
 VER 0270 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0280 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 0290 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 02A0 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 02B0 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 02C0 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 02D0 0000,0000,0000,0000,0000,0000,0000,0000                                
 VER 02E0 0000,0000,0000,0000,0000                                               
 REP 0270 1266,4780,C0FE,8960,0001,4176,F282,47F0                                
 REP 0280 C0F4,C5D9,D960,F0F0,4040,C5D9,D960,F0F4                                
 REP 0290 4040,C2E4,C6C6,C5D9,4040,C4C1,E3C1,C2C1                                
 REP 02A0 E2C5,D6E5,C5D9,D3C1,E840,E3C1,D7C5,4040                                
 REP 02B0 4040,D7C1,C4C1,E440,4040,E4D7,4040,4040                                
 REP 02C0 4040,E4D7,C4E3,40D3,D6C7,E2E4,C240,E3C1                                
 REP 02D0 E2D2,C5D9,D960,F4F0,4040,C5D9,D960,F4F4                                
 REP 02E0 4040,C5D9,D960,F4F8,4040                                               
 *                                                                               
 CHECKSUM 508353AA                                                               

End of Zap Deck