PROGRAM FILE 96: EXCEPTION - NUMERIC UNDERFLOW WHEN                             
        READING DATA CAUSES REPLACEMENT BY ZERO.                                
    ANSI STANDARD 5.6, 14.4                                                     
                                                                                
SECTION 96.1: EXCEPTION - NUMERIC UNDERFLOW WHEN                                
        READING DATA CAUSES REPLACEMENT BY ZERO.                                
                                                                                
TO PASS THIS TEST:                                                              
                                                                                
    1) A MESSAGE IDENTIFYING THE EXCEPTION MAY BE                               
       DISPLAYED (NOT MANDATORY), AND                                           
                                                                                
    2) ZERO MUST BE SUPPLIED AS THE VALUE                                       
       OF THE CONSTANT                                                          
                                                                                
                BEGIN TEST.                                                     
                                                                                
RESULTING VALUE = 0                                                             
                                                                                
***  TEST PASSED  ***                                                           
                                                                                
                 END TEST.                                                      
                                                                                
END PROGRAM 96                                                                  
