Die JTL Umsetzung von Dropshipping steckt noch ein wenig in den Kinderschuhen, so sind zB unterschiedliche Lieferzeiten im JTL Shop je nach Lieferanten und Eigen-/externer Bestand noch nicht ganz durchdacht. Aber es kann ja zumindest nicht schaden, wenn man in der eigenen Wawi schnell nachschauen kann, ob ein Artikel beim Lieferanten noch am Lager ist, um ggf für den Kunden zu bestellen.

Um die Bestände zu importieren muss euch der Lieferant auf seinem Server eine CSV Datei bereitstellen, die ihr automatisiert per (S)FTP über ein CMD-Line Script abrufen könnt. Über HTTPS geht das ggf auch. Als SFTP Client habe ich WinSCP installiert, da dieser SFTP besser beherrscht als die bei Windows mitgelieferte Variante.

Als erstes legt ihr eine Textdatei an, die die Zugangsinformationen des Lieferantenservers beinhaltet, zB „LieferantXY.txt“:

open ftp//user:password@lieferantxy.comget lieferantendatei.csv C:\dein\speicher\pfad\lieferantxy.csv
exit

Die zweite Datei, auch mit einem Texteditor zu erstellen, nennen wir mal „LieferantXY.bat“ – die Dateiendung für Batch Scripts. Als Vorbereitung solltet ihr in der Ameise unter Import->Artikeldaten“ die Lieferantendatei laden, und euch daraus eine Importvorlage erstellen. Je nach enthaltenen Daten in der Importdatei ordnet ihr die Spalten den entsprechenden Spalten von JTL zu („mappen“). Meine Empfehlung ist, das ausschliesslich über die eindeutige EAN/GTIN zu machen, da HAN bei manchen Herstellern zB nicht die Farbe oder Größe reflektiert. Ihr braucht einen eindeutigen Wert zur Zuweisung! Zusätzlich zum Mapping solltet ihr den Standardlieferanten auf euren Lieferanten setzen (alternatives Szenario nicht probiert) und – ganz wichtig – bei der Importart „(2) + alle nicht enthaltenen Artikel des Std-Lieferanten auf Lieferanten-Lagerbestand = 0 setzen“ wählen… falls der Artikel beim Lieferanten ausverkauft ist und nicht in der neuen CSV vorkommt, habt ihr sonst den letzten (positiven) Lagerbestand drin. Speichert nun die Importvorlage als „LieferantXY Import“ und merkt euch die interne Bezeichnung („IMPxxx“).

So, alle Daten für das Batch Script vorhanden:

@echo off
timeout 30
"C:\Program Files (x86)\JTL-Software\JTL-wawi-ameise.exe" --server=DeineServerinstanz --database=DeineDB --dbuser=DeinUser --dbpass=DeinPW --templateid=DeineImportvorlage --inputfile="C:\beschreibarer\pfad\lieferantxy.csv" --csv_errors="C:\beschreibarer\pfad\lieferantxy_errors.csv"
exit

Die Errors Datei dient nur zur gelegentlichen Kontrolle, sie wird zB doppelte und/oder nicht vorhandene EANs beinhalten.

Nun muss das ganze noch in der Windows Aufgabenplanung angelegt werden, vorzugsweise wenn die Lieferantendatei frisch und der Server unausgelastet ist. Öffnet die Aufgabenplanung und legt eine neue Aufgabe an. Als Trigger nehmen wir eine Uhrzeit, und dann je nach Sicherheitsbedarf einen stündlichen bis täglichen Intervall. Bei Aktion „Programm Starten“ und als Programm WinSCP auswählen. Als Argument verwenden wir den Pfad zur LieferantXY.txt: „/script=’C:\pfad\zur\LieferantXY.txt'“. Als zweite Aktion kommt dann die Batch Datei in die gleiche Aufgabe, und schon könnt ihr zeitgesteuert die Bestände eurer Lieferanten in die JTL WaWi importieren. Wir haben zB eine tägliche Aufgabe vor Arbeitsbeginn, die uns auf einen Schlag gleich mehrere Dateien importiert – lässt sich alles wunderbar in einer einzigen Aufgabe verhaften 🙂

Da der JTL Shop und/oder manche Plugins immernoch den Ioncube Loader benötigen, ist die Shopinstallation in einem 1 & 1 Hosting Paket (in unserem Fall Unlimited Plus) kein wirkliches Vergnügen. In der Theorie benötigen diverse Unterverzeichnisse eine eigene php.ini, um den Loader zu finden. Problematisch wird es insbesondere dann, wenn man die PHP Version verändert… heisst: alle php.inis suchen und ändern.

Aber es geht auch einfacher als bei JTL beschrieben: über einen Shell-Zugriff lassen sich in allen Unterverzeichnissen sogenannte Symlinks anlegen, die den Inhalt einer php.ini im Rootverzeichnis verlinken. Und keine Angst vor der Shell… solange ihr nur die unten stehenden Befehle eingebt, passiert nix, war für mich auch das erste Mal 😉

Ladet euch zuerst den Ioncube Loader (Linux 64bit) runter, und zieht alle .so Dateien in euer Rootverzeichnis (üblicherweise /kunden/homepages/xxx/xxx/htdocs/ – ggf schaut im 1 & 1 Backend nach dem Namen) in ein Unterverzeichnis /ioncube/.

Erstellt lokal eine php.ini mit folgendem Inhalt:

[Zend]
zend_extension = /kunden/homepages/xxx/xxx/htdocs/ioncube/ioncube_loader_lin_7.2.so

… wobei die 7.2 für eure PHP Version steht (ebenfalls im 1 & 1 Backend einstellbar). Diese ebenfalls ins Rootverzeichnis laden.

Ladet euch einen Shell-Client runter (PuTTY oder noch besser SmarTTY) runter. Verbindet euch per SSH mit eurem Webspace. Im SSH Client könnt ihr nun per Copy&Paste folgende Befehle eingeben:

find . -name "php.ini" -exec rm {} \;
find -type d -exec ln -s $PWD/php.ini {}/php.ini \;  

Die erste Zeile entfernt alle alten php.inis (so vorhanden) aus der Shopinstallation. Beim Neuinstallation kann man diese Zeile weglassen. Die zweite Zeile sorgt dafür, dass eure neue php.ini in allen Unterverzeichnissen verlinkt wird. Die Fehlermeldung, die kommt, bezieht sich nur auf die bereits vorhandene php.ini im Root, und kann ignoriert werden. Mit einem FTP Client lassen sich die Symlinks auch anzeigen.

Sollten nun Änderungen in der PHP Version gemacht werden, muss nur noch die „echte“ php.ini bearbeitet werden.

Ohne es selber getestet zu haben, aber ich nehme an, das bei Installation eines neuen Plugins, das den Ioncube Loader braucht, dem Unterverzeichnis des Plugins wieder ein Symlink hinzugefügt werden muss.

Erstaunlich, wie lange man an Kleinigkeiten rumbasteln kann, bis es endlich rund läuft. So ging es mir bei der der Einrichtung von JTL Shipping (mal wieder) in Kombination mit DHL Labeln. Wir haben keinen dedizierten Labeldrucker, sondern einen Brother MFC mit 2 Kassetten und manueller Zufuhr. Richte ich Shipping so ein, dass Label an den Standard-Drucker gesendet werden, druckt er unabhängig davon, ob die MF mit Label geladen ist, auf A4. Komischerweise: bei Abwicklung über Intraship hat das immer geklappt.

Die Lösung laut Foren ist, den Druckertreiber zu kopieren und mit den Einstellungen für A5/Manuelle Zufuhr (oder 2. Kassette) abzuspeichern. Das hat sich mir unter Windows10 nicht ganz so erschlossen, auf den ersten Blick wurde der Standard-Drucker umbenannt, oder ein falscher Treiber installiert. Teilweise taucht der 2. Drucker auch erst auf, wenn man die Eigenschaften des einen Druckers öffnet

Die einfachste Lösung ist oft die beste: mit der Installationsdatei vom Drucker lässt sich der vermeindlich zweite Drucker anlegen. Dieser wird dann in der Druckerverwaltung als „Mein Drucker (Kopie 1)“ angelegt. Dort kann man die Eigenschaften auf A5 und Manuelle Zufuhr ändern und speichern, und dem Drucker noch einen sinnvolleren Namen zuweisen (Labeldrucker).

Allerdings müssen die Druckeinstellungen pro Computerbenutzer zugewiesen werden, d.h. wenn man den Drucker unter einem Admin-Konto auf einem Rechner anlegt, muss der normale User diese Einstellungen nochmal vornehmen (kein Admin notwendig). Dito beim WaWi-Benutzer: der Drucker für „DHL Versenden“ muss für jeden User und jeden Mandanten fesgelegt werden.

Aber… plötzlich macht Versand wieder Spaß 😉

Um JTL Shipping korrekt für UPS zu konfigurieren muss man auf der Website einen Token erzeugen… leichter gesagt als getan, da hapert es mit der Dokumentation doch ein wenig.

Ich habe einige Zeit in der Endlosschleife des unter UPS Kontakt angegebenen 01806er Callcenters verbracht, um dann in semioptimalem deutsch zu erfahren, dass ich die Technische Hotline (069 6630 8037) anrufen muss. Dort durfte ich dann nochmal 10min der netten Warteschleifenmusik lauschen, bis ich mich dann doch für den englischsprachigen Support entschieden habe… meine Englischkenntnisse sind dann doch um Längen besser als meine Geduld 😉

Und dann ging es doch ziemlich einfach. Um euch die Warteschleifenqual zu ersparen, hier nun der direkte Weg zum API Token

1. Loggt euch bei UPS mit euren Kundendaten ein
2. Geht auf Dienstleistungen->Nach Typ: UPS Technologie integrieren
3. Unter UPS Kit für Entwickler findet ihr den Punkt Versand API
4. Klickt auf Entwickler: APIs herunterladen
5. Hinter Erste Schritte Punkt 4. Einen Zugriffsschlüssel anfordern verbirgt sich schon fast der gewünschte Token…
6. … nur noch ganz unten auf den Button klicken (sekundäre Info nicht ausgefüllt), und schon habt ihr euren persönlichen Token!

Eigentlich gar nicht so schlimm, wenn man weiß wie 😉

Wer häufig EAN Listen der Lieferanten bearbeiten muss, wird – wie ich – sicher irgendwann daran verzweifeln, dass Vaterartikel händisch angelegt werden müssen. Zusätzlich müssen die Artikel mit der Vaterartikel ID versehen, der Artikelname durch Größe und/oder Farbe ergänzt und die Artikelnummer intelligent gewählt werden. Nicht schlimm bei Listen, die dann für einige Jahre unverändert laufen, aber ein Albtraum bei zB Mode, wo die Kollektionen teilweise halbjährlich erscheinen und 5.000+ Artikel enthalten.

Ich habe versucht, die Lösung dafür auf Stack Overflow zu finden (https://stackoverflow.com/questions/45729617/conditionally-duplicating-rows-in-excel), die Frage war nur zu vage formuliert, um wirklich gute Resultate zu generieren. Da ich selber zwar firm in PHP bin, von VBA aber exakt gar keine Ahnung habe, ist meine „Weiterentwicklung“ des Codes wohl das schlimmste Progrämmchen, was ich je geschrieben habe 😉 Egal, bis auf Kleinigkeiten funktioniert es, wenn man entsprechende Vorarbeit leistet.

Folgende Spalten MUSS die Tabelle in genau dieser Reihenfolge haben:
| HAN/MPN | Artikelname | Variation (zB Größe) | Leer | EAN/UPC |

Spalten hinter EAN (zB HEK, UVP, Gewicht o.ä.) werden so wie vom Lieferanten bereitgestellt mitkopiert. Der Vaterartikel hat keine EAN, keine VaterID und keine Variation, diese werden durch das Script entsprechend gelöscht. Die Artikelnummern werden in der Form 1234 (Vater) und 1234.Varwert (Kind) angelegt, Kinder erhalten die 1234 als VaterID.

Das Resultat sieht von den Spalten her so aus:
| Variation SortNr | HAN/MPN | | HAN/MPN | Hilfsspalte | Variationswert | Artikelnummer | VaterID | Artikelname | EAN/UPC |
… allerdings ohne Header, diese müssen manuell eingetragen oder in der Ameise gemappt werden.

Sub ConditionallyDuplicateRows()

'MPN | Name | Size | None | EAN

Dim lRw As Long
Dim artNr As Long
Dim artOffset As Long
Dim artPrefix As String
Dim varPrefix As String
Dim year As String

Application.ScreenUpdating = False

'Set ID Offset
artOffset = 104700
artNr = artOffset
artPrefix = "ART"
varPrefix = " Größe "
year = ""

Range("B1").EntireColumn.Insert
Range("A1").EntireColumn.Insert
Range("F1").EntireColumn.Insert
Range("G1").EntireColumn.Insert

lRw = Range("B" & Rows.Count).End(xlUp).Row - 1

For i = lRw To 1 Step -1
    If Range("B" & i).Value <> Range("B" & i + 1).Value Then
    
       'PARENT
    
       'Copy Last Rows Data Into New Parent Row
       Rows(i + 1).Copy
       Range("A" & i + 1).Insert Shift:=xlDown
       
       'Highlight Parent Row
       Cells(i + 1, 1).EntireRow.Interior.Color = vbYellow
       
       'Set ID and Parent ID
       artNr = artNr + 1
       Range("F" & i).Value = artPrefix & artNr & "." & Range("E" & i).Value 'ID
       Range("F" & i + 1).Value = artPrefix & artNr - 1 'ID Field for Parent
       Range("G" & i).Value = artPrefix & artNr 'Parent ID
       Range("H" & i + 1).Value = Range("B" & i + 2).Offset(, 2).Value & year
       Range("H" & i).Value = Range("D" & i).Value & year & varPrefix & Range("E" & i)
       'Use as VarSort
       Range("A" & i).Value = i
       
       'Delete VarSort, Parent ID, Variation and EAN
       Range("A" & i + 1).Value = "" 'VarSort
       Range("E" & i + 1).Value = "" 'Variation
       Range("G" & i + 1).Value = "" 'Parent ID
       Range("I" & i + 1).Value = "" 'EAN
       
       'DONT Delete Old Code!
       Range("B" & i).Offset(1, 1).Value = Range("B" & i + 2).Value
       Range("B" & i).Offset(1, 2).Value = Range("B" & i + 2).Offset(, 2).Value
       Range("B" & i).Offset(2, 1).Value = Range("B" & i).Offset(2).Value
       
    Else
        
        'CHILD
        
        Range("F" & i).Value = artPrefix & artNr & "." & Range("E" & i).Value 'ID
        Range("G" & i).Value = artPrefix & artNr 'Parent ID
        Range("H" & i).Value = Range("D" & i).Value & year & varPrefix & Range("E" & i) 'Childs Name
        
        Range("A" & i).Value = i
        
        'DONT Delete Old Code!
        Range("B" & i).Offset(1, 1).Value = Range("B" & i + 1).Value
        
    End If
Next i

Application.CutCopyMode = False
Application.ScreenUpdating = True

End Sub

Bekannte Fehler:

1. die letzte Zeile wird nicht vernünftig befüllt, muss händisch gemacht werden
2. Das Script vergleicht nur HAN, keine Artikelnamen. Daher werden Artikel, die zwei Variationen (zB Größe und Farbe) haben, nicht korrekt kopiert. Lösung: je nach Präferenz HAN und zB Farbe verketten (6789-rot).
3. Und ich bekomme den alten Code nicht weg, ohne das Script zu töten 😉

Auf jeden Fall wäre das hier ein erster Ansatz, ein solches VBA Script zu benutzen. Mir hilft es schon sehr gut, aber Potential nach oben wäre da 😀

Verbesserungsvorschläge gerne am Ende des Beitrags als Kommentar posten! Vielleicht findet sich hier ja ein begnadeter VBA Programmierer 🙂

Anbei ist eine kleine Bibliothek der meistgenutzen Excel-Formeln, diese wird nach und nach erweitert.

Verketten von Zellen

Gerne genommen um Artikelnamen und -Farben bzw. -Größen aneinander zu fügen.

Aufteilen von Zelleninhalten

Wenn der Lieferant mehrere Werte in einer Zelle liefert, die eigentlich in getrennte Spalten gehören, lassen sich diese über die Excel Datentools splitten. Quasi das Gegenteil von Verketten 😉 Erklärung, wie es geht gibt´s besser als ich das hier jetzt machen könnte beim MS Support.

Substring

Um zB den Farbcode, Größe oder andere Info aus einer Zelle zu filtern.

Auf/Abrunden von Preisen

Um in der Ameise Preise auf die nächste 9er Stelle zu runden (323->319, 326->329)

SVERWEIS

Eigentlich kann man dem SVERWEIS (engl. VLOOKUP) fast ein eigenes Kapitel widmen… irgendwie wehren sich die Suchabfragen in Teilausschnitten oder Arbeitsblättern standhaft, ihren Zweck zu erfüllen. Dafür ist es, wenn man den Dreh erst raus hat, ein mächtiges Werkzeug bei der Erstellung von Importlisten.

• $A1: Zelle, deren Inhalt zur Suche verwendet werden soll
• Tabelle2!$A$1:$Z$1000: Suchmatrix (Felder, die durchsucht werden sollen)
• 4: Rückgabewert, Index der Spalte, deren Wert gefunden werden soll (4. Spalte neben Spaltenbeginn der Suchmatrix)
• FALSCH(): exakte Suche

Stolperfallen

Der SVERWEIS kann nur Werte rechts der zu durchsuchenden Spalte zurückliefern! Die zu durchsuchende Spalte muss sich IMMER ganz links in der Suchmatrix befinden. Heißt: wenn die Spalte, in der A1 gesucht werden soll, in Tabelle2 die Spalte D ist, muss die Suchmatrix auch mit D beginnen. Im Zweifelsfall empfiehlt es sich, die zu durchsuchende Spalte in Spalte A einzufügen. Bei Index = 4 würde dann Spalte D den Rückgabewert enthalten.

Der SVERWEIS ist extrem empfindlich bei unterschiedlichen Datentypen. Ist zB die Spalte A in Tabelle 1 eine EAN mit dem Feldtyp „Text“ und die EAN Spalte in Tabelle2.D vom Typ Zahl, wird Excel schlicht nichts finden! Da die Formatierung einer ganzen Spalte mit Headern meist nicht zum gewünschten Ergebnis führt, kann man in einer neuen Spalte einfach den Wert aus Tabelle1.A1 mit 1 multiplizieren, und (bei EANs) dann die Spalte zur Zahl ohne Kommastellen umformatieren. Dann finden die beiden numerischen Werte auch zueinander 😉

Mit leeren Feldern als Suchbegriff gibt´s eine Fehlermeldung. Mit „=WENN(A1 <> „“;SVERWEIS(…);““)“ lassen sich leere Zellen in Spalte A einfach überspringen.

Leerzellen auffüllen

Leider werden beim Export über die Ameise die Kategorien nur beim Vaterartikel ausgegeben – anscheinend haben die Kinderartikel keine Kategoriezuweisung. Da ich aber zB das Artikelgewicht, falls nicht vom Hersteller angegeben, pauschal für die gesamte Kategorie über die Ameise importiere, fehlt mit die Kategoriezuweisung bei den Kindern.

Mit diesem Macro für Excel ist es ganz einfach, die Kategorie „zu vererben“, um dann über einen SVERWEIS das Artikelgewicht zu bestimmen.

Sub Leerzellen()
 Dim Bereich As Range, Zelle As Range
 Set Bereich = Range("A4:A18000")
 For Each Zelle In Bereich.SpecialCells(xlCellTypeBlanks)
 Zelle = Zelle.Offset(-1, 0)
 Next Zelle
End Sub

Wenn zB Zelle A1 = Foo, und Zelle A8 = Bar ist, werden A2…A7 mit Foo aufgefüllt.

Doppelte Werte farblich hervorheben

 Um zB Durchläufer oder NOS-Artikel in EAN-Listen der Lieferanten zu finden und zu markieren, exportiere ich erst alle Artikel des Lieferanten, und füge diese als neues Tabellenblatt in die neue EAN-Liste ein. Dann markiere ich die EAN-Spalte, und gehe über „Bedingte Formatierung -> Neue Regel -> Formel zur Ermittung der zu formatierenden Zellen verwenden“. Mit der Formel

 lasse ich die Zellen zB rot auffüllen. Tabelle2!A ist die Spalte, die ich durchsuchen will, ;A1 die EAN-Spalte, in der die Doubletten markiert werden sollen.

Erstes Wort aus Zelle entfernen