Page History
...
Method for unlocking an entity. The lock is associated with the workstation that issued the LOCK on the entity.
Syntax
retval = Repository("UNLOCK" , entID)
...
Null, whether or not the UNLOCK is successful. If the entity is already unlocked, Get_Status() will return an error code.
Note: Always call the Get_Status function after calling Repository.
See also
Repository() function, LOCK Method, Get_Repos_Entities().
Example
| Code Block |
|---|
/* Unlock the CENTERWINDOW stored procedure in 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("UNLOCK", entid)
/* CENTERWINDOW is now unlocked. The result field is null. */
If Get_Status(ErrCode) then
call msg(@window, 'Error Message returned: ' : ErrCode)
end |
