Beyond The Yellow Bubble

I have just added a new method to the DominoView class in the .Domino Framework that simulates the Edit\Copy Selected As Table functionality.  Instead of pasting the table onto the clipboard the method accepts a RichTextItem and inserts the table at the end of that rich text item.  In my case I am using this method to solve an application need for pasting selected rows into the body of an e-mail.

 '/**
 ' *  Copies the selected documents as a table inside a Rich text Item
 ' */ 
 Sub CopySelectedAsTable(Item As NotesRichTextItem)
  Dim Column    As NotesViewColumn     ' Specific column in view
  Dim ColumnIndex  As Integer          ' Index of the column being processed
  Dim Doc     As NotesDocument      ' Document being processed
  Dim DocEntry   As NotesViewEntry       ' View entry for column being processed
  Dim DocList    As NotesDocumentCollection   ' Selected documents
  Dim RowIndex   As Integer          ' Row in table being processed
  Dim RTNav    As NotesRichTextNavigator    ' Allows navigation within Rich Text Item containing table
  Dim TableStyle   As NotesRichTextParagraphStyle
  Dim TableStyles()  As NotesRichTextParagraphStyle ' Styles used to format table
  Dim ViewNav   As NotesViewNavigator    '  Navigation of view
  
Try:
'  On Error Goto Catch
  If (IUIView Is Nothing) Then Exit Sub
  Set DocList = iUIView.Documents
  If (DocList.Count = 0) Then Exit Sub  
  
' Create Empty Table using styles based upon view attributes
  
  Redim TableStyles(Ubound(iView.Columns)+1)
  Set TableStyles(0) = Session.CreateRichTextParagraphStyle()
  TableStyles(0).LeftMargin = 0
  TableStyles(0).FirstLineLeftMargin = 0
  TableStyles(0).RightMargin = 125
  For ColumnIndex% = 0 To Ubound(iView.Columns)
   Set Column = iView.Columns(ColumnIndex%)
   Set TableStyles(ColumnIndex%+1) = Session.CreateRichTextParagraphStyle()
   TableStyles(ColumnIndex%+1).LeftMargin = 0
   TableStyles(ColumnIndex%+1).FirstLineLeftMargin = 0
   TableStyles(ColumnIndex%+1).RightMargin = Column.Width * 125
  Next ColumnIndex%
  Call Item.AppendTable(DocList.Count+1,Ubound(iView.Columns)+2,,RULER_ONE_INCH,TableStyles)  ' Create empty table
  Set RTNav = Item.CreateNavigator()
  Set ViewNav = iView.CreateViewNav()
  
' Output view title to first row
  
  For ColumnIndex% = 0 To Ubound(iView.Columns)
   Call RTNav.FindNthElement(RTELEM_TYPE_TABLECELL,ColumnIndex%+2)
   Set Column = iView.Columns(ColumnIndex%)
   Call Item.BeginInsert(RTNav)
   Call Item.AppendText(Column.Title)
   Call Item.EndInsert()
  Next ColumnIndex%
  
' Output Data
  
  Set Doc = DocList.GetFirstDocument
  RowIndex% = 1
  While Not Doc Is Nothing
   Call RTNav.FindNthElement(RTELEM_TYPE_TABLECELL,RowIndex%*(Ubound(iView.Columns)+2)+1)
   Call Item.BeginInsert(RTNav)
   Call Item.AppendDocLink(Doc,"")
   Call Item.EndInsert()
   Set DocEntry = ViewNav.GetEntry(Doc)
   If (Not DocEntry Is Nothing) Then
    For ColumnIndex% = 0 To Ubound(DocEntry.ColumnValues)
     Call RTNav.FindNthElement(RTELEM_TYPE_TABLECELL,RowIndex%*(Ubound(iView.Columns)+2)+ColumnIndex%+2)
     Call Item.BeginInsert(RTNav)
     If Isarray(DocEntry.ColumnValues(ColumnIndex%)) Then 
      Call Item.AppendText(Join(DocEntry.ColumnValues(ColumnIndex%),","))
     Else
      Call Item.AppendText(DocEntry.ColumnValues(ColumnIndex%))
     End If
     Call Item.EndInsert()
    Next ColumnIndex%
   End If
   RowIndex% = RowIndex% + 1
   Set Doc = DocList.GetNextDocument(Doc)
  Wend
  Exit Sub
Catch:
  Stop
  ReportError iView
  Exit Sub
 End Sub

A popular way to fill that dull boring void between the last lotusphere and the next lotusphere is to make predictions about what the next lotusphere may contain.  Here are my predictions for lotusphere 2010.

1. Microsoft will kick the week off by announcing a kit for migrating from Lotus Connections/QUICKR to Sharepoint.  They will also proudly announce (by counting all the free licenses of Sharepoint distributed but never used) that they have a 90%+ share of the emerging collaboration market. Fortunately, the only people still believing this crap stuff will their own sales teams.
2. Sadly, attendance will be down due to the impact of a lingering global recession.  In a sign of the times the best attended vendor booth will be that of three formerly unemployed Notes developers who start up a new company that found a way to exploit Xpages to create a new Resume Posting and Notes job board.
3. The yellow bean bags will be back.  This time they will come with dedicated wireless routers so the blogs can get out of the building during the OGS.
4. The OGS vetting committee will find  a guest speaker who is both amusing and relevant to the conference.  Sadly the performance will be marred by lingering issues about the speakers 2008 tax returns...
5. Bob P will deliver yet another stirring speech at the 2009 OGS having overcome an earlier scandal when photos were released to the press showing him and Michael Phelps using a suspicious smoking device at Kimono's during LS09.
6. IBM will announce a realignment of the Websphere, Mashups,QUICKR, Connections portfolio in a bid to address customer confusion and disappointing sales.  At least one of these products will be folded into the others. There will be more announcement about integration between these products as well as Notes/SameTime and more alliances announced with the major players in the wider collaboration community.
7. IBM will use the OGS to announce that amongst its many new customer, the Whitehouse is switching back to Notes after being plagued during 2009 with on-going Exchange outages. Pres. Obama is quoted as loving the new XPages capabilities on his Blackberry.
8. IBM will use the OGS to announce their roadmap for Notes in 2010 and betond.  They will announce plans for Notes 8.6.0, 8.6.1 & 8.6.2.  The major new feature in Notes 8.6 will be a Notes client version of Xpages which did not make it into Notes 8.5 during  2009. The announcements will attract little interest as Ed Brill will have maintained is brilliant effort during 2009 of keeping the yellowsphere informed about most of this via his blog site.
9. One of the loudest cheers at the OGS will occur when IBM review their achievements for 2009 and remind us that the new LotusScript editor for Eclipse did actually get shipped.
10. The big news will be the announcement of XPages 2.0 as part of Notes 8.6. The product will be demoed for the first time and receive even more applause than the mention of the Eclipse LotusScript editor.  This new version will address some of the weaknesses in the initial Web client version of XPages and comparability issues encountered in making XPages work on the Notes client. The room will explode with cheers when it is announced this version of Xpages will support LotusScript for both Notes client events and all server events.
11. NSF2DB2 will officially inducted into the "league of the dark lords" alongside founding member Domino.Doc and Lotus Workflow.  (These are the products whose names shall not be spoken out loud).
12. The microphones at the "Ask The Developer" session will be sponsored by Lotus911.  Despite one of the microphones being for the exclusive use of Lotus911 employees Mr NTF (Nathan Freeman) will still dominate the other microphones. No-one will really care because they always ask great questions...
13. The lines outside of Kimonos will be longer than those outside the OGS with LS attendees skipping afternoon sessions to secure a spot at what is now the only place to be "seen" at LS..
14. At least one speaker/vendor will star when they show how XPages can be used to deliver QUICKR/Connections functionality in the Notes environment.
15. Symphony will have an increased presence with Lotus customers giving presentations on cool applications that have developed with Symphony using the new LotusScript programming capability.
16. IBM will finally disclose its plans for language development within Notes. JavaScript will be the sole option for thin client (Web/Mobile), both Java and LotusScript will be supported for thick client (Notes), and JavaScript, Java, and LotusScript will all be options for server sided scripts/agents. There will also be greater support for JavaScript, HTML, and CSS in the Notes client as part of Xpages 2.0.  IBM will indicate that major enhancements for LotusScript are underway to provide much needed support for OOP similar to Java, and Java will finally be supported on the client side. (OK this last one is more a wish than a prediction!!!).

Over the weekend I found time to release the latest beta of the .Domino Framework on the OpenNTF Web site.  All going well this will be the last beta before the 1.0 version is released in March.

The 0.7 Release contain a few structural changes to the framework and added a few extra features.  I have also updated the UI with some of the look and feel of the 8.5 Designer.

The 1.0 release is planned for the end of March.  At that time most of my consulting work will be with Notes/Domino 8.5. so this will be the last chance I have to provide a Notes 6.0 compatable framework. 

I will soon be starting work on a 2.0 version of the framework that builds on the many capabilities of Notes 6.5, 7.0, 8.0, and 8.5.  Yes, I know I said the .Domino Framework would never support 8.5!  I have found the 8.5 gold code to be the fastest and most stable of the 8.x releases.  And while I hate the 8.5 designer client there seems to be the promise that the new Lotuscript editor can be installed as an eclipse component onto the existing 8.5.0 designer client.  And I am sure IBM will eventually clean up the Designer client for all those "legacy" design elements such as forms, views, pages etc... The announcement of a Notes client version of XPages (along with Blackberry support for XPages and XPages for Quickr) is leading me to take a long hard look at XPages technology.  If Xpages is going to be more than just a Web development strategy then the world as we know it inside the yellow sphere is going to change BIG TIME....