Repository.Task.GetAllCorrectiveTasks: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
No edit summary
Line 1: Line 1:
{{Template:APIBreadcrumb|10|Repository}}
<noinclude>{{Template:API}}{{Template:APIBreadcrumb|10|Repository}}</noinclude>
{{Template:API}}
 
Gets a list of all existing corrective tasks in the current project. Returns a '''[[CCorrectiveTask Class|cCorrectiveTask]]''' object array that contains the task names, ID numbers and other information.   
Gets a list of all existing corrective tasks in the current project. Returns a '''[[CCorrectiveTask Class|cCorrectiveTask]]''' object array that contains the task names, ID numbers and other information.   
 
<noinclude>
== Syntax ==
== Syntax ==
''object''.'''Task.GetAllCorrectiveTasks()'''
''object''.'''Task.GetAllCorrectiveTasks()'''
Line 28: Line 28:
   TaskID = ListofTasks(0).ID
   TaskID = ListofTasks(0).ID
   MsgBox ({{APIString|"The first corrective task is: "}} & TaskName & {{APIString|", ID#"}} & TaskID)
   MsgBox ({{APIString|"The first corrective task is: "}} & TaskName & {{APIString|", ID#"}} & TaskID)
</noinclude>

Revision as of 18:07, 16 July 2015

APIWiki.png


Member of: SynthesisAPI10Repository

Gets a list of all existing corrective tasks in the current project. Returns a cCorrectiveTask object array that contains the task names, ID numbers and other information.

Syntax

object.Task.GetAllCorrectiveTasks()

where object is a variable that represents a Repository object.


Example

This example assumes that corrective tasks exist in the first available project of a repository.

VBA|VB.NET

 Dim MyRepository As New Repository
 ...'Add code to connect to a Synthesis repository.   

 'Get a list of all corrective tasks in project #1. 
 Dim ListofTasks() As cCorrectiveTask
 MyRepository.Project.SetCurrentProject (1)  
 ListofTasks = MyRepository.Task.GetAllCorrectiveTasks()

 'Output sample: Display the name and ID of the first available corrective task in the project. 
 Dim TaskName As String
 Dim TaskID As Integer
 TaskName = ListofTasks(0).Name
 TaskID = ListofTasks(0).ID
 MsgBox ("The first corrective task is: " & TaskName & ", ID#" & TaskID)