OBS/Stammdaten/Artikel: Import Externe-Artikeltexte: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Shop-Texte Importieren
(Importing text file) |
Böhrer (Diskussion | Beiträge) Keine Bearbeitungszusammenfassung |
||
| Zeile 1: | Zeile 1: | ||
<font size="2" color="#000000" face="Arial"> </font> | {{Menü: Stammdaten}}<font size="2" color="#000000" face="Arial"> </font> | ||
<div><center><font size="6">Shop-Texte Importieren</font></center></div><br />Mit dieser Funktion können Shop-Texte im XLS Format importiert werden.<br />Der Lieferant wird herangezogen wenn die Artikelnummer eine Bestellnummer in der Excel-Liste ist.<div><br /></div><div><font size="1" face="courier new">function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;<div><br /></div>ArtikelEAN, ArtikelTyp, ArtikelLand sind Optionsfunktionen.<br />Wenn ArtikelLand nicht vorhanden dann Land aus MaskeWenn ArtikelTyp nicht vorhanden dann Typ aus Maske<br />Wenn der Lieferant angegeben ist und die Artikelnummer nicht vorhanden ist und keine Bestellnummer beim Artikel hinterlegt ist,dann versuchen die Artikelnummer über die Artikel-EAN zu ermitteln falls eine gültige EAN ur Verfügung steht.<br />Makro Standard setzt das Makro auf das vordefinierten OBS Standard-Makro zurück.<div><br /></div><div>[[Image:FRMTEXTEIMPORT_1.jpg]]</div><div><br /></div><div><font face="courier new">//----------------------------------------------------<div><font face="courier new">//Beispiel für Textimport<div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := LeftStr(GetCell(oXLS,nRow,0),6);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := '9101';<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,2);<div><font face="courier new">end; <div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"> <div><font face="courier new">function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := 'D';<div><font face="courier new">end; <div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"> <div><font face="courier new">function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,3);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,1);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><br /></div>[[Category:html]] | <div><center><font size="6">Shop-Texte Importieren</font></center></div><br />Mit dieser Funktion können Shop-Texte im XLS Format importiert werden.<br />Der Lieferant wird herangezogen wenn die Artikelnummer eine Bestellnummer in der Excel-Liste ist.<div><br /></div><div><font size="1" face="courier new">function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;<div><font size="1" face="courier new">function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;<div><br /></div>ArtikelEAN, ArtikelTyp, ArtikelLand sind Optionsfunktionen.<br />Wenn ArtikelLand nicht vorhanden dann Land aus MaskeWenn ArtikelTyp nicht vorhanden dann Typ aus Maske<br />Wenn der Lieferant angegeben ist und die Artikelnummer nicht vorhanden ist und keine Bestellnummer beim Artikel hinterlegt ist,dann versuchen die Artikelnummer über die Artikel-EAN zu ermitteln falls eine gültige EAN ur Verfügung steht.<br />Makro Standard setzt das Makro auf das vordefinierten OBS Standard-Makro zurück.<div><br /></div><div>[[Image:FRMTEXTEIMPORT_1.jpg]]</div><div><br /></div><div><font face="courier new">//----------------------------------------------------<div><font face="courier new">//Beispiel für Textimport<div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := LeftStr(GetCell(oXLS,nRow,0),6);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := '9101';<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,2);<div><font face="courier new">end; <div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"> <div><font face="courier new">function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := 'D';<div><font face="courier new">end; <div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"> <div><font face="courier new">function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,3);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><font face="courier new"><br /><div><font face="courier new">function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;<div><font face="courier new">begin<div><font face="courier new"> Result := GetCell(oXLS,nRow,1);<div><font face="courier new">end;<div><font face="courier new"><br /><div><font face="courier new">//----------------------------------------------------<div><br /></div>[[Category:html]] | ||
---- | ---- | ||
[[Benutzer:Auto import|Auto import]] 15:21, 25. Aug. 2011 (CEST) | [[Benutzer:Auto import|Auto import]] 15:21, 25. Aug. 2011 (CEST) | ||
Version vom 29. September 2011, 15:31 Uhr
Personen
- Tasten und Schaltflächen
Ansprechpartner
- Eingabemaske
Artikel
- Artikel
- Beispiel: Anlegen eines Artikels
- Anleitung für den Etikettendruck
- Brutto und Nettopreise in OBS
- Tasten und Schaltflächen
- Eingabemaske
Warengruppen
- Tasten und Schaltflächen
- F3 Druck
- F4 Sortierung
- F5 Unterwarengruppe
- F6 Vertreter
- F7 Prov
- F8 Lieferanten Prioritäten
- F9 Soll
- F10 Weitere
- Eingabemaske
Leistungen
- Tasten und Schaltflächen
F10 Weitere
- Eingabemaske
- Kalkulation
Erlöskonten
Textbausteine
Formulare
Liste
Tasten und Schaltflächen
Eingabemaske
Schnittstellen
Artikelpflege
- Tasten und Schaltflächen
Return
Lieferanten-Artikel bearbeiten
- Tasten und Schaltflächen
- Eingemaske
Übernahmeparameter definieren
Datanorm 4.0
Edifakt
Internet-Shop
Menü: xtcModifed
- A Shop-Stammdaten
- C Personen übertragen
- D Kataloge verwalten
- E Kategorien verwalten
- F Preislisten-Update
- G Bestellungen abholen
- H Verfügbarkeit übertragen
- I Merkliste übertragen
- V Varianten übertragen
- W Artikelvarianten übertragen
- X Protokoll
- Y leere Passworte füllen
- Z Update-Informationen zurücksetzen
Menü: VShop 3.2
- A Shop-Stammdaten
- B Datenbankzugang
- C Personen übertragen
- D Preise aktualisieren
- E eigene Artikel übertragen
- F Preislisten verwalten
- G Warengruppen verwalten
- H Bestellvorlagen übertragen
- Y leere Passworte füllen
- Z FTP-Protokoll
Menü: VShop 4.0
- A Shop-Stammdaten
- B Datenbankzugang
- C Personen übertragen
- D Preise aktualisieren
- E eigene Artikel übertragen
- F Preislisten verwalten
- G Warengruppen verwalten
- H Bestellvorlagen übertragen
- I Kundengruppen
- K Zugang für Bildübertragung
- Y leere Passworte füllen
- Z FTP-Protokoll
Verträge
- Verträge
- Vertragsinformation
- Vertragsabrechnung Beispiele
- Vertragskontrolle - Kopien für Vertrag
- Wenn zu viel Toner verbraucht wird
- Minderkopien bei Vertragsdruckabrechnung
- OBS/Weitere Stammdaten/Volumenvertrag - Abbildung im OBS
- Tasten und Schaltflächen
- F3 Druck
- F5 Markieren
- F6 Positionen
- F7 Selektieren
- F8 Dokumente
- F9 Demarkieren
- F10 Weitere Funktionen
- Eingabemaske
- Registerkarte: 1 Vertrag
- Registerkarte: 2 Druckabrechnung
- Registerkarte: 3 Text Pauschale
- Registerkarte: 4 Text Druckabrechnung
- Registerkarte: 5 Text Zählerstandabfrage
- Registerkarte: 6 Zusatzkosten
- Weitere
E-Mail
- Tasten und Schaltflächen
- F10 Weitere Funktionen
- Eingabemaske
Projektverwaltung
- Tasten und Schaltflächen
- Eingabemaske
Infoverwaltung
Aufgaben
- Tasten und Schaltflächen
- Aufgaben-Gruppen
- Eingabemaske
Kalender
- Termine
- Termine
- neuen Termin erstellen/Termin bearbeiten
- neuen Langzeittermin erstellen/Langzeittermin bearbeiten
- Geburtstag
- Tasten und Schaltflächen
- Technikersteuerung
Faxverwaltung
Automatische Vorgänge
SMS-Verwaltung
Programmparameter
Mit dieser Funktion können Shop-Texte im XLS Format importiert werden.
Der Lieferant wird herangezogen wenn die Artikelnummer eine Bestellnummer in der Excel-Liste ist.
function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;
function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;
function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;
function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;
function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;
function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;
ArtikelEAN, ArtikelTyp, ArtikelLand sind Optionsfunktionen.
Wenn ArtikelLand nicht vorhanden dann Land aus MaskeWenn ArtikelTyp nicht vorhanden dann Typ aus Maske
Wenn der Lieferant angegeben ist und die Artikelnummer nicht vorhanden ist und keine Bestellnummer beim Artikel hinterlegt ist,dann versuchen die Artikelnummer über die Artikel-EAN zu ermitteln falls eine gültige EAN ur Verfügung steht.
Makro Standard setzt das Makro auf das vordefinierten OBS Standard-Makro zurück.
Wenn ArtikelLand nicht vorhanden dann Land aus MaskeWenn ArtikelTyp nicht vorhanden dann Typ aus Maske
Wenn der Lieferant angegeben ist und die Artikelnummer nicht vorhanden ist und keine Bestellnummer beim Artikel hinterlegt ist,dann versuchen die Artikelnummer über die Artikel-EAN zu ermitteln falls eine gültige EAN ur Verfügung steht.
Makro Standard setzt das Makro auf das vordefinierten OBS Standard-Makro zurück.
//----------------------------------------------------
//Beispiel für Textimport
//----------------------------------------------------
function ArtikelNummer(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := LeftStr(GetCell(oXLS,nRow,0),6);
end;
//----------------------------------------------------
function ArtikelTyp(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := '9101';
end;
//----------------------------------------------------
function ArtikelName(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := GetCell(oXLS,nRow,2);
end;
//----------------------------------------------------
function ArtikelLand(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := 'D';
end;
//----------------------------------------------------
function ArtikelText(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := GetCell(oXLS,nRow,3);
end;
//----------------------------------------------------
function ArtikelEAN(oXLS:TObject;nRow:Intgeger) : String;
begin
Result := GetCell(oXLS,nRow,1);
end;