%MACRO MLTRXY06(ICD9=);
 %**********************************************************************
 ***********************************************************************

 1  MACRO NAME:      MLTRXY06
 2  PURPOSE:         to assign multiple RXs for some ICD9s codes for
                     2006 RxHCC software
 **********************************************************************;
   SELECT(&ICD9);
     WHEN('40403','40413','40493')  RXCC91  = 1;
     OTHERWISE;
   END;
 %MEND MLTRXY06;