# Rational TestSuite Question: Download Questions PDF

## Answer:

A datapool is a test dataset that supplies data variables
in a test script during playback. Using datapools allows
you to run multiple iterations of a script using different
data each time.

Sub Main
Dim Result As Integer -> Header file

'Initially Recorded: 9/22/01 12:45:07 PM
'Script Name: Classics Place an Order Datapool

Dim x As Integer 'variable for loop
Dim dp As Long 'variable for datapool
Dim quantity, expdate As String 'variables for fields

dp=SQADatapoolOpen("Order CD") -> Open the Data Pool

For x = 1 to 10 -> Start of loop

Call SQADatapoolFetch(dp) ->fetch a row from the data pool

Window SetContext, "Name=frmMain", ""
PushButton Click, "Name=cmdOrder"
'Result = WindowVP
(CompareProperties, "Name=frmOrder", "VP=Object Properties
1")

Window SetContext, "Name=frmOrder", ""
EditBox Click, "Name=txtQuantity", "Coords=84,8"

'Quantity data
Call SQADatapoolValue(dp,1,quantity)
InputKeys "{HOME}+{END}{DELETE}” &quantity
EditBox Click, "Name=txtCreditCard", "Coords=9,6"
InputKeys "{HOME}+{END}{DELETE}1234 1234 1234 1234"
EditBox Click, "Name=txtExpirationDate", "Coords=14,11"

'Expiration date data
Call SQADatapoolValue(dp,2,expdate)
InputKeys "{HOME}+{END}{DELETE}"&expdate

Result = ComboBoxVP
(CompareData, "Name=comboCardType", "VP=Object Data 1")

PushButton Click, "Name=cmdOrder"
Window SetContext, "Name=frmConfirm", ""
PushButton Click, "Name=cmdOK"

Next x
Call SQADatapoolClose(dp)

End Sub

Download Rational TestSuite Interview Questions And Answers PDF

 Previous Question Next Question What is user defined data type? Explain What kind of problems are solved by Datapools?