Menü

ellib.ShowArEditStaffelDlg(iScript)

Zurück | Ebene zurück

Zeigt das Dialogfenster zum Ändern der Staffelpreise eines Artikels an. Allgemeine Informationen zu diesem Dialogfenster befinden sich im Bedienerhandbuch im Kapitel „Artikel - Allgemein“.

ellib.ShowArEditStaffelDlg (ArtikelId)

Parameter

ArtikelId: Integer

die ID des Artikels, dessen Staffelpreise geändert werden sollen

Anmerkungen

Diese Funktion ist ab Version EULANDA® 2010 verfügbar.

Beispiele

A. Einfacher Aufruf

In diesem Beispiel wird zunächst die ID und die Nummer eines Artikels ermittelt, zu dem bereits Staffelpreise hinterlegt sind. Fall kein solcher Artikel vorhanden ist, wird der letzte Artikel ermittelt, der überhaupt angelegt wurde. In der letzten Zeile erfolgt dann der eigentliche Aufruf des Dialogfensters.

VBScript

' **********************************************
' *** Vorbereitung - Ermitteln einer Artikel-ID
' **********************************************
 
dim sql, ArtikelId, ArtNummer
sql = "set nocount on; declare @id int select top 1 @id = artikelid from Preis " &_
  "if @@rowcount = 0 select top 1 @id = id from artikel order by id desc " &_
  "select id, ArtNummer from artikel where id = @id " &_
  "if @@rowcount = 0 raiserror('Es werden noch keine Artikel angelegt',16,1)"

with Client.ExecuteSql(Sql)
  ArtikelId = .Fields(0).Value
  ArtNummer = .Fields(1).Value
end with

msgbox "Es wird nun der Staffelpreis-Editor für Artikel '" & ArtNummer & "' angezeigt"

' **********************************************
' *** der eigentliche Aufruf des Dialogfensters
' **********************************************

ellib.ShowArEditStaffelDlg ArtikelId