﻿object TFloArchive
  FIDS = '{3C934CD0-20DC-490E-80B5-6A489559B1F4}'
  FolderFIDS = '{00000000-0000-0000-0000-000000000000}'
  ModuleName = 'Numeric Functions Check - (Action)'
  DBVersion = 2
  MultipleModules = True
  object oActionManager1: TFloActionManager
    FIDS = '{CCCCC845-526D-429A-8CD9-270499958C4C}'
    FolderFIDS = '{00000000-0000-0000-0000-000000000000}'
    ModuleName = 'Numeric Functions Check'
    ScheduleType = fstNone
    LinkedAction = 0
    LinkedActionFIDS = '{00000000-0000-0000-0000-000000000000}'
    SchedulePeriod = fspDaily
    RunOnceImmediately = False
    RepeatInterval = 1
    RepeatUOM = 1
    DayInterval = 1
    MonthDay = 1
    EnableReoccurring = False
    WeekDays = [fdMonday, fdTuesday, fdWednesday, fdThursday, fdFriday]
    MonitorPOP = False
    MonitorFTP = False
    MonitorDX = False
    MonitorLAN = False
    MonitorHTTP = False
    IgnoreCancel = False
    StopButIndicateSuccess = False
    ReprocessUntilError = False
    AllowPause = False
    CacheAction = False
    IgnoreErrorsBetweenPartners = True
    RunPerPartner = True
    DeterminePartnerFromFile = True
    ProcessExisting = True
    SaveLogStatuses = [flsOK, flsWarning, flsError]
    SendNotificationStatuses = [flsWarning, flsError]
    AllowMultiThreading = False
    MaxThreadsPerAction = 0
    UseDefaultEmail = True
    EDINetworkId = -1
    ActionPurpose = fptExport
    MainDBConID = -1
    MainDBConFIDS = '{00000000-0000-0000-0000-000000000000}'
    PrecheckData = False
    LogSQL = True
    LogFileEvents = True
    LogInfoItems = True
    LogWebServices = True
    UseUniqueSubActionLogs = False
    object FloActionCustomScript3: TFloActionCustomScript
      IgnoreEmptySourceData = False
      ActionManager = oActionManager1
      ActionName = 'Checking Values'
      ActionType = fatCustomScript
      ActionID = -1
      ActionFIDS = '{00000000-0000-0000-0000-000000000000}'
      ItemActive = True
      Source = FloSourceDB9
      object FloScriptItem3: TFloScriptItem
        FriendlyName = 'New Script Item'
        Formula.Strings = (
          'procedure ScriptEvent (var Value : variant);'
          'begin'
          '  LogInfo('#39'Testing ROUND'#39');'
          '  LogInfo(IntToStr(Round(123.455)));   // result is 123'
          '  LogInfo(IntToStr(Round(65.51)));     // result is 66'
          '  LogInfo(IntToStr(Round(8622.143)));  // result is 8622'
          '  LogInfo(IntToStr(Round(7.74)));      // result is 8'
          '  //LogInfo(IsNumber('#39'abc123'#39'));      // returns FALSE'
          '  //LogInfo(IntToStr(IsNumber('#39'758'#39')));         // returns TRUE'
          '  //LogInfo(IntToStr(IsNumber('#39'$523.61'#39')));     // returns FALSE'
          
            '  //LogInfo(IntToStr(IsCurrencyNumber('#39'abc123'#39')));      // retur' +
            'ns FALSE'
          
            '  //LogInfo(IntToStr(IsCurrencyNumber('#39'758'#39')));         // retur' +
            'ns TRUE'
          
            '  //LogInfo(IntToStr(IsCurrencyNumber('#39'$5,323.61'#39')));   // retur' +
            'ns TRUE'
          '  LogInfo('#39'Testing ROUND2'#39')'
          '  LogInfo(FloatToStr(Round2(666.777,2)));'
          
            '  LogInfo(FloatToStr(Round2(745.454,2)));     // result is 745.4' +
            '5'
          
            '  LogInfo(FloatToStr(Round2(745.455,2)));     // result is 745.4' +
            '5'
          
            '  LogInfo(FloatToStr(Round2(745.456,2)));     // result is 745.4' +
            '6'
          
            '  LogInfo(FloatToStr(Round2(745.4558,3)));    // result is 745.4' +
            '56'
          
            '  LogInfo(FloatToStr(Round2(745.4553,3)));    // result is 745.4' +
            '55'
          
            '  LogInfo(FloatToStr(Round2(745.554,2)));     // result is 745.5' +
            '5'
          
            '  LogInfo(FloatToStr(Round2(745.555,2)));     // result is 745.5' +
            '5'
          
            '  LogInfo(FloatToStr(Round2(745.556,2)));     // result is 745.5' +
            '6'
          
            '  LogInfo(FloatToStr(Round2(745.5558,3)));    // result is 745.5' +
            '56'
          
            '  LogInfo(FloatToStr(Round2(745.5553,3)));    // result is 745.5' +
            '55'
          '  LogInfo('#39'Testing ROUND2UP'#39')'
          
            '  LogInfo(FloatToStr(Round2Up(123.454,2)));     // result is 123' +
            '.45'
          
            '  LogInfo(FloatToStr(Round2Up(123.455,2)));     // result is 123' +
            '.46'
          
            '  LogInfo(FloatToStr(Round2Up(123.465,2)));     // result is 123' +
            '.47'
          
            '  LogInfo(FloatToStr(Round2Up(123.4558,3)));    // result is 123' +
            '.456'
          
            '  LogInfo(FloatToStr(Round2Up(123.4553,3)));    // result is 123' +
            '.455'
          
            '  LogInfo(FloatToStr(Round2Up(745.554,2)));     // result is 745' +
            '.55'
          
            '  LogInfo(FloatToStr(Round2Up(745.555,2)));     // result is 745' +
            '.56'
          
            '  LogInfo(FloatToStr(Round2Up(80.374,2)));      // result is 80.' +
            '37'
          
            '  LogInfo(FloatToStr(Round2Up(80.4566,3)));     // result is 80.' +
            '46'
          
            '  LogInfo(FloatToStr(Round2Up(80.5553,3)));     // result is 80.' +
            '56'
          '  LogInfo('#39'Testing EXTRACTNUMBER'#39')'
          
            '  LogInfo(FloatToStr(ExtractNumber('#39'$5,232.46'#39')));      // retur' +
            'ns 5232.46'
          
            '  LogInfo(FloatToStr(ExtractNumber('#39'-$5,232.46'#39')));     // retur' +
            'ns -5232.46'
          
            '  LogInfo(FloatToStr(ExtractNumber('#39'ab86.9b6'#39')));       // retur' +
            'ns 86.96'
          
            '  LogInfo(FloatToStr(ExtractNumber('#39'xyz123.67abc'#39')));   // retur' +
            'ns 123.67'
          
            '  LogInfo(FloatToStr(ExtractNumber('#39'ww987$#()'#39')));      // retur' +
            'ns 987'
          'end;'
          '')
        CompiledStatus = 2
      end
    end
    object TFloSourceManager
      ActionManager = oActionManager1
      object FloSourceDB9: TFloSourceDB
        SourceName = '_Blank Statelake'
        SourceType = fstDatabase
        SourceID = -1
        DBConID = 0
        FileConID = -1
        SourceFIDS = '{5B5F7F00-802B-4292-A4DD-12935B01F4C4}'
        FileConFIDS = '{00000000-0000-0000-0000-000000000000}'
        WebConFIDS = '{00000000-0000-0000-0000-000000000000}'
        RuntimePopup = False
        AllowDBChange = False
        UniqueTransaction = False
        PrecheckData = False
        object TFloDBConLink
          DBConId = -1
          DBConFIDS = '{DFB9BB2A-6CC5-4002-91A6-1EADD2E7A22C}'
          DBConName = '_Self'
        end
      end
    end
  end
  object oDBSource1: TFloDBSource
    FIDS = '{5B5F7F00-802B-4292-A4DD-12935B01F4C4}'
    FolderFIDS = '{00000000-0000-0000-0000-000000000000}'
    ModuleName = '_Blank Statelake'
    DBConID = 0
    FileConID = -1
    FileConFIDS = '{00000000-0000-0000-0000-000000000000}'
    WebConFIDS = '{00000000-0000-0000-0000-000000000000}'
    DisableStringTrim = True
    TruncateStrings = False
    IDManagement = fimNone
    UpdateIDFields = False
    UpdateStatus = rhUpdate
    SaveNullFieldAsBlank = False
    SaveBlankFieldAsNull = False
    ForceNullToSQL = False
    UseInMemoryCheck = False
    AllowDirtyReadsForChecks = False
    DisableTransactions = False
    object TFloDBConLink
      DBConId = -1
      DBConFIDS = '{DFB9BB2A-6CC5-4002-91A6-1EADD2E7A22C}'
      DBConName = '_Self'
    end
  end
  object FloDaDataModule1: TFloDaDataModule
    SingleFileMode = False
  end
  object FloDaDataModule2: TFloDaDataModule
    SingleFileMode = False
  end
  object oDBCon1: TFloDBCon
    FIDS = '{DFB9BB2A-6CC5-4002-91A6-1EADD2E7A22C}'
    FolderFIDS = '{00000000-0000-0000-0000-000000000000}'
    ModuleName = '_Self'
    ImportAction = iaAddOrIgnore
    ConnectionType = ctMSSQL
    SQLType = sqSQL2
    ConnectionPurpose = -1
    Hostname = 'WSAMZN-BKV64R4I\SQLEXPRESS'
    Database = 'Statelake_Training'
    IsTestDB = False
    SingleQuoteDates = True
    UseASAlias = False
    ForceAlias = False
    UseSingleBackQuote = False
    MaxFieldAlias = 35
    IsPersistant = False
    MinConnections = 0
    MaxConnections = 0
    MaxTranPerUpdate = 0
    Initialised = False
    HostDB = hdConfig
    DisableTransactions = False
  end
  object FlwAuthenticator1: TFlwAuthenticator
    FIDS = '{24B0F525-FEAA-4BFF-A01F-41612B45F588}'
    FolderFIDS = '{00000000-0000-0000-0000-000000000000}'
    ModuleName = 'New Authenticator'
  end
end
26f29334ab2cf0cf20917d72e682fac0
