Hat schoma Jemand eine LN DB nach Quickr migriert?

[fsinani]

Hallo Freunde anforderungsfreier ergebnisoffener stets positiv bewerteter Arbeit 

Hab da mal nen Auftrag erhalten zu Testzwecken eine einfachste NotesDB zu einem Bereich migrieren. Der Bereich exisitert noch nicht und soll nur die DB ersetzen.

Die DB hat genau 2 Masken und unter 50 Felder. Weiterhin gibt es ca. 3 Ansichten. Überwiegend handelt es sich um Notesdokumente, in denen Autoren und Kategorien ausgewählt werden und in einem RTF ein Attachment hängt.


Frage:
- Jemand von Euch schon mal gemacht? Bitte auf eine Antwort verzichten ala (ganz bestimmt gibt es viele, die das schon mal gemacht haben o.ä.)
- wie seid Ihr vorgegangen. Vorbereitungen, Doing
- habt Ihr per Script  alle Dokumente automatische in den Bereichen erszeugt, oder alles manuell über den Connector?


Vorgabe:
Ich möchte die Notesdokumente mit den Attachments nicht als EML im Quickr haben. SOmit fällt eigentlich eine Maus-Verschiebe-Aktion auch weg :-)


Vielen Dank für Eure Tipps.


Gruß

fsinani

[elektron]

Hallo,

ich glaube nicht, dass Quickr das richtige Zielsystem ist.
Wenn (wie ich annehme) die Aufgabe lautet, eine Notesdatenbank webfähig zu machen,  solltest du das besser mit XPages angehen.

Gruss
Toralf

[fsinani]

Hi Toralf und Danke!

Nein, das ist tatsächlich nicht die Aufgabenstellung.

Das Ziel soll sein, eine recht statische NotesDB als Quickr Bereich abzubilden, um einfach mal mit der Nutzung von Quickr zu beginnen - in einem Testzeitraum soll dann herauskommen, ob das gut oder schlecht war, was wir getan haben.

Ganz sicher ist aber XPages für die Webfähigmachung einer DB die zuwählende Lösung.

Uns geht es jetzt erstmal darum, unser lizensiertes Quickr endlich mal zu benutzen :-)

[sral]

Hallo,

ich habe einen Agent, der Notes Teamroom Dokumenten in Lotus Quickr Dokumente speichert. Damit migiriere ich alte Teamräume nach Lotus Quickr.

Lars

[fsinani]

Hallo Lars,

vielen Dank für das "Angebot". Ich würde es gerne in Anspruch nehmen, befürchte jedoch, dass Teamroom Dokumente anders strukturiert sind, als Notesdokumente.

Ich stelle insgesamt fest, dass es eine blöde Idee ist, eine Notes DB (egal, wie wenig sie kann) 1zu1 in einen Quickplace zu migrieren.

Ich werde mir wohl zwingend Gedanken machen, welche Features von Quickr nützlich sind, um diese DB als Bereich abzubilden.
Dafür fehlt mir im Moment das Quickr Know-How.

Danke

[MacSpudik]

Hallo,

ich habe einen Agent, der Notes Teamroom Dokumenten in Lotus Quickr Dokumente speichert. Damit migiriere ich alte Teamräume nach Lotus Quickr.

Lars

Hallo Lars,

könntest Du den Agenten SourceCode o.ä. (dennoch) posten bzw. mir zukommen lassen.
Das wäre super. Danke

Grüße von
Sebastian

[sral]

Hallo zusammen,

hier die Anleitung zur Migration:

1. Im Notes Teamroom in der Maske "MainTopic" eine Aktion "Übernahme Quickr" erstellen mit folgenden Code:

Sub Click(Source As Button)
   Dim s As New NotesSession
   Dim Ws As New NotesUIWorkspace
   Dim Quickr As New NotesDatabase("Servername", "LotusQuickr/xxx/Main.nsf")
   Dim thisUiDoc As NotesUIDocument
   Dim thisDoc As NotesDocument
   Dim NewDoc As NotesDocument
   Dim SBody As NotesRichtextItem
   Dim TBody As NotesRichTextItem
   Dim Topics As String
   Dim n As Long
   
   Set thisUiDoc = Ws.CurrentDocument
   Set thisDoc = thisUiDoc.Document
   Set NewDoc = Quickr.CreateDocument
   NewDoc.Form = "h_PageUI"
   NewDoc.h_Name = thisDoc.Subject
   NewDoc.h_TextAbstract = thisDoc.Subject
   NewDoc.h_Originator = thisDoc.DocEditor
   NewDoc.h_Type = "0"
   NewDoc.h_Readers = Arrayappend( thisDoc.readers, Split( "[h_Managers]:[h_SuperUser]", ":" ) )
   NewDoc.h_IsPublished = "1"
   NewDoc.h_VersionType = "explicit"
   NewDoc.h_ShowVersionsTab = "1"
   NewDoc.h_ShowPageHeader = "1"
   NewDoc.h_ShowCommentsTab = "1"
   NewDoc.h_ShowAboutTab = "1"
   NewDoc.h_SetReadScene ="h_StdPageRead"
   NewDoc.h_SetErrorScene ="h_HaikuErrorAnimation"
   NewDoc.h_SetEditScene = "h_StdPageEdit"
   NewDoc.h_PageCmdStage = "h_After"
   NewDoc.h_PageCmd ="h_Publish"
   NewDoc.h_CurrentBgColor = "#e6e6e6"
   NewDoc.h_CurrentSkinName = "h_ModernPlusSkin"
   NewDoc.h_CurrentSkinType = "h_Edit"
   NewDoc.h_AbsoluteURLPart = "http://xxx.de/LotusQuickr/xxx/Main.nsf"
   NewDoc.h_Form = "30DF3123AEFAF358052567080016723D"
   
   For n = 2 To 4
      If thisDoc.GetItemValue("Subject" & Cstr(n))(0) <> "" Then
         If Topics <> "" Then
            Topics = Topics & "\"
         End If
         Topics = Topics & thisDoc.GetItemValue("Subject" & Cstr(n))(0)
      End If
   Next
   NewDoc.Topics = Topics
   Set SBody = thisDoc.GetFirstItem("Body")
   If Not(SBody Is Nothing) Then
      Set TBody = New NotesRichTextItem(NewDoc, "PageBody")
      Call TBody.AppendRTItem(SBody)
      Call TBody.Update
   End If
   Call Ws.EditDocument(True, NewDoc)
   Call thisUiDoc.Close(True)
End Sub

2. Im Quickr Teamroom die Maske "Page | QDK_h_Page" durch den Alias "h_PageUI" erweitern >>> "Page | h_PageUI | QDK_h_Page"

3. Im Notes Teamroom jedes Dokument öffnen und die Aktion "Übernahme Quickr" drücken >>> das neue Lotus Quickr Dokument mit STRG+ S speichern

4. Über den Quickr Connector alle neuen Dokumente in den Zeilordner verschieben

5. Im Lotus Quickr Teamroom ein Agent erstellen und über alle Dokumente in dem neuen Ordner ausführen lassen >>> damit die Dokument nicht unter Task angezeigt werden

FIELD h_TaskDueDate:= @DeleteField;
@True;
SELECT @All

Alle Angeben ohne Garantie :-)