GetNewParamWindow

Окно ввода параметров макроса или отчета создается с помощью метода GetNewParamWindow глобального объекта System.

GetNewParamWindow(WindowKey: Integer): IgsParamWindow

где WindowKey — хэндл родительского окна.

Пример:

 dim Win
 set Win = System.GetNewParamWindow(0)

Объект окна поддерживает интерфейс IgsParamWindow.

Методы IgsParamWindow

AddParam

procedure AddParam (ParamName: String; 
          ParamType: String; 
          Comment: String)

Добавляет в список параметров окна новый параметр. Например,

Win.AddParam "Параметр 1", "PRMDate", "Parameter 1"

ParamType может иметь следующие значения:

• PRMINTEGER
• PRMFLOAT
• PRMDATE
• PRMDATETIME
• PRMTIME
• PRMSTRING
• PRMBOOLEAN
• PRMNOQUERY

AddLinkParam

procedure AddLinkParam(ParamName: String; 
             ParamType: String; 
             TableName: String; 
             PrimaryName: String;
             DisplayName: String; 
             LinkCondition: String; 
             LinkLanguage: String; 
             Comment: String)

Добавляет в список параметров окна новый параметр типа ссылка. Константы типов:

• PRMLINKELEMENT
• PRMLINKSET

Например,

Win.AddLinkParam "Параметр 2", "PRMLinkElement", "GD_USER", "ID", "NAME", "", "", ""

Execute

function Execute: Variant

Возвращает массив Variant с введенными параметрами. Например,

Win.AddParam "Параметр 1", "PRMDate", "Parameter 1"
Win.AddLinkParam "Параметр 2", "PRMLinkElement", "GD_USER", "ID", "NAME", "", "", ""
Result = Win.Execute

Получим окно следующего вида:

После нажатия "ОК" получим: в Result(0) — дата, в Result(1) — ID администратора. Если нажать "Отмена", Result будет Empty!

ExecuteWithParam

function ExecuteWithParam(ParamName: String; 
                 ParamType: String;                                     
                 Comment: String): Variant

Для единственного "простого" параметра — добавить его и вызвать окно.

ExecuteWithLinkParam

function ExecuteWithLinkParam(ParamName: String;
                     ParamType: String; 
                     TableName: String; 
                     PrimaryName: String;
                     DisplayName: String; 
                     LinkCondition: String; 
                     LinkLanguage: String; 
                     Comment: String): Variant

То же самое для параметра-ссылки.