Resources



Problem Fix Number: 4944

For SYSTEM 2000 Version: 1.0

Problem Status: ZD -- V1 FFD1

Description of Problem:

B37 ABEND IN COBOL PRECOMPILER WHEN ERRONEOUS NUMERIC DIGIT LEFT IN COLUMN 72 OF 'COMMBLOCK OF' STATEMENT.


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 V1.0    BUG 4944  MVS                                                    
 *                                                                               
 * V1 BUG FIX 4944                                                               
 *                                                                               
 * THIS BUG FIX WILL ELIMINATE A LOOP IN THE COBOL PRE-COMPILER                  
 * THAT CAUSES A B37 ABEND ON THE SYSUT2 FILE.  THE LOOP OCCURS                  
 * WHEN AN ERRONEOUS NUMERIC DIGIT IS LEFT IN COLUMN 72 OF THE                   
 * 'COMMBLOCK OF' STATEMENT.                                                     
 *                                                                               
 * RELEASE V1 ZAP                                                                
 *                                                                               
 NAME PRCOMC SETAB                                                               
 VER 04BE 4079,C5F6                                                              
 REP 04BE 47F0,3348                                                              
 *                                                                               
 NAME PRCOMC ZAREA                                                               
 VER 0000 0000,0000,0000,0000,0000,0000                                          
 REP 0000 4079,C5F6,4079,C5F4,47F0,C4C2                                          
 *                                                                               
 CHECKSUM DB88C92B                                                               

End of Zap Deck