Repository.Crew.UpdateCrew: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
Line 9: Line 9:


== Usage Example ==
== Usage Example ==
{{APIComment|Declare a new repository connection class.}}
{{APIComment|'Declare a new repository connection class.}}
        Private WithEvents MyRepository As New Repository
  Dim MyRepository As New Repository
 
 
{{APIComment|Connect to the Synthesis repository.}}
{{APIComment|'Connect to the Synthesis repository.}}
        Dim Success As Boolean = False
  Dim Success As Boolean = False
        Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
  Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
 
{{APIComment|Get the list of Crews in the connected repository.}}
{{APIComment|'Get the list of Crews in the connected repository.}}
        Dim ListOfCrews() As [[cCrew Class|cCrew]]
  Dim ListOfCrews() As [[cCrew Class|cCrew]]
        ListOfCrews = MyRepository.GetAllCrews()
  ListOfCrews = MyRepository.GetAllCrews()
 
 
{{APIComment|After modifying the Crew, Update the repository.}}
{{APIComment|'After modifying the Crew, Update the repository.}}
        Dim SuccessUpdateCrew As Boolean = False
  Dim SuccessUpdateCrew As Boolean = False
        SuccessUpdateCrew = MyRepository.UpdateCrew(ListOfCrews(0))
  SuccessUpdateCrew = MyRepository.UpdateCrew(ListOfCrews(0))

Revision as of 22:17, 23 May 2014


Updates the crew in the repository. Returns True if successful, otherwise returns False.

Syntax

  • UpdateCrew( crew As cCrew ) As Boolean

Parameters

crew: The cCrew to update.

Usage Example

 'Declare a new repository connection class. 
 Dim MyRepository As New Repository
 
 'Connect to the Synthesis repository. 
 Dim Success As Boolean = False
 Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
 'Get the list of Crews in the connected repository. 
 Dim ListOfCrews() As cCrew
 ListOfCrews = MyRepository.GetAllCrews()
 
 'After modifying the Crew, Update the repository. 
 Dim SuccessUpdateCrew As Boolean = False
 SuccessUpdateCrew = MyRepository.UpdateCrew(ListOfCrews(0))