Wartung / Maintencance - Upgrade Version 8.5.12 - Mittwoch/Wednesday - 2024-08-28 07:30-09:00 a.m.
Seitenhistorie
Anker | ||||
---|---|---|---|---|
|
Inhalt |
---|
Beschreibung
Auszug |
---|
Erzeugt Kategorie 901 mit akt. Datum und den Verbünden als Mailboxempfänger |
Historie
Datum | geändert von | Beschreibung |
---|---|---|
2011-06-25 | Althaus | neu erstellt |
2011-07-01 | Althaus | Empfänger e-DE-613 wurde entfernt. |
Code
dnb_inhaltserschliessung.js
Codeblock |
---|
function Mailbox() { __dnbMailbox(false); } |
dnb_public.js
Codeblock |
---|
function __dnbMailbox(answer) { if (!__isEditScreen("Mailbox","entry",false)) { application.messageBox("Mailbox", "Die Funktion muss aus dem Edit-Bildschirm für Normdaten aufgerufen werden.", "alert-icon"); return false; } var strStandort = __getStandort(); if ((strStandort != "DNB-F") && (strStandort != "DNB-L")) { __dnbFehler("Funktion: Mailbox","Standort unbekannt: " + strStandort + "\nMuss entweder DNB-F oder DNB-L sein!",""); return false; } var strAktDate = __makeDate(); var strMailboxPhrase = "\n901 " + strAktDate + " // a-DE-101-SE-" + strStandort.charAt(4) + " e-"; //application.messageBox("",strMailboxPhrase,""); var strMbxPhr1 = "AT-3:NOeLB e-AT-9:OBV-SE e-CH-000001-5 e-DE-1 e-DE-101-SE-"; var strMbxPhr2 = " e-DE-12-SE e-DE-188 e-DE-384-SE e-DE-576 e-DE-601-SE e-DE-603 e-DE-605-SE e-DE-612-SE"; if (!answer) { if (strStandort == "DNB-F") { strMailboxPhrase = strMailboxPhrase + strMbxPhr1 + "L" + strMbxPhr2; } else { strMailboxPhrase = strMailboxPhrase + strMbxPhr1 + "F" + strMbxPhr2; } } __geheZuKat("901","",true); application.activeWindow.title.insertText(strMailboxPhrase + " *"); } |
Überblick
Inhalte