Inaktiv Druckvorlage Preisliste mit Sonderpreis

[RainerR]

Hallo,
ich versuche eine Druckvorlage "Preisliste" mit der Spalte Sonderpreis zu erstellen.
Leider ohne Erfolg. Ich finde innerhalb der "Daten und Funktionen" keine Variablen für Sonderpreise.
Bei den Artikeletiketten geht das. Bei einer Preisliste nicht.
Was mache ich falsch - wer kenn helfen?
Vielen Dank im Voraus.
MfG
Rainer

 

[gutberle]

Du machst gar nichts falsch, die Variable gibt es schlicht nicht. - Man kann sich die Daten aber mit einer JTL_DirectQuery() direkt aus der Datenbank holen und - letztlich - schwer ist das nicht.
Ich bin die nächsten drei Tage geschäftlich unterwegs und kann für nichts garantieren, aber spätestens Mittwoch kann ich Dir hier helfen, sorry früher geht leider nicht....

 

[gutberle]

Hallo Rainer,

ok, "Hilfe bis Mittwoch" war dann doch zu ehrgeizig, aber jetzt bin ich endlich dazu gekommen und hier ist meine Anleitung zum Einfügen von Sonderpreisen in die Preisliste ...

Wie oben schon gesagt, werden Sonderpreise leider nicht mit an die Preislisten-Vorlage übergeben, man muß sie sich also selbst aus der Datenbank holen. Das macht man mit einem JTL_DirectQuery() Befehl, dem man ein SQL Statement mit auf den Weg gibt und man bekommt dann den gewünschten Wert zurück. Diesen Rückgabewert kann man dann wie einen normalen Text, Zahlen- oder Währungswert weiterverarbeiten, z.B. auch so formatieren, wie es sich für Deutschland gehört. Das habe ich hier gleich noch mit erledigt und der gesamte Befehle sieht dann so aus...

LocCurrL$(Val(JTL_DirectQuery("SELECT fNettoPreis FROM tSonderpreise JOIN tArtikelSonderpreis ON tArtikelSonderpreis.kArtikelSonderpreis=tSonderpreise.kArtikelSonderpreis JOIN tKundenGruppe ON tKundenGruppe.kKundenGruppe=tSonderpreise.kKundenGruppe WHERE tArtikelSonderpreis.nAktiv=1 AND tKundenGruppe.cName='"+Vorgang.Kundengruppendetails.Name+"' AND tArtikelSonderpreis.kArtikel="+ToString$(Preislistenartikel.InterneArtikelnummer))),"de-DE")

... und wenn Du Dir den Befehl einmal genau anschaust, dann siehst Du, dass an zwei Stellen "Unterbrechungen" im SQL Code sind, nämlich dort, wo die aktuelle Kundengruppe über Vorgang.Kundengruppendetails.Name und später dann die aktuelle (interne) Artikelnummer mit Preislistenartikel.InterneArtikelnummer übergeben werden. Das sind also sozusagen die Variablen, die für jeden Artikel neu bestimmt und mit übergeben werden.

Damit jetzt aber nicht so ein Trum von Befehl in Deiner Tabelle steht, habe ich noch einen Trick angewandt und habe im Bereich Projekt (oben im Fenster) eine Benutzervariable namens @SonderPreis angelegt und habe den obenstehenden Code dort als Inhalt von @SonderPreis abgelegt. Das sieht dann so aus...



Das führt dazu, dass jedesmal, wenn Du in Deiner Tabelle in einer Spalte den Wert @SonderPreis eingibst, die Benutzervariable neu aus der Datenbank geladen und Dir der Sonderpreis des aktuellen Artikels zurückgegeben wird, oder eben 0,00€, falls kein Sonderpreis existiert oder einer existierte, aber schon wieder inaktiv ist. Das sieht dann in der Tabelle mit Deinen Artikelpositionen so aus...



Ich habe hierfür einfach eine Preislistenvorlage im "Standard" Format genommen und den Barcode rausgeschmissen, damit es von der Tabellenbreite her passt. Das musst Du natürlich an Deine Anforderungen anpassen, aber als Referenz habe ich Dir meine Beispielvorlage unten auch einmal angehängt.

Zwei Hinweise noch:

1. Es gibt in den Preislistenvorlagen zwar auch eine Variable Vorgang.Kundengruppe, die wird aber beim Aufruf der Vorlage nicht mit der aktuellen Kundengruppe versorgt, man muß also tatsächlich Vorgang.Kundengruppendetails.Name nehmen.
2. Keine der Kundengruppen-Variablen werden beim Aufruf der Vorlage zum Editieren mit Werten versorgt! - Die Abfrage auf Sonderpreise läuft im Editier-Modus also immer auf die Rückgabe von 0,00€ hinaus. Zum tatsächlichen Testen der Vorlage muß man also über Verkauf > Preisliste in der Wawi gehen, Kundengruppe und ggfls. Sprache auswählen, usw.

Gruß,
Ingmar

 

[gutberle]

... und hier noch ein Nachtrag und eine kleine (Sicherheits-)Korrektur zu oben:

1. Wenn Du Sonderpreise für einen Artikel sowohl für die Wawi wie auch für den Shop definiert hast, dann funktioniert die obige Abfrage und auch die Vorlage weiter genauso gut, obwohl dann zwei Tabellenzeilen zurückgegeben werden. Das ist aber nur deshalb so, weil die JTL_DirectQuery() die zweite Tabellenzeile einfach ignoriert. Das ist aber natürlich schlechter Stil (von mir) und die korrigierte SQL Query holt jetzt explizit nur den Sonderpreis für die Wawi aus der Datenbank...

LocCurrL$(Val(JTL_DirectQuery("SELECT fNettoPreis FROM tSonderpreise JOIN tArtikelSonderpreis ON tArtikelSonderpreis.kArtikelSonderpreis=tSonderpreise.kArtikelSonderpreis JOIN tKundenGruppe ON tKundenGruppe.kKundenGruppe=tSonderpreise.kKundenGruppe WHERE tArtikelSonderpreis.nAktiv=1 AND tSonderpreise.kShop=0  AND tKundenGruppe.cName='"+Vorgang.Kundengruppendetails.Name+"' AND tArtikelSonderpreis.kArtikel="+ToString$(Preislistenartikel.InterneArtikelnummer))),"de-DE")

2. Falls Du über den aktuellen Sonderpreis hinaus auch noch ausgeben möchtest bis wann oder bis zu welchem Lagerstand der Sonderpreis gilt, dann kriegst Du auch diese Infos auch nur aus der Datenbank. Da dieser Wunsch für eine Preisliste aber eigentlich eher normal sein sollte, habe ich eine etwas komplexere SQL Query geschrieben, die alle relevanten Daten zum Sonderpreis und auch den Sonderpreis selbst in einer handlichen Form zurückgibt.

JTL_DirectTableQuery("SELECT 'istDatum=', CASE WHEN nIstDatum=0 THEN 'FALSE' ELSE 'TRUE' END, '|StartDatum=', CONVERT(VarChar(10), dStart, 104) AS StartDate, '|EndDatum=', CONVERT(VarChar(10), ISNULL(dEnde,dStart), 104), '|istAnzahl=', CASE WHEN nIstAnzahl=0 THEN 'FALSE' ELSE 'TRUE' END, '|EndAnzahl=', nAnzahl, '|SonderPreis=', tSonderpreise.fNettoPreis FROM tArtikelSonderpreis JOIN tSonderpreise ON tSonderpreise.kArtikelSonderpreis=tArtikelSonderpreis.kArtikelSonderpreis JOIN tKundenGruppe ON tKundenGruppe.kKundenGruppe=tSonderpreise.kKundenGruppe WHERE tArtikelSonderpreis.nAktiv=1 AND tSonderpreise.kShop=0 AND tKundenGruppe.cName='"+Vorgang.Kundengruppendetails.Name+"' AND tArtikelSonderpreis.kArtikel="+ToString$(Preislistenartikel.InterneArtikelnummer),"","|")

Die Informationen werden hier in dem Format zurückgeliefert, das der Alias$() Befehl erwartet, mit dem man die einzelnen Bestandteile bequem abfragen kann. Will man z.B. das Startdatum abfragen, dann würde der Alias-Befehl dazu lauten...
Alias$("StartDatum",@SonderPreis) und um zu erkennen, ob der Sonderpreis überhaupt datumsgesteuert ist, könnte man folgendes Konstrukt nehmen: Cond(Alias$("istDatum",@SonderPreis)="TRUE",Alias$("StartDatum",@SonderPreis,"")

Und da der Sonderpreis jetzt nicht mehr in der DB-Abfrage selbst formatiert werden kann, macht man das in der Tabelle mit LocCurrL$(Val(Alias$("SonderPreis",@SonderPreis)),"de-DE") und erst dort, wo man ihn ausgeben will.

Angehängt findest Du eine neue Vorlage, die dies umsetzt und gleich noch ein paar Zeilen Debug-Code enthält, der Dir zeigt, wie die Alias$() Befehle für die unterschiedlichen Sonderpreis-Parameter lauten.

 

[tschwenke]

Hallöchen,

auch wenns schon her ist, hab das grad bei uns, etwas abgewandelt, eingebaut.
Was soll ich sagen, einfach Top.

Besten Dank für deine Codesnippets.

Thorsten

 

[hii]

Hallo zusammen,

auch mir haben die Codesnippets sehr geholfen, vielen Dank für's teilen!

Jedoch versuche ich verzweifelt den Brutto Sonderpreis auszugeben. Gerne auch in Form einer Berechnung.
Weiß hier jemand wie ich das hinbekommen kann?

 

[hii]

Habe mir nun nach einigen Experimenten wie folgt geholfen...

Die @SonderPreis habe ich wie folgt angepasst:

LocCurr$(Val(JTL_DirectQuery("SELECT fNettoPreis FROM tSonderpreise JOIN tArtikelSonderpreis ON tArtikelSonderpreis.kArtikelSonderpreis=tSonderpreise.kArtikelSonderpreis JOIN tKundenGruppe ON tKundenGruppe.kKundenGruppe=tSonderpreise.kKundenGruppe WHERE tArtikelSonderpreis.nAktiv=1 AND tSonderpreise.kShop=0  AND tKundenGruppe.cName='"+Vorgang.Kundengruppendetails.Name+"' AND tArtikelSonderpreis.kArtikel="+ToString$(Preislistenartikel.InterneArtikelnummer))),"de-DE")

Somit bekomme ich eine Zeichenkette die nur aus Zahlen besteht.

Dann platziere ich die Variable in meine Tabelle und Wandel ich per "Val" die Zeichenkette zu einer Zahl und kann somit "weiterrechnen":

Fstr$((Val (@SonderPreis)*1,19),"-?&.##")

Bei Bedarf kann die Währung angehangen werden:

Fstr$((Val (@SonderPreis)*1,19),"-?&.##") + " " + Vorgabe.Standardwährung.Name

Sicherlich gibt es elegantere Weg, aber für mich funktioniert dieser.

Viele Grüße

 

[Irina]

Hallo ich bin ein Anfänger.

ich suche zwei Variablen :

Kundengruppe online shop -> Preis Normal - den ich auf dem Etikett durchstreichen möchte
Kundengruppe online shop -> Sonderpreis - groß als Angebot

Sind diese code für mein Weg richtig? Woran erkenne ich das es die Variable der Kundengruppe?

Danke!