Beschreibung
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_scripte_01.js
function Mailbox() { __dnbMailbox(false); }
dnb_public.js
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