Description
Method for updating an entity while allowing the repository routines to record the update.
Syntax
retval = Repository("UPDATE" , entID, param1)
Parameters
The UPDATE method has the following parameters.
| Parameter | Description |
|---|---|
| Message | "UPDATE" |
| entID | entID consists of four elements, which are '*' (asterisk) delimited: |
| |
| 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. | |
| param1 | The updated contents of the entity. UPDATE will update the contents and log it to the repository. |
Returns
Null
Note: Always call the Get_Status function after calling Repository.
See also
Repository() function, NEW Method, WRITE Method, Get_Repos_Entities().
Example
/* Read the source code of the CENTERWINDOW stored procedure into the variable called result, change the code, and update the repository. */
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("ACCESS", entid)
* result now contains the source code to CENTERWINDOW
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
return 1
end
result = '/* adding a comment, and updating... */' : @fm : result
retval = Repository("UPDATE", entid, result)
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
return 1
end