Hi Roman Zilber,
Thanks for the help....

Managed to get it working...

Things i did was:
after
Reporter.ReportEvent micFail....i included

DataTable.GetSheet('Global")
Datable.SetCurrentRow (1)

Many Thanks.....

On 22 June, 19:00, Roman Zilber <[email protected]> wrote:
> I think the "Reporter.ReportEvent micFail " stops current iteration of
> global script, but I don't know if it si "as designed" or not.
>
> The workaround can be to use loop:
>
> 1) Set action properties to one iteration only.
> 2)
>
> NumOfRows = DataTable.GetSheet('Global").GetRowCount
>
> For Iterator = 1 To NumOfRows Step 1
>         DataTable.GetSheet(('Global").SetCurrentRow(Iterator)
> ....
>
> On Mon, Jun 22, 2009 at 1:13 PM, johnthenu <[email protected]> wrote:
>
> > Hi,
>
> > I have several actions and from each of the action i am calling some
> > validation function...
>
> > Call compareExpectedAndActual (expFirstDD, actFirstDD)
>
> > For validation the values are pulled from local sheet and for the
> > actions the value are pulled from global sheet.
>
> > Now the problem is when the validation passes,,,,everything is
> > normal ....but when the validation fails.....QTP can not pick up the
> > value from the global sheet for the next action....
>
> > I am confused on why this is happening
> > Here is my validation code:
>
> > Public Sub compareExpectedAndActual (actualDD, expectedDD)
>
> >   If actualDD = expectedDD Then
> >                                                          '     MsgBox Pass
> >                                        ' For
> > Debugging
> >                     Reporter.ReportEvent micPass, " Expected Result: "&
> > actualDD
> > &" = Actual Result:"& expectedDD  &"", "Test Passed"
> >        ElseIf actualDD <> expectedDD Then
>
> >                                                                'MsgBox Fail
> >                                           ' For
> > Debugging
> >                  Reporter.ReportEvent micFail , " Expected Result: "&
> > actualDD  &"
> > <> Actual Result:"& expectedDD &"", "Test Failed - Please Check the
> > Difference"
> >        End If
>
> > End Sub
>
> > Many Thanks

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to