Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Uh Ohh.. Have I found another error?
Message
From
05/09/2001 11:30:08
 
 
To
05/09/2001 09:18:29
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00551426
Message ID:
00552563
Views:
24
This message has been marked as the solution to the initial question of the thread.
I see the problem now, and I sent it up the line.

It works OK if there is a space in the SKIP FOR prior to the first .F., but if there is not, the SKIP FOR is omitted. If I use the SKIP FOR below, it will happen. I didn't see it before because your posted SKIP FOR had the extra space.
IIF(EMPTY(ga_trns[1]),.F., gn_ModMode <> 2 OR TYPE("pl_stkdisp") = "U" OR NOT pl_stkdisp) ;

You can fix this by editing GENMENU.PRG, in the AddSkipFor function. I changed line 1250 from this:
IF ATC(".F.",GETWORDNUM(m.skip,1)) # 0

to this:
IF ATC(".F.",GETWORDNUM(ALLTRIM(m.skip),1)) = 1

and it seems to work fine for me. Please note that I HAVE NOT TESTED THIS EXTENSIVELY, but I think my logic is OK. Alternately, you can leave Genmenu as it was, and include spaces in your SKIP FOR prior to the first .F..

The problem is we should only drop the SKIP FOR if the .F. is first, not if it is anywhere in the first word.

Thanks for sending this through!

Jim
Jim Saunders
Microsoft
This posting is provided “AS IS”, with no warranties, and confers no rights.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform