CLEARFLAG Method
Description
Method for resetting the evaluation and/or compilation flags for a repository entity.
Syntax
retval = Repository('CLEARFLAG', entID, type, tree)
Parameters
The CLEARFLAG message has the following parameters
Parameter | Description |
---|---|
Message | 'CLEARFLAG' |
entID | entID 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. |
type | Type - Value 0 - Clear evaluation and compilation flag 1 - Clear evalution flag 2 - Clear compilation flag |
tree | a boolean value indicating whether or not the corresponding flags in the components using this component should be cleared. |
Returns
retval - null. Use Get_Status() to test for error return.
Note: Always call the Get_Status function after calling Repository().
See Also
Repository() function,Get_Repos_Entities(). Also, Stored Procedures chapter in the Guide to Application Development.
Example
/* Clear the compilation and evaluation flags in the CENTERWINDOW stored procedure */ Declare Function Repository, Get_Status AppID = @APPID<1> ;* current application TypeID = "STPROC" ;* OpenInsight stored procedures ClassID = "" ;* Not Applicable Stored_Proc_Name = 'CENTERWINDOW' Type = 0 ;* clear both evaluation and compilation flags Tree = '' ;* do not clear flags of entities using CENTERWINDOW entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Stored_Proc_Name result = Repository("CLEARFLAG", entid, type, tree) If Get_Status(ErrCode) then call msg(@window, 'Error Message returned: ' : ErrCode) end