How to run same script for different URLs when loading time is different

[mansis]

Hi All,

I have prepared following script which needs to be executed on 5-10 live clients every day after deployment of new changes/enhancements.

Load time of each page is different for each live clients. After deployment, our server gets bit solve and loading speed may differ each time.

In below script, I have used "wait" command to get page loaded..

Now the problem is.. Page size of pages different for each client.. Due to which, for some client's site, one page gets loaded fast and for some, its too slow.. If site is slow for any client, then errors of object occurs.

Due to which I need to increase seconds in "Wait" command during run. Because of which if any of site is fast then also it will perform wait operation which results in wastage of time.

Can any one provide me the solution.. Here do I need to use looping for "wait" command.. If yes, please provide me the code for same..

Please help me urgently..

Below is the script..

-----------------

Code:

URL = Datatable.Value("URL",Global) User_name = Datatable.Value("User_name",Global) Password = Datatable.Value("Password",Global) Users = Datatable.Value("Users",Global) systemutil.Run "iexplore",URL Wait (5) Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtUsername").Set User_name Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtPassword").Set Password Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click Wait (5) Browser("InSync :: Login").Page("InSync :: Login_2").WebList("ddlUsers").Select Users Wait (8) 'Select Facility If Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Exist Then Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Click Wait (4) End If Wait (20) 'Access Scheduler Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click Browser("InSync :: Login").Page("InSync :: Visit Scheduler").Sync Wait (50) 'Access Patient Search Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image3").Click Browser("InSync :: Login").Page("InSync :: Patient Search").Sync Wait(25) Browser("InSync :: Login").Close

------------------

Thanks,
Mansi.

[ricks_ngl]

Hi Mansi,

Use the below code and try instead of giving wait command,

Code:

blnImg=Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").EXist count=1 While Not blnImg Wait (1) blnImg=Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Exist count=count+1 If count=50 then blnImg=True End if Wend

Thanks,
Ricks

[mansis]

Hi Ricks,

Thanks for reply.. But can you please integrate your code in my script? I am NOT getting where to place your code in my script by replacing wait command..At how many places should I need to replace your code with my wait command? ..

Thanks,
Mansi.

[mansis]

Hi,

While I am running script by replacing your code with "Wait" command, it skip execution of entire "Scheduler" module and start executing next "Patient search"..

Below is the script...

-----------------

Code:

URL = Datatable.Value("URL",Global) User_name = Datatable.Value("User_name",Global) Password = Datatable.Value("Password",Global) Users = Datatable.Value("Users",Global) systemutil.Run "iexplore",URL Wait (5) Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtUsername").Set User_name Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtPassword").Set Password Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click Wait (5) Browser("InSync :: Login").Page("InSync :: Login_2").WebList("ddlUsers").Select Users Wait (8) 'Select Facility If Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Exist Then Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Click Wait (4) End If Wait (20) 'Access Scheduler Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click 'code to replace wait [color=#FF0000]blnImg=Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Exist count=1 While Not blnImg Wait (1) blnImg=Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Exist count=count+1 If count=50 then blnImg=True End if Wend [/color] 'End of code to replace wait 'Browser("InSync :: Login").Page("InSync :: Visit Scheduler").Sync 'Wait (50) 'Access Patient Search Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image3").Click Browser("InSync :: Login").Page("InSync :: Patient Search").Sync Wait(25) Browser("InSync :: Login").Close

------------

Pleaes help me...

[ricks_ngl]

I thinik you forgot to perform the click operation. Once the Image exist, then you need to click it right.

Code:

Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click

Add this code after the "Wend" and you should be all set. All the best.

[mansis]

Hi,

Thanks for your help..It works now..

But I need your favor.. Can you please explain me the following code which you gave me so that I can use it, if It is fully clear for me...

----

Code:

blnImg=Browser("InSync :: Login").Page("InSync :: Login").WebElement("InSync® EMR and Practice").Exist count=1 While Not blnImg Wait (1) blnImg=Browser("InSync :: Login").Page("InSync :: Login").WebElement("InSync® EMR and Practice").Exist count=count+1 If count=8 then blnImg=True End if Wend

-----

Below is my understanding of code and questions list-

Here, in above code, I think first you have define the variable bInImg in which you have checked that object is Exist or not..
Lets say for first time bInImg = false (because object may not be loaded)
Now you have define one more variable count by taking value 1.
Next is time of loop..
While Not bInImg (i.e. while bInImg = false) then wait (1)
now I don’t understand that why you have again define bInImg by again checking that object is Exist or not?
Let say if now bInImg = True / False it will increase count by 1 and will check if condition that count = 8 or not..
Here my one more question is instead of above code, if I used wait (8) then it will wait for 8 secs and if I use above code then it will run 8 iteration of loop. So what is difference in using 8 secs and 8 iteration loop… Here if after performing 8 iteration also page is yet not loaded then this code will be failed.. right??

Please kindly explain me in detail.. I am beginner in QTP so needs to patience help..

Thanks a lot,
Mansi.