Repository.Unit.GetAllUnits: Difference between revisions

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


== Example ==
== Example ==
  '''VBA|VB.NET'''<br>
  '''VBA|VB.NET'''
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
  {{APIComment|...'Add code to connect to a Synthesis repository.}} <br>
  {{APIComment|...'Add code to connect to a Synthesis repository.}}
   {{APIPrefix|Dim}} ListOfUnits() {{APIPrefix|As}} UnitInfo
   {{APIPrefix|Dim}} ListOfUnits() {{APIPrefix|As}} UnitInfo
   ListOfUnits = MyRepository.Unit.GetAllUnits()<br>
   ListOfUnits = MyRepository.Unit.GetAllUnits()
  {{APIComment|'Output example: Get the name and ID of the first available unit in the repository and display them in a message box.}}
  {{APIComment|'Output example: Display the name and ID of the first available unit in the repository.}}
   Dim UnitName {{APIPrefix|As}} String
   Dim UnitName {{APIPrefix|As}} String
   Dim UnitID {{APIPrefix|As}} Integer<br>
   Dim UnitID {{APIPrefix|As}} Integer<br>

Revision as of 16:24, 14 July 2015

Member of: SynthesisAPI10Repository

APIWiki.png


Gets a list of all predefined units in the current repository. Returns a UnitInfo object array that contains the unit names, ID numbers, abbreviations and multipliers.

In Synthesis desktop applications, these units are shown in the Manage Units window.

Syntax

object.Unit.GetAllUnits()

where object is a variable that represents a Repository object.

Example

VBA|VB.NET

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

 Dim ListOfUnits() As UnitInfo
 ListOfUnits = MyRepository.Unit.GetAllUnits()

 'Output example: Display the name and ID of the first available unit in the repository. 
 Dim UnitName As String
 Dim UnitID As Integer
UnitName = ListofUnits(0).Name UnitID = ListofUnits(0).ID MsgBox ("The first available unit is: " & UnitName & ", ID#" & UnitID)