Please enable JavaScript.

Coggle requires JavaScript to display documents.

VArchive, Обозначения АБД - архивная БД ПБД - проектная БД (SQLite) …

- - - - Инициализируется обработчик NMEA сообщений MyNMEAWork
        
        PrepareToGetSignals() - обработчики сигналов и команд от valcom unit
        
        MainLogic.CheckDedicateAndConnect()
        Комментарий: "могу предположить что тут сделан механизм выбора подключения к внешнему серверу"
        Проверяет параметры URLLocal(не использует в этом методе) из VArchive.Settings, URLServ из SQLite.tblProgramDefaults. Данные из URLServ приравнивает WcfRemoteAdress, и часть с IP к DedicateDbServAddres.
        Проверяет параметр RemoteConnectionString (по документации связан с БД мониторинга), если он есть, его значение приравнивается к DedicateDbservAddres. Здесь же проверяются параметры FTP соединения
        
        MainLogic.CheckAndLoadBdLite
        (Почему не делать это раньше?)
        MainLogic.CheckAndLoadBdLite
        Создает папку VArchive, если ее нет
        Подгружает ПБД, если ее время более позднее чем _bdFileTimeс помощью метода LoadBdLite
        
        MainLogic.LoadBdLite
        Заполняет поле MyNsi, DByNumSignals(дискретные сигналы), AByNumSignals(аналоговые сигналы), AllUnits, AllSignals, AllCompareSignals, LogUnits, AlaUnits,
        EnableArchiveTransfer, PingRemArchiveSig, ArchiveTransferFinish, Persons, OsAddress
        
        MainLogic.InitOperData
      - MySync.Init
        ArchSync.DeleteOldFiles
        Удаляет файлы *.csv, .bin, если таковые присутствуют в папке VArchiveLocal
        ArchSync.CreateGetSockets
        Создает сокеты для PortTS и начинает асинхронное получение данных с колбэком ReadCallback
        CheckSingleStation
        проверяет по БД количество БВ в tblOs
        запускает ArchSync.CycleWork в новом потоке
        
        ArchSync.ReadCallback
        Раскладывает заголовок сообщения согласно документации, добавляет или обновляет информацию об источниках sources( другой БВ), запускает новое чтение
        
        ArchSync.CycleWork
        Если основной цикл не запущен(см. OnFinishArchBdLoad) задержка на 10 секунд
        иначе ArchSync.SyncArchs
        
        ArchSync.SyncArchs
        1.Если bhasact(есть активный источник, сообщение получено меньше 15 секунд) и !bHasReserv то bHasReserv= true пишем в лог SyncArcs Has reserv;
        2.Если главный архив и не пишем файлы, то для первого (inf) активного источника у которого есть флаг NEEDARCH:
        присваиваем этот источник объекту ArchNeedInfo и вызов метода WriteBdArchFiles(inf)
        3.Если нет активного источника и bHasReserv, то bHasReserv = false, пишем в лог SyncArcs No reserv
        Если не зашли в условие 2 или у ArchNeedInfo нет флага NEEDARCH или у ArchNeedInfo больше секунды назад обновлялась то обнуление флага WRITEARCH и BUSYARCH, ArchNeedInfo = null, bWriting = false, NumFilesToRead = 0
        
        ArchSync.WriteBdArchFiles(SourceInfo)
        Если у источника время LastAlarmTime или LastUnitTime >= текущим или нет соединения с АБД, то установка у MyFlag флага WRITEARCH;
        Установка флага BUSYARCH
        Вызов bdup.WriteBdArchFiles(ObjectId, папка с названием источника в VArchiveLocal, подключение к АБД, время последних сигнала/аварий (если они не старше недели от текущих, иначе недельное смещение от текущих))
        Папка с именем источника, которой лежат файлы, созданные в методе WriteBdArchFiles помещаются в zip и перемещаются в папку с именем источника
        
        BDUpdate.WriteBdArchFiles
        Если времена последних А/С равны записанным в АБД то выход из функции;
        В alarms1 сделаем выборку из АБД где аварии начались позже последней
        В alarms2 сделаем выборку аварий, которые появились в или раньше последней, но закончились или были просмотрены после времени последней
        Запишем alarms1 в файл alarms1{имя объекта}{номер месяца}, аналогично сделаем и с alarms2
        Сделаем выборку из SignalsArchN где TimeWrite > времени последнего сигнала, запишем эти значения в units{имя объекта}{номер месяца}
        Аналогично для выборок из NmeaArch (файл nmea{имяобъекта}, и SigArchHours и SigCurrentHours(сериализуются в hunits{имяобъекта}.bin
        
        Если StartState = WAIT_ARCH и !bUnpacking и есть источник с флагом WRITEARCH, то
        bUnpaking = true
        распаковка файлов c помощью метода UnpackFiles
        
        ArchSync.UnpackFiles
        Если в папке VArchiveLocal не существует папки с именем компьютера, то осуществляется попытка создать, если создать не получается, то OnSyncArchEnd()
        
        ArchSync.OnSyncArchEnd
        ArchRequestTime = MinValue
        Сброс флага NEEDARCH
        StartState=NO_WAIT
        bUnpaking = false
        FilesToUnpack = 0
        Вызов делегата SyncFinished
        
        1 more item...
        
        Если LoadFileFromSecond, то ok = true, заполняет массивы csv и bin файлов
        
        2 more items...
        
        CheckNet()
        Если сокеты созданы, то
        С помощью метода TransAlive создает и отправляет сообщение из документации
        иначе создает сокеты
        Создаем WCF сервисы (зачем в цикле?)
    - - LoadArchBd
        
        MainLogic.LoadArchBd
        
        BDUpdate.LoadBd(conn, Program.Config.ObjectId, ArchNsi)
        Заполняет поля в объекте MainLogic.ArchNsi: ObjectInfo, SignalInfo(список всех сигналов), SystList (список всех систем из tblHullSystem, также содержит сигналы относящиеся к этим системам), определение имен уставок и присвоение их имени соответствующим полям SignalInfo, заполнение списка Persons (список пользователей)
        
        BDUpdate.GetBDTimes
        Определяет время последней записи в SignalsArchN(краткосрочный архив сигналов) и Alarms(архив APS) и записывает их в поля lastAlarmTime и lastUnitTime
        
        Если MainLogic.ArchNsi.ObjectInfo равен NULL или в архивной БД(АБД) по objectinfo.nsiupdate или MainLogic.NsiUpdateTime (время модификации SQLite (ПБД)) больше времени в АБД objectinfo.nsiupdate(и оно не равно стандартному значению)
        И
        АБД является локальной БД или локальный архив главный
        ТО
        BdNsiSync.UpdateBdSync(conn)
        и обновим таймзону SetArchTimeZone
        
        BdNsiSync.UpdateBdSync(DbConnection conn)
        
        BDUpdate.UpdateBd - Перенос в АБД информации из ПБД: таблицы objectinfo, signals, hullsystem, personal
        
        BdNsiSync.UpdateCurrent
        добавление сигналов c флагом Restore и без флага Log из ПБД в АБД таблицу sigcurrentvalues
        
        BdNsiSync.UpdateCurrentHours
        добавление сигналов c флагом RunHours и c флагом Log из ПБД в АБД таблицу sigcurrentvalues
  - - - ArchSync.MakeArchSyncRequest
        Если у источника с самым маленьким временем старта время последней аварии больше моего или время последнего сигнала больше моего, то
        {
        StartState = WAIT_ARCH
        ArchRequestTime = DateTimeNow
        }
      - Если ArchRequestTime == DateTime.MinValue ТО
        {
        Если мой вычислитель галвный ТО
        ExtBdWork.ResetBDStart
        SyncArchFinished()
        }
        иначе
        для каждого юнита в AllUnits установить флаг bInited
        
        BdWorkExt.ResetBDStart
        Обновим Alarms в которых TimeEnd и TimeView равны NULL значением TimeBegin+1 sec
        
        MainLogic.SyncArchFinished
        (смотри связи в левой части)
    - - NotLongResponceReset()
        если ArchRequestTime больше начального значения и ArchGetTime равен начальному значению и DateTime.Now > ArchRequestTime + минута ТО SyncArchFinished
      - Если приложение закрывается или TimeStart = начальному значению return
        
        Добавление сигналов и команд в список на запись в архив с помощью метода AddUnitToArch
        
        Если обновилась ПБД обновим информацию с помощью метода UpdateArcBD
        
        UpdateArcBD
        MainLogic.CheckAndLoadBdLite
        Проверка разницы у сигналов из AllCompareSignals
        Если что-то изменилось, то LoadAndUpdateArchNsi