Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Basic User Input to search and report
Message
 
To
19/04/2000 14:25:15
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00355661
Message ID:
00361456
Views:
27
Hi John,

For future reference, you can get to the message through the calender. Click the calender link in the left pane, click the link for that days messages, it is the number under the date, That will display all the messages for that day in the bottom right pane. Then just scroll down to the message you are looking for :)

IAC here is Ed's post. FYI, if you have questions you need to go to that message and reply to it.

-----Ed's post------
>Hi John,
>
>It looks ok from here. I'm not sure what could be causing it.
>
>You may want to start a new thread in "Troublshooting" and see if some else has any ideas.
>
>>Hi Roi,
>>> I hate to keep beating a dead bird, but got a quick question. <
>>> I've got the folling code in my command button <

Where in the command button? The Click event?

>>> cGroupCode = THISFORM.text1.VALUE <
>>> SELECT * FROM client ; <
>>> WHERE group_code = cGroupCode ; <
>>> INTO CURSOR Mycursor <
>>> REPORT FORM POLICY.FRX FOR GROUP_CODE = cGroupCode PREVIEW <

This is asking for trouble - using a REPORT FORM based on a FOR in conjunction with a PREVIEW may result in the filter not being applied if the user decides to print. Either do a SELECT to a cursor, or use a P-view as the basis of the report (if you inherit from the current DE and you need the detail to have the name of the base table, you can always open the P-view with an ALIAS) so that you don't run into this particular trap

>>> IF _TALLY !=0
>>> wait window 'FOUND MATCH, WILL PRINT REPORT ' <
>>> ELSE <
>>> wait window 'NO DATA MATCH, TRY AGAIN ' <
>>>ENDIF <
>>
>>>RETURN <

Burp - the cursor MyCursor's FOR clause just became invalid, since cGroupCode just went out of scope. Try converting the SELECT to convert cGroupCode to a literal with macro-expansion and quote encapsulation as shown below:

SELECT * FROM client ;
WHERE group_code = [&cGroupCode] ;
INTO CURSOR Mycursor
Roi
'MCP' Visual FoxPro

In Rome, there was a poem.
About a dog, who found two bone.
He lick the one, he lick the other.
He went pyscho, he drop dead!
Previous
Reply
Map
View

Click here to load this message in the networking platform