Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Man, seems I am not giving up until someone actually hel
Message
 
To
17/06/1999 10:13:41
Chuck Tripi
University of Wisconsin - Milwaukee
Milwaukee, Wisconsin, United States
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00230878
Message ID:
00231387
Views:
16
Chuck,

After a quick look, I think you should be able to figure this out yourself. Do a SET STEP ON right before your scan. Through the Command Box, you should BROWSE all affected tables before and after every command that affects a table. Also check your record pointer after any LOCATE to see that it is where you expect. When something happens that you didn't expect/want, fix the code.

Do you have a problem with that?

Joe



> CASE _tally = ct && (means both tables has same counts, so need to verfiy side-by-side)
> SELECT histpo
> SELECT * FROM histpo TO histtemp WHERE po = varpo
> SELECT tempcur
> SELECT * FROM tempcur TO temptemp
>
>***
>***THIS SECTION IS WHERE I NEED HELP!!!
>***
>
> SCAN FOR po = varpo
> IF class = varclass AND ;
> fund = varfund AND ;
> udds = varudds AND ;
> amount = varamount AND ;
> fy = varfy AND ;
> activity = varactivity AND ;
> account = varaccount
> SELECT histtemp
> DELETE
> SELECT temptemp
> DELETE
> LOCATE
> ELSE && (means tempcur has updated data, need to DELETE records in HISTPO, add new records into HISTPO)
> SELECT tab3
> APPEND FROM tempcur
> EXIT
> ENDIF
> SELECT histtemp
> IF BOF() && (see next 2nd line)
> SELECT temptemp
> IF BOF() && (means ALL matches)
> SELECT tab2
> APPEND FROM tempcur
> ELSE
> SELECT tab3
> APPEND FROM tempcur
> ENDIF
> ELSE
> SELECT tab3
> APPEND FROM tempcur
> ENDIF
> ENDSCAN
>
>
>What is wrong here? I have two tables and both have duplicate recs and same counts of duplicates (5 recs and 5 recs or 4 and 4 or 2 and 2). I need to track so I can know if updated or not, so I can report it (there are no forms so it is click and snip coffee and walk to printer kind of execute).
Joseph C. Kempel
Systems Analyst/Programmer
JNC
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform