FlightReservation Examples2 using qtp

1.Record the log in fail operation ,modifiy the script and execute (Check whether the error pop up is coming or not)

SystemUtil.Run “C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe”,”",”C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\”,”open”

Dialog(“Login”).WinEdit(“Agent Name:”).Set DataTable(“FailCases”, dtGlobalSheet)

Dialog(“Login”).WinEdit(“Password:”).SetSecure “4c91bc221cac82356789274ebd5c0e68ab84531d”

Dialog(“Login”).WinButton(“OK”).Click

obj1=Dialog(“Login”).Dialog(“Flight Reservations”).Exist

If obj1 Then

reporter.ReportEvent micPass,”should pass”,”done”

else

reporter.ReportEvent micFail,”fail”,”not expected”

End If

Dialog(“Login”).Dialog(“Flight Reservations”).WinButton(“OK”).Click

Dialog(“Login”).WinButton(“Cancel”).Click

2.Record for incorrect password.Add the objects of incorrect password window to Object Repository.Modify the script and execute.(Get the message from the pop up and check)

SystemUtil.Run “C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe”,”",”C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\”,”open”

Dialog(“Login”).WinEdit(“Agent Name:”).Set “venkatesh”

Dialog(“Login”).WinEdit(“Password:”).Set  “incorrect”

Dialog(“Login”).WinButton(“OK”).Click

msg=dialog(“Login”).Dialog(“Flight Reservations”).Static(“Incorrect password. Please”).GetROProperty(“text”)

If msg=”Incorrect password. Please try again” Then

reporter.ReportEvent micPass,”This is Pass”,”ok na”

End If

Dialog(“Login”).Dialog(“Flight Reservations”).WinButton(“OK”).Click

Dialog(“Login”).WinButton(“Cancel”).Click

3.Open the booked orders and send fax orders. (Used Regular Expressions and Parameterization).

a.Record for login and open an order & send fax order

b.Do parameterization at order number

c.Use Regular Expression at (Ex:Dialog(“Fax Order No. 2″))

SystemUtil.Run “C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe”,”",”C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\”,”open”

Dialog(“Login”).WinEdit(“Agent Name:”).Set “venkatesh”

Dialog(“Login”).WinEdit(“Password:”).SetSecure “4c91c4b3fe65cca29a1c1c0820bfdeea176fb3c4″

Dialog(“Login”).WinButton(“OK”).Click

Window(“Flight Reservation”).WinMenu(“Menu”).Select “File;Open Order…”

Window(“Flight Reservation”).Dialog(“Open Order”).WinCheckBox(“Order No.”).Set “ON”

Window(“Flight Reservation”).Dialog(“Open Order”).WinEdit(“Edit”).Set DataTable(“order”, dtGlobalSheet)

Window(“Flight Reservation”).Dialog(“Open Order”).WinButton(“OK”).Click

Window(“Flight Reservation”).WinMenu(“Menu”).Select “File;Fax Order…”

Window(“Flight Reservation”).Dialog(“Fax Order No. 2″).ActiveX(“MaskEdBox”).Type “1323232323″

Window(“Flight Reservation”).Dialog(“Fax Order No. 2″).WinButton(“Send”).Click

Window(“Flight Reservation”).Close

4.Check how many Buttons and Radio buttons are there

SystemUtil.Run “C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe”,”",”C:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\”,”open”

Dialog(“Login”).WinEdit(“Agent Name:”).Set “venkatesh”

Dialog(“Login”).WinEdit(“Password:”).SetSecure “4c90a563f23d7e76c5337820c246323ce7bb8ffe”

Dialog(“Login”).WinButton(“OK”).Click

Set obj1=description.Create()

obj1(“micclass”).value=”winbutton”

Set buttons=window(“Flight Reservation”).ChildObjects(obj1)

no_buttons=buttons.count()

msgbox “The number of buttons are :  ” &no_buttons

Set obj2=description.Create()

obj2(“micclass”).value=”WinRadioButton”

Set radio=window(“Flight Reservation”).ChildObjects(obj2)

no_rb=radio.count()

msgbox “The number of radio buttons are ” &no_rb

Window(“Flight Reservation”).Close