Description

Method for destroying entities and entities used by this entity (such as a window and events created in the window). Tdestroying a Window will destroy the window and events. Tdestroying a compiled window will destroy the window events and their compiled versions. Tdestroying a stored procedure executable (STPROCEXE) will destroy the source (STPROC) and debug (STPROCDBG) also.

Syntax

object = Repository("TDESTROY" , entID)

Parameters

The TDESTROY method has the following parameters.

ParameterDescription
Message"TDESTROY"
entIDentID consists of four elements, which are '*' (asterisk) delimited:
 
  • Application name
  • Type ID
  • Class ID
  • Entity name
 Methods are executed as follows: if class specific, execute at the class level; if type specific, execute at the type level; otherwise, execute the method.

Returns

null

Note: Always call the Get_Status function after calling Repository.

See also

Repository() function, DESTROY method, Get_Repos_Entities().

Example

* Destroy the BTREEREADTEST_BACKUP form, and entities used by it (window events) */
Declare Function Repository, Get_Status
AppID = @APPID<1>  ;* current application
TypeID = "OIWINEXE"  ;* OpenInsight window executable
ClassID = ""  ;* Not Applicable
Window_Name = 'BTREEREADTEST_BACKUP'
entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Window_Name
result = Repository("TDESTROY",  entid)
/*  the form and its associated events have been destroyed */
*  test result
If Get_Status(ErrCode) then
   call msg(@window, 'Error Message returned: ' : ErrCode)
end
  • No labels