Beschreibung

Eingangsbearbeitung von 1 Pflichtexemplar (Einzelexemplar) für den eigenen Standort bei vorhandenem ND-Datensatz oder Aam-Satz
Ausgangsbildschirm: Titeldatensatz im Lesemodus.

Hinweise/Fragen

Die Funktion soll für beide Standorte funktionieren, d.h. Erzeugung von 0701 @nur in DNB-F@ (Nutzung in FFM) oder 0701 @nur in DNB-L@ (Nutzung in Leipzig).

 

Automatische Tastaturbelegung mit dem Short-Cut ALT_E gewünscht

 

Ist Feld 0600 schon im Datensatz vorhanden, wird die erneute Bildung von 0600 unterdrückt. Im vorhandenen Feld 0600 wird vor die Inhalte ein r; eingefügt und der Cursor steht zwischen r und ;.( Beispiel: 0600 r[Cursor];di ) [Anm.: Wunsch von F1.2]

 

Historie

Datum

geändert von

Beschreibung

2011-06-17

Althaus

neu erstellt

2011-07-13

Althaus

Fehlerbehebung: Wenn 0600 nicht vorhanden ist, wird das Feld mit Zeilenumbruch (Warnung) eingefügt.

Code

dnb_erwerbung.js

function NDEinzel() {

	var strKuerzel = __getProfVal("Kürzel erfassen","kuerzel","Bitte geben Sie Ihr Bearbeiterkürzel ein.");
	var strAbteilung = __getAbteilung();
	var strContent4700 = "|" + strAbteilung + "|" + strKuerzel;
	var strStandort = __getStandort();
	
	if (application.activeWindow.getVariable("scr") != "8A"){
	application.messageBox("Datensatzkopie","Der Datensatz muss sich in der Vollanzeige befinden!", "alert-icon");
	return;
	}
	application.activeWindow.command("k",false);
	if (application.activeWindow.title.findTag("4208", 0, true, true, false)) {
		application.activeWindow.title.deleteSelection();
		//application.messageBox("", "4208 vorhanden und gelöscht?", "");
	}
	__geheZuKat("0701","",true);
	application.activeWindow.title.insertText("\n0701 @nur in " + strStandort + "@");
	
	__geheZuKat("4700","",true);
	application.activeWindow.title.insertText("\n4700 " + strContent4700);
	
	if (application.activeWindow.title.findTag("0600", 0, true, true, false)) {
		application.activeWindow.title.startOfField(false);
		application.activeWindow.title.wordRight(1,false);
		application.activeWindow.title.insertText("r;");	
		application.activeWindow.title.charLeft(1,false);
		//application.messageBox("", "0600 vorhanden und ergänzt", "");
	} else {
		__geheZuKat("0600","",true);
		application.activeWindow.title.insertText("\n0600 r");	
	}
	//application.messageBox("", "Ende","");

}
Vorgabe
Wechsel in den Korrekturmodus.
Feld 4208 wird gelöscht.
Es bilden sich im Datensatz die Felder
0600 r  (der Cursor steht hinter dem r)
0701 @nur in DNB-F@ (bzw. @nur in DNB-L@ )
4700 |ERW|Namenskürzel
Datensatz bleibt im Korrekturmodus zur weiteren Eingabe.

Seitenanfang

  • Keine Stichwörter