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

Seitenanfang

  • Keine Stichwörter