romfast/roagest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)

Browse Source 
Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
Marius Mutu
2026-07-16 11:22:03 +03:00
commit 7ae0c39d5e
204 changed files with 66147 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
Programe/cumplun-furn.prg Normal file
View File

@@ -0,0 +1,26 @@
set deleted on
sele cumplun
*dele all
set order to tag nume
sele furnizor
DELE ALL
set order to tag nume
SELE DISTINCT ALLT(NUME) AS NUME,COD_FISCAL FROM CUMPLUN INTO CURSOR TT
SELE FURNIZOR
APPE FROM DBF('TT')
USE IN TT
sele furnizor
scan
scat memv
sele cumplun
sum achitat to m.platit for ALLT(nume)=ALLT(m.nume)
sum totctva to m.achizit for ALLT(nume)=ALLT(m.nume)
sele furnizor
gath memv
endscan