====== SETSHAREABLE Method ======


 
==== Description ====
 
Method for setting the entity's shareable flag in the repository.
 
==== Syntax ====
 
//retval// = **Repository**('SETSHAREABLE', //entID, param1//)
 
==== Parameters ====
 
The SETSHAREABLE method has the following parameters.

^Parameter^Description^
|//Message//|'SETSHAREABLE'|
|//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|Shareable flag to set.  0 = shareable flag disabled; 1 = shareable flag enabled.|

 
==== Returns ====
 
Null, regardless of whether the function succeeded.

**Note:**  Always call the [[get_status|Get_Status function]] after calling Repository.
 
==== See Also ====
 
[[repository|Repository() function]], [[getshareable|GETSHAREABLE Method]], [[get_repos_entities|Get_Repos_Entities()]]. Also, Stored Procedures chapter in the //Guide to Application Development//.
 
==== Example ====
 
<code>
/* Set the shareable flag for the for the BTREEREADTEST window executable */

Declare Function Repository, Get_Status

AppID = @APPID<1>  ;* current application

TypeID = "OIWINEXE"  ;* OpenInsight window executable

ClassID = ""  ;* Not Applicable

Stored_Proc_Name = 'BTREEREADTEST'

flag = '1'

entid = AppID : '*' : TypeID : '*' : ClassID : '*' : Stored_Proc_Name
 

result = Repository("SETSHAREABLE", entid, flag)

/* Even if the publishable flag is set, result is null, so need to check for errors */

If Get_Status(ErrCode) then

  call msg(@window, 'SETSHAREABLE method error ' : ErrCode : '.')

  return 1

end
</code>