zum Thema:
Falscher Einstandspreis für die Kosten der Beistellteile! Der prozentuale Aufschlag für z.B Fracht und Spesen, der auf den Listenpreis des Lieferanten aufgeschlagen wird, wird genauso auf den Einstandspreis der Beistellteile aufgeschlagen -wahrscheinlich falsche Berechnungsreihenfolge - es fallen wahrscheinlich auch Frachtkosten für die Anlieferung der Beistellteile an, aber bestimmt nicht die Spesen des Fremdfertiger, mit denen man die Rüstkosten abgedeckt hat.
gibt es neue Erkenntnisse:
AvERP versucht über den Schalter Mandantenverwaltung 3.Artikel Zusatzkosten in Kalk.Preis
AvERP versucht über den Schalter Mandantenverwaltung 3.Artikel Zusatzkosten in Kalk.Preis
Einkaufs-Zusatzkosten wie Spesen, Fracht, Zoll entweder mit in den Einstandspreis einfließen zu lassen oder aber das zu unterlassen.
Wenn gesetzt, werden die prozentualen Zusatzkosten auch auf die Materialkosten für Beistellteile aufgeschlagen.
Abhilfe schafft eine Anpassung im Trigger TRIGGER BSAL_BIU0 FOR BSAL
-- Preise rechnen
EXECUTE PROCEDURE P_BSAL_PREIS (NEW.LISTPREIS, NEW.BWAER_ID_WAERUNGKB, NEW.GPRABATT,
NEW.GPNRABATT, NEW.GPSPESEN, NEW.GSPESEN, NEW.FRACHT,
NEW.GFRACHT, NEW.ZOLL, NEW.GZOLL, NEW.GBEISTELL,
NEW.GPREIS, 'LISTPREIS', NEW.BMAND_ID)
RETURNING_VALUES ( NEW.LISTPREIS, NEW.GPRABATT, NEW.GPNRABATT, NEW.GPSPESEN, NEW.GSPESEN,
NEW.FRACHT, NEW.GFRACHT, NEW.ZOLL, NEW.GZOLL, NEW.GBEISTELL, NEW.GPREIS);
-- GK 06.06.2006 Rabatt bei Kalkulationspreis berücksichtigen
IF (NEW.GPRABATT <> 0.0) THEN
KALKVORGABE = NEW.LISTPREIS * (1 - (NEW.GPRABATT / 100.00));
ELSE
KALKVORGABE = NEW.LISTPREIS;
-- Kosten der Beistellteile berücksichtigen
SELECT A.BSALZUSATZ
FROM BMAND A
WHERE A.ID = NEW.BMAND_ID
INTO :BSALZUSATZ;
/* Aenderung US: 14.05.2012 09:57:22 :*/
IF (BSALZUSATZ = SJA) THEN
KALKVORGABE = NEW.GPREIS; /* Aenderung US: 14.05.2012 09:57:01 :*/
else
KALKVORGABE = KALKVORGABE + NEW.GBEISTELL;
-- aber nicht mit %_Aufschlag Spesen,Zoll,Fracht berechnen
EXECUTE PROCEDURE P_BSAL_KALPREIS(NEW.BSA_ID_LINKKEY, NEW.BLIEF_ID_LIEFNR, :KALKVORGABE,
NEW.BWAER_ID_WAERUNGKB, NEW.PRBASIS,NEW.BMAND_ID)
RETURNING_VALUES (NEW.KALKPREIS_HW, NEW.KALKPREIS_FW, :NOK);
--exception debug_me :kalkvorgabe||' '||NEW.KALKPREIS_FW;
-- nur für Compilermeldung
NOK = NOK;
-- Sollen Fracht/Zoll/Spesen auf den Kalkulationspreis aufgeschlagen werden
/*
BEGIN
NEW.KALKPREIS_FW = (((NEW.GPSPESEN / 100) * NEW.KALKPREIS_FW) +
((NEW.ZOLL / 100) * NEW.KALKPREIS_FW) +
((NEW.FRACHT / 100) * NEW.KALKPREIS_FW) +
NEW.KALKPREIS_FW);
NEW.KALKPREIS_HW = (((NEW.GPSPESEN / 100) * NEW.KALKPREIS_HW) +
((NEW.ZOLL / 100) * NEW.KALKPREIS_HW) +
((NEW.FRACHT / 100) * NEW.KALKPREIS_HW) +
NEW.KALKPREIS_HW);
END
*/
/* Aenderung US: 14.05.2012 09:35:27 :*/
EXECUTE PROCEDURE P_BSAL_PREIS (NEW.LISTPREIS, NEW.BWAER_ID_WAERUNGKB, NEW.GPRABATT,
NEW.GPNRABATT, NEW.GPSPESEN, NEW.GSPESEN, NEW.FRACHT,
NEW.GFRACHT, NEW.ZOLL, NEW.GZOLL, NEW.GBEISTELL,
NEW.GPREIS, 'LISTPREIS', NEW.BMAND_ID)
RETURNING_VALUES ( NEW.LISTPREIS, NEW.GPRABATT, NEW.GPNRABATT, NEW.GPSPESEN, NEW.GSPESEN,
NEW.FRACHT, NEW.GFRACHT, NEW.ZOLL, NEW.GZOLL, NEW.GBEISTELL, NEW.GPREIS);
-- GK 06.06.2006 Rabatt bei Kalkulationspreis berücksichtigen
IF (NEW.GPRABATT <> 0.0) THEN
KALKVORGABE = NEW.LISTPREIS * (1 - (NEW.GPRABATT / 100.00));
ELSE
KALKVORGABE = NEW.LISTPREIS;
-- Kosten der Beistellteile berücksichtigen
SELECT A.BSALZUSATZ
FROM BMAND A
WHERE A.ID = NEW.BMAND_ID
INTO :BSALZUSATZ;
/* Aenderung US: 14.05.2012 09:57:22 :*/
IF (BSALZUSATZ = SJA) THEN
KALKVORGABE = NEW.GPREIS; /* Aenderung US: 14.05.2012 09:57:01 :*/
else
KALKVORGABE = KALKVORGABE + NEW.GBEISTELL;
-- aber nicht mit %_Aufschlag Spesen,Zoll,Fracht berechnen
EXECUTE PROCEDURE P_BSAL_KALPREIS(NEW.BSA_ID_LINKKEY, NEW.BLIEF_ID_LIEFNR, :KALKVORGABE,
NEW.BWAER_ID_WAERUNGKB, NEW.PRBASIS,NEW.BMAND_ID)
RETURNING_VALUES (NEW.KALKPREIS_HW, NEW.KALKPREIS_FW, :NOK);
--exception debug_me :kalkvorgabe||' '||NEW.KALKPREIS_FW;
-- nur für Compilermeldung
NOK = NOK;
-- Sollen Fracht/Zoll/Spesen auf den Kalkulationspreis aufgeschlagen werden
/*
BEGIN
NEW.KALKPREIS_FW = (((NEW.GPSPESEN / 100) * NEW.KALKPREIS_FW) +
((NEW.ZOLL / 100) * NEW.KALKPREIS_FW) +
((NEW.FRACHT / 100) * NEW.KALKPREIS_FW) +
NEW.KALKPREIS_FW);
NEW.KALKPREIS_HW = (((NEW.GPSPESEN / 100) * NEW.KALKPREIS_HW) +
((NEW.ZOLL / 100) * NEW.KALKPREIS_HW) +
((NEW.FRACHT / 100) * NEW.KALKPREIS_HW) +
NEW.KALKPREIS_HW);
END
*/
/* Aenderung US: 14.05.2012 09:35:27 :*/
Keine Kommentare:
Kommentar veröffentlichen