Page History
...
null
Note: Always call the Get_Status function after calling Repository.
See also
Repository() function, GET Method, Get_Repos_Entities().
Example
| Code Block |
|---|
/* Change the author of the CENTERWINDOW stored procedure executable by reading the repository record and setting the
appropriate field. */
Declare Function Repository, Get_Status
$insert sysrepos_col_equates
AppID = @APPID<1> ;* current application
TypeID = "STPROCEXE" ;* OpenInsight stored procedure executables
ClassID = "" ;* Not Applicable
Stored_Proc_Name = 'CENTERWINDOW'
entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Stored_Proc_Name
result = Repository("GET", entid)
* result now contains the entry in SYSREPOS corresponding to the CENTERWINDOW stored procedure
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
end
result<SYSREP_AUTHOR$> = 'Ira Krakow'
result = Repository("SET", entid, result)
/* respository row is written with changed author. Result is null. Need to check for errors. */
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
end |
