PC & Mediji 2002 March/PCM_0203.iso/MEDIA/PREIZKUSNI/WinIVR.msi/Instal01.cab/_48EADAE697834AD79691DBE84629B5E2

Text File | 2002-01-30 | 4KB | 173 lines

object IVRVar
  object IVRVariant
    Name = 'CallerID'
    InitValue = '""'
  end
  object IVRVariant
    Name = 'HasCalled'
  end
  object IVRDataBase
    Name = 'GetCallingTimes'
    ConnectionString = 'FILE NAME=CallingTimes.udl'
    CommandType = cmdText
    CommandText = 'Select * from Caller  where CallerID=:CallerID'
  end
  object IVRDataBase
    Name = 'UpdateCallingTimes'
    ConnectionString = 'FILE NAME=CallingTimes.udl'
    CommandType = cmdText
    CommandText =
      'Update Caller Set Callingtimes=:CallingTimes where CallerID=:Cal' +
      'lerID'
  end
  object IVRVariant
    Name = 'InsertCallingTimes'
    InitValue = '"Insert into Caller values(""'
  end
  object IVRVariant
    Name = 'CallingTimes'
    InitValue = 1
  end
  object IVRVariant
    Name = 'SpeakText'
    InitValue = '"You have called "'
  end
end
object IVRBegin
  object IVRRing
    Save = 'CallerID'
    Times = 2
  end
  object IVRAnswer
  end
  object IVROperator
    Enabled = False
    Save = 'CallerID'
    Operate = optAssign
    Dest = '"1234567890"'
  end
  object IVRParam
    DataBase = 'GetCallingTimes'
    Param = '"CallerID"'
    Value = 'CallerID'
  end
  object IVRDBOperate
    DataBase = 'GetCallingTimes'
    Operate = dbOpen
    Save = 'HasCalled'
  end
  object IVROperator
    Save = 'HasCalled'
    Operate = optGreatEqual
    Source = 1
    Dest = 'HasCalled'
  end
  object IVRIf
    Condition = 'HasCalled'
    object IVRTrue
      object IVRField
        DataBase = 'GetCallingTimes'
        Field = '"CallingTimes"'
        Save = 'CallingTimes'
      end
      object IVROperator
        Save = 'CallingTimes'
        Operate = optAdd
        Source = 1
        Dest = 'CallingTimes'
      end
      object IVRParam
        DataBase = 'UpdateCallingTimes'
        Param = '"CallingTimes"'
        Value = 'CallingTimes'
      end
      object IVRParam
        DataBase = 'UpdateCallingTimes'
        Param = '"CallerID"'
        Value = 'CallerID'
      end
      object IVRDBOperate
        DataBase = 'UpdateCallingTimes'
        Operate = dbExecute
      end
    end
    object IVRFalse
      object IVRDBOperate
        DataBase = 'GetCallingTimes'
        Operate = dbClose
      end
      object IVROperator
        Save = 'InsertCallingTimes'
        Operate = optAdd
        Source = 'CallerID'
        Dest = 'InsertCallingTimes'
      end
      object IVROperator
        Save = 'InsertCallingTimes'
        Operate = optAdd
        Source = '"",1)"'
        Dest = 'InsertCallingTimes'
      end
      object IVRCommand
        DataBase = 'GetCallingTimes'
        CommandText = 'InsertCallingTimes'
        CommandType = cmdUnknown
      end
      object IVRDBOperate
        DataBase = 'GetCallingTimes'
        Operate = dbExecute
      end
    end
  end
  object IVRSpeech
    Interruptible = True
    Content = '"Your phone number is"'
    SupportXML = False
    SpeechType = stText
  end
  object IVRIf
    Condition = 'CallerID'
    object IVRTrue
      object IVRSpeech
        Interruptible = True
        Content = 'CallerID'
        SupportXML = True
        SpeechType = stContext
        XMLTag = 'Number_Digit'
      end
    end
    object IVRFalse
      object IVRSpeech
        Interruptible = True
        Content = '"empty"'
        SupportXML = False
        SpeechType = stText
      end
    end
  end
  object IVRString
    Save = 'CallingTimes'
    Operate = strToString
  end
  object IVROperator
    Save = 'SpeakText'
    Operate = optAdd
    Source = 'CallingTimes'
    Dest = 'SpeakText'
  end
  object IVROperator
    Save = 'SpeakText'
    Operate = optAdd
    Source = '" times."'
    Dest = 'SpeakText'
  end
  object IVRSpeech
    Interruptible = True
    Content = 'SpeakText'
    SupportXML = False
    SpeechType = stText
  end
end
object IVREnd
end