Beschreibung
Eingangsbearbeitung von 2 Pflichtexemplaren bei vorhandenem ND-Datensatz
Ausgangsbildschirm: Titeldatensatz im Lesemodus.
Hinweise/Fragen
Automatische Tastaturbelegung mit dem Short-Cut ALT_N 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 |
eingefügt. Code
dnb_erwerbung.js
function NDEingPflicht() {
var strKuerzel = __getProfVal("Kürzel erfassen","kuerzel","Bitte geben Sie Ihr Bearbeiterkürzel ein.");
var strAbteilung = __getAbteilung();
var strContent4700 = "|" + strAbteilung + "|" + strKuerzel;
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 ");
__geheZuKat("4700","",true);
application.activeWindow.title.insertText("4700 " + 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 die Felder 0600 r (der Cursor steht hinter dem r) 0701 4700 |ERW|Namenskürzel Datensatz bleibt im Korrekturmodus zur weiteren Eingabe.
Überblick
Inhalte