---
title: "Integracijos diegimas"
url: "https://gidas.rivile.lt/integraciniai_sprendimai/kitos_integracijos/blue_emi/integracijos_diegimas"
updated: "2025-10-31"
parent: "https://gidas.rivile.lt/integraciniai_sprendimai/kitos_integracijos/blue_emi.md"
---

# Integracijos diegimas

[Konsultantams ir atstovams:](https://manorivile.sharepoint.com/:f:/r/sites/rivilefiles/Shared%20Documents/Downloads/Kitos%20integracijos/Blue_EMI?csf=1&web=1&e=xN2L4t)

#### Diegimas

- Į Rivile GAMA\ALL katalogą įrašomi failai:
  - blue_emi_qr_link.fxp
- Pardavimo operacijų sąraše aprašomas testavimo klavišas (CTRL+Q):
  

```
m.lcNuoroda=""
blue_emi_qr_link(@lcNuoroda,1.00,"Mokėjimo paskirtis testas","01")
f_info(m.lcNuoroda,.t.)
```

![blue_1](https://gidas.rivile.lt/user/pages/142.integraciniai_sprendimai/11.Kitos_integracijos/80.Blue_EMI/20.Integracijos_diegimas/blue_1.png)



- Pirmą kartą paleidus testavimo klavišą, automatiškai susikuria parametrai: **BLUE_EMI_USR** ir **BLUE_EMI_EML**.
- Įvedamos parametro  **BLUE_EMI_USR** reikšmės:
  - Brand ID ir Key - ši informacija gaunama iš Blue EMI 
- Įvedamos parametro  **BLUE_EMI_EML** reikšmės:
  - Blue EMI el. paštas - nurodomas el. paštas, kuris bus perduodamas į Blue EMI. Jei šis parametras neužpildytas, tai perduodamas el. paštas iš kliento kortelės.
- Pardavimo operacijų sąraše paspaudus testavimo klavišą, sėkmės atveju parodoma pilnai suformuota nuoroda, kurią nukopijavus į naršyklę atidaromas dokumento apmokėjimo langas Blue EMI puslapyje.  Jei viskas veikia tinkamai - testavimo mygtuką galima ištrinti.
- Susiimportuojama papildoma ataskaita - joje aprašytas nuorodos įkėlimo pavyzdys.
- Analogiškai pakoreguojamos kliento naudojamos ataskaitos arba el. laiškų tekstai:
  * Įkeliamas nuorodos stulpelis ruošiant duomenis ataskaitos INIT'e
  * Įkeliamas QR ir apmokėjimo tekstas su nuoroda
  * Pridedama sugeneruota nuorda į el. laiško tekstą



### BLUE_EMI_QR_LINK

```
blue_emi_qr_link(@lcNuoroda,lnSuma,lcPaskirtis,lcKodas_ks,[lcLaukas],[lcKodas_op],[lcModulis])
```

- lcNuoroda - grąžinama nuoroda arba klaidos pranešimas **(Privalomas)**
- lnSuma - nurodoma suma. Tipas skaitmeninis **(Privalomas)**
- lcPaskirtis - mokėjimo paskirtis, gavus pavedimą bus matoma ši mokėjimo paskirtis **(Privalomas)**
- lcKodas_ks - kliento kodas Rivilės sistemoje **(Privalomas)**
- lcLaukas - laukas kuriame bus saugomas iš Blue EMI gautas nuorodos fragmentas. Jei lauko kodas nenurodomos, tuomet visada bus generuojama nauja apmokėjimo nuoroda. **Perdavus šį parametrą privaloma perduoti ir du likusius parametrus lcKodas_op ir lcModulis. Skirtas tik pirkimams ir pardavimams**
- lcKodas_op - pirkimo/pardavimo operacijos numeris. **Neprivalomas (privalomas tik tuo atveju jei perduodamas lcLaukas)**  
- lcModulis - modulio kodas. PO - pirkimai arba RO - pardavimai. **Neprivalomas (privalomas tik tuo atveju jei perduodamas lcLaukas)**

Procedūra **blue_emi_qr_link** grąžina .T. arba .F., pagal šias reikšmes galime nustatyti ar nuoroda buvo sugeneruota ar ne.

Naudojimo pavyzdys be nuorodos fragmento išsaugojimo:

  ```
 m.lcNuoroda=""
 blue_emi_qr_link(@lcNuoroda,200.99,"Dokumentas #AAA","01")
* Kintamajame m.lcNuoroda grąžinama nuoroda arba klaidos pranešimas:
* "https://gate.blueemi.com/p/daf1fe0a-0931-4e8b-8ac4-5b9a11ac1.../"
  ```

Naudojimo pavyzdys be nuorodos fragmento išsaugojimo pardavimuose:

  ```
m.lcNuoroda=""
blue_emi_qr_link(@lcNuoroda,i06_suma+i06_suma_pvm,"Dokumentas #"+alltrim(i06_dok_nr),i06_kodas_ks)
* Kintamajame m.lcNuoroda grąžinama nuoroda arba klaidos pranešimas:
* "https://gate.blueemi.com/p/daf1fe0a-0931-4e8b-8ac4-5b9a11ac1.../"
  ```

Naudojimo pavyzdys su nuorodos fragmento išsaugojimu pardavimuose:

  ```
m.lcNuoroda=""
blue_emi_qr_link(@lcNuoroda,i06_suma+i06_suma_pvm,"Dokumentas #"+alltrim(i06_dok_nr),i06_kodas_ks,"i06_aprasymas3",i06_kodas_po,"RO")
* Kintamajame m.lcNuoroda grąžinama nuoroda arba klaidos pranešimas:
* "https://gate.blueemi.com/p/daf1fe0a-0931-4e8b-8ac4-5b9a11ac1.../"
  ```

### Pavyzdžiai sąskaitoje faktūroje ir el. laiško tekste

#### Sąskaitoje faktūroje:

Spausdinant ataskaitoje, sugeneruotą nuorodą reikėtų įterpti į ataskaitos duomenis (ataskaitos INIT'e). Pavyzdžiui:

```
LOCAL lal
lal=ALIAS()

IF TYPE(lal+".blue_emi_link")#"C"
	LOCAL lcNuoroda
	IF !blue_emi_qr_link(@lcNuoroda,i06_suma+i06_suma_pvm,"Dokumentas #"+alltrim(i06_dok_nr),i06_kodas_ks,"i06_aprasymas3",i06_kodas_po,"RO")
		WAIT WINDOW m.lcNuoroda
		RETURN .F.
	ENDIF
	IF EMPTY(m.lcNuoroda)
		WAIT WINDOW "Nepavyko sugeneruoti nuorodos"
		RETURN .F.
	ENDIF
	SELECT *, CAST(m.lcNuoroda as M) as blue_emi_link FROM (lal) INTO CURSOR (lal) READWRITE
ENDIF

SELECT (m.lal)
GO TOP
```

Ataskaitos formoje įkeliama nuoroda. Nuoroda pagal XFRX taisykles aprašoma objekto komentaruose:

```
#UR A HREF=blue_emi_link
```

Norint ataskaitoje suformuoti QR kodą, komanda paveiksliuko objektui:

```
bar_kod_gen_qr_full(blue_emi_link,330)
```

![blue_emi_w3](https://gidas.rivile.lt/user/pages/142.integraciniai_sprendimai/11.Kitos_integracijos/80.Blue_EMI/20.Integracijos_diegimas/blue_emi_w3.png)





Detaliau: [bar_kod_gen_qr_full](https://gidas.rivile.lt/sistemos_programavimas/funkcijos/kitos_funkcijos/bar_kod_gen_qr_full.md).

#### El. laiško tekste:

Siunčiant el. laišką sugeneruotą nuorodą reikėtų įterpti į ataskaitos duomenis (ataskaitos INIT'e). Pavyzdžiui:

```
LOCAL lcNuoroda

IF !blue_emi_qr_link(@lcNuoroda,i06_suma+i06_suma_pvm,"Dokumentas #"+alltrim(i06_dok_nr),i06_kodas_ks,"i06_aprasymas3",i06_kodas_po,"RO")
	WAIT WINDOW m.lcNuoroda
	RETURN .F.
ENDIF

IF EMPTY(m.lcNuoroda)
	WAIT WINDOW "Nepavyko sugeneruoti nuorodos"
	RETURN .F.
ENDIF

m.lcPav="PVM S/F"
m.lcText=[Laba diena,<br><br>]
m.lcText=m.lcText+[Siunčiame Jums PVM Sąskaitą-Faktūrą.<br>]
m.lcText=m.lcText+[Apmokėti galite <a href="]+alltrim(m.lcNuoroda)+[" target="_blank">ČIA</a><br>]
...

IF !f_mail_Chilkat(m.lcE_mail,m.lcPav,,m.lcFile,m.lcText)
...
```

**Kad nuoroda būtų aktyvi el. laiške, privaloma laiško tekstą formatuoti ir siųsti HTML formatu.**