Data Independence - Sample Flight Login

[Forrest Gump]

Hi Friends,
I have created three actions.
1 Login
2 Insert Flight order.
3 Exit application
In first action I am parameterizing Login
In second action I am parameterizing Fly From dates.
In third action I am Closing application (Since invoke command is used in Action1)

Code is as shown below:
Code for "Login" Action :

Code:

invokeapplication "D:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe"
dialog("Login").WinEdit("Agent Name:").Set DataTable("Uname", dtGlobalSheet)
dialog("Login").WinEdit("Password:").Set DataTable("Pwd", dtGlobalSheet)
dialog("Login").WinButton("OK").Click

Code for "Insert_FlightOrder" Action :

Code:

Window("Flight Reservation").WinMenu("Menu").Select "File;New Order"
Window("Flight Reservation").WinObject("Date of Flight:").Type DataTable("Fight_Date", dtLocalSheet)
Window("Flight Reservation").WinComboBox("Fly From:").Select "Frankfurt"
Window("Flight Reservation").WinComboBox("Fly To:").Select "Los Angeles"
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select 0
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set "sree"
Window("Flight Reservation").WinRadioButton("First").Set
Window("Flight Reservation").WinEdit("Tickets:").Set "2"
Window("Flight Reservation").WinButton("Insert Order").Click
wait(5)

Code for "Exit" Action :

Code:

Window("Flight Reservation").WinMenu("Menu").Select "File;Exit"

My Aim: I will use login details in Action sheet 1 i.e username and password. (For Example; say 2 records)

In action sheet 2, I enter 5 records for login 1 user and 10 records for login 2 user.

Problem: QTP is inserting all the values for both login users.


Hope you guys help me

Thnks in advance