How to pass values between different tests in QTP

[vijaya.t]

can we open one test from another in qtp?
i am vijaya,when i am doing qtp samples,passing output parameter value of one test to input parameter of another test sample, i am getting error(application busy).
can we open one test from another?can anyone help me?????

[NancyNancy]

Never Done it before, not too sure, BUT

How about an action at the end of the last test to call the second test

Let us know

[Saket]

this thread Extract data from test and use it in another test may help you. always put a thread title relevent to your query, never use such words like hi, hello as thread title.
Please refer posting guidelines.

[amitspandey]

Hi,
I think nancy is right...this can be tried.

[Brian.Osborne]

I was able to get this accomplished by using excel.
Inputs:
1. I needed a random customer(s) that had a minimum FICO score for 3 different lines of business. Each business would return a different FICO in our test environment.

Outputs: During the QTP script, I would capture various information for use later.

1. FICO. I would update the 3 columns of the spreadsheet with a new value in case the FICO has changed since it was last pulled.
2. Application Number. This is submitting an application for a loan for these customers and I want to capture this number for downstream testing.

I then just run the next QTP script pointing to the Application numbers sheet I just captured and I am able to use outputs from one QTP script as input for another. And the data is available for viewing and review later.

Here is the code:

Code:

Set objExcel = CreateObject("Excel.Application") Set objWorkbook = objExcel.WorkBooks.Open("Z:\Path\Test.xlsx") Set objDriverSheet = objWorkbook.Worksheets("FirstStep") BusinessLine = DataTable("BUS", dtGlobalSheet) NumberApplicants = DataTable("APPLICANTS", dtGlobalSheet) Do Until FICO1 > 700 randomize upperbound = 1206 lowerbound = 2 Row1 = Int(( upperbound - lowerbound + 1 ) * Rnd + lowerbound ) If BusinessLine = "PCM" Then FICO1 = objDriverSheet.Cells(Row1, "B").Value ElseIf BusinessLine = "HE" Then FICO1 = objDriverSheet.Cells(Row1, "C").Value ElseIf BusinessLine = "WFAF" Then FICO1 = objDriverSheet.Cells(Row1, "D").Value End If Loop If NumberApplicants = 2 Then Do Until FICO2 > 700 Row2 = Int(( upperbound - lowerbound + 1 ) * Rnd + lowerbound ) If BusinessLine = "PCM" Then FICO2 = objDriverSheet.Cells(Row2, "B").Value ElseIf BusinessLine = "HE" Then FICO2 = objDriverSheet.Cells(Row2, "C").Value ElseIf BusinessLine = "WFAF" Then FICO2 = objDriverSheet.Cells(Row2, "D").Value End If Loop End If DataTable("FICO1", dtGlobalSheet) = FICO1 DataTable("FICO2", dtGlobalSheet) = FICO2 DataTable("Row1", dtGlobalSheet) = Row1 DataTable("Row2", dtGlobalSheet) = Row2 'This is where the script would capture the FICOs and App number normally - it has been removed for testing FICO1 = DataTable("NewFICO1", dtGlobalSheet) FICO2 = DataTable("NewFICO2", dtGlobalSheet) APPNUMBER = DataTable("NewAppNumber", dtGlobalSheet) If BusinessLine = "PCM" Then objDriverSheet.Cells(Row1, "B").Value = FICO1 ElseIf BusinessLine = "HE" Then objDriverSheet.Cells(Row1, "C").Value = FICO1 ElseIf BusinessLine = "WFAF" Then objDriverSheet.Cells(Row1, "D").Value = FICO1 End If If NumberApplicants = 2 Then If BusinessLine = "PCM" Then objDriverSheet.Cells(Row2, "B").Value = FICO2 ElseIf BusinessLine = "HE" Then objDriverSheet.Cells(Row2, "C").Value = FICO2 ElseIf BusinessLine = "WFAF" Then objDriverSheet.Cells(Row2, "D").Value = FICO2 End If End If objWorkbook.Save objWorkbook.Close objExcel.quit Set objExcel = CreateObject("Excel.Application") Set objWorkbook = objExcel.WorkBooks.Open("G:\Path\Test.xlsx") Set objDriverSheet = objWorkbook.Worksheets("SecondStep") APPSPACE = 1 APPROW = 1 Do Until APPSPACE = "" DataTable("APPSPACE", dtGlobalSheet) = objDriverSheet.Cells(APPROW, "A").Value APPSPACE = DataTable("APPSPACE", dtGlobalSheet) APPROW = APPROW + 1 Loop APPROW = APPROW - 1 objDriverSheet.Cells(APPROW, "A").Value = APPNUMBER objWorkbook.Save objWorkbook.Close objExcel.quit

This may seem like a lot, but I tried a lot of other solutions and none would do what I wanted consistently and without error.
I was using a SharePoint site to house the excel doc, but that caused too many issues with checking the doc in, saving, etc..

Hope this helps.

Brian

[anumolu9999]

@anumolu
Use action frame work to call another test from one test.
calling actions from another action.
To do this
Open ur test
1. In expert view, Right click in code area.
2. Then, Click Action->Insert call to Existing
3. 'Select Action' window appears.
4. Click 'Browse' button at the 'From test' section.
5. Select the test u want to insert.
6. click ok button.
Then
RunAction "TestName", oneIteration
will be appeared in your code

[mrajeshtnl]

---

can you please explain be about bussiness line and upper bound and lower bound, used in the above script..

is it checking for boundary value analysis