*DECK MD10CTX 
      PRGM MD10CTX; 
      CONTROL STEXT;
# *CALL MDDEFDCLS # 
*CALL MDDEFDCLS 
# *CALL MD10CDCLS # 
*CALL MD10CDCLS 
      TERM
