Seitenhistorie

function FindePERinTBs () {

/* 
Die Funktion kopiert den Inhalt der aktuellen Kategorie und schickt die Suchfrage "rec n; f per ... and tb s" ab. Der Kategorieinhalt wird entfernt. Die Verknüpfungs-IDN kann im Anschluss mit Funktion HoleIDN übernommen werden!

2011-02-02 : Althaus	: erstellt

*/
	if (application.activeWindow.title == null) {
		__dnbFehler("Funktion FindePERinTBs","Funktion kann nur in einem Bearbeitungsschirm aufgerufen werden!");
	} else {
	
			application.activeWindow.title.startOfField(false);
			application.activeWindow.title.wordRight(1,false);
			application.activeWindow.title.endOfField(true);
			var strPerson = application.activeWindow.title.selection;
			var strSetSize = 0;
			var strCommand = "rec n;f per " + strPerson + " and tb s";
			//application.activeWindow.title.deleteSelection;
			application.activeWindow.command(strCommand,false);
			strSetSize = application.activeWindow.getVariable("P3GSZ");
			if (strSetSize < 1)
				application.activeWindow.closeWindow();
			}
}