Kate Racaza at 18:29, 3 April 2017

2017-04-03T18:29:55Z

← Older revision		Revision as of 18:29, 3 April 2017
Line 37:		Line 37:
	{{APIComment\|'Connect to a Synthesis repository.}}		{{APIComment\|'Connect to a Synthesis repository.}}
	{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository		{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository
	MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.~~rsr10~~"}}) {{APIComment\|'Replace with name and path to test repository.}}		MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.rsr11"}}) {{APIComment\|'Replace with name and path to test repository.}}

	{{APIComment\|'Send the data collection to the repository.}}		{{APIComment\|'Send the data collection to the repository.}}

Kate Racaza: Created page with '{{Template:API}} ==Tutorial: Transfer Data from an Excel File to the SDW== Below is the VBA version of the tutorial. ''…'

2016-04-28T18:32:27Z

Created page with '{{Template:API}} ==Tutorial: Transfer Data from an Excel File to the SDW== Below is the VBA version of the tutorial. ''…'

New page

{{Template:API}}

==Tutorial: Transfer Data from an Excel File to the SDW==
Below is the VBA version of the [[Transfer_Data_to_the_Synthesis_Data_Warehouse_(SDW)|tutorial]].

'''VBA'''

Sub Main()

{{APIComment|'Declare a new RawDataSet object.}}
{{APIPrefix|Dim}} DataCollection {{APIPrefix|As New}} RawDataSet

{{APIComment|'Name it "New Data Collection," and then specify that}}
{{APIComment|'it is for use with Weibull++.}}
DataCollection.ExtractedName = {{APIString|"New Data Collection"}}
DataCollection.ExtractedType = RawDataSetType_Weibull

{{APIComment|'Declare a RawData object.}}
{{APIPrefix|Dim}} Row {{APIPrefix|As}} RawData

{{APIComment|'Read each row of data from the Excel sheet.}}
{{APIPrefix|Dim}} i {{APIPrefix|As}} Integer, MaxRow {{APIPrefix|As}} Integer
MaxRow = 20

{{APIPrefix|For}} i = 2 {{APIPrefix|to}} MaxRow
{{APIPrefix|Set}} Row = {{APIPrefix|New}} RawData

{{APIComment|'Set the properties for the current data point.}}
Row.StateFS = Sheet1.Cells(i, 1)
Row.StateTime = Sheet1.Cells(i,2)
Row.FailureMode = Sheet1.Cells(i,3)

{{APIComment|'Add the current data point to the data collection.}}
{{APIPrefix|Call}} DataCollection.AddDataRow(Row)
{{APIPrefix|Next}} i

{{APIComment|'Connect to a Synthesis repository.}}
{{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
MyRepository.ConnectToRepository ({{APIString|"C:\RSRepository1.rsr10"}}) {{APIComment|'Replace with name and path to test repository.}}

{{APIComment|'Send the data collection to the repository.}}
{{APIPrefix|Call}} MyRepository.DataWarehouse.SaveRawDataSet(DataCollection)

End Sub

Transfer Data to the Synthesis Data Warehouse (SDW)/VBA - Revision history

Kate Racaza at 18:29, 3 April 2017

Kate Racaza: Created page with '{{Template:API}} ==Tutorial: Transfer Data from an Excel File to the SDW== Below is the VBA version of the tutorial. ''…'