>>Yea, Friday. That also means:

>>SET CLASSLIB TO Local_Store
>>oBeer = CREATEOBJECT("Buy_Beer")
>>DO WHILE NOT oBeer.All_Gone()
>>  oBeer.Drink_Up
>>ENDDO
>>QUIT

>
>George:
>
>When I run the above code, I get an error message on the last line:
>'Cannot quit Drinking Binge'
>
>???
Bryan, of course, being as old as I am, I haven't executed the above as written in years. I've used several other methods in order to control the loop, however.
The above was while I was single.These have been:

* After I got married
DO WHILE NOT oBeer.Wife_DirtyLook()
* Since I've past 40
DO WHILE oBeer.Still_Awake()

However, as I recall it, there is a method that you can call. Try issuing:

oBeer.HideAllMyMoney

I used that one several times with great success. %-)