100 RUN DFU, GL310D 110 RUN COMP,CLRGLA/G 120 RUN COMP,CLRGLT/G 130 DE INIT3/S 140 R COMP,PGMEND,TERID/G 150 ; 160 ; INIT3 / GL - 310 170 ; 180 ; DATE: 07/01/77 190 ; 200 ; BATCH FOR INITIALIZING THE GLAMAS/1 & YTDGLT/2