mojaSymfonia FORUM
https://forum.mix-soft.pl/

Pole "nazwa fiskalna" HMP2009
https://forum.mix-soft.pl/viewtopic.php?f=16&t=1072		 Strona 1 z 1
Autor:  mrEM [ 2009-08-06, 11:28 ]
Tytuł:  Pole "nazwa fiskalna" HMP2009
Witam

Czy ktoś wie może, w jakiej tabeli i jakim polu zapisywana jest nazwa fiskalna towaru (HMP2009)? Nie znalazłem takowego pola w bazie TW a potrzebuje się do niego dostać od strony raportu.
Autor:  mrEM [ 2009-08-06, 11:52 ]
Tytuł: 
Ok, temat zamknięty. Znalazłem (baza uzgodnień).
Autor:  Notos [ 2009-08-06, 11:53 ]
Tytuł: 
Baza UZ, typi = 80, idkh = 0, referencja do id TW poprzez pole iduz
Najłatwiej dobrać się kluczem "kodnasz" z segmentami: "typi", iduz", "idkh"
Autor:  barnie [ 2009-08-06, 12:05 ]
Tytuł: 
Kod:
string sub NazwaFiskalna(long idTw)

   baseUZ uz
   uz.SetKey("kodnasz")
   uz.SetKeySeg("typi",80)
   uz.SetKeySeg("iduz",idTw)
   uz.SetKeySeg("idkh",0)

   int err = uz.GetRec( EQ )

   if !err then
      NazwaFiskalna = uz.GetField("kodobcy")
   else
      NazwaFiskalna = ""
   endif

endsub
Autor:  niziok [ 2010-03-24, 15:19 ]
Tytuł: 
A w jaki sposób z automatu przepisać nazwy towarów do nazwy fiskalnej...

w tej chwili na paragonie drukuje mi kod towaru (jesli w paramatrach towaru z palca nie jest wpisana nazwa fiskalna)
Autor:  wrob [ 2010-03-24, 15:24 ]
Tytuł: 
Na tabeli TW - updatem mozna
Autor:  rafal [ 2010-03-24, 22:55 ]
Tytuł: 
A może wystarczy ustawić w parametrach żeby drukowała się nazwa zamiast kodu na drukarce fiskalnej.

[center]Obrazek [/center]
Autor:  wladimirec [ 2011-12-28, 18:45 ]
Tytuł:  Re: Pole "nazwa fiskalna" HMP2009
witam,
próbuje napisać taki skrypt do automatycznego wypełnienia pola "nazwa fiskalna"
tak aby w tym polu znalazła się taka treść "[kod_towaru] [nazwa_towaru]" oczywiscie z ucięciem do max 40 znaków


Kod:
int sub NazwaFiskalna(long idTw, string KodProd, string NazwaProd)
string nazwafis

   baseUZ uz
   uz.SetKey("kodnasz")
   uz.SetKeySeg("typi",80)
   uz.SetKeySeg("iduz",idTw)
   uz.SetKeySeg("idkh",0)
   

   nazwafis = KodProd +" "+ NazwaProd
   if Len(nazwafis)>40 then nazwafis=mid(nazwafis,1,40)
   uz.SetField("kodobcy", nazwafis)

   int err = uz.GetRec( EQ )
   if !err then
      uz.Update()
   else
      uz.InsRec()
   endif

endsub


W przypadku, gdy już istnieje jakakolwiek nazwa fiskalna dla danego produktu, to nie ma problemu, pole się Update'uje i działa jak trzeba.
Natomiast pojawia się problem, gdy dany towar nie ma/miał jeszcze wpisanej żadnej wartości w to pole. Pole nadal pozostawało puste.
Jak mniemam trzeba stworzyć nowy rekord z taką wartością w bazie UZ, a update nie ma co aktualizować.
Próbowałem zrobić jak wyżej, ale też nie daje pożądanych rezultatów.

Bedę wdzięczny jakby ktoś mógł mnie naprowadzić na rozwiązanie.

Z góry dzięki
Autor:  wrob [ 2011-12-28, 23:01 ]
Tytuł:  Re: Pole "nazwa fiskalna" HMP2009
zeby robic insrec - trzeba wypelnic sporo pol tego rekordu a ty wypelniasz tylko kodobcy - to za malo :(
Autor:  wladimirec [ 2011-12-29, 10:35 ]
Tytuł:  Re: Pole "nazwa fiskalna" HMP2009
dzięki,
a gdzie można zaleźć informacje jakie pola muszę jeszcze wypełnić,
albo jak w ogóle wygląda taka tabela dla wersji 2011?
Autor:  rafal [ 2011-12-29, 13:59 ]
Tytuł:  Re: Pole "nazwa fiskalna" HMP2009
Kod:
int sub NazwaFiskalna(long idTw, string KodProd, string NazwaProd)

   string nazwafis

   nazwafis = KodProd +" "+ NazwaProd
   if Len(nazwafis)>40 then nazwafis=mid(nazwafis,1,40)


   baseUZ uz
   uz.SetKey("kodnasz")
   uz.SetKeySeg("typi",80)
   uz.SetKeySeg("iduz",idTw)
   uz.SetKeySeg("idkh",0)

   int err = uz.GetRec( EQ )

      if !err then
         //uz.Update()
      else
      uz.Clear()
       uz.InsRec()
      uz.SetField("typi", 80)
      uz.SetField("iduz", idTw)
      uz.SetField("idkh", 0)   
      endif
   
      uz.SetField("kodobcy", nazwafis)

     uz.PutRec()

endsub
Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/