CopyRefObjTestPlan
You can use this function for Optiva Copy Methods.
Purpose
Copies a test plan from the References tab of the current object to the new object.
Syntax
Dim variable As Long = CopyRefObjTestPlan()
Arguments
None
Example
This script is in a copy method for a formula created from the
References tab of a project
(Object Type = FORMULA, Reference Type = PROJECT, Events = Create From
As New
). It is
PROJECT FORMULA PLAN
in the seed database.
Dim des As String = ObjProperty("DESCRIPTION","PROJECT",
Context._REFOBJECTKEY)
Dim rc As Integer = ObjPropertySet(des,0,"DESCRIPTION", "","")
rc = CopyRefObjTestPlan()
Return 1