PROGRAM FILE 68: EXCEPTION - SUBSCRIPT TOO LARGE FOR                            
        ONE-DIMENSIONAL ARRAY, WITH DIM AND OPTION BASE 1.                      
    ANSI STANDARD 6.5, 15.2, 15.4                                               
                                                                                
SECTION 68.1: EXCEPTION - SUBSCRIPT TOO LARGE FOR                               
        ONE-DIMENSIONAL ARRAY, WITH DIM AND OPTION BASE 1.                      
                                                                                
THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR                         
RECOGNIZES A FATAL EXCEPTION WHEN A SUBSCRIPT EXCEEDS                           
THE EXPLICIT UPPER BOUND OF AN ARRAY, WITH AN OPTION                            
STATEMENT PRESENT.                                                              
                                                                                
TO PASS THIS TEST:                                                              
                                                                                
    1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE                              
       DISPLAYED, AND                                                           
                                                                                
    2) THE PROGRAM MUST TERMINATE UPON USE OF THE ILLEGAL                       
       SUBSCRIPT.                                                               
                                                                                
                               BEGIN TEST.                                      
                                                                                
ABOUT TO ASSIGN TO A( 5 ). ASSIGNMENT SHOULD BE OK.                             
HAVE ASSIGNED  15  TO A( 5 ).                                                   
                                                                                
ABOUT TO ASSIGN TO A( 6 ). ASSIGNMENT SHOULD BE OK.                             
HAVE ASSIGNED  14  TO A( 6 ).                                                   
                                                                                
ABOUT TO ASSIGN TO A( 7 ). ASSIGNMENT SHOULD BE OK.                             
HAVE ASSIGNED  13  TO A( 7 ).                                                   
                                                                                
ABOUT TO ASSIGN TO A( 8 ). *** EXCEPTION SHOULD OCCUR NOW ***                   
                                                                                
ERROR in line 300: SUBSCRIPT OUT OF RANGE A(8)                                  
