Initial commit — sursa ROAGEST

This commit is contained in:
2026-07-08 20:19:12 +03:00
commit 0b31c100b8
294 changed files with 13076 additions and 0 deletions

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