Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

RS232 komunikacija sa Fisklanim

[es] :: Pascal / Delphi / Kylix :: RS232 komunikacija sa Fisklanim

[ Pregleda: 6751 | Odgovora: 11 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Igor.

Član broj: 90915
Poruke: 14
*.sbb.co.yu.



Profil

icon RS232 komunikacija sa Fisklanim03.06.2006. u 15:15 - pre 179 meseci
Pozdrav

da li neko moze da mi pomogne nekim primerom, treba da posaljem komandu Fiskalnom printeru preko rs232 i da procitam sta je fiskalni vratio,
imam komponentu SerialNG i nije mi jasno kako se salju komande. U uputstvu pise sledece:

FP550 Galeb
45H(69) Dnevni fiskalni izvestaj

Prostor za podatke : [<Option>,[N][A]]
Odgovor: Closure, Total, TotalX
Opcioni parametri : '0', '1', '2'

Znaci kako da tu komandu 69 posaljem printeru i procitam sta je vratio.

Hvala unapred.


 
Odgovor na temu

_deran_

Član broj: 69493
Poruke: 236
*.suonline.net.



+1 Profil

icon Re: RS232 komunikacija sa Fisklanim03.06.2006. u 15:48 - pre 179 meseci
primanje:

Code:

procedure TForm1.SerialPortNG1.RxClusterEvent(Sender: TObject);
begin
  if SerialPortNG1.NextClusterSize >= 0 then 
      showmessage('Primio: '+SerialPortNG1.ReadNextClusterAsString);
end;


slanje:
Code:

SerialPortNG1.SendString('ovo se salje');  // 45H = 'E'


Samo dobro podesi port, otvori ga i pazi na linefeed.
 
Odgovor na temu

Vladica Savić
Software Developer
Toronto, Canada

Član broj: 26699
Poruke: 654



+5 Profil

icon Re: RS232 komunikacija sa Fisklanim03.06.2006. u 16:25 - pre 179 meseci
Ovim se jos nisam bavio, pa me zato i zanima, moze li neko da malo opsirnije pojasni kako sve funkcionise sa prenosom podataka sa kompa na fiskalnu kasu...
Koliko sam ja informisan, program koji sluzi za npr. za unos novih artikla u kasu generise jednu datoteku u unapred zadatom formatu (Ime proizvoda, prva cena, druga cena, i sl) , i kasnije se ta ista datoteka salje preko seriskog porta na kasu. To bi trebalo da je to u globalu, a sad mene zanima moze li neko da malo bolje pojasni kako sve to funkcionise...
Pozdrav Vlada
 
Odgovor na temu

_deran_

Član broj: 69493
Poruke: 236
*.suonline.net.



+1 Profil

icon Re: RS232 komunikacija sa Fisklanim03.06.2006. u 18:25 - pre 179 meseci
Ako vec imas program koji ce da posreduje izmedju tvog programa i kase, onda ne moras da se mucis oko serijske komunikacije nego samo napravis fajl u odredjenom formatu i smestis ga u odredjeni folder. Rezidentni program bi trebao da ga prihvati i posalje na kasu, i mozda vrati rezultat u nekom drugom fajlu.
 
Odgovor na temu

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 108
*.147.eunet.yu.

ICQ: 156892888


+1 Profil

icon Re: RS232 komunikacija sa Fisklanim03.06.2006. u 19:29 - pre 179 meseci
U knjizici koja dolazi uz FP 550 imas format sadrzaja paketa koji trebas da prosledis uredjaju. Potrebno je da komandu koju saljes upakujes u zadati format, zajedno sa odgovarajucim parametrima, uradis cheksum i pustis je na port. Posle slanja poruke osluskujes port dok ne vrati odgovor ili ne istekne max predvidjeno vreme za odgovor. Vreme je definisano protokolom uredjaja.
Evo kako moja komponenta (DmxFP) pakuje taj paket.
Posto se radi o komercijanoj stvari ne mogu da ti posaljem bas sve o tome, ali ti zapitkuj pa ces verovatno doci do nekog resenja. DmxFP komponenta za komunikaciju sa uredjajem koristi ComPort Library ver. 3.0 .

Code:

function TCustomFU.PakovanjePaketa(dCMD: integer; Data: string): string;
var
  dDuzina, dSEQ: integer;
begin
  Result  := '';
  dDuzina := Length(Data) + $4 + $20;
  //$4(LEN,SEQ,CMD,Postamble) $20
  Randomize;
  repeat
    dSEQ := RandomRange($20, $7F);
  until dSEQ <> SEQ;
  SEQ := dSEQ;

  Result := Chr(dPreamble) + Chr(dDuzina) +
    Chr(dSEQ) + //Sekvenca
    Chr(dCMD) + //Komanda
    Data + Chr(dPostamble);
  Result := Result + BccStr(Copy(Result, 2, dDuzina)) + Chr(dTerminator);
end;


Marcha
-----------------------------------
Pretpostavka je majka zajeba.
 
Odgovor na temu

Igor.

Član broj: 90915
Poruke: 14
*.sbb.co.yu.



Profil

icon Re: RS232 komunikacija sa Fisklanim03.06.2006. u 20:38 - pre 179 meseci
Ljudi hvala
uspeo sam da odradim ovo ali naprimer kada posaljem komandu stampac nekad reaguje odmah a nekad tek posle treceg ili cetvrtog klika iako sacekam i po par sekundi. Nisam uspeo da procitam sta stampac vraca pa ne znam da li je to normalno ili ne?

I jos nesto da li je pametno da se zakacim na port i nepustam ga ili da se pre svake komande konektujem i posle odgovora stampaca diskonektujem.
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2654



+73 Profil

icon Re: RS232 komunikacija sa Fisklanim04.06.2006. u 00:26 - pre 179 meseci
> uspeo sam da odradim ovo ali naprimer kada posaljem komandu stampac nekad reaguje odmah a nekad tek posle treceg ili cetvrtog klika iako sacekam i po par
> sekundi. Nisam uspeo da procitam sta stampac vraca pa ne znam da li je to normalno ili ne?

Galeb posle svake komande vraća odgovor, rok je tu negde do 100ms. Pretpostavljam da postoji neki problem sa načinom na koji koristiš komponentu ili kako očekuješ odgovore. Ne poznajem tu komponentu koju koristiš pa ne mogu pomoći oko nje, jedino mogu preporučiti TComPort za serijsku komunikaciju. Sa Galebom počni od jednostavnijih komandi, na primer prikazivanje teksta na displeju, štampanje dijagnostike, provera statusa, može i presek stanja ili dnevni izveštaj koji si ti probao (vodi računa ako radiš sa fiskalizovanim primerkom da je njihov broj ograničen).

> I jos nesto da li je pametno da se zakacim na port i nepustam ga ili da se pre svake komande konektujem i posle odgovora
> stampaca diskonektujem.

Otvori port pri startovanju i drži ga, ako pišeš fiskalni drajver i treba da imaš ekskluzivnu komunikaciju sa uređajem. Inače, pravljenje kvalitetnog drajvera je užasno težak posao, a još ako radiš sa više modela... Razmisli o nekom gotovom rešenju, ima kvalitetnih drajvera a beše i Galeb ima svoj (besplatan) drajver. Ako se ipak odlučiš za pisanje i negde zaglaviš, pitaj.
 
Odgovor na temu

Igor.

Član broj: 90915
Poruke: 14
*.sbb.co.yu.



Profil

icon Re: RS232 komunikacija sa Fisklanim04.06.2006. u 14:22 - pre 179 meseci
Ok thanks probacu TComPort, znam da je broj dnev. izvestaja ogranicen imam nefiskalizovan stampac i treba da napravim neku komponentu ili DLL koji bi komunicirao sa stampacem. Da ne objasnjavam znam da postoje razni programi i drajveri od strane galeba, dosta se i razumem u rad fisklanih stampaca i sve sam to vec radio sa FI500, MetaLIne itd. Jednostavno sam dobio stampac i zadatak da napravim direktnu komunikaciju iz nekog mog programa.

Probao sam po vasim uputstvima da stampam text na displeju, da odstampam Dnevni izvestaj i presek stanja , nefiskalni text pa cak i fiskalni isecak. Problem sa reagovanjem stampaca sam resio tako sto posaljem bilo koju drugu komandu stampacu ( npr komanda za stanje stampaca ) i posle toga ono sto mi treba i onda radi na svaki klik.

Marcha tvoj primer mi je pomogao da shvatim kako sve to funkcionise, ali nisam uspeo da raspakujem poruku koju stampac vraca. Ako imas opet neki primer bilo bi super.
 
Odgovor na temu

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 108
*.ptt.yu.

ICQ: 156892888


+1 Profil

icon Re: RS232 komunikacija sa Fisklanim04.06.2006. u 17:20 - pre 179 meseci
Code:

function TCustomFP.DataOfAnswer(Answer: string): string;
var
  PosPre, PosPost, PosDel, PosTerm: integer;
  Status: string;
begin
  PosPre  := Pos(Chr(dPreamble), Answer);
  PosDel  := Pos(Chr(dDelimiter), Answer);
  PosPost := Pos(Chr(dPostamble), Answer);
  PosTerm := Pos(Chr(dTerminator), Answer);
  if (PosPre <> 1) or (PosPre > PosDel) or (PosDel > PosPost) or
    (PosPost > PosTerm) then
    DoPrinterNotResponding;
  Status := Copy(Answer, PosDel + 1, PosPost - PosDel - 1);
  CheckStatusBits(Status);
  Result := Copy(Answer, PosPre + 4, PosDel - PosPre - 4);
end;

Marcha
-----------------------------------
Pretpostavka je majka zajeba.
 
Odgovor na temu

Vladica Savić
Software Developer
Toronto, Canada

Član broj: 26699
Poruke: 654



+5 Profil

icon Re: RS232 komunikacija sa Fisklanim05.06.2006. u 09:59 - pre 179 meseci
Ima li ko vec odradjen FULL PROJECT koji moze da se vidi kao Demo...
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2654



+73 Profil

icon Re: RS232 komunikacija sa Fisklanim05.06.2006. u 12:29 - pre 179 meseci
> Ima li ko vec odradjen FULL PROJECT koji moze da se vidi kao Demo...

Misliš na fiskalni drajver? Pogledaj http://www.wings.co.yu/download/wingsfiskal.zip.
 
Odgovor na temu

Igor.

Član broj: 90915
Poruke: 14
*.topolauniverzal.com.



Profil

icon Re: RS232 komunikacija sa Fisklanim07.06.2006. u 12:59 - pre 179 meseci
Marcha hvala sve sam odradio, sad ostaje samo da se sve lepo odradi i slozi u jedan npr dll ili koponentu.

Hvala svima na pomoci
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: RS232 komunikacija sa Fisklanim

[ Pregleda: 6751 | Odgovora: 11 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.