Description
Method for updating the list of users who have update permission for this entity.
Note: SETUPDATEPERMIT cannot be used against columns or tables.
Syntax
retval = Repository("SETUPDATEPERMIT" , entID, param1)
Parameters
The SETUPDATEPERMIT method has the following parameters.
| Parameter | Description |
|---|---|
| Message | "SETUPDATEPERMIT" |
| 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 | field mark delimited list of users to be granted update permission to this entity. |
Returns
Null
Note: Always call the Get_Status function after calling Repository.
See also
Repository() function, GETUPDATEPERMIT Method, Get_Repos_Entities().
Example
/* Add the user 'EDWARD' to the list of users with update permission for the CENTERWINDOW stored procedure executable */
Declare Function Get_Repos_Entities, Repository, Get_Status
declare subroutine fsmsg
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("GETUPDATEPERMIT", entid)
/* result now contains a field mark delimited list of users who have udpate permission to CENTERWINDOW in Field 1. */
If Get_Status(ErrCode) then
call msg(@window, 'Error in GETUPDATEPERMIT method call: ': ErrCode : '.')
return 1
end
locate 'EDWARD' in result using @fm setting loc else
result = result : @fm : 'EDWARD'
retval = Repository("SETUPDATEPERMIT", entid, result)
/* retval is null. Use Get_Status() to determine if an error occurred. */
If Get_Status(ErrCode) then
call msg(@window, 'Error in SETUPDATEPERMIT method call: ': ErrCode : '.')
return 1
end
end
