*DECK COBDP 
          PRGM COBDP; 
  
 #        COBDP - SET UP DATA DIVISION PARSER INFO                     #
  
          BEGIN 
          XREF
              BEGIN 
              PROC DP;
              PROC OVERRTN;   #RETURN FROM OVERLAY# 
              END 
  
  
 #     START OF EXECUTION                                              #
  
          DP;     #EXECUTE DATA DIV PARSER# 
          OVERRTN;
          END 
          TERM
