R17 :  SELECT CASE
******************

**status** : mentioned in preamble

Use SELECT CASE when possible instead of IF/ELSEIF/ELSE/ENDIF.