Моя библиотека со всякими функциями – RSSUtils.d32

 

Модуль содержит следующие функции:

 

void CS_TW_date ( string date,string retdate) - функция преобразования даты из формата процессинга Компас(кол-во секунд с 01.01.1901) в формат "dd.mm.yyyy"

  Параметры:

  string date    - дата в формате процессинга Компас

  string retdate - возвращаемая дата в виде строки "dd.mm.yyyy"

 

void CS_TW_date_time(string time,string date,int hour,int min,int sec) - функция преобразования времени из формата процессинга Компас(кол-во секунд с 01.01.1901) в формат "dd.mm.yyyy",hour,min,sec

 Параметры:

  string date    - время в формате процессинга Компас

  string retdate - возвращаемая дата в виде строки "dd.mm.yyyy"

  int hour       - кол-во часов

  int min        - кол-во минут

  int sec        - кол-во секунд

 

void date_time_CS_TW(string date,string time,string retval) - функция преобразования времени в формат процессинга Компас(кол-во секунд с 01.01.1901)

 Параметры:

  string date    - дата в формате строки "dd.mm.yyyy"

  string rime    - время в формате строки "hh:mm:ss"

  string retval  - время в формате процессинга Компас

 

void CS_TW_SendText(string text,int needrez,int timeout,string result,string host,int port,int kolcon,int shortans) - функция  отправки сообщения и получения ответа по указанному ip-адресу и порту.

Параметры:

  string text    - текст для отправки

  int needrez    - признак необходимости дожидаться ответа

  int timeout    - время ожидания ответа

  string result  - полученный ответ, в случае ошибки может принимать следующие значения:

1. если ошибка в сокете, то возвращаемый сокетом код ошибки

2. "lostconnection" при потере соединения

3. "timeout" истекло время ожидания ответа string host - куда коннектимся, можно просто ip-адрес, пример "192.168.100.113"

  int port       - порт, на который коннектимся

  int kolcon     - кол-во попыток подконнектиться, каждая попытка будет продолжаться timeout

  int shortans   - признак того, что ответ короткий, т.е. придет по сети в одном пакете, т.е. получили пакет и все отконнекчиваемся 0 - короткий, 1- не короткий, т.е. получаем ответ в течении timeout 

 

void sleep(int millisecond) - обычный Sleep

 Параметры:

  millisecond    - продолжительность слипа в миллисекундах

 

void MRandomize(void) - обычный Randomize

 

void MRandom(int rand) - обычный Random

 Параметры:

  rand           - число, ограничивающее интервал выборки

 

void ProcessMessages(void) - пропихивание очереди виндовозных сообщений

 

void StartNTService(string servicename,bool retval) - запуск NT сервиса

Параметры:

  string servicename - название сервиса

  bool retval        - возвращаемое значение, true - запущен, false - не запущен

 

void StopNTService(string servicename,bool retval) - остановка NT сервиса

Параметры:

  string servicename - название сервиса

  bool retval        - возвращаемое значение, true - остановлен, false - не остановлен

 

void SetNTRegistrValue(int RootKey,string destination,string registryname,int typeregistry, value,string retval) - установить значение регистра в реестре NT

Параметры:

  int RootKey        - корень поиска регистра, значения:

                       0 - HKEY_CLASSES_ROOT

                       1 - HKEY_CURRENT_USER

                       2 - HKEY_LOCAL_MACHINE

                       3 - HKEY_USERS

                       4 - HKEY_CURRENT_CONFIG

  string destination - местоположение регистра, пример: "SOFTWARE\Pergamon\AKT\Anwendung\Startup"

  string registryname- название регистра

  int typeregistry   - тип регистра, значения:

                       0 - Bool

                       1 - String

                       2 - Int

                       3 - Float

  value              - новое значение регистра, соответствующего типа

  string retval      - возвращаемое значение: "_0_" - не установили, "_1_" - установили

 

void GetNTRegistrValue(int RootKey,string destination,string registryname,int typeregistry, value) - считать заничение регистра в реестре NT

Параметры:

  int RootKey        - корень поиска регистра, значения:

                       0 - HKEY_CLASSES_ROOT

                       1 - HKEY_CURRENT_USER

                       2 - HKEY_LOCAL_MACHINE

                       3 - HKEY_USERS

                       4 - HKEY_CURRENT_CONFIG

  string destination - местоположение регистра, пример: "SOFTWARE\Pergamon\AKT\Anwendung\Startup"

  string registryname- название регистра

  int typeregistry   - тип регистра, значения:

                       0 - Bool

                       1 - String

                       2 - Int

                       3 - Float

  value              - возвращаемое значение регистра, соответствующего типа

                       если прочитать не удалось, то возвращается "_0_"

void postsoap(string URL,string SOAPAction,string RequestFileName,string ResponseFileName,bool result,string error) - Отправка сообщения WEB-сервису методом POST

    string URL - URL соединения с WEB-сервисом

    string SOAPAction - вызываемый метод WEB-сервиса

    string RequestFileName - имя файла с параметрами метода

    string ResponseFileName - имя файла с ответом - xml-файл

    bool result - признак выполнения true/false

    string error - если result==false, то текст ошибки:

        Error creating F_PostSOAP - ошибка при создании формы

        Error PostSOAP execute - ошибка отправки/получения информации

void DisableX(void) - Отключает возможность закрытия терминала RS-Bank крестиком.