Digital Developer Conference: a FREE half-day online conference focused on AI & Cloud – North America: Nov 2 – India: Nov 9 – Europe: Nov 14 – Asia Nov 23 Register now

Close outline
  • United States
IBM?
  • Site map
IBM?
  • Marketplace

  • Close
    Search
  • Sign in
    • Sign in
    • Register
  • IBM Navigation
IBM Developer Answers
  • Spaces
    • Blockchain
    • IBM Cloud platform
    • Internet of Things
    • Predictive Analytics
    • Watson
    • See all spaces
  • Tags
  • Users
  • Badges
  • FAQ
  • Help
Close

Name

Community

  • Learn
  • Develop
  • Connect

Discover IBM

  • ConnectMarketplace
  • Products
  • Services
  • Industries
  • Careers
  • Partners
  • Support
10.190.13.195

Refine your search by using the following advanced search options.

Criteria Usage
Questions with keyword1 or keyword2 keyword1 keyword2
Questions with a mandatory word, e.g. keyword2 keyword1 +keyword2
Questions excluding a word, e.g. keyword2 keyword1 -keyword2
Questions with keyword(s) and a specific tag keyword1 [tag1]
Questions with keyword(s) and either of two or more specific tags keyword1 [tag1] [tag2]
To search for all posts by a user or all posts with a specific tag, start typing and choose from the suggestion list. Do not use a plus or minus sign with a tag, e.g., +[tag1].
  • Ask a question

Need help modifying Notes 9.0.1 Mail Template.

270005CYYU gravatar image
Question by SimonB2018  (1) | Oct 15 at 02:54 AM dominonotesdomino-designer

Hello everyone,

We are using Crossware to append signatures to the bottom of all emails. The signatures work fine on the initial reply, but as emails continue to go back and forth, the signatures start to get appended to the entire email message, rather than at the reply.

Crossware provide a facility whereby you can search for a string of text in the mail, which can be used as a marker for the signature placement.

Having tested this on a reply form, using ---- reply from username ----..., it seems to work.

My issue now is implementing this into the design of the reply form.

So far, I have modified the postopen event as follows:

    Sub Postopen(Source As Notesuidocument)
     Dim session As New NotesSession
 If source.InPreviewPane Then Exit Sub
 Call cMemoObject.PostOpen(source)
 If source.editmode And Not (source.isnewdoc) Then
     Call cMemoObject.querymodechange(source)
     Call cMemoObject.postmodechange()
 End If
 

'refresh needed if orig. memo had follow up flag or if orig. memo was signed 'or if opening draft memo (for additional mail options)

 If (source.isnewdoc And source.document.getitemvalue("OrigSig")(0) = "1") Or (source.isnewdoc And source.document.getitemvalue("origStat")(0) <> "" And source.document.getitemvalue("enterCopyTo")(0) = "") Or   (Not source.isnewdoc And source.editmode) Or (source.IsNewDoc And source.Document.HasItem("DisplayCustExpDate") And source.document.getitemvalue("DisplayCustExpDate")(0) <> "") Then 
     Call source.refresh(False, False, True)
     Call source.gotofield("Body")        
         Call source.InsertText( "----- Reply from "+ session.CommonUserName+" -----" )    
     End If

 If (source.IsNewDoc) Then
     Call source.gotofield("Body")
     Call source.InsertText( "----- Reply from "+ session.CommonUserName+" -----" )    
 End If
 End Sub

The result produces ----- Reply from Username -----, with the cursor ending up at the end of this line.

However, what I would like to achieve is to have the cursor above the reply from text, to avoid users having to manually navigate to that position, as seen below :

Cursor here

----- Reply from Username-----

Can anyone suggest how I might achieve this or is there another way to achieve what I want to do ?

Many thanks.

People who like this

  0
Comment
10 |3000 characters needed characters left characters exceeded
  • Viewable by all users
  • Viewable by moderators
  • Viewable by moderators and the original poster

1 reply

  • Sort: 
270005CYYU gravatar image

Answer by SimonB2018 (1) | Oct 16 at 03:14 AM

I managed to make it work by modifying the above code as follows:

If (source.IsNewDoc) Then Call source.gotofield("Body") Call source.insertText(Chr(10)+Chr(10)+ "----- Reply from "+ session.CommonUserName+" -----" )
Call source.gotofield("Body")
End If

When implemented, the cursor appears two lines above the "---Reply from" text. However, one caveat is that I had to switch my person document to "Prefers MIME" as the incoming mail preference to get the signature to appear above the ---reply from---

Does anyone know if this is resolved in Notes / Domino 10 ?

Comment

People who like this

  0   Share
10 |3000 characters needed characters left characters exceeded
  • Viewable by all users
  • Viewable by moderators
  • Viewable by moderators and the original poster

Follow this question

184 people are following this question.

Answers

Answers & comments

Related questions

IBM Notes electronic signatures and the courts 2 Answers

User seems to have corrupt form design 3 Answers

Why does the Folder ACL not allow Directory Groups? 3 Answers

How to measure java agent memory use 1 Answer

Clarification on OriginalStartDate for an all day, recurring event in lotus notesnotes 1 Answer

  • Contact
  • Privacy
  • IBM Developer Terms of use
  • Accessibility
  • Report Abuse
  • Cookie Preferences

Powered by AnswerHub

Authentication check. Please ignore.
  • Anonymous
  • Sign in
  • Create
  • Ask a question
  • Spaces
  • API Connect
  • Analytic Hybrid Cloud Core
  • Application Performance Management
  • Appsecdev
  • BPM
  • Blockchain
  • Business Transaction Intelligence
  • CAPI
  • CAPI SNAP
  • CICS
  • Cloud Analytics
  • Cloud Automation
  • Cloud Object Storage
  • Cloud marketplace
  • Collaboration
  • Content Services (ECM)
  • Continuous Testing
  • Courses
  • Customer Experience Analytics
  • DB2 LUW
  • Data and AI
  • DataPower
  • Decision Optimization
  • DevOps Build
  • DevOps Services
  • Developers IBM MX
  • Digital Commerce
  • Digital Experience
  • Finance
  • Global Entrepreneur Program
  • Hadoop
  • Hybrid Cloud Core
  • Hyper Protect
  • IBM Cloud platform
  • IBM Design
  • IBM Forms Experience Builder
  • IBM Maximo Developer
  • IBM StoredIQ
  • IBM StoredIQ-Cartridges
  • IIDR
  • ITOA
  • InformationServer
  • Integration Bus
  • Internet of Things
  • Kenexa
  • Linux on Power
  • LinuxONE
  • MDM
  • Mainframe
  • Messaging
  • Node.js
  • ODM
  • Open
  • PartnerWorld Developer Support
  • PowerAI
  • PowerVC
  • Predictive Analytics
  • Product Insights
  • PureData for Analytics
  • Push
  • QRadar App Development
  • Run Book Automation
  • Search Insights
  • Security Core
  • Storage
  • Storage Core
  • Streamsdev
  • Supply Chain Business Network
  • Supply Chain Insights
  • Swift
  • UBX Capture
  • Universal Behavior Exchange
  • UrbanCode
  • WASdev
  • WSRR
  • Watson
  • Watson Campaign Automation
  • Watson Content Hub
  • Watson Marketing Insights
  • dW Answers Help
  • dW Premium
  • developerWorks Sandbox
  • developerWorks Team
  • Watson Health
  • More
  • Tags
  • Questions
  • Users
  • Badges