Hi Helge,

I tested on a native display.

I have to say, I gave you a bad example last time. Further research shows that 
is not a timing issue. The issue of tInsertNote has turned out to be a defect 
of script. I'll explain to you.

I attach another result file to you. This one is a timing issue which I sent to 
Joerg just now.

[quote]
I'll send you the f_wizards.res, in which tUpdtWizardEuroconverter have the 
problem. 

The problem will come up, until you add a sleep instruction before 
"Waehrungen.Select(1) 'Setting to first entry of listbox "
[/quote]

BTW, How to perform a remote testing? I'd like to know. :-)


Error in tInsertNote:

1. Sorry I told you the wrong script name. It's ma_updt.bas, not w_updt.bas
2. The error occurs after you deleted the userprofile(or new installed).

Reason:
When you first run the testcase after delete the userprofile, at "instruction 
No.1", Navigator of MasterDoc came out. "NavigatorGlobalDoc" are Kontexted, and 
Liste is visible. So the navigator are switched to normal navigator. 
"Instruction No.3" are run, so this normal navigator get Kontexted. when the 
script goes to the "Instruction No.4", because there is NO Liste in this 
navigator, so error occured.

When you run the testcase again, at "Instruction No.1", normal navigator will 
come up, because we switched to normal navigator last time. But this 
instruction Kontext MasterDoc navigator (NavigatorGlobalDoc), So Liste is not 
visible. So "Instruction No.3" will not run. And so, MasterDoc navigator is 
still Kontexted. So at "Instruction No.4", Liste is exist but not visible, so 
the "switch button" will not be clicked. But this time the result will be OK. 

So, in NavigatorGlobalDoc, there is Liste. And in NavigatorWriter, there is 
Auswahlliste.

But we found, in NavigatorGlobalDoc, there is Auswahlliste too. That why there 
is no Error with Auswahlliste at "Instruction No.6", Although "Instruction 
No.5" is not run when we run the testcase again.

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

testcase tInsertNote
     dim sNoteText as String
      PrintLog "- Insert / Note"
  
      Call hNewDocument
      printlog " Insert / Note"
      InsertNoteWriter
      Kontext "DocumentWriter"
      sNoteText = "Testnote inserted by testtool !"
      Call wTypeKeys (sNoteText)
      Call wNavigatorAuswahl( 11, 1 )                    //Error occurs in this 
sub, I paste it below
      Kontext "NavigatorWriter"
      if Auswahlliste.Gettext <> sNoteText then
          warnlog ("Note was not inserted correctly (Focus problem?")
      end if
      printlog " Check if note exists"
      printlog " Close active document"
      Call hCloseDocument
endcase


sub wNavigatorAuswahl(Gruppe as integer, Eintrag as integer,optional LeaveFocus 
as boolean)
    dim j as integer, WelcherEintrag as integer
    Dim MinEntrys as integer
    If IsMissing(LeaveFocus) = True then LeaveFocus = False
    Select Case Ucase(gApplication)
                ...
            Case "MASTERDOC"
            Kontext "NavigatorGlobalDoc"
            if NavigatorGlobalDoc.NotExists then EditNavigator
            wait 500
            Kontext "NavigatorGlobalDoc"                         //Instruction 
No.1
            if Liste.IsVisible then                                    
//Instruction No.2
                Kontext "GlobaldokumentToolbox"
                Umschalten.Click
                Kontext "NavigatorWriter"                         //Instruction 
No.3
            end if
            MinEntrys = 11
        Case Else ' for all others!!!!
            Warnlog "Not supported application!"
            exit sub
    end select
Sleep 2
    Select Case Ucase(gApplication)
             ...
        Case "MASTERDOC"
        if Liste.IsVisible = True then                           //Instruction 
No.4
            Umschalten.Click                                      //Instruction 
No.5
        end if
        if Auswahlliste.GetItemCount >MinEntrys then    //Instruction No.6
             For j= 1 to 12
                 Auswahlliste.Select j
                 Auswahlliste.TypeKeys "-"
            next j
        end if
        Auswahlliste.Select Gruppe
        if Eintrag >0 then
            WelcherEintrag = Gruppe + Eintrag
            Auswahlliste.TypeKeys "+"
            Auswahlliste.Select WelcherEintrag
            Auswahlliste.TypeKeys "<Return>"
        end if
    end select
...
end sub


2008-12-18 



Zhu Lihua 



发件人: Helge Delfs 
发送时间: 2008-12-17  16:57:22 
收件人: dev 
抄送: 
主题: Re: [qa-dev] [Automation]Timing problem when run scripts 
 
Hi Lihua,
I have one additional question:
Are you testing on native display or is it remote testing that you are
doing  ? For example if you are testing on VNC display you must use the
xrender extension (I've got this hint from one of our developers Herbert
Duerr) If you don't use this extension on your VNC-Server the connection
can be slowed down.
Try 'xdpyinfo|grep RENDER' to figure out if this extension is installed.
Best Regards
 Helge
Am 16.12.08 04:59, Zhu Lihua schrieb:
> Hi Maho and all,
> 
> I'm running required scripts against OOo_m9 these days. I've found some 
> timing issues, if I add a sleep instrction at proper position, the result 
> will be Ok, or there will be some errors or warnings in the result. I'll 
> attach a resultfile, w_updt.res. In this file, tEditFields, tInsertNote, 
> tFormatWrapArea and tFormatPositionAndSizeLegend often have this timing 
> issue. Not every testcase metioned will occur the problem every time, but 
> often.
> 
> the same problem often come out in some other scripts, such as EuroConverter.
> 
> I consulted Helge about this. He told me this never happened in Sun. And he 
> took time to run some testcases, no error happened.
> 
> I ran the testcases against both English version and Chinese version under 
> both English locale and Chinese locale of OS. The problem happened in all 
> conditions. 
> 
> Did you have this kind of problem when you ran testcases? 
> 
> Thank you!
> 
> 2008-12-16 
> 
> 
> 
> Zhu Lihua 
> 
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to