REPORT  ZRICO_SPEAK. 
  
include ole2incl. 
  
data:ole type ole2_object, 
     voice type ole2_object. 
  
parameters:p_text type string. 
  
start-of-selection. 
  
create object voice 'SAPI.SpVoice'. 
  
call method of voice 'Speak' = ole 
  
exporting #1 = p_text.