Beschreibung
Neu: Die Funktion fügt Änderungscodierung und "GESPERRT" in Normdatensätze ein.
Historie
Datum |
geändert von |
Beschreibung |
---|---|---|
2010 |
Grund |
erstellt |
Datei
dnb_authorities.js |
Code
{code}
//********************************************************************
function NormLoeschen() {
/*--------------------------------------------------------------------------------------------------------
normLoeschen ()
Die Funktion fügt Änderungscodierung und "GESPERRT" in Normdatensätze ein
typ = Materialart
af_kat = Feld, in der die Ansetzungsform steht
z = Anzahl der Schritte vom Zeilenanfang, die zur Eingabe von GESPERRT zurückgelegt werden müssen
gesp = PND mit ***, SWD mit !!!
Mögliche Erweiterung: Integration mit Löschfunktion für Titeldaten: SetzeStatusd
Verwendete Unterfunktionen: __dnbFehler(), __feldTest(), __geheZuKat()
Historie:
2010-04-01 Stefan Grund : erstellt
--------------------------------------------------------------------------------------------------------*/
var boxTit = "Normdatensatz löschen";
if (application.activeWindow.getVariable("scr") != "8A")
//SWD- oder PND-Satz?
var typ = application.activeWindow.materialCode;
if ("Tn Tp".indexOf(typ) > -1)
else if ("Ts".indexOf(typ) > -1)
else if ("Ts Tp Tn".indexOf(typ) < 0)
//Satz bereits als Löschsatz gekennzeichnet?
if (__feldTest(af_kat,"","GESPERRT",false) == "i")
if (__feldTest("010","","",false) == "i")
application.activeWindow.command("k",false);
application.activeWindow.title.insertText("010 d\n");
__geheZuKat(af_kat,"",true);
application.activeWindow.title.startOfField(false);
application.activeWindow.title.charRight(z,false);
application.activeWindow.title.insertText(gesp);
application.activeWindow.simulateIBWKey("FR");
}
{code}