basic_script

/* $Id: Action.c,v 1.1 2007/12/31 11:25:39 sevitz Exp $ [MISCCSID] */

Action()

{

       lr_start_transaction("S01_T03_SearchFlight");

 

       web_url("welcome.pl",

              "URL=http://127.0.0.1:1080/WebTours/welcome.pl?page=search",

              "Resource=0",

              "RecContentType=text/html",

              "Referer=http://127.0.0.1:1080/WebTours/nav.pl?page=menu&in=home",

              "Snapshot=t3.inf",

              "Mode=HTML",

              LAST);

 

       lr_end_transaction("S01_T03_SearchFlight", LR_AUTO);

 

       lr_think_time(4);

 

       lr_start_transaction("S01_T04_BookFlight");

 

       web_submit_form("reservations.pl",

              "Snapshot=t4.inf",

              ITEMDATA,

              "Name=depart", "Value=Denver", ENDITEM,

              "Name=departDate", "Value=12/26/2007", ENDITEM,

              "Name=arrive", "Value=Los Angeles", ENDITEM,

              "Name=returnDate", "Value=12/27/2007", ENDITEM,

              "Name=numPassengers", "Value=1", ENDITEM,

              "Name=roundtrip", "Value=<OFF>", ENDITEM,

              "Name=seatPref", "Value=Aisle", ENDITEM,

              "Name=seatType", "Value=Coach", ENDITEM,

              "Name=findFlights.x", "Value=18", ENDITEM,

              "Name=findFlights.y", "Value=6", ENDITEM,

              LAST);

 

       web_submit_form("reservations.pl_2",

              "Snapshot=t5.inf",

              ITEMDATA,

              "Name=outboundFlight", "Value=030;251;12/26/2007", ENDITEM,

              "Name=reserveFlights.x", "Value=34", ENDITEM,

              "Name=reserveFlights.y", "Value=13", ENDITEM,

              LAST);

 

       lr_end_transaction("S01_T04_BookFlight", LR_AUTO);

 

       lr_think_time(3);

 

       lr_start_transaction("S01_T05_PaymentDetails");

 

       web_submit_form("reservations.pl_3",

              "Snapshot=t6.inf",

              ITEMDATA,

              "Name=firstName", "Value=Joseph", ENDITEM,

              "Name=lastName", "Value=Marshall", ENDITEM,

              "Name=address1", "Value=234 Willow Drive", ENDITEM,

              "Name=address2", "Value=San Jose/CA/94085", ENDITEM,

              "Name=pass1", "Value=Joseph Marshall", ENDITEM,

              "Name=creditCard", "Value=12345678", ENDITEM,

              "Name=expDate", "Value=06/06", ENDITEM,

              "Name=saveCC", "Value=<OFF>", ENDITEM,

              "Name=buyFlights.x", "Value=41", ENDITEM,

              "Name=buyFlights.y", "Value=15", ENDITEM,

              LAST);

 

       lr_end_transaction("S01_T05_PaymentDetails", LR_AUTO);

 

       lr_think_time(4);

 

       lr_start_transaction("S01_T06_CheckItinerary");

 

       web_image("Itinerary Button",

              "Alt=Itinerary Button",

              "Snapshot=t7.inf",

              LAST);

 

       lr_end_transaction("S01_T06_CheckItinerary", LR_AUTO);

 

       lr_think_time(5);

 

       return 0;

}