*COMDECK MD4ASSEM 
*CALL MODE4ISP
*CALL MODE4ITP
*CALL MODE4BTP
*CALL MODE4CAT
*CALL ASKASK
*CALL ASKBCD
*CALL BCDASK
*CALL ASKPRT
*CALL ASKFLD
*IF -DEF,CSET63 
*CALL ASKDC4
*CALL BCDDC4
*CALL DC4ASK
*CALL DC4BCD
*ENDIF,CSET63 
*IF DEF,CSET63
*CALL ASKDC3
*CALL BCDDC3
*CALL DC3ASK
*CALL DC3BCD
*ENDIF,CSET63 
