Taromato kvitų skenavimas POS pardavimo taške

SISTEMOS INIT

titi_pagr.SS_PARAM_POS_UZSTATO_TARA

Jei parametro reikšmė yra .T. ir parenkamas pinigų išėmimas su tipu "Užstatas", tai atsiranda langas, kuriame galima nuskenuoti taromato išduotus kvitus. Skenavimo metu patikrinama ar toks taromato kvito kodas dar nebuvo nuskenuotas.

Poso aprašyme turi būti aprašytas pinigų išėmimas su tipu Užstatas.

Servisas -> POS sistema -> POS aprašymas

pos

Servisas -> POS sistema -> POS pardavimo taškas

Paspaudus F6 -pinigų išėmimas ir pasirinkus užstato išdavimą atsidaro langas taromato kvitų nuskenavimui:

pos1

Taros kvito Bar kodų formatai gali būti skirtingi. Jeigu netinka standartinis variantas, šiame lange galima užprogramuoti "Po inf. nuskaitymo", ir patiems užpildyti reikalingus laukus.

*91 - prefixas
*XXXX - USAD parduotuvės kodas
*C - taromato nr.
*VVVVVV - 180516  (metai|menuo|diena)
*BBBB - 0936 (laikas)
*NNNN - kvito numeris
*MMMMM - kvito suma (max suma 999,90 €)

*91 XXXX C VVVVVV BBBB NNNN MMMMM
*91 6212 1 180515 1148 0002 00090
*91621211805151148000200090

POS_TARA_KODAS=alltrim(thisform.kodas_tar.value)
POS_TARA_SITEMINIS_NR=substr(POS_TARA_KODAS,1,2)
POS_TARA_PARDUOTUVĖS_NR=substr(POS_TARA_KODAS,3,4)
POS_TARA_TAROMATO_NR=substr(POS_TARA_KODAS,7,1)
POS_TARA_CEKIO_NR=substr(POS_TARA_KODAS,18,4)
POS_TARA_SUMA=round(val(substr(POS_TARA_KODAS,23,5))/100,2)
*POS_TARA_PAV="Suma3"

pos2

Standartiškai yra padaryta:

POS_TARA_KODAS=alltrim(thisform.kodas_tar.value)
POS_TARA_SITEMINIS_NR=substr(POS_TARA_KODAS,1,5)
POS_TARA_PARDUOTUVĖS_NR=substr(POS_TARA_KODAS,6,4)
POS_TARA_TAROMATO_NR=substr(POS_TARA_KODAS,10,1)
POS_TARA_CEKIO_NR=substr(POS_TARA_KODAS,11,6)
POS_TARA_SUMA=round(val(substr(POS_TARA_KODAS,17,4))/100,2)
POS_TARA_PAV="