Context Object Parameters
| Parameter Name | Type | Read/Write | Comments | 
|---|
| SourceSupportInstance | VPMInstance | Read | Selected source support Its reference has a SharedSupportPart type. | 
| SegmentAtSource | Segment | Read | Segment at source support | 
| TargetSupportInstance | VPMInstance | Read | Selected target support | 
| SegmentAtTarget | Segment | Read | Segment at target support | 
 Sample
The following sample illustrates the syntax of the business rule.
 /* CATRule signature (do not edit) : (ThisObject : #In Support, 
Parameters : #In RuleContext, Validation : #Out Boolean) : #Void */
let SrcSpt(Support)
let SrcSeg(Segment)
let TgtSpt(Support)
let TgtSeg(Segment)
let SrcName(STRING)
let TgtName(STRING)
let SubType(STRING)
set SrcSpt = Parameters.GetAttributeObject("SourceSupportInstance")
set SrcSeg = Parameters.GetAttributeObject("SegmentAtSource")
set TgtSpt = Parameters.GetAttributeObject("TargetSupportInstance")
set TgtSeg = Parameters.GetAttributeObject("SegmentAtTarget")
if((NULL == SrcSpt) or (NULL == TgtSpt) or (NULL == SrcSeg) 
   or (NULL == TgtSeg))
{
   Validation = false
   Parameters.Severity = 2
   Parameters.Message = "Param NULL"
}
else
{
   set SrcName = SrcSpt.Name
   set TgtName = TgtSpt.Name
}
{
if (SrcName == TgtName)
{
   Validation = false
   Parameters.Severity = 2
   Parameters.Message = "Not allowed"
}
else
{
   if(SrcSeg.Elec_SubType == TgtSeg.Elec_SubType)
   {
      Validation = true
      Parameters.Severity = 0
      Parameters.Message = "Copy Allowed - Both segments have same Subtype"
}
else
{
      Validation = true
      Parameters.Severity = 1
      Parameters.Message = "Copy Allowed with warning- Subtypes of the 
      segments does not match"
   }
}