9 164 MAKE_SOUND

LANSA Technical

9.164 MAKE_SOUND

Þ Note: Built-In Function Rules.

Causes a standard sound to be queued.

For use with

LANSA for i

NO

 

Visual LANSA for Windows

YES

 

Visual LANSA for Linux

NO

 

 

 

Arguments

No

Type

Req/ Opt

Description

Min Len

Max Len

Min Dec

Max Dec

1

A

Opt

Sound identifier.

The value specified should be one of :

'BEEP' - Standard beep using the computer speaker

'ASTERISK' - System configured Asterisk sound.

'EXCLAMATION' - System configured Exclamation sound.

'HAND' - System configured Hand sound.

'QUESTION' - System - configured Question sound.

'DEFAULT' - System configured Default sound.

If this argument is not specified or is specified incorrectly the default value 'BEEP' will be used.

1

20

 

 

 

 

Return Values

There are no Return Values.

Technical Notes

  • After queuing the sound the MAKE_SOUND Built-In Function returns control to the calling function. The sound will be played asynchronously.
  • If the system cannot play the specified sound it attempts to play the system default sound. If it cannot play the system default sound, the function produces a standard beep sound through the computer speaker.

Example

This example is for all possible sounds as not all are available with every PC. The actual sound you hear will vary from PC to PC. (The default sound BEEP is particularly recalcitrant.)

function options(*DIRECT)
begin_loop
change field(#STD_TEXT) to(ASTERISK)
use builtin(MAKE_SOUND) with_args(ASTERISK)
request fields(#STD_TEXT)
change field(#STD_TEXT) to(EXCLAMATION)
use builtin(MAKE_SOUND) with_args(EXCLAMATION)
request fields(#STD_TEXT)
change field(#STD_TEXT) to(BEEP)
use builtin(MAKE_SOUND) with_args(BEEP)
request fields(#STD_TEXT)
change field(#STD_TEXT) to(HAND)
use builtin(MAKE_SOUND) with_args(HAND)
request fields(#STD_TEXT)
change field(#STD_TEXT) to(QUESTION)
use builtin(MAKE_SOUND) with_args(QUESTION)
request fields(#STD_TEXT)
change field(#STD_TEXT) to(DEFAULT)
use builtin(MAKE_SOUND) with_args(DEFAULT)
request fields(#STD_TEXT)
end_loop