Method for getting the entity's evaluate flag and notes information.
retval = Repository('GETEVALUATE', entID)
The GETEVALUATE method has the following parameters.
| Parameter | Description | |
|---|---|---|
| Message | 'GETEVALUATE' | |
| 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. |
|
Field 1 contains the evaluation flag for the entity. Field 2 contains notes for the entity, as stored in SYSREPOS. Note: Always call the Get_Status function after calling Repository.
Repository() function, Get_Repos_Entities(). Also, Stored Procedures chapter in the Guide to Application Development.
/* Get the evaluation flag and notes for the CENTERWINDOW stored procedure into the variable called result */
Declare Function Get_Repos_Entities, Repository, Get_Status
AppID = @APPID<1> ;* current application
TypeID = "STPROC" ;* OpenInsight stored procedures
ClassID = "" ;* Not Applicable
Stored_Proc_Name = 'CENTERWINDOW'
entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Stored_Proc_Name
result = Repository("GETEVALUATE", entid)
/* result now contains the evaluate flag of CENTERWINDOW in Field 1 and notes for the entity in Field 2*/
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
end