*DECK COBLP 
          PRGM COBLP; 
  
 #        COBLP - SETS UP LITERAL POOLER INFO                          #
  
          BEGIN 
          XREF
              BEGIN 
              PROC LP;
              PROC OVERRTN;   #RETURN FROM OVERLAY# 
              END 
  
  
 #     START OF EXECUTION                                              #
  
          LP;     #EXECUTE LITERAL POOLER#
          OVERRTN;
          END 
          TERM
