====== SETSUB Method ======


 
==== Description ====
 
Method for setting the list of "sub-entities" (entities using //entID//).  //The list is displayed in the Entity Relationships browser from the Repository outline menu.//
 
==== Syntax ====
 
//retval// = **Repository**('SETSUB', //entID//)
 
==== Parameters ====
 
The SETSUB method has the following parameters.

^Parameter^Description^
|//Message//|'SETSUB'|
|//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 sub-entities for entID.|
|param2|a boolean flag indicating whether the existing entity list should be overwritten (True) or combined with the list passed in (False).|

 
==== Returns ====
 
Null in all cases.

**Note:**  Always call the [[get_status|Get_Status function]] after calling Repository.
 
==== See Also ====
 
[[repository|Repository() function]], [[getsub|GETSUB Method]], [[get_repos_entities|Get_Repos_Entities()]]. Also, Stored Procedures chapter in the //Guide to Application Development//.
 
==== Example ====
 
<code>
/* Change the list of "sub-entities" for the CENTERWINDOW stored procedure executable, overwriting the existing list. */

$insert logical

Declare Function Repository, Get_Status

AppID = @APPID<1>  ;* current application

TypeID = "STPROCEXE"  ;* OpenInsight stored procedure executables

ClassID = ""  ;* Not Applicable

Stored_Proc_Name = 'CENTERWINDOW'

Sub_Entities = @APPID<1>:"*STPROC**CENTERWINDOW" : @fm : @APPID<1> :  "*OIWIN**CENTERWINDOW"

overwrite_flag = TRUE$

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

result = Repository("SETSUB", entid, Sub_Entities, overwrite_flag)

/*  if successful, the list of sub-entities is the stored procedure (STPROC) and window (OIWIN) called "CENTERWINDOW". */

If Get_Status(ErrCode) then

  call msg(@window, 'Error Message returned: ' : ErrCode)

end
</code>