e-TVA Specificații JSON API

[blumache]

Multumim.

Documentatia pentru P300 o avem pe

https://mfinante.gov.ro/web/efactura/e-tva

[viorel_m]

Multumim.

Documentatia pentru P300 o avem pe

https://mfinante.gov.ro/web/efactura/e-tva

n JSON-ul de detaliere de la e-TVA la sectiunea 390_394 voi aveti ceva ? Eu inafara de casa de marcat si e Factura nu gasesc nimic si compar mere cu pere ...

[Cosstel]

@ hd56fox pun aici codul folosit de mine la descarcare poate te ajuta

Code: Select all

	lcTipHTTP='MsXml2.serverXMLHTTP.6.0' 
	loHTTP = CreateObject(lcTipHTTP)

	cAnul=LEFT(sSend,4)
	cLuna=RIGHT(sSend,2)
	cBear=oEfact.CodBear
	cCui=oEfact.CodFiscal

	cUrl="https://api.anaf.ro/decont/ws/v1/info?cui="+cCui+"&an="+cAnul+"&luna="+cLuna

	=loHTTP.Open("GET",cUrl,.F.)
	=loHTTP.SetRequestHeader("Authorization","Bearer " + cBear)
	=loHTTP.SetRequestHeader("Cache-Control", "no-cache")
	=loHTTP.SetRequestHeader("Cache-Control", "max-age=0")
	=loHTTP.Send()

	iDoW=0
	DO WHILE loHTTP.ReadyState!=4
		WAIT ' Se asteapta raspunsul ANAF ...' WINDOW TIMEOUT 2
		iDoW=iDoW+1
		IF iDoW>15
			EXIT
		ENDIF
	ENDDO
	IF iDoW<=15
		=loHTTP.GetAllResponseHeaders()
		cRaspuns=loHTTP.ResponseBody
	ELSE
		cRaspuns='.F. Probleme raspuns ANAF [XmlToPdf]'
	ENDIF

cDir='directorul unde salvezi arhiva'
cFis=cDir+'\zz_eTVA'+cAnLn+'.zip'
=STRTOFILE(cRaspuns,cFis)