Fórum pro uživatele kancelářského balíku OpenOffice | LibreOffice
 

#1 26. 12. 2017 21:02:30

ludviktrnka
Člen
Registrace: 9. 7. 2009
Příspěvků: 697

EET v calcu

Nezkoušel jste někdo napasovat do Officu pokladnu s EET? Nebo případně komunikaci Officu s nějakým softwarem který samotnou EET zvládá.


LibreOffice 5.4.

Offline

#2 27. 12. 2017 09:46:24

neutr
Člen
Registrace: 8. 3. 2007
Příspěvků: 3,435

Re: EET v calcu

MFCR napsal(a)

Dobrý den,

v příloze Vám zasíláme dokument "souhrn_pripravovanych_zmen_EPO_2018.pdf", ve kterém jsou popsány připravované změny EPO formulářů pro rok 2018.

Změny EPO formulářů budou zapracovány do verze aplikace, která bude dostupná na zkušebním serveru od cca 19.12.2017. Tato verze by měla být instalována do ostrého prostředí 28.12.2017.

S pozdravem

Radek Korčák
Generální finanční ředitelství
Technická podpora:
- aplikací Daňového portálu www.daneelektronicky.cz
- elektronické evidence tržeb www.etrzby.cz
E-mail: epodpora@fs.mfcr.cz
-----------------------------------------------------------------------
Databáze častých dotazů z oblasti aplikací Daňového portálu: http://epodpora.mfcr.cz
Databáze častých dotazů z oblasti elektronické evidence tržeb: http://www.etrzby.cz

     Pane Ludvíku přihlaste se na tenhle portál. Abyste dostával změny - tohle je jen část. Najdete tam i specifikace formátů, ale hlavně také testovací prostředí.


     Já vidím problém v účelu který sledujete. Nevím jaké všechny pokladní systémy existují, ale obejít to dnes půjde těžko i když technicky je to jistě řešitelné. Nebezpečná je ta první část Vašeho dotazu. Tedy napasovat pokladnu do Officu - a pak z něj odesílat "možná" přizpůsobené výstupy. Tohle musíte oficiálně otestovat a nechat si to od nich potvrdit.
     Jiná stránka věci je sekundární záznam pro vlastní kontrolu. Tady by to bylo asi schůdné zejména pro takové ty offline hlášení nebo kalkulačky s tiskem. Ty dobré systémy jsou napojeny z účetního programu a tam nic takového smysl nedává.


      Hlášení se posílá pomocí metody POST a bylo by možné udělat duplicitní odeslání na vlastní URI - asi i bez souhlasu MFCR. Jenže kasa musí dát denní výstup a vy potřebujete zřejmě kontrolu jestli bylo vše odesláno a to se nemusí povést. Když se zadaří jen druhé odeslání na vlastní adresu tak chybu nezjistíte. Problém bývá právě s tím, že portál MVCR bývá přetížen a tím se odeslání opozdí, a může úplně chcípnout.


      Další možností je že Vás zajímá FIK. Tohle dělá generátor a ten by se dal nastavit k přečtení. Nově tam má být QR kód. Mám z toho dojem, že změny nebo přídavky chodí moc často (nyní už 2x za prosinec) a že finální podoba ještě zdaleka není určena.


      Zase chápu, že zákony se rychle mění a jak to bude, nebo nebude s eet je otázka. Možná by stálo za to zvážit jestli nepokračovat jen pro vlastní potřebu i když to už nebude z pohledu zákona nutné. Byla by to dobrá kontrola vlastních provozů, jen to nasměrovat jinam.


      Osobně bych doporučil si pořídit app pro online (i offline) odesílání, rozkuchat to (přejmenovat na zip a rozpakovat) a pokusit se výstupy upravit. Pak bych hledal kde to je v konkrétním zařízení. Může to být drát, Wifi a možná i bluetot. To ale nebude mít jednotný a jednoduchý postup. U nových systémů pořízených jako ucelený blok zařízení (váha, čtečka kódů, čtečka karet, pokladna) to asi vůbec nepůjde.


Moje e-mailová adresa
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte orientaci při vyhledávání řešení JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

Offline

#3 12. 2. 2018 20:53:10

ludviktrnka
Člen
Registrace: 9. 7. 2009
Příspěvků: 697

Re: EET v calcu

Tak googlování bylo úspěšné. Není to sice přímo EET v openoffice, je to jen využití cizí API ale i tak mě to těší. Nabízí to zde: https://api-eet.cz/ a není to tedy úplně zadarmo (ačkoli verze zdarma je dost použitelná pro velmi malé prodejce 50 položek/den). Implementace pak spočívá v poměrně jednoduché komunikaci pomocí xml. Příklad je pro VBA, ale předělávka do Basicu je celkem v pohodě.

Sub EET_pokus

Dim xmlHtp  As Object
Dim sURL    As String
Dim sEnv     As String
Dim XMLDOC  As Object
Dim strResponse As String

xmlHtp = CreateObject("MSXML2.XMLHTTP")
oleService = createUnoService("com.sun.star.bridge.OleObjectFactory") 
XMLDOC = oleService.createInstance("Msxml.DOMDocument")
    
sEnv = "" 'tady se poskládají identifikační údaje a položky prodávaného zboží
sEnv = sEnv & "<?xml version=""1.0"" encoding=""UTF-8""?>"
sEnv = sEnv & "<request>"
sEnv = sEnv & "<headers>"
sEnv = sEnv & "<Auth>TEaOzAz3iZaFHyg7QwKolAVViYEJhphe</Auth>"
sEnv = sEnv & "</headers>"
sEnv = sEnv & "<data>"
sEnv = sEnv & "<dic_popl>CZ1212121218</dic_popl>"
sEnv = sEnv & "<id_provoz>11</id_provoz>"
sEnv = sEnv & "<id_pokl>ZKP-1</id_pokl>"
sEnv = sEnv & "<porad_cis>123</porad_cis>"
sEnv = sEnv & "<celk_trzba>16</celk_trzba>"
sEnv = sEnv & "<zakl_nepodl_dph>0.5</zakl_nepodl_dph>"
sEnv = sEnv & "<zakl_dan1>8.1</zakl_dan1>"
sEnv = sEnv & "<dan1>1.7</dan1>"
sEnv = sEnv & "<zakl_dan2>4.96</zakl_dan2>"
sEnv = sEnv & "<dan2>0.74</dan2>"
sEnv = sEnv & "<zakl_dan3>0</zakl_dan3>"
sEnv = sEnv & "<dan3>0</dan3>"
sEnv = sEnv & "<polozky_uctenky>"
sEnv = sEnv & "<polozka>"
sEnv = sEnv & "<nazev>Voda perlivá 1.5l</nazev>"
sEnv = sEnv & "<mnozstvi>2</mnozstvi>"
sEnv = sEnv & "<cena>4.9</cena>"
sEnv = sEnv & "</polozka>"
sEnv = sEnv & "<polozka>"
sEnv = sEnv & "<nazev>Rohlík tukový</nazev>"
sEnv = sEnv & "<mnozstvi>3</mnozstvi>"
sEnv = sEnv & "<cena>1.9</cena>"
sEnv = sEnv & "</polozka>"
sEnv = sEnv & "</polozky_uctenky>"
sEnv = sEnv & "<zpusoby_platby>"
sEnv = sEnv & "<platba>"
sEnv = sEnv & "<nazev>Hotovost</nazev>"
sEnv = sEnv & "<castka>10</castka>"
sEnv = sEnv & "</platba>"
sEnv = sEnv & "<platba>"
sEnv = sEnv & "<nazev>Platební karta</nazev>"
sEnv = sEnv & "<castka>15</castka>"
sEnv = sEnv & "</platba>"
sEnv = sEnv & "</zpusoby_platby>"
sEnv = sEnv & "<zaokrouhleni>0.5</zaokrouhleni>"
sEnv = sEnv & "<vraceno>9</vraceno>"
sEnv = sEnv & "<paticka_uctenky>Děkujeme za Váš nákup</paticka_uctenky>"
sEnv = sEnv & "</data>"
sEnv = sEnv & "</request>"

sURL = "https://rest.api-eet.cz/v1/xml/sale-add"

With xmlHtp
  .Open "POST", sURL, False
  .Send sEnv
    
  XMLDOC.loadXML .responseText
  strResponse = .responseText
End With

Print strResponse
'výstup všech těch EET kódů ve formátu XML,
'to samozřejmě je potřeba zapracovat do účtenky

End Sub

LibreOffice 5.4.

Offline

Zápatí