Ukázky

Odeslání jednoduché platby

Celý proces odeslání jednoduché platby o částce 323.56,- Pozn.: tato ukázka NEŘEŠÍ možné chyby vzniklé na straně serveru

* Vytvoreni & inicializace klienta vcetne nacteni certifikatu
loClient = CREATEOBJECT("EET2.Client")
loClient.Init("CZ12345678", 3, "KASA-001", .F.)
loClient.LoadCert("CZ12345678.p12", "tajne_heslo")

* Vytvoreni jednoduche transakce
loTx = CREATEOBJECT("EET2.Transaction")
loTx.Init("0556", DATETIME(), "323.56")

* Prvni odeslani platby
lcPok = loClient.Submit(loTx, .T.)

Evidence platby v pověření jiného poplatníka

Ukázka odeslání tržby, která plyne jinému poplatníkovi než evidujícímu. V ukázce má evidující poplatník EIČ CZ12345678 a poplatník, kterému tržba plyne CZ00000019.

* Vytvoreni & inicializace klienta vcetne nacteni certifikatu
loClient = CREATEOBJECT("EET2.Client")
loClient.Init("CZ12345678", 3, "KASA-001", .F.)
loClient.LoadCert("CZ12345678.p12", "tajne_heslo")

* Vytvoreni jednoduche transakce
loTx = CREATEOBJECT("EET2.Transaction")
loTx.Init("0556", DATETIME(), "323.56")
loTx.EicPoverujiciho = "CZ00000019"

* Prvni odeslani platby
lcPok = loClient.Submit(loTx, .T.)

Odeslání tržby na testovací server

Jednoduchá ukázka odeslání tržby na testovací server.

* Vytvoreni & inicializace klienta vcetne nacteni certifikatu
loClient = CREATEOBJECT("EET2.Client")
loClient.Init("CZ12345678", 3, "KASA-001", .T.)
loClient.LoadCert("CZ12345678.p12", "tajne_heslo")

* Vytvoreni jednoduche transakce
loTx = CREATEOBJECT("EET2.Transaction")
loTx.Init("0556", DATETIME(), "323.56")

* Prvni odeslani platby
lcPok = loClient.Submit(loTx, .T.)
* i testovaci server vraci potvrzovaci kod POK
? lcPok