Seitenhistorie

function __Schlagwortsuche(strKommando,strTrunkierung) {

	var intWinID1	   = application.activeWindow.windowID;
	var intWinID2;
//	var strKommando = "rec n;f an ";
//	var strTrunkierung = "ANSrecn";
	var swPrompt = utility.newPrompter();
	var strKategorie;
	var strSchlagworte;
	var strIDN = application.activeWindow.getVariable("P3GPP");
	var strSWDIDN;
	var msg;
	var intLength;
	var strText = 	"Eingabeform:       Kategorie Schlagwort(e)\n" + 
					"             z.B.: 5100 Magie\n"               +
					"             oder  5101 feng shui\n";
	var strEingabe = "";
	
	if (application.activeWindow.getVariable("scr") != "MT") {
		__dnbFehler("Fehler","Die Funktion kann nur im Korrekturmodus aufgerufen werden!");
	} else {
		msg = swPrompt.prompt(strTrunkierung,strText,strEingabe,null,null);
		ifwhile (msg == true)	{
			strEingabe = swPrompt.getEditValue();
			intLength = strEingabe.length;
			if (intLength < 6) {
				__dnbFehler(strTrunkierung,"Bitte Eingabeform beachten: " + strText);
			} else {
				strKategorie	msg = strEingabeswPrompt.substringprompt(0,4);
				strSchlagwortestrTrunkierung,strText,strEingabe,null,null);
			} else {
				msg = false;
				strKategorie = strEingabe.substring(50,intLength+14);
				ifstrSchlagworte (strTrunkierung == "ANSrecn") {= strEingabe.substring(5,intLength+1);
					__geheZuKat(strKategorie,"",false);
				application.activeWindow.title.command insertText(strKommandostrKategorie + "\"\"" + strSchlagworte + "\"\"", truen");
				} else {
	application.activeWindow.title.lineUp(1 , false);
				application.activeWindow.command (strKommando + strSchlagworte, truetitle.endOfField(false);
				}
				intWinID2if (strTrunkierung == application.activeWindow.windowID;
 "ANSrecn") {
					strSWDIDN = application.activeWindow.getVariable("P3GPP");
				if ((strSWDIDN == strIDN) || (application.activeWindow.getVariable("scr") != "8A"))command (strKommando + "\"\"" + strSchlagworte + "\"\"", true);
				} else {
					application.activeWindow.closeWindow(intWinID2command (strKommando + strSchlagworte, true);
				}
				
				intWinID2 = application.activeWindow.windowID;
				strSWDIDN = application.activeWindow.getVariable("P3GPP");
				if ((strSWDIDN == strIDN) || (application.activeWindow.getVariable("scr") != "8A")) {
					__dnbFehler("Schlagwortsuche","Schlagwort nicht eindeutig zu ermitteln.\n" 
								+ "Mehrere Treffer: Bitte wählen Sie manuell aus und rufen Sie dann die Funktion HoleIDN auf\n"
				application.activateWindow(intWinID1);
					__dnbFehler("Schlagwortsuche","Schlagwort nicht eindeutig zu ermitteln+ "Nichts gefunden: Bitte schließen Sie das Fenster und rufen Sie die Funktion ggf. erneut auf!");
				} else {
					application.closeWindow(intWinID2);
					application.activateWindow(intWinID1);
					__geheZuKat(strKategorie,"",falsetrue);
					application.activeWindow.title.insertText(strKategorie + " !" + strSWDIDN + "!\n");		
				}
			}
		}
	}
}

function ANSrecn() {

	__Schlagwortsuche("rec n;f an ","ANSrecn");

}