Руководство по настройке altAwin:Скрипты/Функции/altAwin

Материал из AltecDocs
Перейти к:навигация, поиск

altAwin

AddFactoryUnitEvent
AddFactoryUnitEvent(FactoryUnitId: Integer; EventTypeCode, Comment: string)

Добавляет событие с заданным кодом EventTypeCode и комментарием Comment в лог производимой единицы с идентификатором FactoryUnitId.

AddFile
AddFile(FileName, Note, PathInDB: string): Integer

Добавляет в БД файл с диска; возвращает идентификатор записи файла.

  • FileName — полный путь к файлу на диске,
  • Note — комментарий,
  • PathInDB — папка в БД.

При отсутствии файла на диске откроется диалог выбора файла (если диалог не нужен, следует проверять наличие файла вручную перед вызовом функции, например через FileExists).

  • Файл каждый раз добавляется новый (даже если такой уже есть).
  • Путь к папке в БД должен быть в виде папка\вложенная папка.
  • Путь к папке чувствителен к регистру.
  • При отсутствии в базе папки с заданным именем папка создаётся.
  • В случае если существует несколько папок с указанным именем, файл будет помещён в одну из них случайным образом.
  • Для добавления файла в корень нужно указать пустой путь (' ').
  • Добавление файла выполняется только в том случае, если у пользователя есть права на создание документа типа «Файл».
  • Если файл не удалось добавить, возвращается NULL
AddFileFromStream
AddFileFromStream(AStream: TStream; const AFileName: string; const Note: string = ; const PathInDB: string = ): Variant

Добавляет файл из потока с именем AFileName. Возвращает идентификатор записи файла.

Пример использования функции AddFileFromStream

var
  S: TStringStream;
begin
  S := TStringStream.Create('');
  try
    S.WriteString('Line1' + #13#10);
    S.WriteString('Line2' + #13#10);
    S.Position := 0;
    AddFileFromStream(S, '1.txt', 'comment', '1\2\3');
  finally
    S.Free;
  end;
end;
CallPhoneNumber [d]
CallPhoneNumber(PhoneNumber, AbonentName: string)

Осуществляет автодозвон до абонента AbonentName с указанным телефонным номером PhoneNumber в международном формате. (cм IpubDialerService.Dial)

CheckOrdersGlassMails [d]
  • CheckOrdersGlassMails
    Проверка электронной почты на наличие заказов стеклопакетов.
CheckOrdersReserves [d]
  • CheckOrdersReserves
    Инициирует принудительную проверку резервов заказов в планировщике.
CheckOrdersWinMails [d]
  • CheckOrdersWinMails
    Проверка электронной почты на наличие заказов конструкций.
CreateContourPath

CreateContourPath: IawContourPath

  • Создаёт и возвращает объект для задания контура.
CreateDialog
CreateDialog(Code: string): IawDialog

Создает и возвращает новый диалог по коду

CreateDictionary
CreateDictionary(): IcmDictionary

Создаёт и возвращает новый объект IcmDictionary.

CreateDictionaryList

CreateDictionaryList(): IcmDictionaryList

  • Создаёт и возвращает новый объект IcmDictionary.
CreateFillingModelPainter [d]
CreateFillingModelPainter(): IawGlassPacketModelPainter

Создаёт и возвращает объект отрисовщика моделей стеклопакетов

CreateFloatList
CreateFloatList(): IcmFloatList

Создает и возвращает новый объект типа IcmFloatList

CreateGlassByDXF
CreateGlassByDXF(const GlassPacketCode: string; const DXF: string; const GlassParams: IcmDictionary = Empty): string

Создаёт модель стеклопакета по заданному артикулу и контуру из DXF

CreateGlassByFormulaAndPath
CreateGlassByFormulaAndPath(const Formula: string; const ContourPath: IawContourPath; const GlassParams: IcmDictionary = Empty): string

Создаёт модель стеклопакета по заданной формуле и контуру

CreateGlassByPath
 CreateGlassByPath(const GlassPacketCode: string; const ContourPath: IawContourPath; const GlassParams: IcmDictionary = Empty): string

Создаёт модель стеклопакета по заданному артикулу и контуру

  • GlassPacketCode — артикул стеклопакета,
  • ContourPath — координаты вершин и высот сторон контура,
  • GlassParams — словарь значений пользовательских параметров для стеклопакета,
CreateGlassDXF
CreateGlassDXF(PackInfo: string;ModelNo: Integer; Mark, FileName: string): Boolean

Выгрузка заданного заполнения в DXF файл

CreateGlassPacketModelPainter
CreateGlassPacketModelPainter: IawGlassPacketModelPainter

Создаёт и возвращает объект отрисовщика моделей стеклопакетов


CreateHTTPSession

CreateHTTPSession:IpubHTTPSession Создаёт и возвращает новый объект IpubHTTPSession Пример работы работы с HTTP сервисами:

var
  Session: IpubHTTPSession;
  Response: IpubHTTPResponse;
  S: string;
begin
  Session := CreateHTTPSession;
  Response := Session.HTTPGet('http://ya.ru', null);
  S := ConvertFromCharSet(Response.ContentCharSet, Response.ContentAsString);
  ShowMessage(S);
end;
CreateIntegerList
CreateIntegerList(): IcmIntegerList

Создает и возвращает новый объект типа IcmIntegerList

CreateMailer
CreateMailer: IpubMailer

Возвращает сервис для отправки и получения почтовых сообщений. Пример работы с почтовым сообщением с помощью скриптов:

var
  MS: IpubMailer;
  M: IpubEmail;
  A: IpubEmailAttachment;
begin
  //создание сервиса почтовых сообщений
  MS := CreateMailer;

  //установка параметров учетной записи
  MS.Account.Address := 'manager@wincompany.ru';
  MS.Account.SmtpHost := 'mail.wincompany.local';
  MS.Account.UserName := 'Владимир Владимирович';

  //создание нового письма
  M := MS.NewEmail;
  //получатели
  M.RecipientsField := 'manager@wincompany.local; support@wincompany.local';
  //тема
  M.Subject := 'Отправка сообщения из altAwin с вложением';
  //тип содержимого (необязательно для простого текста)
  M.ContentType := 'text/html';
  //прикрепление вложения
  M.Attachments.AddFile('c:\autoexec.bat');
  //прикрепление картинок и назначение идентификаторов для использования в тексте письма
  A := M.Attachments.AddFile('c:\pen.gif');
  A.ID := 'pen';
  A := M.Attachments.AddFile('c:\support.gif');
  A.ID := 'support';
  //содержимое в формате HTML
  M.Body := '<html><body><h1>Текст сообщения из altAwin</h1><img src=''cid:pen''/><hr/><img src=''cid:support''/></body></html>';

  //отправка сообщения
  MS.SendEmail(M, False);

  //освобожение ресурсов
  A := Empty;
  M := Empty;
  MS := Empty;
end;
CreateModelImageFile
CreateModelImageFile(const PackInfo: string; ModelNo: Integer; const FileName: string; Width, Height: Integer

Выполняет сохранение изображения конструкции в файл.

  • PackInfo — данные из БД ORDERSITEM.PACKINFO
  • ModelNo — номер изделия, начиная с 1 (0 — конструкция)
  • FileName — имя файла для сохранения, формат файла зависит от расширения (*.bmp, *.pcx, *.jpg, *.png)
  • Width — ширина в пикселях
  • Height — высота в пикселях
CreateModelPainter [d]
CreateModelPainter: IawModelPainter

Создаёт и возвращает объект отрисовщика моделей конструкций

CreateMosquitoNetModelPainter
CreateMosquitoNetModelPainter: IawMosquitoNetModelPainter

Создаёт и возвращает объект отрисовщика моделей москитных сеток

CreateObjectSession
CreateObjectSession(ConnectionName:string): IomSession

Создает и возвращает новый объект типа IomSession


CreateProgress
CreateProgress(): IpubProgress
CreateSandwichModelPainter
CreateSandwichModelPainter(): IawSandwichModelPainter

Создаёт и возвращает объект отрисовщика моделей сэндвичей

CreateWindowModelConstructor
CreateWindowModelConstructor(): IawWindowModelConstructor

Создаёт и возвращает объект конструктора моделей окон

CreateWindowModelPainter
CreateWindowModelPainter(): IawWindowModelPainter

Создаёт и возвращает объект отрисовщика моделей конструкций

Decrypt [d]
Decrypt(FileName, Key: string): string

Дешифрование данных

DoesEmployeeWorkAtDate
DoesEmployeeWorkAtDate (EmployeeId: Integer; Date: TDate): Boolean

Возвращает true, если сотрудник EmployeeId работает в заданный день Date (нет отпуска и рабочий день по расписанию)

Encrypt [d]
Encrypt(FileName, Data, Key: string)

Шифрование данных

ExecuteMethod
ExecuteMethod(MethodName: string; Params: IcmDictionary = Empty): IcmDictionary

Выполнение клиентского метода в текущем приложении

ExportDealerSettings
ExportDealerSettings(FileName: string)

Экспорт дилерских настроек в файл

ExportGlassToDXF
ExportGlassToDXF(OrderItemsId: Integer, FileName: string)

Экспорт стеклопакета в DXF

ExportOfficeSettings
ExportOfficeSettings(FileName: string)

Экспорт настроек в файл

ExportOrders
ExportOrders(FileName: String; Orders: IcmReadOnlyIntegerList)

Экспорт заказов в файл. Доступно только в дилерской и в офисной БД.

FastReportExecute
FastReportExecute(const Stream: IcmStream; const Variables: IcmDictionary = Empty; ShowPreview: Boolean = True): Boolean

Исполняет отчёт из потока, возвращает True в случае успеха. Имена словаря Variables добавляются в отчёт в качестве переменных скрипта. После исполнения отчёта значения переменных скрипта возвращаются в соответствующие значения Variables. При установке {{{1}}} отчёт отправляется на печать без предпросмотра.

  • var
      Stream: TFileStream;
      D: IcmDictionary;
    begin
      Stream := TFileStream.Create('<файл отчёта>', fmRead);
      try
        D := MakeDictionary([
          'test', '123'
        ]);
        if FastReportFromStreamExecute(Stream, D, True) then
          ShowMessage(D['test']);
      finally
        Stream.Free;
      end;
    end;
    
FastReportExecuteFile [d]
FastReportExecuteFile (const FileName: string, const Params: array of Variant, ShowPreview:Boolean=True):Boolean

Исполняет файл отчёта с указанным именем, возвращает True в случае успеха. При ShowPreview = False отчёт отправляет на печать без предпросмотра

FastReportExecuteStream [d]

FastReportExecuteStream (const Stream:TStream, const Params: array of Variant, ShowPreview:Boolean=True):Boolean Исполняет отчёт из потока, возвращает True в случае успеха. При ShowPreview = False отчёт отправляет на печать без предпросмотра. Обеспечивает вызов произвольного отчёта без контекста, только стандартный FastReport + экспортные функции. ShowPreview управляет отображением стандартного предпросмотра FastReport.

FastReportExecuteToFile [d]
FastReportExecuteToFile (const Stream:TStream, const FileName: string, const Params: array of Variant):Boolean
  • Исполняет отчёт из потока и сохраняет в файл (.awr) с указанным именем, возвращает True в случае успеха
    Stream — поток с отчетом;
    FileName — имя файла для сохранения.
    Params — массив значений, элементы которого транслируются в переменные отчёта таким образом, что чётные и нечётные элементы массива попарно определяют значение переменной и её наименование.
FastReportExecuteToPDF [d]
FastReportExecuteToPDF(const Stream:TStream; const FileName: string; const Params: array of Variant): Boolean

Исполняет отчёт из потока и экспортирует его в PDF-файл с указанным именем, возвращает True в случае успеха

var
  StringStream: TStringStream;
begin
  StringStream := TStringStream.Create(QueryField('select REPORTBLOB from REPORTTEMPLATESLINK where REPORTNAME=''testreport'''));
  try
    FastReportExecuteToPDF(StringStream, 'd:\temp\testreport.pdf', ['test', 'Hello, World!']);
    ShellExecute('d:\temp\testreport.pdf');
  finally
    StringStream.Free;
  end;
end.
FastReportExportToAWR
FastReportExportToAWR(const Stream, OutStream: IcmStream; const Params: IcmDictionary = Empty): Boolean;

Функция сохранения отчета в формате AWR в указанное место на диске. Возвращает True в случае успеха.

FastReportExportToJPG
FastReportExportToJPG(const Stream, OutStream: IcmStream; const Params: IcmDictionary = Empty; JPEGQuality: Integer = 90; Resolution: Integer = 96): Boolean;

Функция сохранения отчета в формате JPG в указанное место на диске. Возвращает True в случае успеха.

var
  StringStream: TStringStream;
  FileStream: TFileStream;
begin
  StringStream := TStringStream.Create(QueryField('select REPORTBLOB from REPORTTEMPLATESLINK where REPORTNAME=''test'''));
  try
    FileStream := TFileStream.Create('c:\temp\test.jpg', fmCreate);
    try
      FastReportExportToJPG(CreateIcmStreamAdapter(StringStream), CreateIcmStreamAdapter(FileStream), MakeDictionary(['test', 'Hello, World!']));
    finally
      FileStream.Free;
    end;
    
    ShellExecute('c:\temp\test.jpg');

    FileStream := TFileStream.Create('c:\temp\test.pdf', fmCreate);
    try
      FastReportExportToPDF(CreateIcmStreamAdapter(StringStream), CreateIcmStreamAdapter(FileStream), MakeDictionary(['test', 'Hello, World!']));
    finally
      FileStream.Free;
    end;

    ShellExecute('c:\temp\test.pdf');
  finally
    StringStream.Free;
  end;
end.
FastReportExportToPDF
FastReportExportToPDF(const Stream, OutStream: IcmStream; const Params: IcmDictionary = Empty): Boolean;

Функция сохранения отчета в формате PDF в указанное место на диске. Возвращает True в случае успеха.

FastReportFromStreamExecute
FastReportFromStreamExecute(const Stream: Ttream; const Variables: IcmDictionary; ShowPreview:Boolean = True): Boolean

Исполняет отчёт из потока, возвращает True в случае успеха. Имена словаря Variables добавляются в отчёт в качестве переменных скрипта. После исполнения отчёта значения переменных скрипта возвращаются в соответствующие значения Variables. При ShowPreview = False отчёт отправляется на печать без предпросмотра.

Geometry2d
Geometry2d : Шаблон:Ifn:IawGeometry2d

Геометрические примитивы и функции

GetConstructionInfo
GetConstructionInfo(PackInfo: string):IcsConstruction

Создаёт и возвращает информацию о конструкции (объект IcsConstruction) по запакованной модели.

GetDatabaseVariable
GetDatabaseVariable(Name: string; var Default: Variant): Variant

Возвращает значение переменной БД по имени

GetDateType

GetDateType(const Date: TDateTime): Integer

Возвращает тип дня согласно документу «Поправка календаря»: 0 — рабочий, 1 — выходной, 2 — сокращенный. см. Руководство пользователя altAwin:Поправки календаря)
GetGlassInfo
GetGlassInfo(PackInfo:string): IcsGlass

Возвращает объект, предоставляющий информацию о стеклопакете из запакованной модели

GetLicenseNumber
GetLicenseNumber(): string

Возвращает номер лицензии

GetMatrixValue [d]
GetMatrixValue(const Code: string; X, Y: Integer; InterpolationType: Integer): Variant

Возвращает значение матрицы с указанным кодом для значений X и Y с учётом параметра InterpolationType (0 — интерполированное значение, 1 — по минимальной отметке, 2 — по максимальной отметке), приведённое по курсу заданной валюты в базовую.

GetMonthWorkDayCount
GetMonthWorkDayCount(const Date: TDateTime): Integer

Возвращает количество рабочих дней в месяце (включая сокращенные дни) согласно настроенным праздничным и сокращённым дням.

GetMosquitoNetInfo
GetMosquitoNetInfo(PackInfo:string): IcsMosquitoNet

Возвращает объект, предоставляющий информацию о москитной сетке из запакованной модели

GetProgramVersion

ClsMnu|GetProgramVersion(): string

Возвращает версию программы
GetSandwichInfo
GetSandwichInfo(PackInfo:string):IcsSandwich

Возвращает объект, предоставляющий информацию о сэндвиче из запакованной модели

GetUserDocTypeSQL
GetUserDocTypeSQL(DocType: TGUID): string

Возвращает SQL-запрос для списка документов указанного типа.

var
  sql: string;
begin
  sql := GetUserDocTypeSQL(IudTest);
  ShowMessage(sql);
end;
GetUserParamList [d]

GetUserParamList (PackInfo: string):IawConstructionUserParamList Возвращает общие пользовательские параметры конструкции, распакованной из PackInfo.

GetYearWorkDayCount
ImportGlassDXF
ImportOrders
ImportSettings
ImpostPos
ImpostPosFalc1
ImpostPosFalc2
InitiateWorkflow

InitiateWorkflow(const Code: string; const InitialValues: IcmDictionary Создает и запускает новый экземляр бизнес-процесса с идентификатором Code и начальными параметрами InitialValues. (см Схемы бизнес-процессов).

IsDealerLicense
IsDealerLicense()
  • Возвращает True, если лицензия дилерская, иначе False
IsMatrixExists [d]
  • IsMatrixExists(const Code: string): Boolean;
    Проверка существования матрицы с указанным кодом Code (см. РНА:Матрицы цен)
IsTimeInEmployeeWorkingSchedule
IsTimeInEmployeeWorkingSchedule(EmployeeId:Integer; DateTime: TDateTime): Boolean

Возвращает true, если время DateTime попало в рабочее время сотрудника EmployeeId (время окончания работы считается не рабочим)

IsTimeRangeInEmployeeWorkingSchedule
IsTimeRangeInEmployeeWorkingSchedule(EmployeeId:Integer; StartDateTime, FinishDateTime: TDateTime): Boolean

Возвращает true, если интервал времени [StartDateTime, FinishDateTime] попал в рабочее время сотрудника EmployeeId

LinearOptimization
LinearOptimization() -> IloLinearOptimization

Возвращает сервис линейной оптимизации

LoadFileFromDatabase
LoadFileFromDatabase (const FileName: string):TStream

Функция для загрузки файла из документа файлов, используется в частности для получения файла отчёта из БД. Возвращает поток содержимого файла с указанным именем.

LoadFileFromDatabaseByGUID
LoadFileFromDatabaseByGUID (const GUID:string):TStream

Возвращает поток содержимого файла с указанным GUID

LoadFileFromDatabaseByID
LoadFileFromDatabaseByID (const ID:integer):TStream

Возвращает поток содержимого файла с указанным ID

Logoff
Logoff

Завершение работы. Завершение работы программы altAwin

MakeDictionary
MakeDictionary(ValuesByNames:array of Variant) -> IcmDictionary

Создает и возвращает новый объект типа IcmDictionary, инициализированный значениями ValuesByNames. Пример работы со словарём IcmDictionary:

var
  value1: Integer;
  value2: string;
  Source, Target: IcmDictionary;
begin
  value1 := 1;
  value2 := 'test';
  Source := MakeDictionary(['name1', value1, 'name2', value2]);
  Target := Source.Clone();
  Target['name2'] := 3;
  ShowMessage(JSONEncode(Source));
  ShowMessage(JSONEncode(Target));
end;
MakeObjectMethodCallable
MakeObjectMethodCallable(Ojb: IomObject; MethodName: WideString):IcmCallable

Создание обёртки для метода объекта

MakeOfferByWebAPIRequest
MakeOfferByWebAPIRequest(RequestBody:string)

Создание предложения по формату API-запроса расчётчика. Параметр RequestBody должен содержать данные в формате JSON. См. описание метода offer_calculte в https://calc.activate.altec.ru/openapi.yaml

NewTimetableParams
NewTimetableParams() -> Шаблон:Ifn:IawTimetableParams

Создание фильтра календаря

PackToContourFigure
PackToContourFigure(C:Шаблон:Ifn:IawClosedPolyCurve2d)

Упаковка контура фигуры

ParseGlassPacketFormula
ParseGlassPacketFormula(Text: string): Шаблон:Ifn:IcsGlassPacketFormula

Возвращает объект, предоставляющий информацию о формуле стеклопакета

var
  F: IcsGlassPacketFormula;
  UI: IpubObjectsUIService;
begin
  F := ParseGlassPacketFormula('4\16\4');
 
  UI := ServiceProvider.GetService(IpubObjectsUIService);
  UI.EditObject(F);
end;
PartNameIntoPartID [d]
PartNameIntoPartID(PartName: string):Integer

Возвращает идентификатор части состава по наименованию PartName.

PerformContragentAccountCharge
PerformContragentAccountCharge(ContragID: Integer; const AccountNum: string; const Sum: Double; ApproveType: Integer; const Name: string; const Comment: string = )

Формирует документ «Начисление» и проводку по счету для контрагента.

  • ContragID — идентификатор контрагента,
  • AccountNum — номер счета,
  • Sum — сумма,
  • ApproveType — тип проводки: 0 — приход, 1 — расход,
  • Name — наименование документа.
  • Comment — комментарий.
PerformEmployeeAccountCharge
PerformEmployeeAccountCharge(EmpID: Integer; const AccountNum: string; const Sum: Double; ApproveType: Integer; const Name: string)

Выполняет пополнение/списание со счёта сотрудника. Формирует документ «Начисление» и проводку по счету для сотрудника.

  • EmpID — идентификатор сотрудника,
  • AccountNum — номер счета,
  • Sum — сумма,
  • ApproveType — тип проводки: 0 — приход, 1 — расход,
  • Name — наименование документа.
  • Comment — комментарий.
PlanarOptimization
PlanarOptimization() -> IpoPlanarOptimization

Возвращает сервис плоскосной оптимизации

PriceToStringRus
PriceToStringRus (Price: Double; WithCurrency: Boolean = True; Names: string = 'рубль, рубля, рублей, М, копейка, копейки, копеек, Ж'): string

Возвращает текстовое представление денежной суммы

PseudoSequenceQuery
PseudoSequenceQuery (Name: string):Integer

Возвращает следующее значение псевдогенератора. Если он не существует, создаёт его и возвращает 1.

PseudoSequenceReset
PseudoSequenceReset (Name: string)

Сбрасывает псевдогенератор. Если он не существует, создаёт его.

RefreshActiveView
RefreshActiveView()

Обновляет активное представление

SaveThumbnail
SaveThumbnail (OrderItemsId, ModelNo:Integer, Filename: string)

Сохранение миниатюры изделия в файл. Формат файла зависит от указанного расширения имени файла в параметре FileName, допустимыми являются расширения .pcx и .bmp

SaveThumbnailEx
ClsMnu|SaveThumbnailEx (OrderItemsId, ModelNo:Integer, Filename: string, MarkModel, MarkBeam, MarkDrob, Colored, WithConn:Boolean)}}

Сохранение миниатюры изделия в файл. Формат файла зависит от указанного расширения имени файла в параметре FileName

SelectDepartmentEmployeeTimeSpan [d]
SelectDepartmentEmployeeTimeSpan(DepartmentID: Integer; out EmployeeID: Variant; out StartTime, FinishTime: TDateTime): Boolean

Выбор сотрудника и расписания для указанного подразделения

var
  DepID, EmpID: Integer;
  SelectedEmpID: Variant;
  ST, FT: TDateTime;
begin
  DepID := 4;
  if SelectDepartmentEmployeeTimeSpan(DepID, SelectedEmpID, ST, FT) then
  begin
    EmpID := SelectedEmpID;
 
    ShowMessage(Format('EmpID: %d, From: %s, To: %s', [EmpID, FormatDateTime('dd-mm-YYYY hh:mm', ST), FormatDateTime('dd-mm-YYYY hh:mm', FT)]));
     
    if SelectEmployeeTimeSpan(EmpID, ST, FT) then
      ShowMessage(Format('From: %s, To: %s', [FormatDateTime('dd-mm-YYYY hh:mm', ST), FormatDateTime('dd-mm-YYYY hh:mm', FT)]));
  end;
end;
SelectDocumentType
SelectDocumentType(AncestorType: TGUID; ForCreate:Boolean =True): TGUID

Показывает форму выбора типа документа, который будет является наследником AncestorType. Возвращает имя выбранного типа или пустую строку в случае, если пользователь нажал кнопку "Отмена" или не были найдены потомки

SelectEmployeeTimeSpan [d]
SelectEmployeeTimeSpan(EmployeeID: Integer; out StartTime, FinishTime: TDateTime): Boolean

Выбор расписания для указанного сотрудника

SelectTask
SelectTask(Params: IawTimetableParams) -> IdocTask

Выбор задачи (календарь)

SelectTaskTimeRange
SelectTaskTimeRange(Params: IawTimetableParams): IawTaskTimeRange

Выбор временного интервала (календарь)

SendAltCQMessage

SendAltCQMessage(const UserGUID: string; const Message: string): Boolean Отправляет сообщение пользователю. Пустая строка в первом параметре — отправка всем пользователям.

SetAltCQStatus
SetAltCQStatus(const Code: string; const CustomText: string = ' ')

Установка статуса текущего авторизованного пользователя по коду.

SetDatabaseVariable
SetDatabaseVariable(name:str, value:variant)

Устанавливает значение переменной БД по имени

SetOrderState
SetOrderState (OrderId:Integer, StatusCode: string):Boolean

Установка состояния заказа.

ShowMessageDlg
ShowMessageDlg(Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; Title: string = ; Details: string = ): Integer

Показывает информационное диалоговое окно с сообщением.

    • Msg — текст сообщения
    • DlgType — тип диалога (mtConfirmation = 'Подтверждение', mtCustom = 'Сообщение', mtError = 'Ошибка', mtInformation = 'Информация', mtWarning = 'Предупреждение')
    • Buttons — кнопки на форме диалога
    • Title — заголовок окна диалога, если значение параметра Title = , то заголовок будет выбран автоматически согласно значению параметра DlgType:
    • Details — развёрнутое сообщение.
    Пример использования функции ShowMessageDlg
    ShowMessageDlg('Сообщение', mtInformation, mbOk + mbCancel, 'Заголовок', 'Детализация сообщения')
    
ShowTimetable
ShowTimetable
UnpackFromContourFigure
UnpackFromContourFigure
UpdateIndicators
UpdateIndicators()

Запускает принудительное обновление индикаторов главного окна