The following infoboxes are supplied for this application:

; VRECORD.IIF Start Voice-file Record operation

; =============================================

 

$type decision           ; this file is named in the generated FS file

$set_var PAUSE_TIME 2    ; pause before speaking intro

$next_box VRECORD1       ; start initial prompt

 

; VRECORD1.IIF Initial prompt to record voice file

; ================================================

 

$type record              ; record a new message or prompt

$image_desc standard      ; prompt this recording with VRECORD1.WAV

$record_limit 90          ; limit recording time

$set_var RECORDING_FORMAT @RECFORMAT  ; get format from user profile variable

$record_nextmsg @~RECNEXTFILE   ; double-expand filename containing file number

$next_box VRECORD2        ; go to report the recording

$error_exit s:VOICE_EXIT  ; give up on error (see trace for details)

 

; VRECORD2.IIF Report that a recording has been made to VRECORD.exe

; =================================================================

 

$type decision

; reporting to VRECORD.exe not yet implemented

$next_box VRECORD3    ; go to get option

 

; VRECORD3.IIF Prompt for action after recording

; ==============================================

 

$type question

$image_desc standard       ; prompt VRECORD3.IIF (script in VRECORD3.TXT)

$get_var OPTION 1 1 * #    ; get single DTMF key

$validate none noconfirm   ; suppress confirmation of entry

$next_box VRECORD4         ; analyze DTMF selection

$error_exit VRECORD4       ; same on error

 

; VRECORD4.IIF analyze user's option selection

; ============================================

 

$type decision           ; process selection

$if @OPTION = 1

  $next_box VRECORD5     ; replay the message

$elseif @OPTION = 2

  $next_box VRECORD1     ; record again

$else

  $next_box s:VOICE_EXIT ; all done

$endif

 

; VRECORD5.IIF Play back last recorded message

; ============================================

 

$type replay            ; replays last recording

$next_box VRECORD3      ; go back to request action

$error_exit VRECORD3    ; same on error