Witam

Program Symfonia Handel Forte.
--------------------------------------

Chciałbym w swoim raporcie umieścić info o zysku w poszczególnych towarach.
Analizując wpisy w bazie CN doszedłem do wniosku że oblicza on to z danej faktury i odejmuje cenę z dokumentu Wz powiązanego z tą fakturą.

Moje pytanie brzmi: Co gdy faktura nie ma powiązanego dokumentu Wz. Jaką cenę bierze więc pod uwagę w takim przypadku.

Możecie coś pomóc?

Pozdrawiam

funkcja zwracająca zysk na zadanej pozycji towaru

Jeżeli nie ma dokumentu WZ, lub przynajmniej rezerwacji to nie pokaże nic.

A jaki obiekt dać w parametrze dPozycja i co to za parametr lnumPoz. Skąd to wywołać?
Dzięki z góry

Jakbyście mogli podpowiedzieć będę wdzięczny.

Jak wspominałem wcześniej zauważyłem, że cena zakupu (produkcji) towaru sprzedanego na FV jest ceną tegoż towaru z powiązaną Wz. Jednak gdy analizuję FV pod kątem zysku taką, która powiązanej Wz nie ma, daje jakąś inną cenę, tylko teraz jaką.

Co do tego raporciku, to proszę o wytłumaczenie co mam podstawić w parametrach tej funkcji. Jakie jest to wywołanie.

Pozdrawiam i z góry dziękuję.

pod uwagę brana jest cena bazowa.

Chyba nie bazowa bo bazowa to cena sprzedaży a chodzi o koszty wyprodukowania/zakupu chyba. Nie wiem juz sam, chociaż z tego co zauważyłem jest o wiele wyższa, choć minimalnie niższa od ceny bazowej

bazowa : przytaczam fragment podręcznika.

Dla transakcji, w których nie ma wskazanej konkretnej dostawy towaru z której ma być
realizowane wydanie, szacowanie jest robione według ceny bazowej.

Być może że w danym okresie cena bazowa była inna od obecnej, więc by się zgadzało

Dziękuję bardzo

Chciałbym jeszcze się dowiedzieć o parametry tego raportu powyżej - jak mam je podać, skąd.

sub Float fRentownosc(dispatch dPozycja, long lnumPoz)

dispatch dDostawa, dRezerw
int iDost, iRez
float fWartosc

for iRez = 1 to iRez > dPozycja.item(lnumPoz).Wlasciwosci.Rezerwacje.Count()

dDostawa = dPozycja.item(lnumPoz).Wlasciwosci.Rezerwacje.Item(iRez).Powiazania

for iDost = 1 to iDost > dDostawa.Count()

fWartosc += dDostawy.Item(iDost).Ilosc * dDostawy.Item(iDost).Cena

next iDost

next iRez

fRentownosc = dPozycja.item(lnumPoz).Wartosc - fWartosc

endsub


Powyższa funkcja nie działa

W ogóle nie wchodzi do tych dwóch pętli i wynik zwraca taki jak wartość dokumentu