Autorenfelder ändern

[nyen]

Hallo zusammen,

ich habe eine ganz wichtige Frage, die uns lange beschäftigt
Wie kann ich den Autor eines Dokumentes (mehrerer Dokumente) ändern, wenn der z.B. der Autor nicht mehr da ist.

Ich habe in der ACL unter den erweiterten Einstellungen angeschaut, da gibt es eine Möglichkeit über den Administrationsserver der Datenbank Lese- und Autorenfälder zu ändern. Was ich hier nicht verstehe, eine Zielperson fällt, die ich nirgendwo angeben kann.

Hier ist Beispiel, was ich vorhabe: Fr. Schmidt verlässt die Fa. und  Fr. Müller wird neu eingestellt. Autoren dieser Dokumente sollen auf Fr. Müller umbenannt werden.

Wie mache ich? Mit Administrationsserver, wo gebe ich die Zielperson ein.?

Hat jemand den Fall schon mal gehabt?

Vielen Dank im Voraus:

Grüße
Nyen

[Gandhi]

Der Administrationsserver ändert die Eingaben mit dem AdminP Prozess.
Wenn dieser eine Änderung für eine Person erkennt (z.B. Namensänderung) können dann die Autorenfelder der Datenbanken, die den Administrationsserver zugeordnet haben geändert werden.
Funktioniert erfahrungsgemäß aber nur sehr ungenau.
Besser per Agent:
Field Autorenfeld:="Neuer Autor"
oder
Field Autorenfeld:=Autorenfeld:"Neuer Autor"

Je nachdem, ob Listen erwünscht und zugelassen sind.
Neuer Autor muss im Format:
CN=vorname nachname/OU=..../O=..... stehen. Sonst interpretiert er den Namen nicht.

[nyen]

Hallo Gandhi,

Ich komme damit nicht zurecht. kanns du mit bitte genau beschreiben, wie ich d einen bestimmten Autor per Agent umbennene. Woher soll der Agent wissen, welchen Autor ich ändern möchte.

Alter Autor???

Field Autorenfeld:="Neuer Autor"
oder
Field Autorenfeld:=Autorenfeld:"Neuer Autor"


Danke,
Gruß
Nyen

[koehlerbv]

Field Autor := @ReplaceSubstring (Autor; "Alter Autor"; "Neuer Autor");

Damit wird nur gewechselt, wenn vorhanden, und Autorenlisten können ebenso behandelt werden wie einzelne Einträge.

HTH,
Bernhard

[Gandhi]

viel eleganter...

[nyen]

Danke, aber wo schreibe ich diesen Code. Im Agent kann ich keine Formelsprache schreiben.

Field Autor := @ReplaceSubstring (Autor; "Alter Autor"; "Neuer Autor");

Nyen

[Glombi]

Du bräuchtest einen Notes Designer, sonst geht's nur mit den Einfachen Aktionen, und damit geht's nicht

Andreas

[nyen]

Sorry Designer habe ich ja. Wenn es mit Einfachen Aktionen nicht geht (Agent), womit geht es, mit Lotus Script?

[Semeaphoros]

Mit einfachen Aktionen geht es wirklich nicht, aber mit einem Formel-Agent mit dem drin, was Bernhard beschrieben hat.

Da kannst Du aber auch über die einfachen Aktionen einsteigen, einfach wählen "@Formel ausführen"

[Glombi]

Du müsstest zudem noch herausfinden, in welchem Feld die Autoren stehen. Dazu am besten mal die Dokumenteigenschaften eines Dokuments (und das pro Maske) durchforsten und nach "READ/WRITE ACCESS NAMES" suchen. Das wäre dann ein Autorenfeld.

Dann startest Du den Designer Client und erstellst einen Agenten, der über alle Dokumente der Datenbank läuft.
Unter "Starten" wählst Du "Formel" aus.

Angenommen, das Autorenfeld heisst "Autor", dann könntest Du folgendes programmieren:

SELECT @IsMember("CN=Petra Schmidt/OU=Abteilung/O=Firma";Autor);
FIELD Autor := @ReplaceSubstring(Autor;"CN=Petra Schmidt/OU=Abteilung/O=Firma";"CN=Heike Müller/OU=Abteilung/O=Firma");
@True

Andreas

[koehlerbv]

Code

SELECT @IsMember("CN=Petra Schmidt/OU=Abteilung/O=Firma";Autor);
FIELD Autor := @ReplaceSubstring(Autor;"CN=Petra Schmidt/OU=Abteilung/O=Firma";"CN=Heike Müller/OU=Abteilung/O=Firma");
@True

Was machst Du denn mit dem lustigen @True am Ende ?

Nachtrag für nyen:
Da Dokumente mehrere Leser- und Autorenfelder haben können, musst Du ggf. mehrere FIELD := Anweisungen verwenden.

Bernhard

[Glombi]

Was machst Du denn mit dem lustigen @True am Ende ?

In Memoriam Notes 3  

Alte Angewohnheit wegen "Kein Haupt- oder Auswahlausdruck in Formel".
"Normalerweise" steht ja im Agenten SELECT... ganz am Ende. Man kann das natürlich auch als erstes machen (was ja viel logischer ist).
Notes akzeptiert jetzt ja endich auch eine Zuweisung am Ende.

Also hier: @True = void = "" = einfach nix = bitte ignorieren...

Andreas

[koehlerbv]

Ach ja, stimmt. Da war es einem ja schon in Fleisch und Blut übergegangen, jeden Agenten mit einem
SELECT @All
abzuschliessen. @True oder was anderes nichtssagendes konnte man auch nehmen.
Ich glaub', irgendwann hole ich nochmal die Disketten aus dem Keller, hoffe, dass sie noch lesbar sind und installiere mir spassenshalber noch mal 'nen Dreier  
Von R2 habe ich leider nur noch "Handbücher" ... Jeder Videorecorder hat heute umfangreichere Manuals ...

Ciao,
Bernhard

[Glombi]

Irgendwo müsste ich eigentlich noch die R2 Installationsdisketten rumfliegen haben. Das waren so um die 20 Stück wenn ich mich nicht irre. Man saß beim Kunden (OS/2 Rechner als Server) und hat dann Stück für Stück die Dinger reingehauen und hoffte, dass nicht Nr. 19 beschädigt ist.
Einmal war es dann soweit: Aber mit Notes Null Probleme: Eben mal ne Modemdatei gebastelt und die fehlende Diskette via Notenbuch vom Server geholt. Damals gab's leider noch kein Indernet (jedenfalls nicht hier).

Andreas

[koehlerbv]

Nö, 20 Disketten können das nicht gewesen sein. R3 hatte - ohne jetzt deswegen extra in den Keller gegangen zu sein - m.E. 5 Programm- und 8 Datendisketten. Oder so ...
Was mich nur immer wieder erstaunt, wie man "damals" ohne LotusScript etc. einsetzbare Anwendungen erstellen konnte, die den Leuten die Arbeit erleichtert haben ;-) Aber wir haben eben die @functions so lange vergewaltigt, bis doch was ging, nicht wahr ?  

Ciao,
Bernhard

[Glombi]

Genau, und dann hatte man glücklicherweise noch einen API Freak greifbar...
Bei Lotus gab's einen, der dann später die UDF entwickelt hatte. Und dann gab es noch Formula1, mit dem konnte man sogar andere Dokumente ändern (ohne Agenten). Tolle Sache das  
Das mit dem Disketten, mir kam es mehr vor. Aber egal....

Andreas

[nyen]

Es hat endlich funktioniert.

Ich danke vielmals für Eure Hilfe.

Grüße
Nyen