LeseIDNListe

function LeseIDNListe() {

	var strSetSize;
	var strIDN;
	var strErrorList = "";
	var boolError = false;
	var dnbPrompt = utility.newPrompter();
	var fileInput = Components.classes["@oclcpica.nl/scriptinputfile;1"]
						.createInstance(Components.interfaces.IInputTextFile);
	var strFileName;
	var msg = dnbPrompt.prompt("Funktion: LeseIDNListe","Bitte geben Sie den kompletten Dateinamen inklusive absolutem Pfad ein!",strFileName,null,null);
	if (msg == true)	{
		strFileName = dnbPrompt.getEditValue();
	} else {
		//__dnbMeldung("ErstelleIDNListe","Die Funktion wird abgebrochen!","");
		return false;
	}
	if (fileInput.open(strFileName)) {
		application.activeWindow.command("del s0",false);
		while((strIDN = fileInput.readLine()) != null) {
			//application.activeWindow.command("inf",false);
			application.activeWindow.command("f idn " + strIDN,false);
			if (strIDN != application.activeWindow.getVariable("P3GPP")) {
				strErrorList = strErrorList + strIDN + "\n";
				boolError = true;
			} else {
				application.activeWindow.command("save",false);
			}
		}
		application.activeWindow.command("s s0",false);
		if (boolError) {
			__dnbFehler("LeseIDNListe","Zu folgenden IDNs konnten keine Datensätze gefunden werden: \n" + strErrorList,"");
		}
	} else {
		__dnbFehler("LeseIDNListe","Fehler beim Öffnen der Datei!","");
	}

}