Seitenhistorie
Anker | ||||
---|---|---|---|---|
|
Inhalt |
---|
Beschreibung
Auszug |
---|
Korrigiert erstmals abgespeicherte Afa und Aaa-Sätze der Kaufstelle Frankfurt zum Unterdrücken der Pflichtexemplar-Routine. |
Historie
Datum | geändert von | Beschreibung |
---|---|---|
2011-06-18 | Althaus | neu erstellt |
Code
dnb_erwerbung.js
Codeblock |
---|
function IntMonokorrKauf() { 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; } var Kopie = application.activeWindow.copyTitle(); //application.messageBox("Kopie",Kopie,""); if (Kopie == "") { __dnbFehler("","Es konnte keine Titelkopie erstellt werden",""); } else { var Pos0500 = Kopie.indexOf("0500 "); var Tag0500 = Kopie.substring(Pos0500,Kopie.indexOf("\n",Pos0500)); //application.messageBox("Tag0500",Tag0500,""); var Satzart = Tag0500.substring(5,Tag0500.length-1); if ((Satzart == "Afa") || (Satzart == "Aaa")) { application.activeWindow.command("k",false); if (application.activeWindow.title.findTag("0701", 0, true, true, false)) { application.activeWindow.title.deleteSelection(); //application.messageBox("", "4208 vorhanden und gelöscht?", ""); } if (application.activeWindow.title.findTag("7001", 0, true, true, false)) { application.activeWindow.title.startOfField(false); application.activeWindow.title.wordRight(1,false); application.activeWindow.title.charLeft(2,false); application.activeWindow.title.endOfField(true); application.activeWindow.title.insertText("2 xxh\n7100 HB\n8510 "); } } else { application.messageBox("", "Nur Satzarten Afa und Aaa werden bearbeitet!",""); } } } |
Vorgabe
Codeblock |
---|
Korrigiert erstmals abgespeicherte Afa und Aaa-Sätze der Kaufstelle Frankfurt zum Unterdrücken der Pflichtexemplar-routine Ausgangsbildschirm: Titeldatensatz mit 0500 Afa oder Titeldatensatz mit 0500 Aaa Vollanzeige o löscht in Afa-Satz oder Aaa-Satz Feld 0701 o ersetzt Feld 7001 durch 7002 o fügt in 7002 nach Blank ein: xxh o fügt Feld 7100 HB ein o fügt Feld 8510 ein o Cursor sollte in Feld 8510 nach einem Blank stehen Code: k{ENTER}{Alt+F3}0701{Alt+W}{ESCAPE} {Ctrl+Y}{Alt+F3}7001{Alt+W}{ESCAPE} {RIGHT}{Shift+END}{DELETE}{BACKSPACE} {BACKSPACE}2{RIGHT} xxh{ENTER}7100 HB {Ctrl+END}8510 |
Überblick
Inhalte