====== SETUPDATEPERMIT Method ======


 
==== 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:\\ \\ * 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.|
|param1|field mark delimited list of users to be granted update permission to this entity.|

 
==== Returns ====
 
Null

**Note:**  Always call the [[get_status|Get_Status function]] after calling Repository.
 
==== See Also ====
 
[[repository|Repository() function]], [[getupdatepermit|GETUPDATEPERMIT Method]], [[get_repos_entities|Get_Repos_Entities()]]. Also, Stored Procedures chapter in the //Guide to Application Development//.
 
==== Example ====
 
<code>
/* 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
</code>