PROGRAM FILE 203: EFFECT OF ZONES AND MARGIN ON PRINT.                          
    ANSI STANDARD 12.4, 12.2                                                    
                                                                                
THIS TEST IS CONCERNED WITH THE VARIOUS RULES GOVERNING THE                     
INTERACTION OF ZONE-WIDTH, MARGIN-WIDTH, COLUMNAR POSITION,                     
AND PRINT-SEPARATORS AS DESCRIBED IN THE STANDARD.                              
                                                                                
PLEASE ENTER ZONE-WIDTH FOR THIS IMPLEMENTATION.                                
? 15                                                                            
PLEASE ENTER MARGIN FOR THIS IMPLEMENTATION.                                    
? 80                                                                            
PLEASE ENTER NUMBER OF PRINT ZONES ON A LINE.                                   
? 6                                                                             
                                                                                
THROUGHOUT THESE TESTS, PAIRS OF OUTPUTS WILL BE PRINTED.                       
THE FIRST OF WHICH IS GENERATED ACCORDING TO THE INFORMATION                    
JUST SUPPLIED, AND THE SECOND OF WHICH REPRESENTS THE                           
FEATURE BEING TESTED. THESE TWO OUTPUTS MUST BE IDENTICAL                       
FOR THE TEST TO PASS.                                                           
                                                                                
SECTION 203.1: COMMA ADVANCES COLUMNAR POSITION TO NEXT                         
        PRINT-ZONE.                                                             
                                                                                
                    BEGIN TEST.                                                 
                                                                                
COMMA ADVANCED TO THE BEGINNING OF EACH OF THE  6  PRINT ZONES:                 
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 1                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
A              A              A              A              A              B    
A              A              A              A              A              B    
                                                                                
PRINT-STATEMENT CONTAINING ONLY A COMMA ADVANCES TO NEXT PRINT-ZONE:            
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 2                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
C                             D                                                 
C                             D                                                 
                                                                                
IF COLUMNAR POSITION IS THE LAST POSITION IN A ZONE,                            
A COMMA ADVANCES ONE SPACE TO THE NEXT ZONE:                                    
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 3                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
             E F                                                                
             E F                                                                
                                                                                
IF COLUMNAR POSITION IS THE FIRST POSITION IN A ZONE,                           
A COMMA ADVANCES ONE FULL ZONE:                                                 
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 4                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
              G               H                                                 
              G               H                                                 
                                                                                
LEADING COMMAS IN A PRINT-STATEMENT SKIP PRINT-ZONES:                           
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 5                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
                              I                                                 
                              I                                                 
                                                                                
IF ALL THE ABOVE PAIRS ARE IDENTICAL, THEN                                      
***  TEST PASSED  ***                                                           
                                                                                
                  END TEST.                                                     
                                                                                
                                                                                
SECTION 203.2: INTERACTION OF TAB AND MARGIN.                                   
                                                                                
                  BEGIN TEST.                                                   
                                                                                
                                                                                
TABBING TO A POSITION < COLUMNAR POSITION FORCES A NEW LINE:                    
                                                                                
THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS                        
SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 1                           
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
    A                                                                           
    B                                                                           
    A                                                                           
    B                                                                           
                                                                                
TABBING TO A POSITION >= COLUMNAR POSITION DOES NOT                             
FORCE A NEW LINE:                                                               
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 2                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
    CD                                                                          
    CD                                                                          
                                                                                
TABBING TO A POSITION, N > MARGIN, M, CAUSES TAB TO                             
N - M*INT((N-1)/M):                                                             
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 3                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
  E                                                                             
  E                                                                             
                                                                                
IF ALL THE ABOVE PAIRS ARE IDENTICAL, THEN                                      
***  TEST PASSED  ***                                                           
                                                                                
                  END TEST.                                                     
                                                                                
                                                                                
SECTION 203.3: MARGIN OVERFLOW.                                                 
                                                                                
                  BEGIN TEST.                                                   
                                                                                
IF A PRINT-ITEM DOESN'T FIT IN REMAINDER OF CURRENT LINE,                       
IT FORCES A NEW LINE BEFORE PRINTING:                                           
                                                                                
THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS                        
SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 1                           
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
                                                                              A 
BC                                                                              
                                                                              A 
BC                                                                              
                                                                                
FULL LENGTH OF MARGIN IS USED BEFORE FORCING NEW LINE:                          
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 2                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
                                                                              DE
F                                                                               
                                                                              DE
F                                                                               
                                                                                
FILL RIGHTMOST POSITION OF LAST ZONE:                                           
                                                                                
THE TWO LINES FOLLOWING THE COLUMN NUMBERS SHOULD BE                            
IDENTICAL, CASE # 3                                                             
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
                                                                               G
                                                                               G
                                                                                
IF COLUMNAR POSITION IS IN LAST ZONE, A COMMA FORCES A NEW LINE:                
                                                                                
THE FIRST TWO LINES (1 & 2) FOLLOWING THE COLUMN NUMBERS                        
SHOULD BE IDENTICAL TO THE NEXT TWO (3 & 4), CASE # 4                           
0000000001111111111222222222233333333334444444444555555555566666666667777777777 
1234567890123456789012345678901234567890123456789012345678901234567890123456789 
H                                                                               
I                                                                               
H                                                                               
I                                                                               
                                                                                
IF ALL THE ABOVE PAIRS ARE IDENTICAL, THEN                                      
***  TEST PASSED  ***                                                           
                                                                                
                  END TEST.                                                     
                                                                                
                                                                                
END PROGRAM 203                                                                 
                                                                                
Program interrupted at line 1990                                                
