1 2 /* BEGIN INCLUDE FILE ... cobol_type3.incl.pl1 */ 3 /* Last modified on 11/19/76 by ORN */ 4 5 /* 6 A type 3 alphanumeric literal token is entered into the minpral file by the 7 lexical analysis phase for each alphanumeric literal encountered in the 8 source program. 9 */ 10 11 dcl alit_ptr ptr; 12 13 /* BEGIN DECLARATION OR TYPE3 (ALPHANUMERIC LITERAL) TOKEN */ 14 dcl 1 alphanum_lit based (alit_ptr), 15 %include cobol_TYPE3; 16 /* END DECLARATION OF TYPE3 (ALPHANUMERIC LITERAL) TOKEN */ 17 18 /* END INCLUDE FILE ... cobol_type3.incl.pl1 */ 19