Page History
...
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().
Example
| Code Block |
|---|
/* 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 |