Beschreibung
Die Funktion ruft den in der Vollanzeige dargestellten Datensatz zur Korrektur auf und ergänzt die Kategorien 8510 und 8100.
Historie
Datum |
geändert von |
Beschreibung |
---|---|---|
2011-06-30 |
Althaus |
neu erstellt |
2011-07-11 |
Althaus |
Kategorien 8510 und 8100 werden am Ende des Datensatzes ergänzt. |
Code
dnb_erwerbung.js
function MahnEingNichtPflicht() { if (application.activeWindow.getVariable("scr") != "8A"){ application.messageBox("Datensatzkopie","Der Datensatz muss sich in der Vollanzeige befinden!", "alert-icon"); } else { application.activeWindow.command("k",false); application.activeWindow.title.endOfBuffer(false); application.activeWindow.title.insertText("\n8510 %\n8100 "); } }
VB-Script
Sub MahnEingNichtPflicht() ' ***************************************************** On error resume next Application.ActiveWindow.Command "k", False Application.ActiveWindow.Title.EndOfBuffer False Application.ActiveWindow.Title.InsertText "8510 %" & vbCrLf & "8100 " End Sub
Überblick
Inhalte