Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)
Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
10
program1.prg
Normal file
10
program1.prg
Normal file
@@ -0,0 +1,10 @@
|
||||
|
||||
select id, count(*) as nr from ips_voyages group by id having count(*)>1 into cursor tt
|
||||
select tt
|
||||
scan
|
||||
sele ips_voyages
|
||||
locate for id = tt.id
|
||||
if found()
|
||||
delete in ips_voyages
|
||||
endif
|
||||
endscan
|
||||
Reference in New Issue
Block a user