APISDWTutorialVBA - Revision history

Kate Racaza: Redirected page to Transfer Data to the Synthesis Data Warehouse (SDW)

2016-02-10T18:10:16Z

Redirected page to Transfer Data to the Synthesis Data Warehouse (SDW)

← Older revision		Revision as of 18:10, 10 February 2016
Line 1:		Line 1:
	~~{{InProgress}}{{DISPLAYTITLE:Synthesis Data Warehouse (SDW) Tutorial}}{{Template:API}}~~		#REDIRECT[[Transfer_Data_to_the_Synthesis_Data_Warehouse_(SDW)]]
	~~<div style="border:1px solid #AAA; background:~~#~~f9f9f9; border-radius:10px; width:auto; margin:0 0 1em 1em; padding:1em; float:right;">~~
	~~<nowiki><<</nowiki> [[APIQuickStartGuide\|Back to Quick Start Guide]]~~

	~~'''~~[[~~APISDWTutorial\|Synthesis Data Warehouse (SDW) Tutorial]]'''~~
	*VBA
	*[[APISDWTutorialVBNET\|VB.NET]]
	~~</div>~~

	This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only and does not include any exception handling. To complete this tutorial successfully, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this exercise.





	~~== Transfer Data from an Excel File to the SDW (VBA) ==~~
	~~1. Before we begin, you'll need to reference the Microsoft Excel Object Library. Choose '''Tools > Reference''', and then select the library from the list. Click '''OK'''.~~

	2. Create a new module. Start with the following code to create an SDW data collection. The code uses the <code>RawDataSet</code> class to represent an SDW data collection, and the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

	~~'''VBA'''~~

	~~{{APIComment\|'Declare a new instance of the RawDataSet class.}}~~
	~~{{APIPrefix\|Dim}} DataCollection {{APIPrefix\|As New}} RawDataSet~~

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

	~~3. Next, use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.~~

	The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object for the data in row #3 of the Excel sheet, and so on. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).

	~~'''VBA'''~~

	~~{{APIComment\|'Declare a new instance of the RawData class.}}~~
	~~{{APIPrefix\|Dim}} Row {{APIPrefix\|As New}} 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 desired properties for the current row of data.}}~~
	~~Row.StateFS = Sheet1.Cells(i, 1)~~
	~~Row.StateTime = Sheet1.Cells(i,2)~~
	~~Row.FailureMode = Sheet1.Cells(i,3)~~

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

	~~4. Now that the data from the Excel sheet have been copied to the data collection, the next step is to save the data collection to the Synthesis repository.~~

	~~Connect to the Synthesis repository and then use the <code>DataWarehouse.SaveRawDataSet</code> method to save the data collection to the repository.~~

	~~'''VBA'''~~

	~~{{APIComment\|'Connect to the Synthesis repository. The following code assumes that}}~~
	~~{{APIComment\|'a standard repository called "RSRepository1.rsr10" exists in the C: drive.}}~~
	~~{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository~~
	~~MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.rsr10"}})~~

	~~{{APIComment\|'Save the extracted data collection to the repository.}}~~
	~~{{APIPrefix\|Call}} MyRepository.DataWarehouse.SaveRawDataSet~~(~~DataCollection)~~

	~~=== Test the Code ===~~
	~~Let's verify whether the code can import the data successfully into the SDW.~~

	~~Below is the complete code list for this example. On the Debug menu, click '''Start''' to run the application. Then verify that the data were imported by launching Weibull++, opening the~~ SDW ('''Home > Synthesis > Synthesis Data Warehouse''') and then selecting the new data collection. (You may need to display the StateTime, StateFS and FailureMode columns by right-clicking a column header and choosing '''Select Columns'''.)

	~~'''VBA'''~~

	~~Sub Main()~~

	~~{{APIComment\|'Declare a new instance of the RawDataSet class.}}~~
	~~{{APIPrefix\|Dim}} DataCollection {{APIPrefix\|As New}} RawDataSet~~

	~~{{APIComment\|'Name the data collection "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 new instance of the RawData class.}}~~
	~~{{APIPrefix\|Dim}} Row {{APIPrefix\|As New}} 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 desired properties for the current row of data.}}~~
	~~Row.StateFS = Sheet1.Cells(i, 1)~~
	~~Row.StateTime = Sheet1.Cells(i,2)~~
	~~Row.FailureMode = Sheet1.Cells(i,3)~~

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

	~~{{APIComment\|'Connect to the Synthesis repository. The following code assumes that}}~~
	~~{{APIComment\|'a standard repository called "RSRepository1.rsr10" exists in the C: drive.}}~~
	~~{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository~~
	~~MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.rsr10"}})~~

	~~{{APIComment\|'Save the extracted data collection to the repository.}}~~
	~~{{APIPrefix\|Call}} MyRepository.DataWarehouse.SaveRawDataSet(DataCollection~~)

	~~End Sub~~

	~~===References===~~
	~~To learn more, see the reference documentation for the classes and methods discussed in this section:~~
	*[[RawDataSet Class]]
	*[[RawData Class]]
	*[[AddDataRow Method\|RawDataSet.AddDataRow Method]]
	*[[Repository.DataWarehouse.SaveRawDataSet\|Repository.DataWarehouse.SaveRawDataSet Method]]

Kate Racaza at 20:36, 17 November 2015

2015-11-17T20:36:18Z

← Older revision		Revision as of 20:36, 17 November 2015
Line 17:		Line 17:
	1. Before we begin, you'll need to reference the Microsoft Excel Object Library. Choose '''Tools > Reference''', and then select the library from the list. Click '''OK'''.		1. Before we begin, you'll need to reference the Microsoft Excel Object Library. Choose '''Tools > Reference''', and then select the library from the list. Click '''OK'''.

	2. Create a new module. Start with the following code to create an SDW data collection. The code uses the <code>RawDataSet</code> class to represent an SDW data collection and the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.		2. Create a new module. Start with the following code to create an SDW data collection. The code uses the <code>RawDataSet</code> class to represent an SDW data collection, and the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

	'''VBA'''		'''VBA'''
Line 31:		Line 31:
	3. Next, use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.		3. Next, use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.

	The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object for the data in row #3 of the Excel sheet and so on. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).		The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object for the data in row #3 of the Excel sheet, and so on. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).

	'''VBA'''		'''VBA'''

Kate Racaza at 20:28, 17 November 2015

2015-11-17T20:28:50Z

← Older revision		Revision as of 20:28, 17 November 2015
Line 15:		Line 15:

	== Transfer Data from an Excel File to the SDW (VBA) ==		== Transfer Data from an Excel File to the SDW (VBA) ==
			1. Before we begin, you'll need to reference the Microsoft Excel Object Library. Choose '''Tools > Reference''', and then select the library from the list. Click '''OK'''.

	1. ~~We'll begin~~ with the <code>RawDataSet</code> class~~, which represents~~ an SDW data collection~~. We'll then use~~ the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.		2. Create a new module. Start with the following code to create an SDW data collection. The code uses the <code>RawDataSet</code> class to represent an SDW data collection and the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

	~~Using the [[APISDWTutorial\|Excel file]] you've created for this tutorial, create a new module and start with the following code to create an SDW data collection~~.

	'''VBA'''		'''VBA'''
Line 30:		Line 29:
	DataCollection.ExtractedType = RawDataSetType_Weibull		DataCollection.ExtractedType = RawDataSetType_Weibull

	2. Next, ~~we'll~~ use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.		3. Next, use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.

	The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object~~, sets its properties with~~ the data ~~from~~ row #3 of the Excel sheet, and ~~adds the row to the data collection~~. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).		The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object for the data in row #3 of the Excel sheet and so on. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).

	'''VBA'''		'''VBA'''
Line 55:		Line 54:
	{{APIPrefix\|Next}} i		{{APIPrefix\|Next}} i

	3. Now that the data from the Excel sheet have been copied to the data collection, the next step is to save the data collection to the Synthesis repository.		4. Now that the data from the Excel sheet have been copied to the data collection, the next step is to save the data collection to the Synthesis repository.

	~~First, connect~~ to the Synthesis repository and then use the <code>SaveRawDataSet</code> method to save the data collection to the repository.		Connect to the Synthesis repository and then use the <code>DataWarehouse.SaveRawDataSet</code> method to save the data collection to the repository.

	'''VBA'''		'''VBA'''

Kate Racaza at 16:22, 30 October 2015

2015-10-30T16:22:07Z

← Older revision		Revision as of 16:22, 30 October 2015
Line 3:		Line 3:
	<nowiki><<</nowiki> [[APIQuickStartGuide\|Back to Quick Start Guide]]		<nowiki><<</nowiki> [[APIQuickStartGuide\|Back to Quick Start Guide]]

	'''Synthesis Data Warehouse (SDW) Tutorial'''		'''[[APISDWTutorial\|Synthesis Data Warehouse (SDW) Tutorial]]'''
	*VBA		*VBA
	*[[APISDWTutorialVBNET\|VB.NET]]		*[[APISDWTutorialVBNET\|VB.NET]]

Kate Racaza at 16:12, 30 October 2015

2015-10-30T16:12:47Z

← Older revision		Revision as of 16:12, 30 October 2015
Line 8:		Line 8:
	</div>		</div>

	This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only~~; it~~ does not include any exception handling ~~and its performance may be slow~~. To complete this tutorial successfully, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this ~~tutorial~~.		This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only and does not include any exception handling. To complete this tutorial successfully, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this exercise.


Line 14:		Line 14:


	== Transfer Data from an Excel File to the SDW ==		== Transfer Data from an Excel File to the SDW (VBA) ==

	1. We'll begin with the <code>RawDataSet</code> class, which represents an SDW data collection. We'll then use the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.		1. We'll begin with the <code>RawDataSet</code> class, which represents an SDW data collection. We'll then use the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

Kate Racaza at 17:31, 28 October 2015

2015-10-28T17:31:38Z

← Older revision		Revision as of 17:31, 28 October 2015
Line 67:		Line 67:

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

	=== Test the Code ===		=== Test the Code ===
Line 111:		Line 111:

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

	End Sub		End Sub

Kate Racaza at 17:27, 28 October 2015

2015-10-28T17:27:18Z

← Older revision		Revision as of 17:27, 28 October 2015
Line 16:		Line 16:
	== Transfer Data from an Excel File to the SDW ==		== Transfer Data from an Excel File to the SDW ==

	1. We'll begin with the <code>RawDataSet</code> class, which represents an SDW data collection. We'll then use the <code>ExtractedType</code> property to specify that the data collection for use with Weibull++.		1. We'll begin with the <code>RawDataSet</code> class, which represents an SDW data collection. We'll then use the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

	Using the [[APISDWTutorial\|Excel file]] you've created for this tutorial, create a new module and start with the following code to create an SDW data collection.		Using the [[APISDWTutorial\|Excel file]] you've created for this tutorial, create a new module and start with the following code to create an SDW data collection.

Kate Racaza at 17:26, 28 October 2015

2015-10-28T17:26:10Z

← Older revision		Revision as of 17:26, 28 October 2015
Line 8:		Line 8:
	</div>		</div>

	This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only; it does not include any exception handling and its performance may be slow. To ~~successfully~~ complete this tutorial, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this tutorial.		This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only; it does not include any exception handling and its performance may be slow. To complete this tutorial successfully, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this tutorial.

Kate Racaza: Created page with '{{InProgress}}{{DISPLAYTITLE:Synthesis Data Warehouse (SDW) Tutorial}}{{Template:API}}

← Older revision		Revision as of 18:10, 10 February 2016
Line 1:		Line 1:
	~~{{InProgress}}{{DISPLAYTITLE:Synthesis Data Warehouse (SDW) Tutorial}}{{Template:API}}~~		#REDIRECT[[Transfer_Data_to_the_Synthesis_Data_Warehouse_(SDW)]]
	~~<div style="border:1px solid #AAA; background:~~#~~f9f9f9; border-radius:10px; width:auto; margin:0 0 1em 1em; padding:1em; float:right;">~~
	~~<nowiki><<</nowiki> [[APIQuickStartGuide\|Back to Quick Start Guide]]~~

	~~'''~~[[~~APISDWTutorial\|Synthesis Data Warehouse (SDW) Tutorial]]'''~~
	*VBA
	*[[APISDWTutorialVBNET\|VB.NET]]
	~~</div>~~

	This VBA tutorial will demonstrate one approach to read data from an Excel file and extract it for the SDW. Note that this tutorial is for demonstration purposes only and does not include any exception handling. To complete this tutorial successfully, please use the [[APISDWTutorial\|sample Excel data]] that was provided for this exercise.





	~~== Transfer Data from an Excel File to the SDW (VBA) ==~~
	~~1. Before we begin, you'll need to reference the Microsoft Excel Object Library. Choose '''Tools > Reference''', and then select the library from the list. Click '''OK'''.~~

	2. Create a new module. Start with the following code to create an SDW data collection. The code uses the <code>RawDataSet</code> class to represent an SDW data collection, and the <code>ExtractedType</code> property to specify that the data collection is for use with Weibull++.

	~~'''VBA'''~~

	~~{{APIComment\|'Declare a new instance of the RawDataSet class.}}~~
	~~{{APIPrefix\|Dim}} DataCollection {{APIPrefix\|As New}} RawDataSet~~

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

	~~3. Next, use the <code>RawData</code> class to represent a single row of data, and then use the <code>AddDataRow</code> method to add the row to the data collection.~~

	The following code demonstrates one way to extract a row of data from the Excel sheet. For <code>i = 2</code>, the code creates a new <code>RawData</code> object, and then sets its properties by using the values from row #2 of the Excel file. After the code finishes reading the row of data, it adds the object to the data collection. When the code reaches <code>Next i</code>, it increases <code>i</code> with 1 and jumps back to the <code>For</code> statement, which adds another new <code>RawData</code> object for the data in row #3 of the Excel sheet, and so on. The loop continues until <code>i</code> reaches the specified number of rows (MaxRow).

	~~'''VBA'''~~

	~~{{APIComment\|'Declare a new instance of the RawData class.}}~~
	~~{{APIPrefix\|Dim}} Row {{APIPrefix\|As New}} 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 desired properties for the current row of data.}}~~
	~~Row.StateFS = Sheet1.Cells(i, 1)~~
	~~Row.StateTime = Sheet1.Cells(i,2)~~
	~~Row.FailureMode = Sheet1.Cells(i,3)~~

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

	~~4. Now that the data from the Excel sheet have been copied to the data collection, the next step is to save the data collection to the Synthesis repository.~~

	~~Connect to the Synthesis repository and then use the <code>DataWarehouse.SaveRawDataSet</code> method to save the data collection to the repository.~~

	~~'''VBA'''~~

	~~{{APIComment\|'Connect to the Synthesis repository. The following code assumes that}}~~
	~~{{APIComment\|'a standard repository called "RSRepository1.rsr10" exists in the C: drive.}}~~
	~~{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository~~
	~~MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.rsr10"}})~~

	~~{{APIComment\|'Save the extracted data collection to the repository.}}~~
	~~{{APIPrefix\|Call}} MyRepository.DataWarehouse.SaveRawDataSet~~(~~DataCollection)~~

	~~=== Test the Code ===~~
	~~Let's verify whether the code can import the data successfully into the SDW.~~

	~~Below is the complete code list for this example. On the Debug menu, click '''Start''' to run the application. Then verify that the data were imported by launching Weibull++, opening the~~ SDW ('''Home > Synthesis > Synthesis Data Warehouse''') and then selecting the new data collection. (You may need to display the StateTime, StateFS and FailureMode columns by right-clicking a column header and choosing '''Select Columns'''.)

	~~'''VBA'''~~

	~~Sub Main()~~

	~~{{APIComment\|'Declare a new instance of the RawDataSet class.}}~~
	~~{{APIPrefix\|Dim}} DataCollection {{APIPrefix\|As New}} RawDataSet~~

	~~{{APIComment\|'Name the data collection "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 new instance of the RawData class.}}~~
	~~{{APIPrefix\|Dim}} Row {{APIPrefix\|As New}} 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 desired properties for the current row of data.}}~~
	~~Row.StateFS = Sheet1.Cells(i, 1)~~
	~~Row.StateTime = Sheet1.Cells(i,2)~~
	~~Row.FailureMode = Sheet1.Cells(i,3)~~

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

	~~{{APIComment\|'Connect to the Synthesis repository. The following code assumes that}}~~
	~~{{APIComment\|'a standard repository called "RSRepository1.rsr10" exists in the C: drive.}}~~
	~~{{APIPrefix\|Dim}} MyRepository {{APIPrefix\|As New}} Repository~~
	~~MyRepository.ConnectToRepository ({{APIString\|"C:\RSRepository1.rsr10"}})~~

	~~{{APIComment\|'Save the extracted data collection to the repository.}}~~
	~~{{APIPrefix\|Call}} MyRepository.DataWarehouse.SaveRawDataSet(DataCollection~~)

	~~End Sub~~

	~~===References===~~
	~~To learn more, see the reference documentation for the classes and methods discussed in this section:~~
	*[[RawDataSet Class]]
	*[[RawData Class]]
	*[[AddDataRow Method\|RawDataSet.AddDataRow Method]]
	*[[Repository.DataWarehouse.SaveRawDataSet\|Repository.DataWarehouse.SaveRawDataSet Method]]