OBS/Stammdaten/Weitere Stammdaten/Lieferanten-Typen
Lieferanten-Typen:
Unter Stammdaten → weitere Stammdaten befinden sich die Lieferantentypen.
Die Typen 200-299 sind freie Lieferantentypen.
Hier können eigene Strukturen hinterlegt werden.
Mit F7 können die Felder definiert werden.
Beispiel Büroring als freier Import.
Mit F8 können für CSV-Importe die Feldtrenner gesetzt werden.
Der Feld-Trenner muss numerisch eingegeben werden!
Das Dateiformat kann CSV/FIX-ASCII oder XLS betragen
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 Stammdaten befinden sich die Lieferanten-ILN.
Ein Großteil der ILN Nummern wird von OBS mitgeliefert.
Hier können auch neue ILN-Nummern definiert werden


