*COMDECK USERITMS 
*CALL SUPMSG
*CALL SMAPPL
