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

Include si sistemul de depanare/testare headless din Teste\ (harness UI cu capturi, verificare de sintaxa prin compilare, wrappere text<->binar) si docs\depanare_testare_flora2roa.md.
This commit is contained in:
2026-08-02 08:56:52 +03:00
commit 2736cbd525
49 changed files with 16011 additions and 0 deletions

91
INFO.txt Normal file
View File

@@ -0,0 +1,91 @@
Am facut suma(cantitate * pret) pe intrari si pe iesiri, dar nu am gasit in balanta sumele respective la 371, 401.
In fisierul de iesiri nu am gasit referinte la conturi. Sunt doar iesiri de 371?
In fisierul de intrari nu este contul in clar, ci un camp ID care face referire la un nomenclator de conturi. Trebuie sa aflu ce conturi reprezinta ID-urile
Am gasit si un fisier cu transferuri. Trebuie sa generam note si pentru transferuri?
Pentru lamuriri o sa imi trebuiasca:
RAPORT DE GESTIUNE
CENTRALIZATOR BONURI CONSUM
CENTRALIZATOR NIR-URI
CENTRALIZATOR TRANSFERURI (daca trebuie generate note)
LISTA ARTICOLE
Factura F/54381/17.05.2016 COCA COLA HBC ROMANIA SRL (NIR 1299)
NIR 1301 si Factura 866673 18/05/2016 (articolele au alte conturi decat NIR-ul 1299)
SELECT CONT, SUM(CANT*PRET) AS VALOARE FROM NIR1 GROUP BY CONT INTO CURSOR TT
CONT 11 (301): 6598.88
CONT 18 (371): 7490.00
balanta 301 debit: 6598.90
balanta 371 debit: 7533.45
balanta 378 credit: 4808.81
balanta 4428.1 credit: 715.53
SELECT l.cont, sum(l1.pret*l1.cant) as valoare FROM livrare l FULL JOIN livrare1 l1 ON l.codparinte = l1.codparinte AND l.indexlocal = l1.indexlivr GROUP BY l.cont
transf1
marfa
607: CALCULATE SUM((valachiz) FOR valachiz <> 0
378: CALCULATE SUM((pret*cant)-tva-valachiz) FOR valachiz <> 0
4428: CALCULATE SUM(tva) FOR valachiz <> 0
------------------------------
LUNA 06/2016
INTRARI - NIR
SELECT N.CONT, SUM(N.CANT*N.PRET) AS VALCTVAV, SUM(N.tva) AS VALTVAV, SUM(I.CANT*I.PRET) AS VALACH, SUM(((N.CANT*N.PRET)-N.TVA)-(I.CANT*I.PRET)) AS VALADAOS, SUM(I.TVA) AS VALTVAA FROM NIR1 N JOIN INTRARI1 I ON N.CODPARINTE = I.CODPARINTE AND N.ART = I.ART GROUP BY CONT INTO CURSOR TT
301
valoare achizitie fara tva: 7944.39
valoare tva achizitie: 717.51
371
valoare achizitie fara tva: 2982.41 (371 = 401)
valoare tva achizitie: 377.68 (4426 = 401)
valoare adaos: 5457.26 (371 = 378)
valoare tva vz neex: 904.33 (371 = 4428)
valoare vz cu adaos si tva: 9344 (debit 371)
LIVRARE - BON CONSUM (descarcare gestiune produse retete 301 si 371)
SELECT l.cont, ROUND(sum(l1.pret*l1.cant),2) as valvctva, ROUND(SUM((l1.pret-l1.adaos)*l1.cant),2) as valach, ROUND(SUM(l1.pret*l1.tvaneex/(1+l1.tvaneex)*l1.cant),2) as valtvaneex, ROUND(SUM((l1.adaos*l1.cant)-(l1.pret*l1.tvaneex/(1+l1.tvaneex)*l1.cant)),2) as valadaos FROM livrare l FULL JOIN livrare1 l1 ON l.codparinte = l1.codparinte AND l.indexlocal = l1.indexlivr GROUP BY l.cont
301
valoare achizitie fara tva: 9543.77 (601 = 301)
371
valoare achizitie fara tva: 491.42 (607 = 371)
valoare adaos: 1352.62 (378 = 371)
valoare tva neex: 165.96 (4428 = 371)
TRANSFER - MONETARE (descarcare gestiune marfa 371)
SELECT ROUND(SUM(valachiz),2) as valach, ROUND(SUM((pret*cant)-tva-valachiz),2) as valadaos, ROUND(SUM(tva),2) as valtva WHERE valachiz <> 0 FROM transf1
371
valoare achizitie fara tva: 2368.64 (607 = 371)
valoare adaos: 4199.53 (378 = 371)
valoare tva neex: 724.34 (4428 = 371)
INCASARI
SELECT t.zi, SUM(t.valdoc) as valtot, SUM(NVL(t2.valoare, 0.00)) as valpos, SUM(t.valdoc-NVL(t2.valoare,0.00)) as valcasa FROM transf t LEFT JOIN transf2 t2 ON t.coddoc = t2.codparinte GROUP BY t.zi
select z.zi, ROUND(NVL(x.proctva*100, 0.00),0) as proctva, ROUND(NVL(x.valvctva, 0.0000),2) - ROUND(NVL(z.valdiscoun * x.valvctva/y.valvctva, 0.0000),2) as valdoc, round(w.valpos* x.valvctva/y.valvctva,2) as valpos, round(w.valcasa* x.valvctva/y.valvctva,2) as valcasa from ;
(SELECT tr.zi, s.tvaneex as proctva, ROUND(SUM(t.cant*t.pret),2) as valvctva FROM transf1 t FULL JOIN sursa1 s ON t.codparinte = s.codparinte AND t.indexlocal = s.indexlivr FULL JOIN transf tr ON t.codparinte = tr.coddoc GROUP BY tr.zi, s.tvaneex ) x, ;
(SELECT tr.zi, ROUND(SUM(t.cant*t.pret),2) as valvctva FROM transf1 t JOIN transf tr ON t.codparinte = tr.coddoc GROUP BY tr.zi) y, ;
(SELECT tr.zi, ROUND(SUM(tr.valdiscoun),2) as valdiscoun FROM transf tr GROUP BY tr.zi) z, ;
(SELECT tr.zi, SUM(NVL(t2.valoare, 0.00)) as valpos, SUM(tr.valdoc-NVL(t2.valoare,0.00)) as valcasa FROM transf tr LEFT JOIN transf2 t2 ON tr.coddoc = t2.codparinte GROUP BY tr.zi) w ;
WHERE x.zi = y.zi AND x.zi = z.zi and x.zi = w.zi ;
INTO CURSOR tt
select zi, proctva, valdoc, ;
round(valdoc * proctva /(100 + proctva),2) as tva,;
valdoc - round(valdoc * proctva /(100 + proctva),2) as baza,;
round(valpos * proctva /(100 + proctva),2) as tvacard,;
valpos - round(valpos * proctva /(100 + proctva),2) as bazacard,;
round(valcasa * proctva /(100 + proctva),2) as tvanumerar,;
valcasa - round(valcasa * proctva /(100 + proctva),2) as bazanumerar ;
FROM tt INTO CURSOR vv
CASA = valoarea incasata numerar, cu tot cu TVA
CARD = valoarea incasata cu card, cu tot cu TVA