|
Symfonia Handel Premium - szablon RTF
Autor |
Wiadomość |
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Symfonia Handel Premium - szablon RTF
Witam, mam problem z dodaniem nowego makra do szablonu RTF, mianowicie chciałbym aby przy wydruku WZ pojawiała się przy towarze masa np. Intrastat masa, w jaki sposób dodać takie makro ?
|
2012-09-10, 14:09 |
|
|
Autor |
Wiadomość |
Mix-soft.pl
|
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
czy podejmowałeś/łaś już jakieś próby w tym temacie? jak tak to jakie?
|
2012-09-10, 14:13 |
|
|
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Re: Symfonia Handel Premium - szablon RTF
Engine do dokumentu RTF - zmiana - wprowadzam makro @Masa, ale jakiej zmiennej musi ona odpowiadać to niestety nie wiem.
|
2012-09-10, 14:25 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
Idziesz w dobrym kierunku Znajdź raport Raporty -> Dokumenty -> Dokumenty magazynowe -> Engine do dokumentów magazynowych RTF - zamiana Załącznik:
hmrtf01.jpg [ 58.7 KiB | Przeglądany 15632 razy ]
ZNAJDŹ Kod: //////////////////////////// // Engine do dokumentów magazynowych RTF - zamiana // dkmg_rtf.sci //////////////////////////// WSTAW POD Kod: baseTW mxTW mxTW.Open() ZNAJDŹ Kod: if par != 0 then sDostawa+=RS(Dostawy(par).nazwa)+"\\par " endif par = idw endif next idw if par != 0 then sDostawa+=RS(Dostawy(par).nazwa) if czyimport then sDostawa=RS("Dokument importowany") myReplace( "@Dostawa", sDostawa ) : found=1 endif WSTAW POD Kod: if find regular at "@Waga" then mxTw.GetRecById(Pozycje(i).idtw) myReplace( "@Waga", using "%.2f",mxTw.GetField("przelkg") ) : found=1 endif W katalogu programu znajdź plik wz_01.rtf i wstaw do niego makro @Waga Załącznik:
hmrtf02.jpg [ 46.87 KiB | Przeglądany 15632 razy ]
i zadziała
|
2012-09-10, 14:33 |
|
|
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Re: Symfonia Handel Premium - szablon RTF
no i poczyniłem kroki jak wyżej ale nic to nie dało wyświetla @Waga
|
2012-09-11, 07:16 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
Po wprowadzeniu zmian nie zapomnij wcisnąć Ctrl+Shift+Z. Powinieneś zobaczyć komunikat : Kompilaty raportów zostały usunięte Załącznik:
hmrtf03.jpg [ 50.99 KiB | Przeglądany 15612 razy ]
Dodatkowo możesz otworzyć wz_01.rtf za pomocą notatnika i zobaczyć czy makro @Waga jest w całości czy z jakimiś śmieciami Załącznik:
hmrtf04.jpg [ 85.52 KiB | Przeglądany 15612 razy ]
Zagadnienie omawiane było tu : viewtopic.php?f=15&t=2444Zapewniam Cię że te zmiany działają Załącznik:
hmrtf05.jpg [ 41.79 KiB | Przeglądany 15612 razy ]
|
2012-09-11, 08:11 |
|
|
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Re: Symfonia Handel Premium - szablon RTF
dziękuję za pomoc , raczej bym tego nie ogarnął, teraz zastanawiam się jak zrobić aby pokazywał mi sumę ciężaru np. dwóch elementów oraz sumę ciężaru towarów
|
2012-09-11, 11:04 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
analogicznie
|
2012-09-11, 11:34 |
|
|
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Re: Symfonia Handel Premium - szablon RTF
czyli wykorzystać mniej więcej suma netto ?
|
2012-09-11, 11:39 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
jeżeli chcesz wyświetlić sumę wag w pozycji to Kod: if find regular at "@Waga" then mxTw.GetRecById(Pozycje(i).idtw) myReplace( "@Waga", using "%.2f",mxTw.GetField("przelkg") * Pozycje(i).Ilosc ) : found=1 endif a suma wszystkich wag to musisz pokombinować
|
2012-09-11, 12:15 |
|
|
andrew
Rejestracja: 2012-09-17, 10:17 Posty: 4
|
Re: Symfonia Handel Premium - szablon RTF
A czy da się taką modyfikację zrobić na standardowym wydruku Dokument VAT I?
|
2012-09-17, 14:56 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
Da się. Wejdź w Raporty -> Dokumenty -> Dokumenty sprzedaży -> Dokument VAT -> Dokument VAT I Modyfikacje dla wersji 2013 ale powinno zadziałać dla starszych. ZNAJDŹ Kod: String s #define DEKRET #define PLATWYD WSTAW POD Kod: #define MIXMASA 213 baseTW ttw ttw.Open()
float fMixMasa ZNAJDŹ Kod: StlTabPR(1)=StlTabPR(2)=kr
Add ( -1, 50, nc, 0 ) Add ( -1, 500, nl, 0 ) WSTAW POD Kod: Add ( -1, 100, kr, MIXMASA ) ZNAJDŹ Kod: case KOD sPom = "Kod" if nKodTyp==2 then sPom+=" obcy" if nKodTyp==3 then sPom+=" paskowy" WSTAW POD Kod: case MIXMASA sPom = "Masa jedn. [kg]" ZNAJDŹ Kod: case SWW buf = Pozycje(i).sww
WSTAW POD Kod: case MIXMASA ttw.SetKey("kod") ttw.SetKeySeg("typi",0) ttw.SetKeySeg("kod",Pozycje(i).Kod) ttw.GetRec (EQ) if ttw.GetField("przelkg") == 0 then buf = "" else buf = Kwota(ttw.GetField("przelkg")) fMixMasa += ttw.GetField("przelkg") * Pozycje(i).Ilosc endif ZNAJDŹ Kod: ramka od 0,#B+10,str.szer,90,bRamki SetStyl ( nbl ) print at 30,20;"Słownie: " SetFont ( "tekst" ) print KwotaNaTekst( (using "%.2f",tot_brutto), "" ) koniec WSTAW POD Kod: ramka od 0,#B+10,700,90,bRamki SetStyl ( nbl ) print at 30,20;"Masa całkowita: "+Kwota(fMixMasa) + " kg." koniec W wyniku powinieneś otrzymać taki wydruk Załącznik:
hmwaga01.jpg [ 83.59 KiB | Przeglądany 15579 razy ]
|
2012-09-17, 15:21 |
|
|
poly
Rejestracja: 2009-04-24, 15:49 Posty: 61
|
Re: Symfonia Handel Premium - szablon RTF
może komuś się udała suma wszystkich wag ?
|
2012-10-02, 20:28 |
|
|
TMajkowski
Rejestracja: 2019-06-06, 10:32 Posty: 34 Pomógł: 5
|
Re: Symfonia Handel Premium - szablon RTF
czy ktoś próbował to dostosować do wersji symfonia 50c Handel, a jeśli tak to podpowie jak to powinno wyglądać?
|
2022-11-03, 11:38 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4004 Pomógł: 448
|
Re: Symfonia Handel Premium - szablon RTF
TMajkowski pisze: czy ktoś próbował to dostosować do wersji symfonia 50c Handel, a jeśli tak to podpowie jak to powinno wyglądać? Co dokładnie potrzebujesz zrobić?
|
2022-11-03, 13:00 |
|
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 21 gości |
|
Nie możesz tworzyć nowych tematów Nie możesz odpowiadać w tematach Nie możesz zmieniać swoich postów Nie możesz usuwać swoich postów Nie możesz dodawać załączników
|
|
|
|