Actualizari la programul visual foxpro ef.prg si la efact.dbf?

[florinbad]

Buna ziua!

Repet ceea ce am intrebat si pe Profox - Facebook: lucrez la o firma care nu are nicio treaba cu statul roman, nu are nicio treaba cu bunurile cu risc fiscal ridicat, nu are nicio treaba cu tichetele de vacanta. Producem echipamente pentru foraj gaze naturale si petrol si serviciile aferente acestor activitati. De curand am incheiat un contract cu Sircoss Romgaz (firma de stat) si, vrand-nevrad, trebuie sa invat limbajul de marcare XML, pentru a emite facturi in relatia B to G. Lucrez in Visual FoxPro 9.

Am descarcat toate elementele de la linkul pus de nicu:
https://drive.google.com/drive/folders/ ... lU48nU9_GS

Am luat la puricat programul ef.prg, am remediat doua erori, am incercat sa-l invat pas-cu-pas insa mi-am prins urechile in el si am mai multe probleme pe care nu stiu cum sa le rezolv:
- am aviz de expeditie, l-am introdus in campul respectiv insa nu mi-l afiseaza in xml
- am contract, l-am introdus in campul respectiv insa nu mi-l afiseaza in xml
- am explicatii (70 caractere), l-am introdus in campul respectiv insa nu mi-l afiseaza in xml
- daca am un singur produs este ok, factura in format xml iese cum trebuie
- daca am mai multe produse (2-3-5-10 etc) imi afiseaza doar denumirea ultimului produs. Restul denumirilor produselor le ignora.
- la produsele de pana la ultimul produs, se afiseaza doar valoarea. Nu se afiseaza: denumire, um, cantitate, pret unitar, valoare tva, procent tva
- la ultimul produs nu se afiseaza valoare tva. In rest, se afiseaza toate elementele produsului (denumire, um, cantitate, pret unitar, valoare, procent tva).
Totalurile generale ale facturii se fac si ele.

Aveti cumva actualizari la programul ef.prg si la fisierul efact.dbf? S-a schimbat ceva intre timp?

Multumesc foarte nult pentru intelegere si pentru rabdarea de a citi tot ce am insirat mai sus..

[mrapi]

codul e din februarie 2022 si nu am update la el,a fost ceva de startup despre cum am putea sa pornim cu generare xml dintr o structura incarcata in dbf
cel mai bine incarci aici un exmplu https://www.anaf.ro/CompletareFactura/f ... rale.xhtml
apoi generezi xml ca un fis text,poti folosi SET TEXTMERGE https://hackfox.github.io/section4/s4g161.html

[florinbad]

Multumesc, asa voi face. Am folosit linkul de la Anaf insa doar pentru o factura cu un singur produs. Penttu 10 produse (de exemplu) o sa-mi ia o vesnicie.

Am crezut si sperat ca vreunul dintre voi a imbunatatit programul sau a mai facut modificari in dbf-ul eFact. Mi-ar fi usurat viata si munca.
Pe viitor cum as putea face? Ma gandeam la anticul @Say...Get. Este stupida gandirea mea?
Apoi, de ce trebuie sa transform fisierul xml in fisier text? Anaf-ului nu i-l trimit ca fisier xml?

[mrapi]

@Say/Get era pe vremea lui fox 2.6
xml-ul tot un fisier text este,il loc de extensia .txt are .xml

[florinbad]

Tot antic sunt si eu...
Stiu ca xml este tot text (il deschid cu Notepad). Oi vedea ce voi face in timp, pe masura ce citesc documentatia si ma familiarizez cu termenii. Pentru mine totul este nou cu xml-ul si incep de la zero.
Multumesc pentru raspuns.

[mrapi]

rezolvi simplu cu TEXTMERGE,vezi si linkul anterior,incarci xml-ul exemplu in prg si valorile dinamice le pui cum am facut cu variabila pArticol,sau pui direct campuri din baza de date

Code: Select all

	
pArticol="Articol 1"
	
   SET TEXTMERGE ON
   SET TEXTMERGE TO factura.xml

    \<cac:InvoiceLine>
    \  <cac:Item>
    \   	<cbc:Name><<pArticol>></cbc:Name>
    \  </cac:Item>
    \</cac:InvoiceLine>


    SET TEXTMERGE TO
    SET TEXTMERGE OFF

[florinbad]

Am reusit. Multumesc foarte mult pentru ajutor!

[florinbad]

Se poate exporta fisierul xml din e-factura intr-un format dbf?
Multumesc.

[florinbad]

Reformulez rugamintea, poate nu m-am facut inteles: facturile vor fi trimise/receptionate de la 01.01.2024 NUMAI in format XML?

Furnizorul este obligat sa-mi trimita factura in format inteligibil (PDF, de exemplu sau tiparit) dar si in format XML?

Daca un furnizor imi trimite factura doar in format XML si nu mi-o trimite intr-o forma inteligibila (PDF, DOC, Posta Romana), eu cum o pot transforma intr-o forma inteligibila? Datele din factura XML a furnizorului trebuie sa le incarc in dbf-urile mele. Am incercat cu xmltocursor, insa imi da o eroare referitoare la schema XML ("Unable to infer XML schema").
Va multumesc pentru rabdare si intelegere.

[ionv]

Trebuie sa citesti datele din fisierul xml eFactura, furnizorul nu o sa mai transmita factura in format fizic (cel putin, nu este obligat sa o faca)
Poti sa folosesti MSXML2.DomDocument

Code: Select all

oXML=CREATEOBJECT('MSXML2.DomDocument')
oXML.ASYNC = .F.
oXML.LOADxml(FILETOSTR(GETFILE('xml')))
vtest=oXML.selectSingleNode("//Invoice/cbc:ID")
IF ISNULL(vtest)
	=MESSAGEBOX("Structura eronata",16,"Eroare")
	RETURN
ENDIF
?oXML.selectSingleNode("//Invoice/cbc:ID").text && numar factura
oNodeList = oXML.documentElement.getElementsByTagName("cac:InvoiceLine")
nrnod=oNodeList.LENGTH
FOR mi=0 TO nrnod-1
	?oNodeList.item(mi).selectSingleNode("cbc:InvoicedQuantity").text  && cantitate
	?oNodeList.item(mi).selectSingleNode("cac:Item").selectSingleNode("cbc:Description").text  && descriere produs/serviciu	
endf