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

Znaczniki do dokumentu FKF 2012
https://forum.mix-soft.pl/viewtopic.php?f=4&t=4904
Strona 1 z 1

Autor:  hronys [ 2013-04-25, 16:59 ]
Tytuł:  Znaczniki do dokumentu FKF 2012

Witam, mam dwa pytania odnośnie nadawania znaczników do dokumentu-program FKF 2012.a:

1. Czy można ustawić w programie tak aby dany znacznik był automatycznie przypisany do danego rodzaju dokumentu? - chodzi mi o to aby przy wprowadzaniu dokumentu nie trzeba było za każdym razem wybierać rodzaju znacznika, np ma być że: FZ1- znacznik A, FZ2 -znacznik B itd, jeszcze konkretyzując chciałbym zrobić grupy dokumentów wg znacznika tj: FZ1(faktura) i RK1(raport kasowy) i DP1(dokument prosty) i WB1(wyciąg bankowy) to mają mieć znacznik A, analogicznie FZ2 i RK2... - znacznik B. Takich grup miałbym około 20, i boję się że może komuś umknąć przy wprowadzaniu dokumentów nadanie konkretnego znacznika konkretnemu dokumentowi.

2. Czy można zwiększyć ilość znaczników do dokumentu, o ile się nie mylę jest ich tam 15 szt? Docelowo to najlepiej by było, gdyby udało się przejść z oznaczeń znacznika A,B,C.. na np. 1, 2, 3,..20 - czy program pozwala na takie zmiany?

pozdrawiam

Autor:  wrob [ 2013-04-25, 17:49 ]
Tytuł:  Re: Znaczniki do dokumentu FKF 2012

1. A moze prosciej nie nadawac znacznikow w trakcie tylko potem np wbierajac z listy wszystkie WB1 i zbiorczo im nadajac znaczniki?
Ale wracajac stricte do pytania znacznik to tylko wpis w polu dokumentu wiec mozna zrobić to o co pytasz np triggerem na bazie.

2. Tak - można analogicznie jak w handlu - poszukaj na forum cos o menadżer znacznikow skrzat :)

Autor:  rafal [ 2013-04-25, 18:01 ]
Tytuł:  Re: Znaczniki do dokumentu FKF 2012

Do zwiększenia ilości znaczników służy raport Skrzat - menedżer znaczników

Nie ma go wprogramie. Należy go zainstalować z miejsca gdzie zainstalowany jest program\Raporty\FK plik skrzatMenZnacz.sc

Opis raportu
Załącznik:
Opis raportu Skrzat - menedżer znaczników.pdf [612.47 KiB]
Pobrany 337 razy


i raport
Załącznik:
Komentarz: Raport Skrzat - menedżer znaczników
skrzatMenZnacz.zip [2.63 KiB]
Pobrany 296 razy

Autor:  rafal [ 2013-04-25, 18:48 ]
Tytuł:  Re: Znaczniki do dokumentu FKF 2012

Aby automatycznie nadawać znacznik zapisywanym dokumentom należy dodać raport

Raporty -> Procedury --> Formatki --> DOKUMENTY.TPL

O treści

Kod:
int sub OnAfterBuffer(int update,  long id)
   
mapValue mvDokZn
mvDokZn.Type(string)

mvDokZn.Set("DEX","65") // znacznik A dla dokumentu DEX

mvDokZn.Set("FZ1","66") // znacznik B dla dokumentu FZ1
mvDokZn.Set("WB1","66") // znacznik B dla dokumentu WB1
mvDokZn.Set("RK1","66") // znacznik B dla dokumentu RK1

mvDokZn.Set("FZ1","67") // itd ..
mvDokZn.Set("WB1","67")
mvDokZn.Set("RK1","67")


#ifdef FORTE
   int bDok = open KatalogRoku() for base "buf_dokum"
   BaseError( "buf_dokum", 4)
#else
   int bDok = open KatalogRoku() + FN_BUF_DOK + DBFN_EXT for base "buf_dokum"
   BaseError( KatalogRoku() + FN_BUF_DOK + DBFN_EXT ,4)
#endif

SetKey( bDok, "id")
SetKeySeg( bDok, "id", id)
if GetRec( bDok , EQ ) == 0 then
   
   SetField( bDok, "znacznik", mvDokZn.Get(GetField( bDok, "skrot"),"") )
   PutRec( bDok )

endif

endsub


Wadą tego rozwiązania jest że znacznik nie jest odświeżany na liście dokumentów. Trzeba przeładować listę.

Autor:  rafal [ 2013-04-25, 22:46 ]
Tytuł:  Re: Znaczniki do dokumentu FKF 2012

A to rozwiązanie już odświeża. Wprawdzie może to trwać do 5 sek. ale zawsze.

Kod:
#ifdef FORTE
   int bDok = open KatalogRoku() for base "buf_dokum"
   BaseError( "buf_dokum", 4)
#else

#endif

dispatch con = GetAdoConnection()
dispatch cmd = "ADODB.Command"
cmd.ActiveConnection = con

int sub OnAfterBuffer(int update,  long id)
   
mapValue mvDokZn
mvDokZn.Type(string)

mvDokZn.Set("DEX","65") // znacznik A dla dokumentu DEX
mvDokZn.Set("DP","65")

mvDokZn.Set("FZ1","66") // znacznik B dla dokumentu FZ1
mvDokZn.Set("WB1","66") // znacznik B dla dokumentu WB1
mvDokZn.Set("RK1","66") // znacznik B dla dokumentu RK1

mvDokZn.Set("FZ2","67") // itd ..
mvDokZn.Set("WB2","67")
mvDokZn.Set("RK2","67")




SetKey( bDok, "id")
SetKeySeg( bDok, "id", id)
if GetRec( bDok , EQ ) == 0 then
   
   SetField( bDok, "znacznik", mvDokZn.Get(GetField( bDok, "skrot"),"") )
   PutRec( bDok )

cmd.CommandText= using "INSERT INTO log_base (tablename, rec_id, operation, term) VALUES ('buf_dokum', %l, 3, 99999 )", id
cmd.Execute()


endif

endsub


Autor:  hronys [ 2013-04-26, 09:50 ]
Tytuł:  Re: Znaczniki do dokumentu FKF 2012

wrob pisze:
1. A moze prosciej nie nadawac znacznikow w trakcie tylko potem np wbierajac z listy wszystkie WB1 i zbiorczo im nadajac znaczniki?

Mam sporo rodzajów dokumentów i też dużo ludzi wprowadza dokumenty, dlatego szukam rozwiązania że tak powiem "narzuconego z góry".

Dziękuje bardzo Panowie za podpowiedzi.
rafał - dzięki za kod i raport- najpewniej skorzystam

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