Description

Method for unlocking an entity. The lock is associated with the workstation that issued the LOCK on the entity.

Syntax

retval = Repository("UNLOCK" entID)

Parameters

The UNLOCK method has the following parameters.

ParameterDescription
Message"UNLOCK"
entIDentID 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.

Returns

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() functionLOCK MethodGet_Repos_Entities().

Example

/* 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
  • No labels