How to end script in QTP if the Do Until loop goes to infinite.

[uma87]

Hi , Can anyone please help with below issue.
I have a Do Until ...Loop condition ,

Code:

Do Until X= "Ordered"  
          Call Login Function
          Browser().page().link().click
         Browser().Page().webbutton("Approve).click
         X = Browser().page().webelement("Status").GetROproperty ("Innertext")  
If  X = "Ordered" Then Exit DO
Loop

every time i login with a different username using datatable, click the required link and click Approve button, for every time i approve, the status changes to "Partially approved", "Approved", "Ordered". my loop continues till it finds the Ordered status
some times, we dont get Ordered status due to some acceptable errors or warnings. in such cases, is their any option to end the loop say after 15 times of exceution and still the ordered status is not found.