OBS/System/Sonderprogramme: T-Individueller Artikelimport: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
 
(2 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt)
Zeile 1: Zeile 1:
{{Sonderprogramme}}
{{Sonderprogramme}}
=Lieferanten-Typen:=
Führt das Macro 'data\PBS\.Macro\individuell.mac' aus.
Unter Stammdaten → weitere Stammdaten befinden sich die Lieferantentypen.<br/>
Die Typen 200-299 sind freie Lieferantentypen.<br />


Hier können eigene Strukturen hinterlegt werden.<br />


[[Image:IMPORTE_ALLGEMEIN_1.jpg]]<br />


 
[[Kategorie:OBS/System]]
Mit {{F7}} können die Felder definiert werden.
 
Beispiel Büroring als freier Import.<br />
 
[[Image:IMPORTE_ALLGEMEIN_2.jpg]]<br />
 
Mit {{F8}} können für CSV-Importe die Feldtrenner gesetzt werden.<br />
 
Der Feld-Trenner muss '''numerisch''' eingegeben werden!
 
Das Dateiformat kann CSV/FIX-ASCII oder XLS betragen<br />
 
[[Image:IMPORTE_ALLGEMEIN_3.jpg]]<br />
 
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.<br />
Ein Großteil der ILN Nummern wird von OBS mitgeliefert.<br /
Hier können auch neue ILN-Nummern definiert werden<br />
 
[[Image:IMPORTE_ALLGEMEIN_4.jpg]]<br />
</div>[[Category:html]]
----
[[Benutzer:Auto import|Auto import]] 15:21, 25. Aug. 2011 (CEST)

Aktuelle Version vom 8. September 2016, 09:24 Uhr



Führt das Macro 'data\PBS\.Macro\individuell.mac' aus.

Abgerufen von „http:///index.php?title=OBS/System/Sonderprogramme:_T-Individueller_Artikelimport&oldid=25076“