.Sync is NOT waiting for browser to complete current navigation.. can anyone help?

[mansis]

For below script, I was using wait (3) to view the operations mentioned in script.. But due to wait command, I need to face 3 secs unnecessary delay..

I though .Sync can solve my purpose of waiting to complete current navigation and then only moving ahead.. But when I use .Sync in below script, It is not waiting to load the mentioned page and it goes ahead, which is wrong. Please review below script.

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

Code:

DataTable.Import("D:\Book1.xls")

For i=1 to Datatable.GetRowCount
DataTable.SetCurrentRow i
SystemUtil.Run DataTable("URL",dtGlobalSheet)
Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtUsername").Set DataTable("Username",dtGlobalSheet)
Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtPassword").Set DataTable("Password",dtGlobalSheet)
Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click
Browser("InSync :: Login").Page("InSync :: Login_2").WebList("ddlUsers").Select DataTable("User",dtGlobalSheet)

'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 (2)
Else
    Reporter.ReportEvent micPass, "Login page", "Facility not exist"
    Wait (2)
End If

'Access Scheduler
Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click
[color=#FF0000]Browser("InSync :: Login").Page("InSync :: Visit Scheduler").Sync[/color]

'Access Patient Search
Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image3").Click
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("Edit Patient").Click

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

Here with above script, though step of scheduler accessing is NOT yet started / completed, next step of accessing patient search is started.. I was expecting that .Sync will help me to load scheduler page first.


Can anyone please let me know that what is wrong here.

If .Sync can solve my problem then I want to replace it with Wait to avoid unnecessary delay.

[mansis]

Please help me urgently...

[freeboynil]

Hi,
if wait will not solve...use

Code:

do
wait(3)
loop while Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image3").exists(3)

[DallasT]

You could also do a loop such as...

Code:

Do while Browser(YourBrowser).Object.Busy = True
    Wait 0, 250
Loop

[mansis]

Hi,

Error occurs while I am using your code of loop..Please referr attachment.

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 URL,1
'Wait (15)
Do while Browser("InSync :: Login").Object.Busy = True
    Wait (5)
Loop


Browser("InSync :: Login").Page("InSync :: Login").WebEdit("txtPassword").Set Password
Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click

Do while Browser("InSync :: Login").Object.Busy = True
    Wait (5)
Loop

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)


Browser("InSync :: Login").Close

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

Please help me to resolve this error.

Thanks,
Mansi.