OBS/System/Sonderprogramme: T-Individueller Artikelimport

Vorlage:Zusatzprogramme

Artikel-Import

Die Verzeichnise des Artikelimports liegen wie folgt :
.\OBS\DATA\DOWNLOADS\700000\*.*
Wobei die Nummer des Verzeichnisses die Lieferantennummer ist.
Dies gilt für die freien Importe sowie für

1. Spicers
2. Alka
3. Büroring
4. Büroring BME-Cat
5. Actebis

Das Archiv liegt in.'\OBS\DATA\PBS\Archiv\..
Für PBSeasy gilt folgendes Verzeichnis:
.\OBS\DATA\PBSEASY\..
Das Archiv liegt in.\OBS\DATA\PBSeasy\Archiv\.. '
hier werden alle PBSeasy Dateien hinterlegt.
folgende Dateien werden erwartet:

Lieferant	Zip-Archiv	Import-Dateien
ALKA		plalkawws.txt
Büroring	ascii-1.zip	ascii-1.txtartgrupp.txt
Büroriing BMEcat		br-ek_DE_BMEcat_DEU.xml
Spicers	txt-+ InterneKdNr+.zip	txt-+InterneKdNr+.txt
PBSeasy	DATA\PBSEASY\*.zip
Actebis		pricelist-1.txt
Alpha		Alpha-International.txt (Bestellnummer, Herstellerartikelnummer,EAN,HWGR,Bezeichnung1,Verfügbarkeit,EKPreis)
Softcarrier	PREISEXT.ZIP	STANDARD.TXT
Staples		Staples.csv
Wortmann		ARTIKELFULL_CSV.ZIP
UFP	psvskqvlx.zip	psvskqvlx.csv

Lieferanten-Typen:

unter Stammdaten → weitere Stamdaten befinden sich die LieferantentypenDie Typen 200-299 sind freie Lieferantentypen.Hier können eigene Strukturen hinterlegt werden.

mit F7 könne die Felder definiert werden.Beispiel Büroring als freier Import.

Mit F8 können für CSV-Importe die Feldtrennen gesetzt werdenDer Feld-Trenner muss numerisch eingegeben werden!Das Dateiformat kann CSV/FIX-ASCII oder XLS betragen

Datei:IMPORTE ALLGEMEIN 3.jpg

Die eingelesenen Felder können per Macro zusammengesetzt bzw. berechnet werden.

function Convert(oObj:TObject):Boolean;
var cBez1    : String;
   cBez2    : String;
   cBez3    : String;
   cBez4    : String;
   nEKpreis : double;
   nVKPreis : double;
   cEKpreis : String;
   cVKPreis : String;
begin	
   cBez1  := GetImportFeld(oObj,'bez1');
   cBez2  := GetImportFeld(oObj,'bez2');
   SetImportFeld(oObj,'bez1',   'Keymax® ' 
                              + cBez1 + ' '
                              + cBez2);
   cBez1  := GetImportFeld(oObj,'*frei1');
   cBez2  := GetImportFeld(oObj,'*frei2');
   cBez3  := GetImportFeld(oObj,'*frei3');
   cBez4  := GetImportFeld(oObj,'*frei4');
   SetImportFeld(oObj,'bez2',  cBez1 + ' '
                             + cBez2 + ' '
                             + cBez3 + ' '
                             + cBez4);
   cEKPreis  :=GetImportFeld(oObj,'ekpreis');
   cVKPreis  :=GetImportFeld(oObj,'vkpreis');
   nEKPreis  := xStrToFloat(cEKPreis);
   nVKPreis  := xStrToFloat(cVKPreis);
   nVKPreis  := Roundy(nEKPreis+(nEKPreis*60/100),2);
   cVKPreis  := Alltrim(xStr(nVKPreis,10,2));
   cVKPreis  := StrTRan(cVKPreis,',','.');
   SetImportFeld(oObj,'vkpreis',cVKPreis);
end;

Bei den Lieferanten, die PBS-Easy benutzen, muss die ILN im Personenstamm ausgefüllt werden.unter Stammdaten → weitere Stamdaten befinden sich die Lieferanten-ILNEin großteil der ILN Nummern wird von OBS mitgeliefertHier können auch neue ILN-Nummern definiert werden

---

Auto import 15:21, 25. Aug. 2011 (CEST)