 |
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: 4000 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: 4000 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 15618 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 15618 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: 4000 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 15598 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 15598 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 15598 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: 4000 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: 4000 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: 4000 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 15565 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: 4000 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: Bing [Bot] i 25 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
|
|
|
|
