Редактор зачетный. Несомненно найдет своих поклонников.
По поводу вашей схемы. Не разобрался возможно там это или нет, но функции в выпадающем списке подсказчика [Ctrl+Пробел] лучше дополнить описанием параметров. Вот может пригодиться когдато давно сделанная мною выборка из VIP.CHM
Function _addSec100 (DT :_DateTime; Interval : Comp) : _DateTime;
Function _CompareDateTime (DT1 : _DateTime; DT2 :_DateTime ) : Integer;
Function _CurDateTime : _DateTime;
Function _DateTime (Day : Byte; Month : Byte; Year : Word; Hour : Byte; Min : Byte; Sec : Byte; Sec100 : Byte) : _DateTime;
Function _DateTime1 (D : Date; T : Time) : _DateTime;
Function _DateTimeToStr (DT :_DateTime; Format : String) : String;
Function _FromSec100 (Interval : Comp) : _DateTime;
Function _GetDate (DT :_DateTime) : Date;
Function _GetDay (DT :_DateTime) : Byte;
Function _GetDayOfWeek (DT :_DateTime) : Byte;
Function _GetHour (DT : _DateTime) : Byte;
Function _GetMinute (DT :_DateTime) : Byte;
Function _GetMonth (DT :_DateTime) : Byte;
Function _GetSec100 (DT :_DateTime) : Byte;
Function _GetSecond (DT :_DateTime) : Byte;
Function _GetTime (DT :_DateTime) : Time;
Function _GetYear (DT :_DateTime) : Word;
Function _GreatestDateTime (DT1 : _DateTime; DT2 :_DateTime) : _DateTime;
Function _LeastDateTime (DT1 : _DateTime; DT2 :_DateTime) : _DateTime;
Function _StrToDateTime (Str : String; Format : String) : _DateTime;
Function _SubDateTime (DT 1 : _DateTime; DT 2 : _DateTime) : Comp;
Function _SubSec100 (DT : _DateTime; Interval : Comp) : _DateTime;
Function _ToSec100 (DT : _DateTime) : Comp;
Function Abort : Boolean
Function AbortFileTransaction (iTable : Integer) : Integer;
Function AbortTransaction : Integer;
Function Abs (X : Double) : Double;
Function ActivateEmbeddedWindow (aOldWindow, aNewWindow : Integer) : Boolean;
Function Add (Name : String, Expr : String) : Boolean;
Function Add_Date (D1 : Date; D2 : Date) : Date;
Function Add_Day (D : Date, I : LongInt) : Date;
Function Add_Months (D : Date, M : Integer) : Date;
Function Add_Time (T1 : Time; T2 : Time) : Time;
Function Assigned (Var aVarOfInterfaceType : VarOfInterfaceType) : Boolean;
Function Atan (X : Double) : Double;
Function BeginConcurrentTransaction (iMode : Word) : Integer;
Function BeginExclusive : Integer;
Function BeginFileTransaction (iTable : Integer): Integer;
Function BeginTransaction (iMode : Byte) : Integer;
Function BindEmbeddedInterface (EmbedId : LongInt; InterfaceNameOrVar : AnyType [; WinName : String]) : Boolean;
Function Boolean (I : AnyType) : Boolean;
Function BoundActive (BoundId : LongInt) : Boolean;
Function Byte (I : AnyType) : Byte;
Function CalcDaysBetweenDates (aDateFrom, aDateTo : Date; aMinusNonWorkDays : Boolean) : Integer;
Function Calendar_GetWorkDay (aDate : Date; Var aWorkDay : Boolean) : Boolean;
Function Calendar_SetWorkDay (aDate : Date; aWorkDay : Boolean) : Boolean;
Function CalendarPick (Var aDate : Date) : Boolean;
Function CanDelete (iTable : Integer) : Boolean;
Function CanInsert (iTable : Integer) : Boolean;
Function CanRead (iTable : Integer) : Boolean;
Function CanUpDate (iTable : Integer) : Boolean;
Function Center (Line : String, Len : Byte) : String;
Function cfsAddSelf (aObjName : String; aSelf : Pointer; aContainer : Pointer; aTypeName : LongInt) : LongInt;
Function cfsAssignProps (aObjSource : String | LongInt; aObjDest : String | LongInt; aRecursive : Boolean) : LongInt;
Function cfsCheckProp (aObjName : String | LongInt; aPropName : String | LongInt) : LongInt;
Function cfsCheckPropIsArray (aPropType : LongInt) : Boolean;
Function cfsCreateObject (aObjType : String | LongInt; aContainer : String | LongInt; aObjName : String; aCheck : Boolean; Var aSelf : LongInt) : LongInt;
Function cfsDeleteSelf (aSelf : Pointer) : LongInt;
Function cfsDestroyObject (aObjName : String | LongInt) : LongInt;
Function cfsEnumObjects (aContainer : String | LongInt; Var aList : Array of String | Array of LongInt; aRecursive : Boolean): LongInt;
Function cfsEnumObjectTypes (aContainer : String | LongInt; Var aList : Array of String | Array of LongInt): LongInt;
Function cfsEnumProps (aObjName : String | LongInt; Var aList : Array of String | Array of LongInt) : LongInt;
Function cfsGetAtomCode (aStr : String) : LongInt;
Function cfsGetAtomString (aCode : LongInt) : String;
Function cfsGetCommonProps (aPropsList : Array of LongInt; aSameValues : Array of Boolean) : LongInt;
Function cfsGetCurrentContainerSelf : LongInt;
Function cfsGetObjInfo (aObjName : String | LongInt; Var aFullName : String; Var aSelf : LongInt; Var aContainer : String | LongInt; Var aObjType : String | LongInt) : LongInt;
Function cfsGetObjTypeInfo (aObjType : String | LongInt; Var aFlags : LongInt) : LongInt;
Function cfsGetProp (aObjName : String | LongInt, aPropName : String | LongInt, Var aField : AnyType) : LongInt;
Function cfsGetPropArray (aObjName : String | LongInt; aPropName : String | LongInt; Var aField : Array of :) : LongInt;
Function cfsGetPropInfo (aObjName : String | LongInt; aPropName : String | LongInt; Var aFullName : String; Var aPropType : LongInt; Var aFlags : LongInt) : LongInt;
Function cfsGetPropList (aObjName : String | LongInt; aPropName : String | LongInt; Var aList : Array of String) : LongInt;
Function cfsGetValueType (aPropType : LongInt) : Byte;
Function cfsIsSelected (aObjName : LongInt | String) : Boolean;
Function cfsRegisterAtomString (aCode : LongInt, aStr : String) : Boolean;
Function cfsRegisterObjType (aObjType : LongInt;
Function cfsRegisterProp (aObjType : LongInt; aPropName : LongInt; aPropType : LongInt; aFlags : LongInt; aObjectPropControlProc : TObjectPropControlProc) : LongInt;
Function cfsSetCurrentContainer (aContainer : String | LongInt) : LongInt;
Function cfsSetProp (aObjName : String | LongInt; aPropName : String | LongInt; aField : AnyType) : LongInt;
Function cfsSetPropArray (aObjName : String | LongInt; aPropName : String | LongInt; aField : Array of :) : LongInt;
Function cfsSetPropDefault (aObjName : String | LongInt; aPropName : String | LongInt) : LongInt;
Function cfsSetSelectedObjects (aList : Array of String | Array of LongInt) : LongInt;
Function cfsTestState (aState : LongInt) : Boolean;
Function cfsToggleSelected (aObjName : LongInt | String) : Boolean;
Function Check (Expr : String) : Boolean;
Function CheckFields : Boolean;
Function CheckFilter (aFilterName : String; aFromVip, aPushed : Boolean) : Boolean;
Function CheckSelfTopWindow : Boolean;
Function Chr (I : AnyType) : Char;
Function Clear : Boolean;
Function ClearMemoField (Field : Memo) : Boolean;
Function ClearSemaphore (SemID : String) : Integer;
Function CloseExcelProject : Boolean;
Function CloseWindow (iWindow : Integer) : Boolean;
Function CommandEnabled (aCommand : Word) : Boolean;
Function Comp (I : AnyType) : Comp;
Function ConditionActive (iNum : Integer) : Boolean;
Function ConditionActiveInLeave (iNum : Integer; iLeaf : Integer) : Boolean;
Function Contain : Boolean;
Function Container_AtB (Container : LongInt; IndexNo : LongInt) : Byte;
Function Container_AtBL (Container : LongInt; IndexNo : LongInt) : Boolean;
Function Container_AtC (Container : LongInt; IndexNo : LongInt) : Comp;
Function Container_AtD (Container : LongInt; IndexNo : LongInt) : Data;
Function Container_AtDT (Container : LongInt; IndexNo : LongInt) : DataTime;
Function Container_AtI (Container : LongInt; IndexNo : LongInt) : Integer;
Function Container_AtL (Container : LongInt; IndexNo : LongInt) : LongInt;
Function Container_AtS (Container : LongInt; IndexNo : LongInt) : String;
Function Container_AtT (Container : LongInt; IndexNo : LongInt) : Time;
Function Container_AtW (Container : LongInt; IndexNo : LongInt) : Word;
Function Container_GetCount (Container : LongInt) : LongInt;
Function Container_GetIndex (Container : LongInt; Item : AnyType);
Function Container_Init (Name : String; ItemSize, Count, Delta : LongInt ) : LongInt;
Function Container_Search (Container : LongInt; Item : AnyType; IndexNo : LongInt) : Boolean;
Function CopyMoveFile (From,To : String; IsDel : Boolean) : Boolean;
Function Cos (X : Double) : Double;
Function Count (Var Mass : Array of AnyType) : Word;
Function CreateTmpFileName : String;
Function Cur_Date : Date;
Function Cur_Date_NoAQA : Date;
Function Cur_Time : Time;
Function Cur_Time_NoAQA : Time;
Function CurCommand : Word;
Function CurField : Integer;
Function CurFormatInArea (ScreenBrowseTreeMemoId : LongInt) : LongInt;
Function CurrentFileName : String;
Function CurTabInWindow (aScreenId : Integer) : LongInt;
Function CurTable : Integer;
Function CurWindow : Integer;
Function Date (Day : Byte; Month : Byte; Year : Word) : Date;
Function DateAdd (D : Date; Day, Month, Year : Byte) : Date;
Function DateSub (D : Date; Day, Month, Year : Byte) : Date;
Function DateToStr (D : Date; Format : String) : String;
Function Day (D : Date) : Byte;
Function Day_Of_Week (D : Date) : Byte;
Function DBFAddField (Handle : LongInt; FName : String; CField, LField, Quant : Integer) : Integer;
Function DBFDeleteAllRecords (Handle : LongInt) : Integer;
Function DBFDeleteRecord (Handle : LongInt) : Integer;
Function DBFDelField (Handle : LongInt; FName : String) : Integer;
Function DBFFieldsCount (DbfHandle : Longint) : Integer;
Function DBFGetFieldValue (Handle : LongInt; FName : String) : String;
Function DBFGetFirst (Handle : LongInt) : Integer;
Function DBFGetLast (Handle : LongInt) : Integer;
Function DBFGetMemoFieldValue (Handle : LongInt; FName : String; Field : Memo) : Integer;
Function DBFGetNext (Handle : LongInt) : Integer;
Function DBFGetPrev (Handle : LongInt) : Integer;
Function DBFInsertRecord (Handle : LongInt) : Integer;
Function DBFOpen (Name : String, Mode : Integer) : LongInt;
Function DBFPutFieldValue (Handle : LongInt; FName, Str : String) : Integer;
Function DBFPutMemoFieldValue (Handle : LongInt; FName : String; Field : Memo) : Integer;
Function DBFUpDateRecord (Handle : LongInt) : Integer;
Function DefineFormat (IName : String; IBody : String) : Boolean;
Function Delete (Name : String) : Boolean;
Function DeleteDirectory (aDirectoryName : String) : Boolean;
Function DeleteFile (Name : String) : Boolean;
Function DeleteIndex (iTable : Integer; iIndex : Integer) : Integer;
Function Div_Day (D : Date, I : LongInt) : Date;
Function Div_Sec100 (T : Time, N : LongInt) : Time;
Function DoneFilter (aFilterName : String) : Boolean;
Function Double (D : AnyType) : Double;
Function DoubleToStr (Num : Double, Format : String) : String;
Function EndExclusive : Integer;
Function EndFileTransaction (iTable : Integer) : Integer;
Function EndTransaction : Integer;
Function EOF : Boolean;
Function Error : Boolean;
Function Error : Boolean;
Function ExecProgram (aFileName, aParamStr, aTitle : String;
Function Exp (X : Double) : Double;
Function ExploreException : String;
Function ExportMemoToFile (Field : Memo; File : String; Append : Boolean) : Boolean;
Function Expression (Expression : String; Var ErrorInfo : String) : String;
Function ExprFieldValue : String;
Function FComp (FName, ResName : String) : Boolean;
Function Field_OpenMemo (Handle : LongInt; Field : Memo) : Boolean;
Function FieldCount : Integer;
Function FieldNumber (_Name : String) : Integer;
Function FieldPicture (Number : Integer) : String;
Function FieldPosition (Var f1, f2, f3 : Integer; Number : Integer) : Boolean;
Function FieldSelectAll (ScreenID : Longint; iField : Integer; Enable : Boolean) : Boolean;
Function File_EOF (Handle : LongInt) : Boolean;
Function File_Error (Handle : LongInt) : Boolean;
Function File_FileName (Handle : LongInt) : String;
Function File_GetPos (Handle : LongInt) : LongInt;
Function File_GetSize (Handle : LongInt) : LongInt;
Function File_OpenFile (Handle : LongInt; Name : String; Mode : Word) : Boolean;
Function FileName : String;
Function FiltersActive (aFromVip : Boolean) : Boolean;
Function FindEqual ( iTable : Integer; Index : Integer) : Boolean;
Function FName (Number : Integer) : String;
Function FocusedFormat : LongInt;
Function Form_Error (Handle : LongInt) : Boolean;
Function Form_GetFileName (P : LongInt) : String;
Function Form_GetFormName (P : LongInt) : String;
Function Form_GetNumPage (P : LongInt) : Word;
Function FormatDebugDump (IName, IFile : String; Append : Boolean) : Longint;
Function FormatStr_1 (Format : String, Param1 : AnyType) : String;
Function FormatStr_2 (Format : String, Param1 : AnyType, Param2 : AnyType) : String;
Function FormatStr_3 (Format : String, Param1 : AnyType, Param2 : AnyType, Param3 : AnyType) : String;
Function FormatStr_4 (Format : String, Param1 : AnyType, Param2 : AnyType, Param3 : AnyType, Param4 : AnyType) : String;
Function FormatStr_5 (Format : String, Param1 : AnyType, Param2 : AnyType, Param3 : AnyType, Param4 : AnyType, Param5 : AnyType) : String;
Function From_Days (I : LongInt) : Date;
Function From_Sec100 (N : LongInt) : Time;
Function GetAtlantisVersion : String;
Function GetBooleanParameter (aGroupName : String; aParameterName : String; aFlags : Word) : Boolean;
Function GetColumnSorting (aBrowseId : Longint; aFieldNo : Integer) : Integer;
Function GetColumnWidth (aBrowseId : Longint; aFieldNo : Integer) : Integer;
Function GetCompParameter (aGroupName : String; aParameterName : String; aFlags : Word) : Comp;
Function GetContourUsers (aContourName : String) : LongInt;
Function GetCurrentContour : String;
Function GetCurrentFieldName : String;
Function GetCurrentFormat : LongInt;
Function GetCurRow (aBrowse : LongInt) : Integer;
Function GetDateAsPascalLongint (aDate: Date): Longint;
Function GetDirName (Title : String) : String;
Function GetDoubleParameter (aGroupName : String; aParameterName : String; aFlags : Word) : Double;
Function GetEmbeddedInterfaceReference (EmbedId : LongInt; Var VarInterfaceType : InterfaceType) : Boolean;
Function GetEqual (iTable : Integer; iIndex : Integer) : Boolean;
Function GetError : String;
Function GetFieldCalendarContext (#Field : Integer, aContext : Comp) : Comp;
Function GetFieldFrom (aOffset : LongInt; aCount : Word; aType : Byte; Лист : Integer) : String;
Function GetFileName (Mask : String; Title : String) : String;
Function GetFileName : String;
Function GetFileParameter (aGroupName : String; aParameterName : String; aFlags : Word) :String;
Function GetFirstIn (iNum : Integer; Flags : Byte) : Integer;
Function GetFontBackgroundColor (aScreenId : LongInt; aFieldId : Integer) : Integer;
Function GetFontBold (aScreenId : LongInt; aFieldId : Integer) : Boolean;
Function GetFontForegroundColor (aScreenId : LongInt; aFieldId : Integer) : Integer;
Function GetFontItalic (aScreenId : LongInt; aFieldId : Integer) : Boolean;
Function GetFormatEnabled (ScreenBrowseTreeMemoId : LongInt) : Boolean;
Function GetFormatError : String;
Function GetFormName : String;
Function GetGreater (iTable : Integer; iIndex : Integer) : Boolean;
Function GetGrOrEq (iTable : Integer; iIndex : Integer) : Boolean;
Function GetIfcCurrentFieldName : String;
Function GetInLineCurPos (fldNum : Integer) : Integer;
Function GetInputLineFlags (aScreenId : LongInt; iField : Integer) : LongInt;
Function GetJournalKeyNo (iTable : Integer, Var oIndex : Word) : Boolean;
Function GetLastIn (iNum : Integer; Flags : Byte) : Integer;
Function GetLeftBound (Var Mass : Array of AnyType) : Integer;
Function GetLeOrEq (iTable : Integer; iIndex : Integer) : Boolean;
Function GetLess (iTable : Integer; iIndex : Integer) : Boolean;
Function GetLimit (Var Mass : Array of AnyType) : Word;
Function GetLongIntParameter (aGroupName : String; aParameterName : String; aFlags : Word) : LongInt;
Function GetMarker (Markers : LongInt; IndexNo : LongInt; Item : AnyType) : Boolean;
Function GetMarkerCount (Markers : LongInt) : LongInt;
Function GetMemoPrefix (Лист : Integer) : String;
Function GetModuleUsers (aContourName, aModuleName: String): Longint;
Function GetMyOfficeNo : Word;
Function GetNewFieldValueFromJournal (TableField : AnyType; FixedRecordSize : Word; JournalLVar : Memo; Operation : Byte; Var Value : AnyType) : Boolean;
Function GetNextIN (iNum : Integer; Flags : Byte) : Integer;
Function GetNextNRec (iTable : Integer; iIndex : Byte) : Comp;
Function GetNumPage: Word;
Function GetOldFieldValueFromJournal (TableField : AnyType; FixedRecordSize : Word; JournalLVar : Memo; Operation : Byte; Var Value : AnyType) : Boolean;
Function GetOutFileName : String;
Function GetPathParameter (aGroupName : String; aParameterName : String; aFlags : Word) : String;
Function GetPos : LongInt;
Function GetPrecisionGroup (aName : String) : Byte;
Function GetPrevIn (iNum : Integer; Flags : Byte) : Integer;
Function GetProtoName : String;
Function GetServerDate : Date;
Function GetServerDateTime : _DateTime;
Function GetServerTime : Time;
Function GetSessionID : Comp;
Function GetSize : LongInt;
Function GetStreamViewerAutoFormat : Boolean;
Function GetStreamViewerFormatFlags : Word;
Function GetStreamViewerIndentMargin : Word;
Function GetStreamViewerLeftMargin : Word;
Function GetStreamViewerRightMargin : Word;
Function GetStringParameter (aGroupName : String; aParameterName : String; aFlags : Word) : String;
Function GetTabbedSheetVisible (ScreenBrowseTreeMemoId : LongInt) : Boolean;
Function GetVieverData : String;
Function GetVipInterface (Var <ссылка>) : Boolean;
Function GetVipRef (Var <ссылка>; string ) : Boolean;
Function GetWindowCalendarContext (#Win: Integer, aContext : Comp) : Comp;
Function Handle : LongInt;
Function Handle : Longint;
Function Handle : LongInt;
Function Hex (L : LongInt) : String;
Function Hour (T : Time) : Byte;
Function ImportFileToMemo (Field : Memo; File : String; Append : Boolean) : Boolean;
Function iNextVisual (iHeader : String) : Boolean;
Function InitFilter (aFilterName : String) : Boolean;
Function InitItem (Var Mass : Array of AnyType; Item : Integer) : Boolean;
Function InitMarker (Name : String; Size, Count, Delta : LongInt; Sorted : Boolean) : LongInt;
Function InlineFormat (IName : String) : Boolean;
Function Instr (Substr : String; S : String)
Function Integer (I : AnyType) : Integer;
Function IsButtonInDesk (ButtonName : String) : Boolean;
Function IsFieldModified (FldNum : Integer) : Boolean;
Function IsMemoText (Лист : Integer) : Boolean;
Function IsModified : Boolean;
Function IsNew : Boolean;
Function IsProtected (iTable : Integer) : Boolean;
Function IsSemaphore (SemId : String; Var SemMode : String) : Boolean;
Function IsToolBarVisible (aToolBar : String) : Boolean;
Function IsToolButtonVisible (aToolBar : String; aToolButton : String) : Boolean;
Function IsValid (TableN : Integer) : Boolean;
Function IsValidAll (iLeaf : Integer) : Boolean;
Function IsValidNew (iLeaf : Integer) : Boolean;
Function IsWindowModal (aWindow : Integer) : Boolean;
Function Last_Day (D : Date) : Byte;
Function Length (S) : Byte;
Function LG (X : Double) : Double;
Function LN (X : Double) : Double;
Function LoadVipInterface (Var <ссылка>) : Boolean;
Function LoadVipRef (Var <ссылка>; string) : Boolean;
Function LoCase (S : String) : String;
Function LockCurrent (iPanel : Integer) : Integer;
Function LongInt (I : AnyType) : LongInt;
Function LotExpression_Add (Handle : LongInt, Name : String, Expr : String) : Boolean;
Function LotExpression_Add (Handle : LongInt, Name : String, Ret : AnyType) : Boolean;
Function LotExpression_Check (Handle : LongInt, Expr : String) : Boolean;
Function LotExpression_Clear (Handle : LongInt) : Boolean;
Function LotExpression_Delete (Handle : LongInt, Name : String) : Boolean;
Function LotExpression_GetError (Handle : LongInt) : String;
Function LotExpressionFunc (Fild : String|Memo; Err : String) : String;
Function Lpad (Str : String; Len : Byte) : String;
Function Ltrim (S : String; C : Char) : String;
Function MemoReadLn (Var Line : String; aNum : Integer) :Integer;
Function MemoSeek (aOffset : LongInt; aNum : Integer) : Integer;
Function Minute (T : Time) : Byte;
Function Month (D : Date) : Byte;
Function Months_Between (D1, D2 : Date) : Word;
Function MTChangeRefCount (iLink : Integer; iCount : Longint) : Longint;
Function MTDropIndex (iLink : Integer; iIndex : Integer) : Integer;
Function MTFirstDeleted (iLink : Integer) : Integer;
Function MTFirstRecError (iLink : Integer) : Integer;
Function MTFlush (iLink : Integer; mode : Word) : Integer;
Function MTGetModify (iLink : Integer) : Byte;
Function MTGetRecError (iLink : Integer) : Integer;
Function MTGetSynModify (iLink : Integer) : Byte;
Function MTNextDeleted (iLink : Integer) : Integer;
Function MTNextRecError (iLink : Integer) : Integer;
Function MTRetrieve (iLink : Integer; Trunc : Boolean) : Integer;
Function MTSetTableOrder (iLink : Integer; iOrder : Integer) : Integer;
Function NewRecord : Boolean;
Function NextNumStr (Str : String) : String;
Function NextVisual : Boolean;
Function nNextVisual (iNum : LongInt) : Boolean;
Function NoDialog : Boolean;
Function Nrec2ono (Nrec : Comp) : Word;
Function NullVipRef (Var <ссылка>) : Boolean;
Function OldFieldValue : String;
Function OpenExcelProject (FName : String) : Boolean;
Function OpenFile (Name : String; Mode : Word) : Boolean;
Function OpenMemo (Field : Memo) : Boolean;
Function Ord (C : Char) : Byte;
Function Origin_X : Integer;
Function Origin_Y : Integer;
Function PackFields : Boolean;
Function Pad (Line : String; Len : Byte) : String;
Function PadCh (Line : String; Symbol : Char; Len : Byte) : String;
Function PI : Double;
Function PopFilter (aFilterName : String) : Boolean;
Function PopPos (iTable : Integer) : Integer;
Function PR_CurUserAdmin : Boolean;
Function PrevNumStr (Str : String) : String;
Function PrIntMemoField (Field : Memo; ExecFlag : Integer) : Boolean
Function ProcessCommand (aCommand : Word) : Boolean;
Function PushFilter (aFilterName : String) : Boolean;
Function ReadMyDsk (Buf; Name : String; Var DateChanged : Boolean) : Boolean;
Function RecodeReferences (TargetTable: Word; OldNRec, NewNRec: Comp; Var F: LongInt): Boolean;
Function RecordsInTable (iTable : Integer) : LongInt;
Function ReInitTable (iLink : Integer; mode : Word) : Integer;
Function ReopenSystemTables : Integer;
Function ReopenTableByPath (iTable : Integer; NewPath : String) : Integer;
Function Replace (S, SearchString, ReplaceString : String) : String;
Function ReReadRecord : Boolean;
Function RestoreIndex (iTable : Integer; iIndex : Integer) : Integer;
Function RowCount : Longint;
Function rTrim (S : String; C : Char) : String;
Function Run (Name : String, Ret : AnyType) : Boolean;
Function RunMenu (MenuName : String; [X : Integer, Y : Integer]) : Word;
Function RunWindow (WindowNumber : Integer) : Boolean;
Function RunWindowModal ( iWindow : Integer ) : Word;
Function SaveMyDsk (Buf; Name : String) : Boolean;
Function SearchMarker (Markers : LongInt; Item : AnyType; IndexNo : LongInt) : Boolean;
Function SearchOpen : Boolean;
Function Sec100 (T : Time) : Byte;
Function Second (T : Time) : Byte;
Function SelectFieldByName (aField : String) : Boolean;
Function SelectFormat (Format : LongInt) : Boolean;
Function SelectPanel ( PanelN : Integer) : Boolean;
Function SendMessageToSession (_SessID: Comp; _MesText : String) Boolean;
Function SetBooleanParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : Boolean) : Boolean;
Function SetColumnWidth (aBrowseId : Longint; aFieldNo : Integer; aWidth : Integer) : Integer;
Function SetCompParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : Comp) : Boolean;
Function SetDoubleParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : Double) : Boolean;
Function SetFieldCalendarContext (#Field, aContext) : Comp;
Function SetFileParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : String) : Boolean;
Function SetFormatEnabled (ScreenBrowseTreeMemoId : LongInt; aState : Boolean) : Boolean;
Function SetFormatIterationCount (Iterations : Longint; MaxCount : Longint) : Longint;
Function SetFormatLogFileName (ILogName : String) : Boolean;
Function SetInputLineFlags (aScreenId : LongInt; iField : Integer; aFlags : LongInt) : LongInt;
Function SetLongIntParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : LongInt) : Boolean;
Function SetOrder (OrderN : Integer) : Integer;
Function SetPathParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : String) : Boolean;
Function SetRowSetSize (TableN : Integer; RowSetSize : Word) : Word;
Function SetSemaphore (SemId : String; SemMode : Byte) : Integer;
Function SetStreamViewerAutoFormat (aValue : Boolean) : Boolean;
Function SetStreamViewerFormatFlags (aValue : Word) : Word;
Function SetStreamViewerIndentMargin (aValue : Word) : Word;
Function SetStreamViewerLeftMargin (aValue : Word) : Word;
Function SetStreamViewerRightMargin (aValue : Word) : Word;
Function SetStringParameter (aGroupName : String; aParameterName : String; aFlags : Word; aValue : String) : Boolean;
Function SetTabbedSheetVisible (ScreenBrowseTreeMemoId : LongInt; aState : Boolean) : Boolean;
Function SetWindowCalendarContext (#Win : Integer, aContext : Comp) : Comp;
Function ShowToolBar (aToolBar : String; aVisible : Boolean) : Boolean;
Function ShowToolButton (aToolBar : String; aToolButton; aVisible : Boolean) : Boolean;
Function Sign (X : Double) : Integer;
Function Sin (X : Double) : Double;
Function Single (D : AnyType) : Single;
Function Size_X : Integer;
Function Size_Y : Integer;
Function SortedContainer_Add (SortedContainerInto: LongInt; SortedContainerFrom : LongInt) : Boolean;
Function SortedContainer_AtB (SortedContainer : LongInt; IndexNo : LongInt) : Byte;
Function SortedContainer_AtBL (SortedContainer : LongInt; IndexNo : LongInt) : Boolean;
Function SortedContainer_AtC (SortedContainer : LongInt; IndexNo : LongInt) : Comp;
Function SortedContainer_AtD (SortedContainer : LongInt; IndexNo : LongInt) : Data;
Function SortedContainer_AtDT (SortedContainer : LongInt; IndexNo : LongInt) : DataTime;
Function SortedContainer_AtI (SortedContainer : LongInt; IndexNo : LongInt) : Integer;
Function SortedContainer_AtL (SortedContainer : LongInt; IndexNo : LongInt) : LongInt;
Function SortedContainer_AtS (SortedContainer : LongInt; IndexNo : LongInt) : String;
Function SortedContainer_AtT (SortedContainer : LongInt; IndexNo : LongInt) : Time;
Function SortedContainer_AtW (SortedContainer : LongInt; IndexNo : LongInt) : Word;
Function SortedContainer_Copy (SortedContainerInto: LongInt; SortedContainerFrom : LongInt) : Boolean;
Function SortedContainer_GetCount (SortedContainer : LongInt) : LongInt;
Function SortedContainer_Init (Name : String; ItemSize, Count, Delta : LongInt; Duplicates : Boolean) : LongInt;
Function SortedContainer_Invert (SortedContainer : LongInt; Item : AnyType) : Boolean;
Function SortedContainer_Move (SortedContainerInto: LongInt; SortedContainerFrom : LongInt) : Boolean;
Function SortedContainer_Search (SortedContainer : LongInt; Item : AnyType; IndexNo : LongInt) : Boolean;
Function Sqr (X : Double) : Double;
Function Sqrt (X : Double) : Double;
Function StartTimer (aCommand : Word; tInterval : Longint; mNotify : Boolean) : Boolean;
Function StopTimer (aCommand : Word) : Boolean;
Function String (I : AnyType; Length : Byte; Digits : Byte) : String;
Function StrToDate (S : String; Format : String) : Date;
Function StrToTime (S : String; Format : String) : Time;
Function Sub_Date (D1 : Date, D2 : Date) : Date;
Function Sub_Day (D : Date; I : LongInt) : Date;
Function Sub_Months (D : Date; Months : Integer) : Date;
Function Sub_Time (T1 : Time; T2 : Time) : Time;
Function SubStr (S : String; Position : Byte; Len : Byte) : String;
Function SW_ViewTable (TableName : String; Flags : Word) : Comp;
Function TableByField (Field : Integer) : Integer;
Function Tan (X : Double) : Double;
Function Target : LongInt;
Function Time (Hour, Minute, Second, Sec100 : Byte) : Time;
Function TimeToStr (T : Time; Format : String) : String;
Function To_Days (Date) : LongInt;
Function To_Sec100 (T : Time) : LongInt;
Function TObjectControlProc (aObjType : LongInt; aContainerType : LongInt; Var aSelf : Pointer; aCommand : LongInt; aInfo : Pointer) : LongInt;
Function TObjectPropControlProc (aObjType : LongInt; aPropName : LongInt; aSelf : Pointer; aCommand : LongInt; aInfo : Pointer) : LongInt;
Function TranslatePath (Str : String) : String;
Function TreeCloseNode (Имя_панели : LongInt) : Boolean;
Function TreeGetFirst (Имя_панели : LongInt) : Boolean;
Function TreeGetLast (Имя_панели : LongInt) : Boolean;
Function TreeGetNext (Имя_панели : LongInt) : Boolean;
Function TreeGetNodeTable (Format : LongInt) : Integer;
Function TreeGetPrev (Имя_панели : LongInt) : Boolean;
Function TreeIsTerminal (Имя_панели : LongInt) : Boolean;
Function TreeJumpToRecord (Format : LongInt, NRec : Comp) : Boolean;
Function TreeJumpToRecordEx (Format : LongInt, Tabl : Integer, NRec : Comp) : Boolean;
Function TreeLevel (Имя_панели : LongInt) : Integer;
Function TreeNodeIsOpen (Format : LongInt) : Boolean;
Function TreeOpenNode (Имя_панели : LongInt) : Boolean;
Function TreeSetNodeTable (Format : LongInt, Tabl : Integer) : Boolean;
Function TreeSetNodeType (Имя_панели : LongInt; Тип : Byte; Icon : String);
Function Trim (S : String) : String;
Function UpCase (S : String) : String;
Function UpdatePanels : Boolean;
Function UpDateTable : Boolean;
Function UpDateTableWithInserted : Boolean;
Function UserId : Comp;
Function UserName : String;
Function Verify (iField : AnyType) : Boolean;
Function VerifyFilter (aFilterName : String) : Boolean;
Function VisualCount : LongInt;
Function VisualizationActive : Boolean;
Function Word (I : AnyType) : Word;
Function Year (D : Date) : Word;
Procedure AbortForm;
Procedure AddArea (AreaNum : Word; Definition : String);
Procedure AtDeleteMarker (Markers : LongInt; IndexNo : LongInt);
Procedure CallToNeighbours (aCommand : Word; iTable : Integer);
Procedure cfsAddSelected (aObjName : LongInt | String);
Procedure cfsClearSelected;
Procedure cfsClearState (aState : LongInt);
Procedure cfsDeleteSelected (aObjName : LongInt | String);
Procedure cfsGetSelectedObjects (aList : Array of String | Array of LongInt);
Procedure cfsSetState (aState : LongInt);
Procedure cfsUnRegisterObjects ();
Procedure ClearAdvRecord (iField : AnyType);
Procedure ClearBuffer (Table : Integer);
Procedure ClearColumnsSorting(aBrowseId : LongInt);
Procedure ClearFieldOption (поле : Integer; iOption : Word);
Procedure ClearFieldState (поле : Integer; iState : Word);
Procedure ClearMarker (Markers : LongInt);
Procedure Close;
Procedure CloseArea (AreaNum : Word);
Procedure CloseInterface (aCommand : Word);
Procedure ClusterDisabledField (Cluster : Integer; Mask : Word);
Procedure Container_At (Container : LongInt; IndexNo : LongInt; Item : AnyType);
Procedure Container_AtDelete (Container : LongInt; IndexNo : LongInt);
Procedure Container_AtInsert (Container : LongInt; Item : AnyType; IndexNo : LongInt);
Procedure Container_AtPut (Container : LongInt; IndexNo : LongInt; Item : AnyType);
Procedure Container_Delete (Container : LongInt; Item : AnyType);
Procedure Container_DeleteAll (Container : LongInt);
Procedure Container_Done (Container : LongInt; Name : String);
Procedure Container_Insert (Container : LongInt; Item : AnyType);
Procedure CopyTableFields (FromTab, ToTab : Word);
Procedure DBFClearBuffer (dbfHandle : Longint);
Procedure DBFClose (Handle : LongInt);
Procedure DebugExceptionHandler;
Procedure DeleteMarker (Markers : LongInt; Item : AnyType);
Procedure DisableCommand (aCommand : Word);
Procedure DisableCommands (aCommand : Array of Word);
Procedure DisableProfiler;
Procedure DoFilter (TableName, FilterName : String);
Procedure DoneMarker (Markers : LongInt; Name : String);
Procedure DropPos (iTable : Integer);
Procedure EnableCommand (aCommand : Word);
Procedure EnableCommands (aCommand : Array of Word);
Procedure EnableProfiler (Value : Word; Report : String);
Procedure FBreak;
Procedure FContinue;
Procedure FExit;
Procedure File_Close (Handle : LongInt);
Procedure File_Read (Handle : LongInt; Field : AnyType);
Procedure File_ReadLn (Handle : LongInt; Field : String);
Procedure File_Seek (Handle : LongInt; Pos : LongInt);
Procedure File_Truncate (Handle : LongInt);
Procedure File_Write (Handle : LongInt; Field : AnyType);
Procedure File_WriteLine (Handle : LongInt, Field : String);
Procedure File_WriteLn (Handle : LongInt; Field : String);
Procedure FixRelations (Field : AnyType);
Procedure Form_AbortForm (Handle : LongInt);
Procedure Form_GoNextPage (P : LongInt);
Procedure Form_PrintFile (P : LongInt);
Procedure Form_PutEvent (iEvent : Word; P : LongInt);
Procedure Form_PutEventById (iEvent: Word, Iid: Word; P : LongInt);
Procedure Form_ReInit(P : LongInt);
Procedure Form_SetFileName (iFileName : String; P : LongInt);
Procedure Form_SetFormName (iFormName : String; P : LongInt);
Procedure Form_SetGroup (iGroupName : String; P : LongInt);
Procedure Form_ShowFile (File : String; P : LongInt);
Procedure Form_SkipFormat (iCount: Word, P : LongInt);
Procedure Form_TuneField (Var iValue, iType, iPoInt : Byte; P : LongInt);
Procedure Form_Write (Value : AnyType, Length : Integer; P : LongInt);
Procedure Form_Write (Value : AnyType; Frm : String; P : LongInt);
Procedure FreeVipInterface (Var <ссылка>);
Procedure GetReport (FormName, LinkForm, ResultName, ResName : String);
Procedure GoNextPage;
Procedure InsertMarker (Markers : LongInt; Item : AnyType);
Procedure InvertMarker (Markers : LongInt; Item : AnyType);
Procedure LocateWin (X, Y, SX, SY : Integer; Win : Integer);
Procedure LogStrToFile (aFileName : String; aStr : String);
Procedure MakeValid (TableN : Integer);
Procedure MTClearModify (iLink : Integer; All : Boolean);
Procedure MTClearRecError (iLink : Integer; All : Boolean);
Procedure MTGetNextNREC (iLink : Integer; fromBase : Boolean);
Procedure PopAllConditionForLeave (iLeaf : Integer);
Procedure PopAllConditions;
Procedure PopBounds (BoundN : LongInt);
Procedure PopCondition (iCondition : Word);
Procedure PopConditionForLeave (iNum : Integer; iLeaf : Integer);
Procedure PrepareOutFile : Boolean;
Procedure PrintFile;
Procedure ProcessText (Report.Txt, vfRunModal Or vfNewTitle Or vfToErase Or vfMacroSize, 'Отчет о проделанной работе');
Procedure ProcessText (TextFileName : String; TextFileOptions : Word; TextFileTitle : String);
Procedure ProtectRecord (iTable : Integer; Protect : Boolean);
Procedure PushBounds (BoundN : LongInt);
Procedure PushCondition (iCondition : Integer);
Procedure PushConditionForLeave (iNum : Integer; iLeaf : Integer);
Procedure PushPos (iTable : Integer);
Procedure PutCommand (aCommand : Word);
Procedure PutEvent (iEvent : Word);
Procedure PutEventById (iEvent: Word, iId: Word);
Procedure Read (Field : AnyType);
Procedure ReadLn (Field : String);
Procedure RebuildPanels;
Procedure RedrawPanel (iPanel : Integer);
Procedure ReInit;
Procedure RescanPanel (iPanel : Integer);
Procedure ReSetBounds (TableN : Integer);
Procedure RestartVisual (iHeader : String, iParam : LongInt);
Procedure RestoreDataBase (Dest, Archive : String);
Procedure RunAnyView (Name : String; Modal : Boolean);
Procedure RunForm (FormName : String [ , <список фактических параметров>] );
Procedure RunProcess (ProcessName : String);
Procedure Seek (Pos : LongInt);
Procedure SelecTableButton (iScreen : LongInt; Команда : Word; isSel : Boolean);
Procedure SelectButton (Format : LongInt; Command : Word);
Procedure SelectField (iField : Integer);
Procedure SelectFieldInFormat (FormatName : LongInt; FieldNum : Integer);
Procedure SetBounds (TableN : Integer);
Procedure SetColumnSorting(aBrowseId : LongInt; aFieldNo : Integer; aSortMode : Integer);
Procedure SetColumnTitle (iВrows : LongInt; поле : Integer; title : String);
Procedure SetCurRow (aBrowse : LongInt; aRow : Integer);
Procedure SetEnumList (Format : LongInt, Fild : Integer, Str : Array);
Procedure SetFieldOption (Поле : Integer; iOption : Word);
Procedure SetFieldState (поле : Integer; iState : Word)
Procedure SetFileName (iFileName : String);
Procedure SetFontBackgroundColor (aScreenId : LongInt; aFieldId : Integer; AttrVal : Integer);
Procedure SetFontBold (aScreenId : LongInt; aFieldId : Integer; AttrVal : Boolean);
Procedure SetFontColor (aScreenId : LongInt; aFieldId : Integer; aBackgroundColor, aForegroundColor : Integer);
Procedure SetFontForegroundColor (aScreenId : LongInt; aFieldId : Integer; AttrVal : Integer);
Procedure SetFontItalic (aScreenId : LongInt; aFieldId : Integer; AttrVal : Boolean);
Procedure SetFormat (FormatNumber : Integer);
Procedure SetFormName (iFormName : String);
Procedure SetGroup (iGroupName : String);
Procedure SetHelpAndStatusContext (Format : LongInt, Field : Integer, Status : Word, Help : Word);
Procedure SetHelpAndStatusContext (Format : LongInt; Field : Integer;
Procedure SetINterfaceOptions (Opt : Byte);
Procedure SetMemoPrefix (Лист : Integer; Prefix : String);
Procedure SetModified (iFlag : Boolean);
Procedure SetNew (iFlag : Boolean);
Procedure SetNoMes;
Procedure SetPrecisionGroup (aName : String; aDigits : Byte);
Procedure SetTabbedSheetTitle (ScreenBrowseTreeMemoId : LongInt; aTitle : String);
Procedure SetTitle (iTitle : String);
Procedure SetVisualHeader (iHeader : String);
Procedure SetVisualTitle (iTitle : String);
Procedure SetWindowHelpCtx (Help : Word; Win : Integer);
Procedure SetWindowMoreOption (aWindow : Integer; aOption : Word);
Procedure SetWindowOption (aWindow : Integer; aOption : Word);
Procedure SetWindowTitle (WNum : Integer; iTitle : String);
Procedure ShowButton (iScreen : LongInt; Команда : Word; isShow : Boolean);
Procedure ShowFile (File : String);
Procedure ShowLabel4Field (iField : Integer);
Procedure ShowLabel4Field (iField : Integer);
Procedure SkipFormat (iCount: Word);
Procedure SortedContainer_At (SortedContainer, IndexNo : LongInt; Item : AnyType);
Procedure SortedContainer_AtDelete (SortedContainer, IndexNo : LongInt);
Procedure SortedContainer_AtInsert (SortedContainer : LongInt; Item : AnyType; IndexNo : LongInt);
Procedure SortedContainer_AtPut (SortedContainer : LongInt; IndexNo : LongInt; Item : AnyType);
Procedure SortedContainer_Delete (SortedContainer : LongInt; Item : AnyType);
Procedure SortedContainer_DeleteAll (SortedContainer : LongInt);
Procedure SortedContainer_GetIndex (SortedContainer : LongInt; Item : AnyType);
Procedure SortedContainer_Insert (SortedContainer : LongInt; Item : AnyType);
Procedure StartNewVisual (iVisualType, iFlags : Byte; iHeader : String; iParam : LongInt);
Procedure Stop:Boolean;
Procedure StopVisual (iInfo : String; iFlags : Byte);
Procedure StoreDataBase (Source, Archive : String);
Procedure TestDataBase (Source, Archive : String);
Procedure TreeCloseAllOpenedNode (Имя_панели : LongInt);
Procedure TreeDelTree (TrBrowseId : LongInt);
Procedure TreeDropPos (Format : LongInt);
Procedure TreePopPos (Format : LongInt);
Procedure TreePushPos (Format : LongInt);
Procedure Truncate;
Procedure TuneField (Var iValue : Byte; iType : Byte; iPoInt : Byte);
Procedure UnBindEmbeddedInterface (EmbedId : LongInt);
Procedure UnLockAll (TableN : Integer);
Procedure UpDateMarker (Markers : LongInt; IndexNo : LongInt; Item : AnyTyp);
Procedure Write (Field : AnyType);
Procedure Write (Value : AnyType, Length : Integer);
Procedure Write (Value : AnyType; Frm : String);
Procedure WriteLine (Field : String);