001type
002  IContext = interface(IDispatch)
003    ['{79847D79-A3BE-408F-B59F-662B91BC6350}']
004    function Get_ContextObject: IDispatch; safecall;
005    function Get_UserName: WideString; safecall;
006    function Get_NegotiateAuth: WordBool; safecall;
007    function Get_Language: WideString; safecall;
008    procedure Set_Language(Value: WideString); safecall;
009    function Get_TimeBias: Double; safecall;
010    function getName(ID: OleVariant): WideString; safecall;
011    function getDescription(ID: OleVariant): WideString; safecall;
012    function getPropValue(const ClassName: WideString; const PropName: WideString; 
013      ID: OleVariant): OleVariant; safecall;
014    procedure setPropValue(const ClassName: WideString; const PropName: WideString; 
015      ID: OleVariant; Value: OleVariant); safecall;
016    procedure getPropValues(const ClassName: WideString; 
017      const PropName: WideString; IDS: OleVariant; OnValueEvent: OleVariant; 
018      ThreadCount: Integer; ThreadSafe: WordBool); safecall;
019    procedure setPropValues(const ClassName: WideString; 
020      const PropName: WideString; IDS: OleVariant; OnValueNeededEvent: OleVariant; 
021      ThreadCount: Integer; ThreadSafe: WordBool); safecall;
022    function createDataSet(const TargetClassName: WideString): IContextDataSet; safecall;
023    function select(const ClassName: WideString; QueryItems: OleVariant): IDispatch; safecall;
024    function executeMethod(const ClassName: WideString; 
025      const MethodName: WideString; Params: OleVariant): OleVariant; safecall;
026    function getClass(const ClassName: WideString): WideString; safecall;
027    function enumerationItem(ItemIdentifier: OleVariant): WideString; safecall;
028    function getResource(const Name: WideString): WideString; safecall;
029    procedure bulkInsert(const ClassName: WideString; const Data: IDispatch); safecall;
030    function PreProcessScript(const Script: WideString; Indent: WordBool; 
031      const CommentMark: WideString): WideString; safecall;
032    function executeReport(const ClassName: WideString; 
033      const TemplateName: WideString; Params: OleVariant): IDispatch; safecall;
034    procedure saveReport(const ClassName: WideString; 
035      const TemplateName: WideString; Params: OleVariant; const FileName: WideString); safecall;
036    function Get_Variable(const Name: WideString; Persistent: WordBool): OleVariant; safecall;
037    procedure Set_Variable(const Name: WideString; Persistent: WordBool; 
038      Value: OleVariant); safecall;
039    function DebugString(const Message: WideString): WideString; safecall;
040    procedure raiseManagedException(const ExceptionMessage: WideString); safecall;
041    function createGUID: WideString; safecall;
042    function getTempFileName(const Extension: WideString): WideString; safecall;
043    function HasUI: WordBool; safecall;
044    function Handle: Integer; safecall;
045    procedure processStart(const Description: WideString; ItemCount: Integer; 
046      CanAbort: WordBool); safecall;
047    function processStep: WordBool; safecall;
048    procedure processStop; safecall;
049    procedure Sleep(MSecs: Integer); safecall;
050    function executeConsoleProcess(const CommandLine: WideString; 
051      MaxDuration: Integer; const OutputData: OleVariant): Integer; safecall;
052    function downloadData(const Host: WideString; const Url: WideString; 
053      const UserName: WideString; const Password: WideString; 
054      NegotiateAuth: WordBool; PostData: OleVariant; 
055      const PostContentType: WideString; PostDataIsBinary: WordBool; 
056      CanCache: WordBool; NewSession: WordBool; TimeOut: Integer): OleVariant; safecall;
057    function LineBreak: WideString; safecall;
058    function Transliterate(const Value: WideString): WideString; safecall;
059    procedure CompareLists(var List1: OleVariant; var List2: OleVariant; 
060      const Delimiter: WideString; CaseSensitive: WordBool); safecall;
061    function parseJSON(const JSON: WideString): WideString; safecall;
062    function ConvertExcel(Source: OleVariant; const Format: WideString): IDispatch; safecall;
063    function createBinaryData: IDispatch; safecall;
064    function getCRC(Data: OleVariant): WideString; safecall;
065    function buildNamedFile(const Data: IDispatch; 
066      const StoredFileName: WideString; Propmpt: WordBool; 
067      Compress: WordBool): IDispatch; safecall;
068    procedure parseNamedFile(NamedFile: OleVariant; out FileName: OleVariant; 
069      out Data: OleVariant); safecall;
070    function createRaster: IDispatch; safecall;
071    function BinaryToBitmap(const Data: IDispatch): IDispatch; safecall;
072    function getOleObject(const ClassID: WideString; 
073      const AccessibleFileName: WideString): IDispatch; safecall;
074    function PlaceDataSet(const Range: IDispatch; const DataSet: IContextDataSet; 
075      ShiftRows: WordBool; ShiftColumns: WordBool): Integer; safecall;
076    procedure ExportObject(var Document: OleVariant; const ID: WideString; 
077      const ClassID: WideString); safecall;
078    function createZIPArchive: IDispatch; safecall;
079    function callRoutine(const ClassName: WideString; 
080      const RoutineName: WideString; var RetValue: OleVariant; 
081      const ScriptPart: OleVariant): WordBool; safecall;
082    function selectVaue(const ClassDomain: WideString; 
083      const ExpressionContext: IUnknown; var Value: OleVariant): WordBool; safecall;
084    function editValues(const ValuesList: WideString; const Title: WideString; 
085      UseTabs: WordBool; HideOKButton: WordBool; 
086      const ScriptPart: OleVariant): WordBool; safecall;
087    function MsgBox(const Prompt: WideString; Buttons: LongWord; 
088      const Title: WideString; const HelpFile: WideString; Context: LongWord): Integer; safecall;
089    function ShowMsgBox(const Prompt: WideString; Buttons: LongWord; 
090      const Title: WideString; const HelpFile: WideString; Context: LongWord): Integer; safecall;
091    procedure showView(const ViewName: WideString; Key: OleVariant; 
092      const DetailPropertyName: WideString); safecall;
093    procedure showDataSet(const DataSet: ContextDataSet; const Caption: WideString; 
094      ColumnCaptions: OleVariant; ColumnOnChangeHandlers: OleVariant; 
095      TakeActionsFromView: OleVariant); safecall;
096    procedure SaveExternalDataToFolder(const Resource: WideString; 
097      const Folder: WideString); safecall;
098    function PerformAsyncTask(ID: OleVariant): WordBool; safecall;
099    procedure RebuildTextIndex(ClassID: OleVariant; FieldID: OleVariant; 
100      ThreadCount: Integer); safecall;
101    property ContextObject: IDispatch read Get_ContextObject;
102    property UserName: WideString read Get_UserName;
103    property NegotiateAuth: WordBool read Get_NegotiateAuth;
104    property Language: WideString read Get_Language write Set_Language;
105    property TimeBias: Double read Get_TimeBias;
106    property Variable[const Name: WideString; Persistent: WordBool]: OleVariant 
107      read Get_Variable write Set_Variable;
108  end;