Seitenhistorie
...
<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="2016aae0fb192f94-84a96a6e-49ea4bed-b7fc9e6f-0aefbf7bac216ab36dce8844"><ac:plain-text-body><![CDATA[ | Der Standard-Vermerk Gehoert eindeutig nicht zum Sammelgebiet der Deutschen Nationalbibliothek soll in den Exemplardatensätzen beider Standorte in einem eigenen Unterfeld von Feld 4801 stehen: 4801 [Unterfeld]Kein Sammelgebiet |
| ]]></ac:plain-text-body></ac:structured-macro> |
Feld 8034 soll nicht mehr besetzt werden. |
|
...
Datum | geändert von | Beschreibung |
---|---|---|
2011-06-18 | Althaus | neu erstellt |
...
Code
dnb_
...
erwerbung.js
...
Codeblock |
---|
function Kein_Sammelgebiet_eindeutig() { __eingabeKommentar("Gehoert eindeutig nicht zum Sammelgebiet der Deutschen Nationalbibliothek","s"); /* Lt. Frau Freidhof kann der Inhalt der 4700 wegfallen. Hier der VB-Code: Application.ActiveWindow.Command "k", False Call HoleDNBStandort(strStandort) Call HoleKuerzel(strKuerzel) Application.ActiveWindow.Title.InsertText vbcr & "4701 " & strStandort & "; " & strKuerzel & "#NSG :" & vbcr Application.ActiveWindow.SimulateIBWKey "FR" */ } |
dnb_public.js
Codeblock |
---|
function __eingabeKommentar(comment,kennzeichen) { var Mahnstatus; var strKuerzel = __getProfVal("Kürzel erfassen","kuerzel","Bitte geben Sie Ihr Bearbeiterkürzel ein."); var strAbteilung = __getAbteilung(); var strStandort = __getStandort(); var strContent4700 = "|" + strAbteilung + "|" + strStandort + ";" + strKuerzel; if (application.activeWindow.getVariable("scr") != "8A"){ __dnbFehler("Eingabekommentar","Der Datensatz muss sich in der Vollanzeige befinden!", ""); return; } else { var Kopie = application.activeWindow.copyTitle(); //application.messageBox("Kopie",Kopie,""); if (Kopie == "") { __dnbFehler("Retro","Es konnte keine Titelkopie erstellt werden",""); } else { var Eingabe = ""; var Pos0500 = Kopie.indexOf("0500 "); var Tag0500 = Kopie.substring(Pos0500,Kopie.indexOf("\n",Pos0500)); //application.messageBox("Tag0500",Tag0500,""); var Satzart = Tag0500.substring(6,Tag0500.length-1); var Pos0599 = Kopie.indexOf("0599 "); var Tag0599 = Kopie.substring(Pos0599,Kopie.indexOf("\n",Pos0599)); if (Tag0599.indexOf("m") > 0) { Mahnstatus = true; } //application.messageBox("",Satzart.length,""); if ((Satzart == "ac") || (Satzart == "am")) { application.activeWindow.command("k",false); __dnbUpdMatStatus("q"+kennzeichen) //application.messageBox("","q-Kennzeichnung",""); if (application.activeWindow.title.findTag("0599", 0, false, true, false)) { if (!Mahnstatus) { application.activeWindow.title.deleteLine(1); //application.messageBox("","0599 löeschen",""); } } __geheZuKat("4700","",true); application.activeWindow.title.insertText("\n4700 " + strContent4700); //application.messageBox("","4700 eingeben",""); if (application.activeWindow.title.findTag("2100", 0, false, true, false)) { application.activeWindow.title.deleteLine(1); //application.messageBox("","2100 löschen",""); } __geheZuKat("0701","",true); if (application.activeWindow.title.findTag("0701", 0, false, true, false)) { application.activeWindow.title.find("#", false, true, false); //application.messageBox("","Text eingeben",""); application.activeWindow.title.insertText("\n0701 /q/@" + comment + "@#"); application.activeWindow.title.lineUp(1,false); //application.messageBox("","Zeile löschen",""); application.activeWindow.title.deleteLine(1); } else { application.activeWindow.title.insertText("\n0701 /q/@" + comment + "@"); } __geheZuKat("0701","",true); //application.activeWindow.simulateIBWKey("FR"); } else { __dnbFehler("Eingabekommentar","Diese Funktion lässt sich nur für die Datensatzarten\n\n" + "- Aac\n- Aam\n- Bac\n- Oac\n- Kac\n- Sac\n- Zac\n\naufrufen!",""); } } } } |
...
Überblick
Inhalte