CASE WHEN INSTR(TRANSLATE(foo, 
  'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ', 
  'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX'),    
'X')>0
 THEN 'Alpha' ELSE 'No Alpha' END