*DECK COBRP 
          PRGM COBRP; 
  
 #        COBRP - SETS UP REPORT PARSER  INFO                          #
  
          BEGIN 
          XREF
              BEGIN 
              PROC RP;
              PROC LDRPOVL;   #SAVES LOVERS RETURN ADDRESS# 
              PROC RPRTN;     #RETURN FROM ROOT OVERLAY#
              END 
  
  
 #     START OF EXECUTION                                              #
  
          #SAVE LOVERS RETURN ADDRESS INTO OVERLAY 0,0 BECAUSE RP # 
          #WILL USE LOVER TO LOAD THE SECONDARY OVERLAYS.         # 
          LDRPOVL;
          RP;     #EXECUTE REPORT PARSER #
          RPRTN;
          END 
          TERM
