home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 1999 September / PCW0999.ISO / Software / NotesR5 / edition / DATA1.CAB / DataFilesRequiredDataFiles / imapcl5.ntf (.txt) < prev    next >
Encoding:
Lotus Notes Storage Facility  |  1999-07-08  |  478.0 KB  |  4,183 lines
  1. Mail (IMAP)
  2. #1StdR50IMail
  3. $FolderInfo
  4. Inbox
  5. FOLDER_DIRECTORY_OBJECT
  6. $profile_013imail profile_
  7. #0|VF
  8. 0mZhQ
  9. CN=Shaun McGale/OU=DUB/O=Lotus
  10. 04/02/98 08:46:57 AM Teresa Deane/Iris updated [LocalDomainServers]
  11. 04/02/98 08:46:49 AM Teresa Deane/Iris updated [OtherDomainServers]
  12. 04/02/98 08:46:35 AM Teresa Deane/Iris updated -Default-
  13. 04/01/98 08:03:35 PM Teresa Deane/Iris added OtherDomainServers
  14. 04/01/98 08:03:28 PM Teresa Deane/Iris updated [OtherDomainServers]
  15. 04/01/98 08:03:23 PM Teresa Deane/Iris added [OtherDomainServers]
  16. 04/01/98 08:03:16 PM Teresa Deane/Iris updated [LocalDomainServers]
  17. 04/01/98 08:03:12 PM Teresa Deane/Iris added [LocalDomainServers]
  18. 04/01/98 08:03:04 PM Teresa Deane/Iris updated [-Default-]
  19. 04/01/98 08:03:00 PM Teresa Deane/Iris added [-Default-]
  20. 04/01/98 08:02:50 PM Teresa Deane/Iris updated LocalDomainServers
  21. 04/01/98 08:02:45 PM Teresa Deane/Iris added LocalDomainServers
  22. 04/01/98 08:02:37 PM Teresa Deane/Iris deleted Dave Delay/Iris
  23. 04/01/98 08:02:35 PM Teresa Deane/Iris updated -Default-
  24. 04/11/97 03:33:45 PM Dave Delay/Iris updated Dave Delay/Iris
  25. 04/11/97 03:33:45 PM Dave Delay/Iris added Dave Delay/Iris
  26. -Default-
  27. LocalDomainServers
  28. [-Default-]
  29. [LocalDomainServers]
  30. [OtherDomainServers]
  31. OtherDomainServers
  32. MailFS|MailFS
  33. CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Rob Shaver/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes#4Cde-DE7
  34. 00000116################################################
  35. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  36. TemplateNameTemplateNamede-DE
  37. 0000011E#############################
  38. HC34W
  39. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  40. dspDbTitledspDbTitlede-DEB
  41. 00000122################################
  42. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesdelete.GIF
  43. act_DELETE.GIFact_DELETEde-DE
  44. 0000014E########################
  45. de-DEP
  46. 00000126
  47. MemoMemoD
  48. BodySubjectBlindCopyToCopyToSendToEncryptSign$AutoSpellLogoFrom
  49. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesle/O
  50. CDU3wx
  51. EncryptSign1
  52. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  53. (Delivery Options)DeliveryOptionsde-DEg
  54. 00000132########################################
  55. ##########################################################
  56. ##########################################################
  57. ##########################################################
  58. ##########################################################
  59. ##########################################################
  60. ##########################################################
  61. ##########################################################
  62. ##########################################################
  63. ##########################################################
  64. ##########################################################
  65. ##########################################################
  66. ##########################################################
  67. ##########################################################
  68. ##########################################################
  69. ##########################################################
  70. ##########################################################
  71. ##########################################################
  72. $FolderInfo
  73. $1038    
  74. CN=Marc Zehngut/O=IrisCN=Mike Palone/O=IrisCN=Teresa Deane/O=IrisCN=Rob Slapikoff/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesY($FolderInfo)de-DE2    0
  75. 0000013A############################################
  76. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesfolder.GIF
  77. act_FOLDER.GIFact_FOLDERde-DE
  78. 0000015A########################
  79. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesde-DE
  80. 00000192################
  81. ##########################################################
  82. CN=Dave Delay/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesY($All Messages)R
  83. FromDateSubject$Conflict$REF
  84. Subject
  85. FromFromDateDateSubjectSubject&
  86. de-DE
  87. 00000136
  88. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesdelivery options.GIF
  89. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONSde-DE
  90. 00000152
  91. ##########################################################
  92. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesedit.GIF1
  93. act_EDIT.GIFact_EDITde-DE
  94. 00000156@
  95. ##########################################################
  96. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes###############################################
  97. C34WQ
  98. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  99. OutlineDisplayOutlineDisplayde-DE
  100. 0000011A########################
  101. $profile_013imail profile_ 
  102. CN=Shaun McGale/OU=DUB/O=Lotus
  103. ##########################################################
  104. ##########################################################
  105. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesaddress book.GIF
  106. act_ADDRESSBOOK.GIFact_ADDRESSBOOKde-DEe
  107. 00000146########
  108. #0|VF
  109. completed.GIF
  110. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes1
  111. act_completed.GIFact_CSCOMPLETEDde-DE
  112. 0000014A########
  113. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesforward.GIF
  114. act_FORWARD.GIFact_FORWARDde-DE
  115. 0000015E#####################
  116. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesnew mail.GIF
  117. act_NEWMEMO.GIFact_NEWMEMOde-DET
  118. 00000166####################
  119. ok.GIF
  120. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes1
  121. act_ok.GIFact_CSOKde-DEs
  122. 0000016A#############################
  123. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesreply.GIF
  124. act_REPLY.GIFact_REPLYde-DE
  125. 0000016E###########################
  126. ##########################################################
  127. ##########################################################
  128. ##########################################################
  129. ##########################################################
  130. ##########################################################
  131. insert signature.GIF
  132. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  133. act_INSERTSIG.GIFact_INSERTSIGde-DE6
  134. 00000162########
  135. 0mZhQ
  136. save.GIF
  137. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes1
  138. act_save.GIFact_CSSAVEde-DE
  139. 00000176#######################
  140. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notessend.GIF1
  141. act_SEND.GIFact_SENDde-DE
  142. 0000017A@
  143. ##########################################################
  144. ##########################################################
  145. ##########################################################
  146. ##########################################################
  147. ##########################################################
  148. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notessave as draft.GIF
  149. act_SAVEASDRAFT.GIFact_SAVEASDRAFTde-DE
  150. 00000172#######
  151. glacier.gif
  152. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  153. memoBG.gifmemoBG.gifde-DEN
  154. 00000182######################################################
  155. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesde-DE
  156. 00000196#################
  157. ##########################################################
  158. mail outline.gif
  159. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes34Ci
  160. ImapOutline.gifImapOutline.gifde-DE
  161. 0000017E############
  162. ##########################################################
  163. ##########################################################
  164. ##########################################################
  165. O=Lotus Notes
  166. O=Lotus Notes
  167. PURSAFO
  168. |.:#U
  169. O=Lotus Notes
  170. CN=Lotus Notes Template Development/O=Lotus Notes
  171. PURSAFO
  172. $ACLDigest
  173. PURSAFO
  174. $ViewX
  175. TemplateName|TemplateNameX
  176. NotesNavigatorNotesViewX
  177. OutlineDisplay
  178. Switcher
  179. dspDbTitle|dspDbTitleX
  180. NotesViewNotesPreviewX
  181. InboxX
  182. NotesPreview
  183. O=Lotus Notes
  184. O=Lotus Notes
  185. PURSAFO
  186. |.:#U
  187. O=Lotus Notes
  188. CN=Lotus Notes Template Development/O=Lotus Notes
  189. PURSAFO
  190. $TITLE
  191. $FrameSet
  192. $Language
  193. $LastBuildTime
  194. $BabelInfo
  195. Mail Picker
  196. ImapOutline.gif|ImapOutline.gifX
  197. MailOutline
  198. MailOutline
  199. O=Lotus Notes
  200. O=Lotus Notes
  201. PURSAFO
  202. |.:#U
  203. O=Lotus Notes
  204. CN=Lotus Notes Template Development/O=Lotus Notes
  205. PURSAFO
  206. $Info
  207. $$ScriptName
  208. $Background
  209. $Body
  210. $Language
  211. $LastBuildTime
  212. $BabelInfo
  213. Lotus Product
  214. Mail Title
  215. O=Lotus Notes
  216. O=Lotus Notes
  217. PURSAFO
  218. |.:#U
  219. O=Lotus Notes
  220. CN=Lotus Notes Template Development/O=Lotus Notes
  221. PURSAFO
  222. ZM=E%
  223. $Info
  224. $$Script_O
  225. $$ScriptName
  226. $Body
  227. $Language
  228. $LastBuildTime
  229. $BabelInfo
  230. Untitled
  231. O=Lotus Notes
  232. O=Lotus Notes
  233. PURSAFO
  234. |.:#U
  235. O=Lotus Notes
  236. CN=Lotus Notes Template Development/O=Lotus Notes
  237. PURSAFO
  238. $Info
  239. $WebFlags
  240. $$ScriptName
  241. $Body
  242. $Language
  243. $LastBuildTime
  244. $BabelInfo
  245. memoBG.gif|memoBG.gif
  246. HeaderRegion
  247. BodyRegion
  248. Neues Memo
  249. Subject
  250.     4S6S
  251. &Arial
  252. Times New Roman
  253. '++LotusScript Development Environment:2:5:(Options):0:74
  254. Option Public
  255. '++LotusScript Development Environment:2:5:(Forward):0:1
  256. Declare Sub Initialize
  257. '++LotusScript Development Environment:2:5:(Declarations):0:10
  258. Dim glbDraftsFolderName As String
  259. Dim glbSentFolderName As String
  260. Dim glbCurrentFolderName As String
  261. '++LotusScript Development Environment:2:2:Initialize:1:10
  262. Sub Initialize
  263.     Dim Sess As NotesSession
  264.     Dim Value As String
  265.     'Set Defaults for Drafts and Sent folders
  266.     glbDraftsFolderName = "Entw
  267.     glbSentFolderName = "Gesendet"
  268.     'Get overrides from NOTES.INI
  269.     Set Sess = New NotesSession
  270.     Value = Sess.GetEnvironmentString("IMAPDrafts")
  271.     If ( Value <> "" ) Then
  272.         glbDraftsFolderName = Value
  273.     End If
  274.     Value = Sess.GetEnvironmentString("IMAPSent")
  275.     If ( Value <> "" ) Then
  276.         glbSentFolderName = Value
  277.     End If
  278. End Sub
  279. Lotus Product
  280.  Memo'++LotusScript Development Environment:2:5:(Options):0:66
  281. '++LotusScript Development Environment:2:5:(Forward):0:1
  282. Declare Sub Postopen(Source As Notesuidocument)
  283. Declare Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  284. Declare Sub Initialize
  285. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  286. Declare Sub Postsave(Source As Notesuidocument)
  287. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  288. '++LotusScript Development Environment:2:5:(Declarations):0:2
  289. '++LotusScript Development Environment:2:2:BindEvents:1:129
  290. Private Sub BindEvents(Byval Objectname_ As String)
  291.     Static Source As NOTESUIDOCUMENT
  292.     Set Source = Bind(Objectname_)
  293.     On Event Postopen From Source Call Postopen
  294.     On Event Querymodechange From Source Call Querymodechange
  295.     On Event Querysave From Source Call Querysave
  296.     On Event Postsave From Source Call Postsave
  297.     On Event Queryopen From Source Call Queryopen
  298. End Sub
  299. '++LotusScript Development Environment:2:2:Postopen:1:12
  300. Sub Postopen(Source As Notesuidocument)
  301. End Sub
  302. '++LotusScript Development Environment:2:2:Querymodechange:1:12
  303. Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  304. End Sub
  305. '++LotusScript Development Environment:2:2:Initialize:1:10
  306. Sub Initialize
  307. End Sub
  308. '++LotusScript Development Environment:2:2:Querysave:1:12
  309. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  310. End Sub
  311. '++LotusScript Development Environment:2:2:Postsave:1:12
  312. Sub Postsave(Source As Notesuidocument)
  313.     Dim Note As NotesDocument
  314.     Dim TargetFolderName As String
  315.     Set Note = Source.Document
  316.     'Put the document in the current folder
  317.     Call Note.PutInFolder(glbCurrentFolderName)
  318.     'Determine target folder
  319.     TargetFolderName = Note.TmpFolder(0)
  320.     'Move the document to the target folder
  321.     If ( TargetFolderName <> ""  And  TargetFolderName <> glbCurrentFolderName ) Then
  322.         'Move it
  323.         Call Note.PutInFolder(TargetFolderName)
  324.         Call Note.RemoveFromFolder(glbCurrentFolderName)
  325.         'The following was an attempt to update the current folder.  Doesn't work in IMAP on-line
  326.         'mode because the collection behind the folder is not the right collection
  327.         'glbCurrentFolder.Refresh
  328.     End If
  329. End Sub
  330. '++LotusScript Development Environment:2:2:Queryopen:1:12
  331. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  332.     glbCurrentFolderName = Source.ParentViewName
  333. End Sub
  334. Lotus Product
  335. Hidden: 
  336. getLoc
  337.     1S2S
  338. getLoc
  339. getLoc
  340.     0R3S4S6S8S2E
  341. StdNotesLtr21
  342. Logoz
  343. $AutoSpell
  344. Signz
  345. Encrypt
  346. Encrypt
  347. Principal
  348. Principal
  349. Principal
  350. NamePreference
  351. AltFrom
  352. $LangFrom
  353. LanguagePreferencet
  354. AltFrom
  355.     1S2S3RTTTT4RTTTT5S7S8S9S10S12RTTTTT14TRTTTT15RTTTTT16RTTTTT19RTTTTT20S21S23RTTTTT24S25RTTTTTTT26RTTTTTTT28RTTTTTTTT30RTTTTTTT36RTTTTTTT38RTTTTTT40RTTTTT41RTTTTT42RTTTT
  356.     0RR1S2S8S
  357.     0R1S2S5S6S8S14S18S
  358.     0R1S2S5S6S8S14S18S
  359. SentBy
  360. X400FreeForm^
  361.     0RR1S2S5S6S8S10S11S12S14S15S16S17S18S20S21S22S24S26S
  362. SentBy
  363. FromDomain
  364. FromDomain
  365. FromDomain
  366. FromDomain
  367.     0RR7S10S13S14S18S20S23S24S26S28S29S30S36S39S43S46S52S
  368. FromName
  369. Principal
  370. Principal
  371. Principal
  372.     0RR1S2S10S11S16S18S
  373. FromStops
  374.     0RR1S2S6S
  375. FromName
  376. FromStops
  377. FromStops
  378. FromStops
  379.     0RR1S2S3S4S10S13S17S20StmpDisplayFrom_Previewz
  380. tmpDisplayFrom_Preview
  381.     Von:
  382. tmpDisplayFrom_Preview
  383. tmpDisplayFrom_NoLogo
  384. tmpDisplayFrom_NoLogo
  385. NamesList
  386. SendTo
  387. ImplodedNamesList
  388. NamesList
  389. ImplodedNamesList
  390. ImplodedNamesList
  391. ImplodedNamesList
  392. tmpDisplaySendTo
  393.     Thema:
  394. Subject
  395. Subject
  396. Subject
  397.     0S0E
  398. TmpDisplaySubject_1
  399.     Kopie:
  400. CC_Content
  401. CopyTo
  402. BCC_Content
  403. DeliveredDate
  404. BlindCopyTo
  405.  (Blindkopie: 
  406. BlindCopyTo
  407.     0R5S6S7S8S9S10S12S13S14S18S20S21S23S
  408. NamesList
  409. CC_Content
  410. BCC_Content
  411.     0R9S10S
  412. ImplodedNamesList
  413. NamesList
  414. ImplodedNamesList
  415. ImplodedNamesList
  416. ImplodedNamesList
  417. tmpDisplayCC
  418. tmpDisplayFrom_Preview
  419. DisplayFrom_Pre
  420. DisplayFrom_Pre
  421. $HideMailHeader
  422. Principal
  423. Principal
  424. Principal
  425. Principal
  426. Principal
  427.     4S5S9S10S11S12S13S14S19S20S24S26S27S31S33S34S37S38S40S41S45S47S48S52S
  428.     Gesendet von: 
  429. FromDomain
  430. FromDomain
  431. FromDomain
  432. FromDomain
  433.     4S10S14S21S24S32S33S36S37S39S41S42S43S49S52S56S59S64S
  434. FromName
  435.     0RR1S2S6S
  436. FromStops
  437.     0R1S2S6S
  438. FromName
  439. FromStops
  440. FromStops
  441. FromStops
  442.     0RR1S2S3S4S10S13S17S20StmpDisplaySentz
  443. tmpDisplaySent
  444. PostedDateh
  445. PostedDate
  446.     4S5S10S12S
  447. tmpDisplayDate_PreDatum/Uhrzeit, zu dem das Memo erstellt oder gesendet wurde.z
  448. tmpDisplayDate_Pre
  449. ReplyDate
  450. ReplyTo
  451. $HideMailHeader
  452.     2S3S4S5S6S7S9S10S14S15R
  453. Bitte antworten
  454. ReplyTo
  455. ReplyTo
  456. ReplyDate
  457.  bis 
  458. ReplyDate
  459.     1S2S5S6S8S10S11S12S19S20S23S24S26S28S29S30StmpDisplayReply
  460. tmpDisplayReply
  461. IsMailStationery
  462.     0S0E
  463.     Name der Vorlage:
  464. MAILSTATIONERYNAME
  465. -Unbenannt-
  466. MAILSTATIONERYNAME
  467.     0S0E
  468. Statioz
  469. Statio
  470. MemoGR.gif
  471. $HideMailHeader
  472.     0S0E
  473.         An:    
  474. SendTo
  475.         Kopie:    
  476. CopyTo
  477.         Kopie:    
  478. CC_Content
  479. CopyTo
  480.     1S2S
  481. BCC_Content
  482. BlindCopyTo
  483.  (Blindkopie: 
  484. BlindCopyTo
  485.     0R5S6S8S9S10S14S16S17S19S
  486. CC_Content
  487. BCC_Content
  488.     0R3S4S
  489. tmprCopyTo
  490.         Blindkopie:
  491. BlindCopyTo
  492.         Thema:    
  493. SIZE=50
  494. Subject
  495. Bodyz
  496. _Kategorisieren
  497. Dokument _bearbeiten
  498. Dokument _senden
  499. In Ordner _verschieben...
  500. Aus Ordner _entfernen
  501. Sendenb
  502. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  503.     0R7S9S
  504. Now save the message to the Sent folder
  505.     0RR1S
  506. tmpFolder
  507. IMAPSent
  508.     0R1S2S3S7S
  509.     0R7S9S
  510. act_SEND.GIF|act_SEND?
  511. Als Entwurf speichern
  512. Save the message to the Drafts folder
  513. tmpFolder
  514. IMAPDrafts
  515.     0R1S2S3S7S
  516.     0R7S9S
  517. act_SAVEASDRAFT.GIF|act_SAVEASDRAFT?
  518. _Weiterleiten
  519. act_FORWARD.GIF|act_FORWARD?
  520. schene 
  521.     0S0E
  522. act_DELETE.GIF|act_DELETE?
  523. Antwort\Antwortl.
  524. Reply
  525.     4S6S
  526. act_REPLY.GIF|act_REPLY?
  527. Antwort\Antwort mit Protokoll
  528. Antwort mit Protokoll
  529. Dieses Dokument ist nicht vollst
  530. ndig.
  531.     4S8S10S13S
  532. Reply with history
  533. act_REPLY.GIF|act_REPLY?
  534. Adresse... 
  535.     0S0E
  536. act_ADDRESSBOOK.GIF|act_ADDRESSBOOK?
  537. Zustelloptionen...
  538. DeliveryOptions
  539. Zustelloptionen
  540.     4S5S6S7S8S10S
  541. act_DELIVERYOPTIONS.GIF|act_DELIVERYOPTIONS?
  542. _Kategorisieren
  543. Dokument _bearbeiten
  544. Dokument _senden
  545. In Ordner _verschieben...
  546. Aus Ordner _entfernen
  547. Sendenb
  548. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  549.     0R7S9S
  550. Now save the message to the Sent folder
  551.     0RR1S
  552. tmpFolder
  553. IMAPSent
  554.     0R1S2S3S7S
  555.     0R7S9S
  556. Als Entwurf speichern
  557. Save the message to the Drafts folder
  558. tmpFolder
  559. IMAPDrafts
  560.     0R1S2S3S7S
  561.     0R7S9S
  562. _Weiterleiten
  563. schen7 
  564.     0S0E
  565. Antwort\Antwort
  566. Reply
  567.     4S6S
  568. Antwort\Antwort mit Protokoll
  569. Antwort mit Protokoll
  570. Dieses Dokument ist nicht vollst
  571. ndig.
  572.     4S8S10S13S
  573. Reply with history
  574. Adresse... 
  575.     0S0E
  576. Zustelloptionen...
  577. DeliveryOptions
  578. Zustelloptionen
  579.     4S5S6S7S8S10S
  580. O=Lotus Notes
  581. O=Lotus Notes
  582. PURSAFO
  583. |.:#U
  584. O=Lotus Notes
  585. CN=Lotus Notes Template Development/O=Lotus Notes
  586. PURSAFO
  587. ComposedDate
  588. PostedDate
  589. $Language
  590. $LastBuildTime
  591. $BabelInfo
  592. $BackgroundR5
  593. $HeaderArea
  594. $RegionFrameset
  595. $Info
  596. $WindowTitle
  597. $Script
  598. $$Script_O
  599. $$ScriptName
  600. $$FormScript
  601. $$$FormScript_O
  602. $Body
  603. $V5ACTIONS
  604. $ACTIONS
  605. ComposedDate
  606. Poste
  607. memoBG.gif|memoBG.gif
  608. HeaderRegion
  609. BodyRegion
  610. Neues Memo
  611. Subject
  612.     4S6S
  613. &Arial
  614. Times New Roman
  615. '++LotusScript Development Environment:2:5:(Options):0:74
  616. Option Public
  617. '++LotusScript Development Environment:2:5:(Forward):0:1
  618. Declare Sub Initialize
  619. '++LotusScript Development Environment:2:5:(Declarations):0:10
  620. Dim glbDraftsFolderName As String
  621. Dim glbSentFolderName As String
  622. Dim glbCurrentFolderName As String
  623. '++LotusScript Development Environment:2:2:Initialize:1:10
  624. Sub Initialize
  625.     Dim Sess As NotesSession
  626.     Dim Value As String
  627.     'Set Defaults for Drafts and Sent folders
  628.     glbDraftsFolderName = "Entw
  629.     glbSentFolderName = "Gesendet"
  630.     'Get overrides from NOTES.INI
  631.     Set Sess = New NotesSession
  632.     Value = Sess.GetEnvironmentString("IMAPDrafts")
  633.     If ( Value <> "" ) Then
  634.         glbDraftsFolderName = Value
  635.     End If
  636.     Value = Sess.GetEnvironmentString("IMAPSent")
  637.     If ( Value <> "" ) Then
  638.         glbSentFolderName = Value
  639.     End If
  640. End Sub
  641. Lotus Product
  642.  Reply'++LotusScript Development Environment:2:5:(Options):0:66
  643. '++LotusScript Development Environment:2:5:(Forward):0:1
  644. Declare Sub Postopen(Source As Notesuidocument)
  645. Declare Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  646. Declare Sub Initialize
  647. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  648. Declare Sub Postsave(Source As Notesuidocument)
  649. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  650. '++LotusScript Development Environment:2:5:(Declarations):0:2
  651. '++LotusScript Development Environment:2:2:BindEvents:1:129
  652. Private Sub BindEvents(Byval Objectname_ As String)
  653.     Static Source As NOTESUIDOCUMENT
  654.     Set Source = Bind(Objectname_)
  655.     On Event Postopen From Source Call Postopen
  656.     On Event Querymodechange From Source Call Querymodechange
  657.     On Event Querysave From Source Call Querysave
  658.     On Event Postsave From Source Call Postsave
  659.     On Event Queryopen From Source Call Queryopen
  660. End Sub
  661. '++LotusScript Development Environment:2:2:Postopen:1:12
  662. Sub Postopen(Source As Notesuidocument)
  663. End Sub
  664. '++LotusScript Development Environment:2:2:Querymodechange:1:12
  665. Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
  666. End Sub
  667. '++LotusScript Development Environment:2:2:Initialize:1:10
  668. Sub Initialize
  669. End Sub
  670. '++LotusScript Development Environment:2:2:Querysave:1:12
  671. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  672. End Sub
  673. '++LotusScript Development Environment:2:2:Postsave:1:12
  674. Sub Postsave(Source As Notesuidocument)
  675.     Dim Note As NotesDocument
  676.     Dim TargetFolderName As String
  677.     Set Note = Source.Document
  678.     'Put the document in the current folder
  679.     Call Note.PutInFolder(glbCurrentFolderName)
  680.     'Determine target folder
  681.     TargetFolderName = Note.TmpFolder(0)
  682.     'Move the document to the target folder
  683.     If ( TargetFolderName <> ""  And  TargetFolderName <> glbCurrentFolderName ) Then
  684.         'Move it
  685.         Call Note.PutInFolder(TargetFolderName)
  686.         Call Note.RemoveFromFolder(glbCurrentFolderName)
  687.         'The following was an attempt to update the current folder.  Doesn't work in IMAP on-line
  688.         'mode because the collection behind the folder is not the right collection
  689.         'glbCurrentFolder.Refresh
  690.     End If
  691. End Sub
  692. '++LotusScript Development Environment:2:2:Queryopen:1:12
  693. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  694.     If Not Isempty(Source.ParentViewName)  Then
  695.         glbCurrentFolderName = Source.ParentViewName
  696.     Else
  697.         glbCurrentFolderName = "Inbox"
  698.     End If
  699. End Sub
  700. Lotus Product
  701. Hidden:
  702. Principal
  703. Principal
  704. Principal
  705. Fromh
  706.     1S2S8S9S10S11S13S15S20S22S
  707. FromDomainh
  708. FromDomain"
  709.     0R7S8S9S10S11S13SInheritedFrom
  710. InheritedFrom
  711. Subject
  712. InheritedSubject
  713. getLoc
  714.     1S2S
  715. getLoc
  716. getLoc
  717.     0R3S4S6S8S2E
  718. Notes
  719. PostedDateh
  720. NamePreference
  721. AltSendTo
  722. AltSendTo
  723. AltCopyTo
  724. SendTo
  725. CopyTo
  726. InheritedSendTo
  727. SendTo
  728. CopyTo
  729.     9S10S12S13S30S31S36S37S39S41SInheritedSendTo
  730. InheritedSendTo
  731. Notes
  732. PostedDateh
  733. ReplyTo
  734. ReplyTo
  735.     9S10S12S13SInheritedReplyToz
  736. InheritedReplyTo
  737. Notes
  738. PostedDateh
  739. FromDomain
  740. InheritedFromDomain
  741. FromDomain
  742.     9S10S12S13SInheritedFromDomain
  743. InheritedFromDomain
  744. StdNotesLtr21
  745. Logoz
  746. Principal
  747. Principal
  748. Principal
  749. NamePreference
  750. AltFrom
  751. $LangFrom
  752. LanguagePreferencet
  753. AltFrom
  754.     1S2S3RTTTT4RTTTT5S7S8S9S10S12RTTTTT14TRTTTT15RTTTTT16RTTTTT19RTTTTT20S21S23RTTTTT24S25RTTTTTTT26RTTTTTTT28RTTTTTTTT30RTTTTTTT36RTTTTTTT38RTTTTTT40RTTTTT41RTTTTT42RTTTT
  755.     0RR1S2S8S
  756.     0R1S2S5S6S8S14S18S
  757.     0R1S2S5S6S8S14S18S
  758. SentBy
  759. X400FreeForm^
  760.     0RR1S2S5S6S8S10S11S12S14S15S16S17S18S20S21S22S24S26S
  761. SentBy
  762. FromDomain
  763. FromDomain
  764. FromDomain
  765. FromDomain
  766.     0RR7S10S13S14S18S20S23S24S26S28S29S30S36S39S43S46S52S
  767. FromName
  768. Principal
  769. Principal
  770. Principal
  771.     0RR1S2S10S11S16S18S
  772. FromStops
  773.     0RR1S2S6S
  774. FromName
  775. FromStops
  776. FromStops
  777. FromStops
  778.     0RR1S2S3S4S10S13S17S20StmpDisplayFrom_Previewz
  779. tmpDisplayFrom_Preview
  780.     0S0E
  781. Signz
  782.     0S0E
  783. Encrypt
  784. Encrypt
  785. $AutoSpell
  786.     Von:
  787. tmpDisplayFrom_Preview
  788. tmpDisplayFrom_NoLogo
  789. tmpDisplayFrom_NoLogo
  790. NamesList
  791. SendTo
  792. ImplodedNamesList
  793. NamesList
  794. ImplodedNamesList
  795. ImplodedNamesList
  796. ImplodedNamesList
  797. tmpDisplaySendTo
  798.     Thema:
  799. Subject
  800. Subject
  801. Subject
  802.     0S0E
  803. TmpDisplaySubject_1
  804.     Kopie:
  805. CC_Content
  806. CopyTo
  807. BCC_Content
  808. DeliveredDate
  809. BlindCopyTo
  810.  (Blindkopie: 
  811. BlindCopyTo
  812.     0R5S6S7S8S9S10S12S13S14S18S20S21S23S
  813. NamesList
  814. CC_Content
  815. BCC_Content
  816.     0R9S10S
  817. ImplodedNamesList
  818. NamesList
  819. ImplodedNamesList
  820. ImplodedNamesList
  821. ImplodedNamesList
  822. tmpDisplayCC
  823. tmpDisplayFrom_Preview
  824. DisplayFrom_Pre
  825. DisplayFrom_Pre
  826. $HideMailHeader
  827. Principal
  828. Principal
  829. Principal
  830. Principal
  831. Principal
  832.     4S5S9S10S11S12S13S14S19S20S24S26S27S31S33S34S37S38S40S41S45S47S48S52S
  833.     Gesendet von: 
  834. FromDomain
  835. FromDomain
  836. FromDomain
  837. FromDomain
  838.     4S10S14S21S24S32S33S36S37S39S41S42S43S49S52S56S59S64S
  839. FromName
  840.     0RR1S2S6S
  841. FromStops
  842.     0R1S2S6S
  843. FromName
  844. FromStops
  845. FromStops
  846. FromStops
  847.     0RR1S2S3S4S10S13S17S20StmpDisplaySentz
  848. tmpDisplaySent
  849. PostedDateh
  850. PostedDate
  851.     4S5S10S12S
  852. tmpDisplayDate_PreDatum/Uhrzeit, zu dem das Memo erstellt oder gesendet wurde.z
  853. tmpDisplayDate_Pre
  854. ReplyDate
  855. ReplyTo
  856. $HideMailHeader
  857.     2S3S4S5S6S7S9S10S14S15R
  858. Bitte antworten
  859. ReplyTo
  860. ReplyTo
  861. ReplyDate
  862.  bis 
  863. ReplyDate
  864.     1S2S5S6S8S10S11S12S19S20S23S24S26S28S29S30StmpDisplayReply
  865. tmpDisplayReply
  866. MemoGR.gif
  867. $HideMailHeader
  868.     0S0E
  869.         An:    
  870. MailAddress
  871. InheritedFrom
  872.     1S2S
  873. MailAddress
  874. SendTo}
  875.     0S0E
  876. SendTo
  877.         Kopie:    
  878. CopyTo
  879.     0S0E
  880. CopyTo}
  881.     0S0E
  882. CopyTo
  883.         Kopie:    
  884. CC_Content
  885. CopyTo
  886.     0S0E
  887. BCC_Content
  888. BlindCopyTo
  889.  (Blindkopie: 
  890. BlindCopyTo
  891.     0R5S6S8S9S10S14S16S17S19S
  892. CC_Content
  893. BCC_Content
  894.     0R3S4S
  895. tmpCopyTo
  896.         Blindkopie:
  897. BlindCopyTo
  898.     0S0E
  899. BlindCopyTo
  900.     0S0E
  901. BlindCopyTo
  902.         Thema:    
  903. SIZE=50
  904. Subject
  905. Topic
  906. Subject
  907.     1S2S5S6S8S10S
  908. ANTWORT
  909. Antwort: 
  910. Subj"
  911.     0R10S12S16S17S19S21S22S23S
  912. Subject
  913.         Thema:    
  914. Subject
  915. tmpDisplaySubject
  916. Bodyz
  917. _Kategorisieren
  918. Dokument _bearbeiten
  919. Dokument _senden
  920. In Ordner _verschieben...e
  921. Aus Ordner _entfernen
  922. Sendenb
  923. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  924.     0R7S9S
  925. Now save the message to the Sent folder
  926.     0RR1S
  927. tmpFolder
  928. IMAPSent
  929.     0R1S2S3S7S
  930.     0R7S9S
  931. act_SEND.GIF|act_SEND?
  932. Als Entwurf speichern
  933. Save the message to the Drafts folder
  934. tmpFolder
  935. IMAPDrafts
  936.     0R1S2S3S7S
  937.     0R7S9S
  938. act_SAVEASDRAFT.GIF|act_SAVEASDRAFT?
  939. _Weiterleitent
  940. act_FORWARD.GIF|act_FORWARD?
  941. schen
  942.     0S0E
  943. act_DELETE.GIF|act_DELETE?
  944. Antwort\Antwort
  945. Reply
  946.     4S6S
  947. act_REPLY.GIF|act_REPLY?
  948. Antwort\Antwort mit Protokoll
  949. Antwort mit Protokoll
  950. Dieses Dokument ist nicht vollst
  951. ndig.
  952.     4S8S10S13S
  953. Reply with history
  954. act_REPLY.GIF|act_REPLY?
  955. Allen antworten`'++LotusScript Development Environment:2:5:(Options):0:74
  956. Option Declare
  957. '++LotusScript Development Environment:2:5:(Forward):0:1
  958. Declare Sub Click(Source As Button)
  959. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  960. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  961. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  962. '++LotusScript Development Environment:2:5:(Declarations):0:2
  963. '++LotusScript Development Environment:2:2:BindEvents:1:129
  964. Private Sub BindEvents(Byval Objectname_ As String)
  965.     Static Source As BUTTON
  966.     Set Source = Bind(Objectname_)
  967.     On Event Click From Source Call Click
  968. End Sub
  969. '++LotusScript Development Environment:2:2:Click:1:12
  970. Sub Click(Source As Button)
  971.     Dim session As New notessession
  972.     Dim uiwork As New notesuiworkspace
  973.     Dim uidoc As notesuidocument
  974.     Dim note As notesdocument
  975.     Dim vInheritedSendTo As Variant
  976.     Dim vRealInheritedSendTo As Variant
  977.     Dim iSenderIndex As Integer
  978.     Dim x As Integer
  979.     Dim strOwner As String
  980.     Dim strInheritedDomain As String
  981.     Set uidoc = uiwork.currentdocument
  982.     Set note = uidoc.document
  983.     strOwner = session.username
  984.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  985.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  986.     ' Remove the sender from the list
  987.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  988.     If (iSenderIndex >= 0) Then
  989.         vInheritedSendTo(iSenderIndex) = ""
  990.     End If        
  991.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  992.     ' Append the inheritedfromdomain
  993.     If Len(strInheritedDomain) Then
  994.         For x = 0 To Ubound(vRealInheritedSendTo)
  995.             If Not vRealInheritedSendTo(x) = "" Then
  996.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  997.             End If
  998.         Next
  999.     End If
  1000.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  1001.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  1002.     ' Find all addresses without a domain and append FromDomain
  1003.     ' Find all addresses whose domain is the same as ours and strip it off
  1004. End Sub
  1005. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  1006. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  1007.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  1008. %END REM 
  1009.     Dim x As Integer
  1010.     Dim iNames As Integer
  1011.     NAMEFindInList = -1
  1012.     If Isempty(vListOfNames) Then
  1013.         Exit Function
  1014.     End If
  1015.     If Isarray(vListOfNames) Then
  1016.         iNames = Ubound(vListOfNames)
  1017.         For x = 0 To iNames
  1018.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  1019.                 NAMEFindInList = x
  1020.                 Exit Function
  1021.             End If
  1022.         Next
  1023.     Else
  1024.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  1025.     End If
  1026. End Function
  1027. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  1028. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  1029.     Returns true if two names are equal, False otherwise
  1030. %END REM
  1031.     Dim sCanName1 As String
  1032.     Dim sDomainName1 As String
  1033.     Dim sCanName2 As String
  1034.     Dim sDomainName2 As String
  1035.     Dim nLenName1 As Integer
  1036.     Dim nLenName2 As Integer
  1037.     Dim name1 As NotesName
  1038.     Dim name2 As NotesName
  1039.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  1040.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  1041.     Set name1 = New NotesName(sCanName1)
  1042.     Set name2 = New NotesName(sCanName2)
  1043.     ' Do a canonical comparison if both names are hierarchical
  1044.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  1045.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  1046.             NAMECompare = True
  1047.             Exit Function
  1048.         Else
  1049.             Exit Function        
  1050.         End If
  1051.     End If
  1052.      ' Compare the common names
  1053.     If (Strcompare(name1.common, name2.common) = 0) Then
  1054.         NAMECompare = True
  1055.         Exit Function
  1056.     End If
  1057.     NAMECompare = False
  1058. End Function
  1059. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  1060. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  1061.     Dim nameUser As NotesName
  1062.     Set nameUser = New NotesName(sUsername) 
  1063.     If Instr(sUserName,"@") Then
  1064.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  1065.         sRetDomain = Strright(nameUser.abbreviated,"@")
  1066.     Else
  1067.         sRetAbbreviatedName = nameUser.abbreviated
  1068.         sRetDomain = ""
  1069.     End If
  1070. End Sub
  1071. act_REPLY.GIF|act_REPLY?
  1072. Adresse... 
  1073.     0S0E
  1074. act_ADDRESSBOOK.GIF|act_ADDRESSBOOK?
  1075. Zustelloptionen...
  1076. DeliveryOptions
  1077. Zustelloptionen
  1078.     4S5S6S7S8S10S
  1079. act_DELIVERYOPTIONS.GIF|act_DELIVERYOPTIONS?
  1080. _Kategorisieren
  1081. Dokument _bearbeiten
  1082. Dokument _senden
  1083. In Ordner _verschieben...
  1084. Aus Ordner _entfernenT
  1085. Sendenb
  1086. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  1087.     0R7S9S
  1088. Now save the message to the Sent folder
  1089.     0RR1S
  1090. tmpFolder
  1091. IMAPSent
  1092.     0R1S2S3S7S
  1093.     0R7S9S
  1094. Als Entwurf speichern
  1095. Save the message to the Drafts folder
  1096. tmpFolder
  1097. IMAPDrafts
  1098.     0R1S2S3S7S
  1099.     0R7S9S
  1100. _Weiterleiten
  1101. schen7 
  1102.     0S0E
  1103. Antwort\Antwort
  1104. Reply
  1105.     4S6S
  1106. Antwort\Antwort mit Protokoll
  1107. Antwort mit Protokoll
  1108. Dieses Dokument ist nicht vollst
  1109. ndig.
  1110.     4S8S10S13S
  1111. Reply with history
  1112. Allen antworten
  1113. '++LotusScript Development Environment:2:5:(Options):0:74
  1114. Option Declare
  1115. '++LotusScript Development Environment:2:5:(Forward):0:1
  1116. Declare Sub Click(Source As Button)
  1117. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  1118. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  1119. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  1120. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1121. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1122. Private Sub BindEvents(Byval Objectname_ As String)
  1123.     Static Source As BUTTON
  1124.     Set Source = Bind(Objectname_)
  1125.     On Event Click From Source Call Click
  1126. End Sub
  1127. '++LotusScript Development Environment:2:2:Click:1:12
  1128. Sub Click(Source As Button)
  1129.     Dim session As New notessession
  1130.     Dim uiwork As New notesuiworkspace
  1131.     Dim uidoc As notesuidocument
  1132.     Dim note As notesdocument
  1133.     Dim vInheritedSendTo As Variant
  1134.     Dim vRealInheritedSendTo As Variant
  1135.     Dim iSenderIndex As Integer
  1136.     Dim x As Integer
  1137.     Dim strOwner As String
  1138.     Dim strInheritedDomain As String
  1139.     Set uidoc = uiwork.currentdocument
  1140.     Set note = uidoc.document
  1141.     strOwner = session.username
  1142.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  1143.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  1144.     ' Remove the sender from the list
  1145.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  1146.     If (iSenderIndex >= 0) Then
  1147.         vInheritedSendTo(iSenderIndex) = ""
  1148.     End If        
  1149.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  1150.     ' Append the inheritedfromdomain
  1151.     If Len(strInheritedDomain) Then
  1152.         For x = 0 To Ubound(vRealInheritedSendTo)
  1153.             If Not vRealInheritedSendTo(x) = "" Then
  1154.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  1155.             End If
  1156.         Next
  1157.     End If
  1158.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  1159.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  1160.     ' Find all addresses without a domain and append FromDomain
  1161.     ' Find all addresses whose domain is the same as ours and strip it off
  1162. End Sub
  1163. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  1164. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  1165.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  1166. %END REM 
  1167.     Dim x As Integer
  1168.     Dim iNames As Integer
  1169.     NAMEFindInList = -1
  1170.     If Isempty(vListOfNames) Then
  1171.         Exit Function
  1172.     End If
  1173.     If Isarray(vListOfNames) Then
  1174.         iNames = Ubound(vListOfNames)
  1175.         For x = 0 To iNames
  1176.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  1177.                 NAMEFindInList = x
  1178.                 Exit Function
  1179.             End If
  1180.         Next
  1181.     Else
  1182.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  1183.     End If
  1184. End Function
  1185. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  1186. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  1187.     Returns true if two names are equal, False otherwise
  1188. %END REM
  1189.     Dim sCanName1 As String
  1190.     Dim sDomainName1 As String
  1191.     Dim sCanName2 As String
  1192.     Dim sDomainName2 As String
  1193.     Dim nLenName1 As Integer
  1194.     Dim nLenName2 As Integer
  1195.     Dim name1 As NotesName
  1196.     Dim name2 As NotesName
  1197.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  1198.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  1199.     Set name1 = New NotesName(sCanName1)
  1200.     Set name2 = New NotesName(sCanName2)
  1201.     ' Do a canonical comparison if both names are hierarchical
  1202.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  1203.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  1204.             NAMECompare = True
  1205.             Exit Function
  1206.         Else
  1207.             Exit Function        
  1208.         End If
  1209.     End If
  1210.      ' Compare the common names
  1211.     If (Strcompare(name1.common, name2.common) = 0) Then
  1212.         NAMECompare = True
  1213.         Exit Function
  1214.     End If
  1215.     NAMECompare = False
  1216. End Function
  1217. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  1218. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  1219.     Dim nameUser As NotesName
  1220.     Set nameUser = New NotesName(sUsername) 
  1221.     If Instr(sUserName,"@") Then
  1222.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  1223.         sRetDomain = Strright(nameUser.abbreviated,"@")
  1224.     Else
  1225.         sRetAbbreviatedName = nameUser.abbreviated
  1226.         sRetDomain = ""
  1227.     End If
  1228. End Sub
  1229. Adresse... 
  1230.     0S0E
  1231. Zustelloptionen...
  1232. DeliveryOptions
  1233. Zustelloptionen
  1234.     4S5S6S7S8S10S
  1235. Lotus Product
  1236. ^8    +t
  1237. ^H    +t
  1238. #KH    -
  1239. #KH    -
  1240. O=Lotus Notes
  1241. O=Lotus Notes
  1242. PURSAFO
  1243. |.:#U
  1244. O=Lotus Notes
  1245. CN=Lotus Notes Template Development/O=Lotus Notes
  1246. PURSAFO
  1247. ComposedDate
  1248. $Language
  1249. $LastBuildTime
  1250. $BabelInfo
  1251. $BackgroundR5
  1252. $HeaderArea
  1253. $RegionFrameset
  1254. $Info
  1255. $WindowTitle
  1256. $Script
  1257. $$Script_O
  1258. $$ScriptName
  1259. $$FormScript
  1260. $$$FormScript_O
  1261. $Body
  1262. $V5ACTIONS
  1263. $ACTIONS
  1264. $SCRIPTOBJ_11
  1265. ComposedDa
  1266. $ACLDigest$Signature$UpdatedBy$Name$TITLE$Flags$FrameSet$Language$LastBuildTime$BabelInfo$Info$$ScriptName$Body$Background$$Script_O$WebFlagsComposedDatePostedDateDate$BackgroundR5$HeaderArea$RegionFrameset$Fonts$$$FormScript_OFromLogo$AutoSpellSignEncryptSendToCopyToBlindCopyToSubjectBody$Fields$WindowTitle$ACTIONS$V5ACTIONS$Script$$FormScriptInheritedFromInheritedSubjectInheritedSendToInheritedReplyToInheritedFromDomain$SCRIPTOBJ_11$SubForms$SCRIPTOBJ_21$SCRIPTOBJ_25$SCRIPTOBJ_29$SCRIPTOBJ_30$SCRIPTOBJ_31$SCRIPTOBJ_36$SCRIPTOBJ_37$Babel_TagsDueDateTimeReplyDateExpireDate$PublicAccess$Formula$Index$Collation$Collation1$Collation2$FormulaClass$ViewFormat$ViewGlobalScript_O$Collation3$Collation4$Collation5$ViewScript_O$ViewScript$ViewGlobalScript$ImagesWide$ImagesHigh$ImagesColorize$ImageNames$ImageData$SiteMapList$DefaultFrameset$FlagsNoRefreshIconBitmap$SCRIPTOBJ_5$DesignVersion$Version$Collection$ViewContainer$FolderObject$FolderIDTable$NoPurgeIMailProxyType$Revisions
  1267. FComic Sans MS
  1268.  DeliveryOptions
  1269. '++LotusScript Development Environment:2:5:(Options):0:66
  1270. Option Public
  1271. '++LotusScript Development Environment:2:5:(Forward):0:1
  1272. Declare Class INIPreference
  1273. '++LotusScript Development Environment:2:5:(Declarations):0:10
  1274. Dim SecurityPreferences As INIPreference
  1275. Class INIPreference
  1276.     Private session As notessession
  1277.     Private note As notesdocument
  1278.     Private lngCurrentINISettings As Long
  1279.     Private nINISignSentMail As Integer
  1280.     Private nINIEncryptSentMail As Integer
  1281.     Private nINIEncryptSavedMail As Integer
  1282.     Private nUpdateINI As Integer    
  1283.     Private SIGN_SENT_MAIL As Long
  1284.     Private ENCRYPT_SENT_MAIL As Long
  1285.     Private ENCRYPT_SAVED_MAIL As Long
  1286. Declare Public Function Close()
  1287.     Sub New(hNote As notesdocument)
  1288.         Set Me.session = New notessession
  1289.         Set Me.note = hNote
  1290.         Me.SIGN_SENT_MAIL             = &h1000&        ' 4096
  1291.         Me.ENCRYPT_SENT_MAIL     = &h2000&        '  8192
  1292.         Me.ENCRYPT_SAVED_MAIL     = &h100000&    ' 1048576
  1293.         Me.lngCurrentINISettings = Me.session.Getenvironmentvalue("Preferences", True)
  1294.         If Me.lngCurrentINISettings And Me.SIGN_SENT_MAIL Then
  1295.             Me.nINISignSentMail = 1
  1296.         Else
  1297.             Me.nINISignSentMail = 0
  1298.         End If
  1299.         If Me.lngCurrentINISettings And Me.ENCRYPT_SENT_MAIL Then
  1300.             Me.nINIEncryptSentMail = 1
  1301.         Else
  1302.             Me.nINIEncryptSentMail = 0
  1303.         End If
  1304.         If Me.lngCurrentINISettings And Me.ENCRYPT_SAVED_MAIL Then
  1305.             Me.nINIEncryptSavedMail = 1
  1306.         Else        
  1307.             Me.nINIEncryptSavedMail = 0
  1308.         End If
  1309.     End Sub    
  1310.     Public Function Close()
  1311.         If Val(Me.note.getitemvalue("Sign")(0)) <> Me.nINISignSentMail Then
  1312.             Me.lngCurrentINISettings = Me.lngCurrentINISettings Xor Me.SIGN_SENT_MAIL
  1313.             Me.nUpdateINI = True    
  1314.         End If
  1315.         If Val(Me.note.getitemvalue("Encrypt")(0)) <> Me.nINIEncryptSentMail Then
  1316.             Me.lngCurrentINISettings = Me.lngCurrentINISettings Xor Me.ENCRYPT_SENT_MAIL
  1317.             Me.lngCurrentINISettings = Me.lngCurrentINISettings Xor Me.ENCRYPT_SAVED_MAIL
  1318.             Me.nUpdateINI = True        
  1319.         End If
  1320.         If Me.nUpdateINI Then    
  1321.             Call Me.session.setenvironmentvar("Preferences", Cstr(Me.lngCurrentINISettings),True)
  1322.         End If
  1323.     End Function
  1324. End Class    
  1325. '++LotusScript Development Environment:2:5:(Options):0:66
  1326. '++LotusScript Development Environment:2:5:(Forward):0:1
  1327. Declare Sub Initialize
  1328. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  1329. Declare Sub Postopen(Source As Notesuidocument)
  1330. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1331. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1332. Private Sub BindEvents(Byval Objectname_ As String)
  1333.     Static Source As NOTESUIDOCUMENT
  1334.     Set Source = Bind(Objectname_)
  1335.     On Event Queryclose From Source Call Queryclose
  1336.     On Event Postopen From Source Call Postopen
  1337. End Sub
  1338. '++LotusScript Development Environment:2:2:Initialize:1:10
  1339. Sub Initialize
  1340. End Sub
  1341. '++LotusScript Development Environment:2:2:Queryclose:1:12
  1342. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  1343.     If Not Source.DialogBoxCanceled Then
  1344.         If Source.Document.UpdateProfileNote(0) = "1"  Then
  1345.             Call SecurityPreferences.Close()
  1346.         End If
  1347.         With Source.Document
  1348.             Select Case .SenderTag(0)
  1349.             Case "P"
  1350.                 Call .ReplaceItemValue("_ViewIcon",    170)
  1351.             Case "C"
  1352.                 Call .ReplaceItemValue("_ViewIcon",    169)
  1353.             Case "R"
  1354.                 Call .ReplaceItemValue("_ViewIcon",    163)                
  1355.             Case "T"
  1356.                 Call .ReplaceItemValue("_ViewIcon",    85)
  1357.             Case "F"
  1358.                 Call .ReplaceItemValue("_ViewIcon",    74)
  1359.             Case"G"
  1360.                 Call .ReplaceItemValue("_ViewIcon",    159)
  1361.             Case "J"
  1362.                 Call .ReplaceItemValue("_ViewIcon",    166)
  1363.             Case "Y"
  1364.                 Call .ReplaceItemValue("_ViewIcon",    23)
  1365.             Case "Q"
  1366.                 Call .ReplaceItemValue("_ViewIcon",    162)
  1367.             Case "M"
  1368.                 Call .ReplaceItemValue("_ViewIcon",    10)
  1369.             Case "N"
  1370.                 Call .RemoveItem("_ViewIcon")
  1371.             Case Else
  1372.                 Call .RemoveItem("_ViewIcon")
  1373.                 Call .RemoveItem("SenderTag")
  1374.             End Select
  1375.         End With
  1376.     End If
  1377. End Sub
  1378. '++LotusScript Development Environment:2:2:Postopen:1:12
  1379. Sub Postopen(Source As Notesuidocument)
  1380.     Set SecurityPreferences = New INIPreference(Source.document)
  1381. End Sub
  1382.     3S4S6S8S
  1383. Signieren | 1X
  1384. Encrypt
  1385. Encrypt
  1386. Encrypt
  1387. Verschl
  1388. sseln|1z
  1389. Encrypt
  1390. Lotus Product
  1391. Lotus Product
  1392. O=Lotus Notes
  1393. O=Lotus Notes
  1394. PURSAFO
  1395. |.:#U
  1396. O=Lotus Notes
  1397. CN=Lotus Notes Template Development/O=Lotus Notes
  1398. PURSAFO
  1399. DueDateTime
  1400. ReplyDate
  1401. ExpireDate
  1402. $Info
  1403. $$ScriptName
  1404. $PublicAccess
  1405. $Script
  1406. $$FormScript
  1407. $Body
  1408. $$Script_O
  1409. $$$FormScript_O
  1410. $Language
  1411. $LastBuildTime
  1412. $BabelInfo
  1413. $106$103$107$Conflict
  1414. Strip alternatives, enclosing matched parentheses, and a leading dollar sign from the $Title item
  1415. FolderName1
  1416. $Title
  1417.     0R1S2S5S6S8S
  1418. FolderName2
  1419. FolderName1
  1420. FolderName1
  1421. FolderName1
  1422. FolderName1
  1423.     0R1S2S9S11S12S14S15S20S22S23S26S32S35S38S
  1424. FolderName3
  1425. FolderName2
  1426. $Title
  1427. FolderName2
  1428. FolderName2
  1429. FolderName2
  1430.     0R1S2S6S7S9S10S15S17S18S21S25S28S
  1431. FolderName3
  1432.     0S0E
  1433. Set the folder flags in addition to those that are stored
  1434. FolderFlags1
  1435. $FolderFlagsh
  1436. $FolderFlags
  1437.     0R1S2S9S11S
  1438. Set the FOLDER_FLAG_HIDDEN (32) and FOLDER_FLAG_SYSTEM (16) flags
  1439.     0R1S
  1440. FolderFlags1
  1441. $Name
  1442. $Name
  1443.     0R1S2S8S10S11S13S19S21S22S24S26S29S
  1444. $Flags
  1445. $Flags
  1446.     0RL1S5S7S8S13S
  1447. $106Ordner
  1448. Strip alternatives, enclosing matched parentheses, and a leading dollar sign from the $Title item
  1449. FolderName1
  1450. $Title
  1451.     0R1S2S5S6S8S
  1452. FolderName2
  1453. FolderName1
  1454. FolderName1
  1455. FolderName1
  1456. FolderName1
  1457.     0R1S2S9S11S12S14S15S20S22S23S26S32S35S38S
  1458. FolderName3
  1459. FolderName2
  1460. $Title
  1461. FolderName2
  1462. FolderName2
  1463. FolderName2
  1464.     0R1S2S6S7S9S10S15S17S18S21S25S28S
  1465. FolderName3
  1466. $103Folder UNID
  1467.     0S0E
  1468. $107Folder Flags
  1469. Set the folder flags in addition to those that are stored
  1470. FolderFlags1
  1471. $FolderFlagsh
  1472. $FolderFlags
  1473.     0R1S2S9S11S
  1474. Set the FOLDER_FLAG_HIDDEN (32) and FOLDER_FLAG_SYSTEM (16) flags
  1475.     0R1S
  1476. FolderFlags1
  1477. $Name
  1478. $Name
  1479.     0R1S2S8S10S11S13S19S21S22S24S26S29S&
  1480. New Memo.
  1481.     0S0E
  1482. Delete 
  1483.     0S0E
  1484. Move To Folder...X 
  1485.     0S0E
  1486. _Forward
  1487. ReplyX4
  1488. Reply
  1489.     0S0E
  1490. Reply With History@
  1491. Reply with history
  1492.     0S0E
  1493. Categori_zeX
  1494. _Edit Document
  1495. Send    
  1496. Resend
  1497. NonDelivery Report
  1498. Kein Zustellungsfehlerbericht
  1499. Sie k
  1500. nnen nur Zustellungsfehlerberichte erneut senden.
  1501.     6S12S17S23S
  1502. Convert To TaskX0
  1503. ConvertToTask
  1504. _Move To Folder...
  1505. _Remove From Folder...
  1506. O=Lotus Notes
  1507. O=Lotus Notes
  1508. PURSAFO
  1509. |.:#U
  1510. O=Lotus Notes
  1511. CN=Lotus Notes Template Development/O=Lotus Notes
  1512. PURSAFO
  1513. BRY!T
  1514. $Name
  1515. $Index
  1516. $FormulaClass
  1517. $Formula
  1518. $ViewFormat
  1519. $ACTIONS
  1520. $Language
  1521. $LastBuildTime
  1522. $BabelInfo
  1523. O=Lotus Notes
  1524. O=Lotus Notes
  1525. PURSAFO
  1526. |.:#U
  1527. O=Lotus Notes
  1528. CN=Lotus Notes Template Development/O=Lotus Notes
  1529. PURSAFO
  1530. $Index
  1531. $FormulaClass
  1532. $Formula
  1533. $ViewFormat
  1534. $Language
  1535. $LastBuildTime
  1536. $BabelInfo
  1537. Lotus Product
  1538. V0.0N
  1539. $1NoteID
  1540. IMAPUIDIMAP UIDR
  1541. IMAPUID
  1542. $IMAPUIDh
  1543. $IMAPUID
  1544.     7S9S
  1545. IMAPLastFolderUNIDLastFolderUnidp
  1546. IMAPLastFolderUNID
  1547. $IMAPLastFolderUNID
  1548. $IMAPLastFolderUNID
  1549.     7S12SIMAPSeqNoIMAP SequenceNoX
  1550. IMAPSeqNo
  1551. $IMAPSeqNoh
  1552. $IMAPSeqNo
  1553.     7S9S
  1554. IMAPFlagsMessage FlagsX
  1555. IMAPFlags
  1556. $IMAPFlagsh
  1557. $IMAPFlags
  1558.     7S9S
  1559. IMAPDiscFlagsDisconnected Flagsd
  1560. IMAPDiscFlags
  1561. $IMAPDiscFlagsh
  1562. $IMAPDiscFlags
  1563.     7S9S
  1564. IMAPMsgIDInternet MsgIDT
  1565. IMAPMsgID
  1566. $IMAPMsgIDh
  1567. $IMAPMsgIDV
  1568.     7S12S&
  1569. O=Lotus Notes
  1570. O=Lotus Notes
  1571. PURSAFO
  1572. |.:#U
  1573. O=Lotus Notes
  1574. CN=Lotus Notes Template Development/O=Lotus Notes
  1575. PURSAFO
  1576. $Index
  1577. $FormulaClass
  1578. $ViewGlobalScript_O
  1579. $Formula
  1580. $ViewFormat
  1581. $Language
  1582. $LastBuildTime
  1583. $BabelInfo
  1584. _KategorisierenX
  1585. Dokument _bearbeiten
  1586. Dokument _senden
  1587. In Ordner _verschieben...X
  1588. Aus Ordner _entfernenX
  1589. Neues Memo,
  1590.     0S0E
  1591. Antwort\AntwortX0
  1592. Antwort
  1593.     4S6S
  1594. Antwort\Antwort mit ProtokollX
  1595. Antwort mit Protokoll
  1596. Dieses Dokument ist nicht vollst
  1597. ndig.
  1598.     4S8S10S13S
  1599. Reply with history
  1600. _WeiterleitenX    
  1601. schenX 
  1602.     0S0E
  1603. Ordner aktualisieren 
  1604.     0S0E
  1605. _KategorisierenX
  1606. Dokument _bearbeiten
  1607. Dokument _senden
  1608. In Ordner _verschieben...X
  1609. Aus Ordner _entfernenX
  1610. Neues Memo,
  1611.     0S0E
  1612. act_NEWMEMO.GIF|act_NEWMEMOX
  1613. Antwort\AntwortX0
  1614. Antwort
  1615.     4S6S
  1616. act_REPLY.GIF|act_REPLYX
  1617. Antwort\Antwort mit ProtokollX
  1618. Antwort mit Protokoll
  1619. Dieses Dokument ist nicht vollst
  1620. ndig.
  1621.     4S8S10S13S
  1622. Reply with history
  1623. act_REPLY.GIF|act_REPLYX
  1624. _WeiterleitenX    
  1625. act_FORWARD.GIF|act_FORWARDX
  1626. schenX 
  1627.     0S0E
  1628. act_DELETE.GIF|act_DELETEX
  1629. Ordner aktualisieren 
  1630.     0S0E
  1631. act_completed.GIF|act_CSCOMPLETEDX'++LotusScript Development Environment:2:5:(Options):0:66
  1632. '++LotusScript Development Environment:2:5:(Forward):0:1
  1633. Declare Sub Postopen(Source As Notesuiview)
  1634. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1635. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1636. Private Sub BindEvents(Byval Objectname_ As String)
  1637.     Static Source As NOTESUIVIEW
  1638.     Set Source = Bind(Objectname_)
  1639.     On Event Postopen From Source Call Postopen
  1640. End Sub
  1641. '++LotusScript Development Environment:2:2:Postopen:1:12
  1642. Sub Postopen(Source As Notesuiview)
  1643. End Sub
  1644. '++LotusScript Development Environment:2:5:(Options):0:74
  1645. Option Public
  1646. '++LotusScript Development Environment:2:5:(Forward):0:1
  1647. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1648. Lotus Product
  1649. Lotus Product
  1650. O=Lotus Notes
  1651. O=Lotus Notes
  1652. PURSAFO
  1653. |.:#U
  1654. O=Lotus Notes
  1655. CN=Lotus Notes Template Development/O=Lotus Notes
  1656. PURSAFO
  1657. <Rj    %;q 
  1658. $Name
  1659. $Index
  1660. $FormulaClass
  1661. $Formula
  1662. $ViewFormat
  1663. $ACTIONS
  1664. $V5ACTIONS
  1665. $ViewScript
  1666. $ViewGlobalScript
  1667. $ViewGlobalScript_O
  1668. $ViewScript_O
  1669. $Language
  1670. $LastBuildTime
  1671. $BabelInfo
  1672. GIF89a
  1673. U/c:<`#V(
  1674. Oa)n3
  1675. O=Lotus Notes
  1676. O=Lotus Notes
  1677. PURSAFO
  1678. |.:#U
  1679. O=Lotus Notes
  1680. CN=Lotus Notes Template Development/O=Lotus Notes
  1681. PURSAFO
  1682. [/S<7'
  1683. $ImagesWide
  1684. $ImagesHigh
  1685. $ImagesColorize
  1686. $ImageNames
  1687. $ImageData
  1688. $Language
  1689. $LastBuildTime
  1690. $BabelInfo
  1691. GIF89a
  1692. ___OOO
  1693. .!f&a
  1694.  JCv2.
  1695. O=Lotus Notes
  1696. O=Lotus Notes
  1697. PURSAFO
  1698. |.:#U
  1699. O=Lotus Notes
  1700. CN=Lotus Notes Template Development/O=Lotus Notes
  1701. PURSAFO
  1702. $ImagesWide
  1703. $ImagesHigh
  1704. $ImagesColorize
  1705. $ImageNames
  1706. $PublicAccess
  1707. $ImageData
  1708. $Language
  1709. $LastBuildTime
  1710. $BabelInfo
  1711. GIF89a
  1712. ___OOO
  1713. h^/&W@
  1714. !#ap=Y"%l`jyj 
  1715. .g$:')
  1716. oP{3$<{
  1717. O=Lotus Notes
  1718. O=Lotus Notes
  1719. PURSAFO
  1720. |.:#U
  1721. O=Lotus Notes
  1722. CN=Lotus Notes Template Development/O=Lotus Notes
  1723. PURSAFO
  1724. 3?1MQ
  1725. $ImagesWide
  1726. $ImagesHigh
  1727. $ImagesColorize
  1728. $ImageNames
  1729. $ImageData
  1730. $Language
  1731. $LastBuildTime
  1732. $BabelInfo
  1733. GIF89a
  1734. c\")%
  1735. )>@8$]! rZd
  1736. !=IK~$Qu6
  1737. O=Lotus Notes
  1738. O=Lotus Notes
  1739. PURSAFO
  1740. |.:#U
  1741. O=Lotus Notes
  1742. CN=Lotus Notes Template Development/O=Lotus Notes
  1743. PURSAFO
  1744. $ImagesWide
  1745. $ImagesHigh
  1746. $ImagesColorize
  1747. $ImageNames
  1748. $ImageData
  1749. $Language
  1750. $LastBuildTime
  1751. $BabelInfo
  1752. GIF89a
  1753. `7kB!h=?2R\!rYZ
  1754.  /)s69
  1755. eV{=JLgOu5
  1756. O=Lotus Notes
  1757. O=Lotus Notes
  1758. PURSAFO
  1759. |.:#U
  1760. O=Lotus Notes
  1761. CN=Lotus Notes Template Development/O=Lotus Notes
  1762. PURSAFO
  1763. $ImagesWide
  1764. $ImagesHigh
  1765. $ImagesColorize
  1766. $ImageNames
  1767. $PublicAccess
  1768. $ImageData
  1769. $Language
  1770. $LastBuildTime
  1771. $BabelInfo
  1772. GIF89a
  1773. S!t"W
  1774. ='h1!K
  1775. t#8BD=Gvj_
  1776. O=Lotus Notes
  1777. O=Lotus Notes
  1778. PURSAFO
  1779. |.:#U
  1780. O=Lotus Notes
  1781. CN=Lotus Notes Template Development/O=Lotus Notes
  1782. PURSAFO
  1783. $ImagesWide
  1784. $ImagesHigh
  1785. $ImagesColorize
  1786. $ImageNames
  1787. $ImageData
  1788. $Language
  1789. $LastBuildTime
  1790. $BabelInfo
  1791. GIF89a
  1792. ___OOO
  1793. 9^cE9!f
  1794. e^#:DF.XJCt36
  1795. O=Lotus Notes
  1796. O=Lotus Notes
  1797. PURSAFO
  1798. |.:#U
  1799. O=Lotus Notes
  1800. CN=Lotus Notes Template Development/O=Lotus Notes
  1801. PURSAFO
  1802. $ImagesWide
  1803. $ImagesHigh
  1804. $ImagesColorize
  1805. $ImageNames
  1806. $ImageData
  1807. $Language
  1808. $LastBuildTime
  1809. $BabelInfo
  1810. GIF89a
  1811. ___OOO
  1812. 'X5}~
  1813. O=Lotus Notes
  1814. O=Lotus Notes
  1815. PURSAFO
  1816. |.:#U
  1817. O=Lotus Notes
  1818. CN=Lotus Notes Template Development/O=Lotus Notes
  1819. PURSAFO
  1820. (Dl:$
  1821. $ImagesWide
  1822. $ImagesHigh
  1823. $ImagesColorize
  1824. $ImageNames
  1825. $ImageData
  1826. $Language
  1827. $LastBuildTime
  1828. $BabelInfo
  1829. GIF89a
  1830. ___OOO
  1831. pE9p]j
  1832. aQQ@C 
  1833. 8DFHJl3
  1834. O=Lotus Notes
  1835. O=Lotus Notes
  1836. PURSAFO
  1837. |.:#U
  1838. O=Lotus Notes
  1839. CN=Lotus Notes Template Development/O=Lotus Notes
  1840. PURSAFO
  1841. $ImagesWide
  1842. $ImagesHigh
  1843. $ImagesColorize
  1844. $ImageNames
  1845. $ImageData
  1846. $Language
  1847. $LastBuildTime
  1848. $BabelInfo
  1849. GIF89a
  1850. ___OOO
  1851. g;}QS pW/
  1852. O9GIfMst
  1853. O=Lotus Notes
  1854. O=Lotus Notes
  1855. PURSAFO
  1856. |.:#U
  1857. O=Lotus Notes
  1858. CN=Lotus Notes Template Development/O=Lotus Notes
  1859. PURSAFO
  1860. $ImagesWide
  1861. $ImagesHigh
  1862. $ImagesColorize
  1863. $ImageNames
  1864. $PublicAccess
  1865. $ImageData
  1866. $Language
  1867. $LastBuildTime
  1868. $BabelInfo
  1869. GIF89a
  1870. ___OOO
  1871. t-@3"
  1872. '     C%
  1873. I1`G    q\=
  1874. O=Lotus Notes
  1875. O=Lotus Notes
  1876. PURSAFO
  1877. |.:#U
  1878. O=Lotus Notes
  1879. CN=Lotus Notes Template Development/O=Lotus Notes
  1880. PURSAFO
  1881. $ImagesWide
  1882. $ImagesHigh
  1883. $ImagesColorize
  1884. $ImageNames
  1885. $ImageData
  1886. $Language
  1887. $LastBuildTime
  1888. $BabelInfo
  1889. GIF89a
  1890. ___OOO
  1891. A*;8$
  1892. \vDe    ]
  1893. O=Lotus Notes
  1894. O=Lotus Notes
  1895. PURSAFO
  1896. |.:#U
  1897. O=Lotus Notes
  1898. CN=Lotus Notes Template Development/O=Lotus Notes
  1899. PURSAFO
  1900. $ImagesWide
  1901. $ImagesHigh
  1902. $ImagesColorize
  1903. $ImageNames
  1904. $ImageData
  1905. $Language
  1906. $LastBuildTime
  1907. $BabelInfo
  1908. GIF89a
  1909. @B$`)
  1910. eM! c:<~(&
  1911. O=Lotus Notes
  1912. O=Lotus Notes
  1913. PURSAFO
  1914. |.:#U
  1915. O=Lotus Notes
  1916. CN=Lotus Notes Template Development/O=Lotus Notes
  1917. PURSAFO
  1918. S^.F-
  1919. $ImagesWide
  1920. $ImagesHigh
  1921. $ImagesColorize
  1922. $ImageNames
  1923. $PublicAccess
  1924. $ImageData
  1925. $Language
  1926. $LastBuildTime
  1927. $BabelInfo
  1928. z'7$bM
  1929. GIF89a
  1930. ___OOO
  1931. m[QNK
  1932. \#& 3
  1933.  QFv4#
  1934. O=Lotus Notes
  1935. O=Lotus Notes
  1936. PURSAFO
  1937. |.:#U
  1938. O=Lotus Notes
  1939. CN=Lotus Notes Template Development/O=Lotus Notes
  1940. PURSAFO
  1941. $ImagesWide
  1942. $ImagesHigh
  1943. $ImagesColorize
  1944. $ImageNames
  1945. $PublicAccess
  1946. $ImageData
  1947. $Language
  1948. $LastBuildTime
  1949. $BabelInfo
  1950. (GIF89a
  1951. 1u)d#
  1952. $,]>U
  1953. N%nry
  1954. \}lM{zY
  1955. q0v];
  1956. @Mn?Y<
  1957. UfySr
  1958. c8V^kv
  1959. WVt3vidx
  1960. b+He@E
  1961. ODg@G
  1962. OWOW2
  1963. Y(TNhS
  1964. aIl~FTs
  1965. D5urK
  1966. }V}du
  1967. +jNc9
  1968. O'JDI
  1969. $WzxQ
  1970. \eF^|
  1971. /ejvde
  1972. Hw0.b
  1973. rEp+ 
  1974. vtxPd
  1975. |eCGY
  1976. M9(P %zh
  1977. H:|l#
  1978. 6PyU7
  1979. q^XJ5
  1980. o"6mr
  1981. Y_P4e
  1982. wTxy:
  1983. J)a?`9
  1984. 7o!F_
  1985. GgBES-G!
  1986. bEhx{>
  1987. 7%S~j
  1988. GO7DH
  1989. 7[?'{
  1990. S>r"u
  1991. {5CRk
  1992. gXwy%
  1993. tR_tOyJz
  1994. a@]8$|
  1995. C\Y9y:71
  1996. tz;vZ#
  1997. ><    J'
  1998. L"7kA
  1999. [5L#2
  2000. xK*:B
  2001. U=/5-
  2002. S(FS6
  2003. %T q*
  2004. d*3s^
  2005. mOEGFo
  2006. @7!(0d
  2007. "\L#U&2,
  2008. Q#^"Htl
  2009. 6r|1O(X
  2010. WEUS}
  2011. $cPek[
  2012. )23bJ    s
  2013. F_[    m
  2014. o\R e
  2015. ?aAb#
  2016. F{8~8k
  2017. ;plKO
  2018. *&7}{e?
  2019. lS#4Q
  2020. ;Rpl|
  2021. "?Txr
  2022. f`$HH
  2023. `i2%7dAS
  2024. bh (o
  2025. wG4"3
  2026. RDB~z
  2027. (MDSj
  2028. .iX W4C
  2029. vuGr6K
  2030. j#j_fr
  2031. 6~-tP
  2032. G1PP<
  2033. K3(uto
  2034.  ;P\gW
  2035. 9$juc1
  2036. h1*!A
  2037. F)3Xc*
  2038. <K|Wx
  2039. l'    #7
  2040. :UneJp
  2041. d7zPCh
  2042. /S4-S`Y2
  2043. Qh&A\
  2044. X3L:(d
  2045. )uYLtC
  2046. I^2o*=
  2047. (l+o>
  2048. &hB?Y$
  2049. *L!B#J
  2050. }uJ]#
  2051. S>qj%
  2052. *R!1e
  2053. tJr>]
  2054. FWrad
  2055. Kky{P
  2056. 7z/Wp_
  2057. _KwM;
  2058. heWgH
  2059. n]YU;g
  2060. zm7uX
  2061. yYW8 
  2062. er4BB
  2063. RP%#i5,$p
  2064. ;:Pz 
  2065. Is"rl
  2066. w    5X!
  2067. xA#q!
  2068. Nab79=?
  2069. KNQOVVXW
  2070. U{hx$i
  2071. S&Q(QI
  2072. GUSeLq$
  2073. j0GGG0
  2074. mO&W#\
  2075. k6d0[
  2076. '@#]C
  2077. >1Jk@
  2078. WI%QR
  2079. fv{_G
  2080. <6=VIh    
  2081. /<F6[
  2082. jI|?4
  2083. cxk"f
  2084. ]7A.'
  2085. v|FgH
  2086. Xz de[
  2087. ^!xM>HD
  2088. S$XuW
  2089. @    FDl
  2090. off^e
  2091. Yiaxk
  2092. 6;Iv%
  2093. LLq0E
  2094. }    7*vx|
  2095. Yt=uu
  2096. ?QYmF
  2097. Me63WMSY
  2098. j]9jv
  2099. V5ec&
  2100. -*c(m
  2101. O=Lotus Notes
  2102. O=Lotus Notes
  2103. PURSAFO
  2104. |.:#U
  2105. O=Lotus Notes
  2106. CN=Lotus Notes Template Development/O=Lotus Notes
  2107. PURSAFO
  2108. $ImagesWide
  2109. $ImagesHigh
  2110. $ImagesColorize
  2111. $ImageNames
  2112. $ImageData
  2113. $Language
  2114. $LastBuildTime
  2115. $BabelInfo
  2116. (GIF89a
  2117. o*P!/14/5
  2118. >h:Mj
  2119. TxOWl
  2120. #8b[b+
  2121. |.Wf?
  2122. H,<7 
  2123. \&{9*J1N,
  2124. zbA(\
  2125. }1 jo
  2126.     ij*G
  2127. m6UQn
  2128. "~(+ru
  2129. %IH<]
  2130. E7eN$
  2131. H"k!O
  2132. 0`.@R!
  2133. 7.C96
  2134.      [\FOr
  2135. E}k&u
  2136. Vt\4Po
  2137. e'6$*g5x
  2138. wt:bo'#
  2139. UupXu
  2140. hy%UJI
  2141. henH) 
  2142. wlqoST3
  2143. XrvX`n
  2144. xdH9X
  2145. nH7Q3gDP
  2146. /ed"HR
  2147. +"y8"
  2148. ^*zbk
  2149. pZ!88g
  2150. ?LoA=
  2151. $w    !:
  2152. CE}*Jd
  2153. z?A9PMT
  2154. WM)(5
  2155. -y{0N
  2156. 0(Aj64
  2157. ,:/-\
  2158.     U<ZV
  2159. JH$Od
  2160. ,QO}Y
  2161. !'"w)
  2162. dLH$\
  2163. {\pi8
  2164. B?$0A
  2165. LK:Z 
  2166. e)]W7
  2167. DR$';m(
  2168. rK#    T
  2169. kG4FO
  2170. @)TWm
  2171. cWHI>
  2172. *O" {
  2173. ;1!@d
  2174. 4Cb1"
  2175. f*B$XWY<
  2176. 1i:ap12b
  2177. SaZ]S%J{
  2178. +a*~]
  2179. US:%<=
  2180. $)n]_I
  2181. ^d\[sh5
  2182. QRHe^
  2183. PIurs
  2184. MT!`B
  2185. ]l:Xl.    
  2186. R8L=    &
  2187. );^;:y
  2188. M0'@6"
  2189. oF@8S
  2190. I`c+R
  2191. ;E>A"a
  2192. O=Lotus Notes
  2193. O=Lotus Notes
  2194. PURSAFO
  2195. |.:#U
  2196. O=Lotus Notes
  2197. CN=Lotus Notes Template Development/O=Lotus Notes
  2198. PURSAFO
  2199. $ImagesWide
  2200. $ImagesHigh
  2201. $ImagesColorize
  2202. $ImageNames
  2203. $ImageData
  2204. $Language
  2205. $LastBuildTime
  2206. $BabelInfo
  2207. Cy34Q
  2208. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes$ACTIONSde-DE
  2209. 0000019A############################################
  2210. ##########################################################
  2211. ##########################################################
  2212. ##########################################################
  2213. ##########################################################
  2214. ##########################################################
  2215. ##########################################################
  2216. ##########################################################
  2217. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesm34MailOutlinede-DE
  2218. 0000018A###########
  2219. MailFS
  2220. CN=Debbie Branco/O=IrisCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusMail (IMAP)
  2221. #1StdR50IMailde-DE
  2222. wwwwww
  2223. wwwwwwp
  2224. oooooooool
  2225. oooooolooooooo
  2226. oooooolooooooo
  2227. 0000018EFRE###############
  2228. Inbox1
  2229. PostedDate
  2230. PostedDate
  2231. Subject
  2232. Subject3FYd
  2233. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesInboxf
  2234. FromPostedDateSubject$Conflict
  2235. PostedDate
  2236. PostedDate
  2237. FromVonPostedDateDatum"
  2238. PostedDate
  2239. PostedDate
  2240. SubjectThema&
  2241. de-DED
  2242. 00000142
  2243. ##############
  2244. ##########################################################
  2245. ##########################################################
  2246. ##########################################################
  2247. ##########################################################
  2248. ##########################################################
  2249. $Modified
  2250.     1S2S3S
  2251. $TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE
  2252. $Flags
  2253.     0SL1S4S5S3724
  2254. $TITLE
  2255. CN=Shaun McGale/OU=DUB/O=Lotus
  2256. #######################################
  2257. $LotusFaxMemoSubform | 1.0 | $LotusFaxMemoSubformMoodsde-DE
  2258. 0000012E
  2259. Antwort mit ProtokollReply with historyD
  2260. BodySubjectBlindCopyToCopyToSendTo$AutoSpellEncryptSignLogoInheritedFromDomainInheritedReplyToInheritedSendToFromInheritedSubjectInheritedFrom
  2261. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes########################################################
  2262. ##########################################################
  2263. ##########################################################
  2264. ##########################################################
  2265. de-DE
  2266. 0000012A
  2267. AntwortReplyD
  2268. BodySubjectBlindCopyToCopyToSendTo$AutoSpellEncryptSignLogoInheritedFromDomainInheritedReplyToInheritedSendToFromInheritedSubjectInheritedFrom
  2269. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2270. ##########################################################
  2271. $1IMAPUID
  2272. IMAPUID
  2273. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesY($IMAPResyncInfo)
  2274. $1IMAPUIDIMAPLastFolderUNIDIMAPSeqNoIMAPFlagsIMAPDiscFlagsIMAPMsgID$Conflict
  2275. IMAPUID
  2276. $IMAPUIDh
  2277. $IMAPUID
  2278.     7S9S
  2279. IMAPLastFolderUNID
  2280. $IMAPLastFolderUNID
  2281. $IMAPLastFolderUNID
  2282.     7S12S
  2283. IMAPSeqNo
  2284. $IMAPSeqNoh
  2285. $IMAPSeqNo
  2286.     7S9S
  2287. IMAPFlags
  2288. $IMAPFlagsh
  2289. $IMAPFlags
  2290.     7S9S
  2291. IMAPDiscFlags
  2292. $IMAPDiscFlagsh
  2293. $IMAPDiscFlags
  2294.     7S9S
  2295. IMAPMsgID
  2296. $IMAPMsgIDh
  2297. $IMAPMsgIDV
  2298.     7S12S
  2299.     L1Sde-DE+
  2300. 0000013E#############
  2301. 34CiQ
  2302. bouncyearth3.GIF
  2303. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  2304. MemoGR.gifMemoGR.gifde-DE
  2305. 00000186################################################
  2306. ##########################################################
  2307. ##########################################################
  2308. ##########################################################
  2309. ##########################################################
  2310. ##########################################################
  2311. ##########################################################
  2312. ##########################################################
  2313. ##########################################################
  2314. ##########################################################
  2315. ##########################################################
  2316. ##########################################################
  2317. ##########################################################
  2318. ##########################################################
  2319. ##########################################################
  2320. ##########################################################
  2321. ##########################################################
  2322. ##########################################################
  2323. ##########################################################
  2324. ##########################################################
  2325. ##########################################################
  2326. ##########################################################
  2327. ##########################################################
  2328. ##########################################################
  2329. ##########################################################
  2330. ##########################################################
  2331. ##########################################################
  2332. ##########################################################
  2333. ##########################################################
  2334. ##########################################################
  2335. ##########################################################
  2336. ##########################################################
  2337. ##########################################################
  2338. ##########################################################
  2339. ##########################################################
  2340. ##########################################################
  2341. ##########################################################
  2342. ##########################################################
  2343. ##########################################################
  2344. ##########################################################
  2345. ##########################################################
  2346. ##########################################################
  2347. ##########################################################
  2348. ##########################################################
  2349. ##########################################################
  2350. ##########################################################
  2351. ##########################################################
  2352. ##########################################################
  2353. ##########################################################
  2354. ##########################################################
  2355. ##########################################################
  2356. ##########################################################
  2357. ##########################################################
  2358. ##########################################################
  2359. ##########################################################
  2360. ##########################################################
  2361. ##########################################################
  2362. ##########################################################
  2363. ##########################################################
  2364. ##########################################################
  2365. ##########################################################
  2366. ##########################################################
  2367. ##########################################################
  2368. ##########################################################
  2369. ##########################################################
  2370. ##########################################################
  2371. ##########################################################
  2372. ##########################################################
  2373. ##########################################################
  2374. ##########################################################
  2375. ##########################################################
  2376. ##########################################################
  2377. ##########################################################
  2378. ##########################################################
  2379. ##########################################################
  2380. ##########################################################
  2381. ##########################################################
  2382. ##########################################################
  2383. ##########################################################
  2384. ##########################################################
  2385. ##########################################################
  2386. ##########################################################
  2387. ##########################################################
  2388. ##########################################################
  2389. ##########################################################
  2390. ##########################################################
  2391. ##########################################################
  2392. ##########################################################
  2393. ##########################################################
  2394. ##########################################################
  2395. ##########################################################
  2396. ##########################################################
  2397. ##########################################################
  2398. ##########################################################
  2399. ##########################################################
  2400. ##########################################################
  2401. ##########################################################
  2402. ##########################################################
  2403. ##########################################################
  2404. ##########################################################
  2405. ##########################################################
  2406. ##########################################################
  2407. ##########################################################
  2408. ##########################################################
  2409. ##########################################################
  2410. ##########################################################
  2411. ##########################################################
  2412. ##########################################################
  2413. ##########################################################
  2414. ##########################################################
  2415. ##########################################################
  2416. ##########################################################
  2417. ##########################################################
  2418. ##########################################################
  2419. ##########################################################
  2420. ##########################################################
  2421. ##########################################################
  2422. ##########################################################
  2423. ##########################################################
  2424. ##########################################################
  2425. ##########################################################
  2426. ##########################################################
  2427. ##########################################################
  2428. ##########################################################
  2429. ##########################################################
  2430. ##########################################################
  2431. ##########################################################
  2432. ##########################################################
  2433. ##########################################################
  2434. ##########################################################
  2435. ##########################################################
  2436. ##########################################################
  2437. ##########################################################
  2438. ##########################################################
  2439. GIF89aZ
  2440. TUwX\kIT
  2441. aNlhI
  2442. HO_BGp%
  2443. 7tXa@
  2444. +P\>|
  2445. Lx.6o
  2446. RL#]X
  2447. 0I$r0qD
  2448. O=Lotus Notes
  2449. O=Lotus Notes
  2450. PURSAFO
  2451. |.:#U
  2452. O=Lotus Notes
  2453. CN=Lotus Notes Template Development/O=Lotus Notes
  2454. PURSAFO
  2455. I&#=p
  2456. WVQS*
  2457. $ImagesWide
  2458. $ImagesHigh
  2459. $ImagesColorize
  2460. $ImageNames
  2461. $ImageData
  2462. $Language
  2463. $LastBuildTime
  2464. $BabelInfo
  2465. O=Lotus Notes
  2466. O=Lotus Notes
  2467. PURSAFO
  2468. |.:#U
  2469. O=Lotus Notes
  2470. CN=Lotus Notes Template Development/O=Lotus Notes
  2471. PURSAFO
  2472. $SiteMapList
  2473. $Language
  2474. $LastBuildTime
  2475. $BabelInfo
  2476. Times New Roman
  2477.     0S0E
  2478.     Fenster schlie
  2479. ber Mail (IMAP)
  2480. Wozu dient diese Datenbank? 
  2481. Eine 'Mail (IMAP)'-Datenbank ist eine lokale Datenbank zur Interaktion mit einem IMAP-Server. Sie k
  2482. nnen damit  Nachrichten und Ordner Ihrer IMAP-Mailbox lesen und bearbeiten. Sie k
  2483. nnen auch arbeiten, ohne mit dem Netzwerk verbunden zu sein, und dann sp
  2484. ter die Informationen mit dem IMAP-Server synchronisieren. 
  2485. Um die 'Mail (IMAP)'-Datenbank zu verwenden, m
  2486. ssen Sie zuerst ein Internet-Benutzerkontendokument erstellen. Wenn Sie das Internet-Benutzerkontendokument speichern, wird automatisch eine 'Mail (IMAP)'-Datenbank erstellt. Eine Beschreibung zu Internet-Benutzerkontendokumenten finden Sie im Dokument 
  2487. Benutzen dieser DatenbankX
  2488. Wer verwendet diese Datenbank? X
  2489. Jeder, der eine Mailbox auf einem IMAP-Server hat. X
  2490. Wichtige Funktionen 
  2491. Ordner:X
  2492.  Ordner, Mailboxen genannt, k
  2493. nnen erstellt, umbenannt, verschoben und gel
  2494. scht werden. Nachdem Ordner ge
  2495. ndert wurden, k
  2496. nnen Sie die Option 'Ordner aktualisieren' verwenden, um die neueste Ordnerliste vom Server abzurufen. X
  2497. Nachrichten:
  2498.  Nachrichten k
  2499. nnen gel
  2500. scht, verschoben, beantwortet und erstellt werden. X
  2501. IMAP-Online-Modus:
  2502. glicht interaktives Bearbeiten von Nachrichten und Ordnern (Mailboxen) auf dem IMAP-Server. Sowohl Nachrichten als auch deren Zusammenfassungen werden von der 'Mail (IMAP)'-Datenbank abgerufen. Sie werden nicht in der lokalen Datenbank gespeichert. Nur Gestaltungselemente f
  2503. r Masken und Ordner werden in der lokalen Datenbank gespeichert. X
  2504. IMAP-Offline-Modus:X
  2505. glicht das Abrufen von Nachrichten und Ordnern in eine lokalen 'Mail (IMAP)'-Replik. Diese Nachrichten und Ordner (Mailboxen) k
  2506. nnen bearbeitet werden, ohne da
  2507.  eine Netzwerkverbindung besteht, und sp
  2508. ter mit dem IMAP-Server synchronisiert werden.
  2509. Wo finden Sie weitere Informationen? X
  2510. -  Mehr Informationen finden Sie im Dokument X
  2511.     0S0E
  2512. 'Benutzen dieser Datenbank'X
  2513. O=Lotus Notes
  2514. O=Lotus Notes
  2515. PURSAFO
  2516. |.:#U
  2517. O=Lotus Notes
  2518. CN=Lotus Notes Template Development/O=Lotus Notes
  2519. PURSAFO
  2520. $Info
  2521. $Body
  2522. $Language
  2523. $LastBuildTime
  2524. $BabelInfo
  2525. RSAFO
  2526. $Modified
  2527.     1S2S3S
  2528. $TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE$C1$
  2529. $Flags
  2530.     0SL1S4S5S
  2531. $TITLE
  2532. C34WQ
  2533. de-DE
  2534. MailFS|MailFS
  2535. CDU3wx
  2536. ($FolderInfo)
  2537. ($All Messages)
  2538. ($IMAPResyncInfo)
  2539. Inbox
  2540. 34CiQ
  2541. MailOutline
  2542. $ACTIONS
  2543. Cy34Q 
  2544. CN=Shaun McGale/OU=DUB/O=Lotus
  2545. FromPostedDateSubject$Conflict$C1$
  2546. PostedDate
  2547. PostedDate
  2548. PostedDate
  2549. PostedDate
  2550. Subject
  2551. Subject
  2552. CN=Lotus Notes Template Development/O=Lotus Notes
  2553. Times New Roman
  2554.     0S0E
  2555.     Fenster schlie
  2556. Benutzen der Datenbank 'Mail (IMAP)'
  2557. Internet-Benutzerkontendokumente X
  2558. Ein Internet-Benutzerkonto ist ein Dokument in Ihrem pers
  2559. nlichen Adre
  2560. buch, das einen Internet-Dienst beschreibt. Beispielsweise definiert ein IMAP-Internet-Benutzerkontendokument den Namen des IMAP-Servers und den Benutzernamen und das Kennwort, das Sie ben
  2561. tigen, um auf den Server zuzugreifen. Um eine 'Mail (IMAP)'-Datenbank verwenden zu k
  2562. nnen, m
  2563. ssen Sie zuerst ein IMAP-Internet-Benutzerkontendokument erstellen. Wenn Sie das IMAP-Internet-Benutzerkontendokument speichern, wird automatisch die 'Mail (IMAP)'-Datenbank erstellt. Wenn Sie Notes zum ersten Mal starten, k
  2564. nnen Sie das Produkt so konfigurieren, da
  2565.  es automatisch Internet-Benutzerkontendokumente erstellt. 
  2566. So erstellen Sie ein IMAP-Internet-Benutzerkonto: X
  2567. ffnen Sie Ihr pers
  2568. nliches Adre
  2569. buch. X
  2570. hlen Sie 'Ansicht - Erweitert - Konten'X
  2571. Klicken Sie in der Aktionsleiste auf die Schaltfl
  2572. che 'Benutzerkonto hinzuf
  2573. gen'. 
  2574. llen Sie das Feld 'Name des Benutzerkontos' aus. Sie k
  2575. nnen dem Benutzerkonto einen beliebigen Namen geben, er darf in Ihrem pers
  2576. nlichen Adre
  2577. buch allerdings nur einmal vorhanden sein. Allgemein empfiehlt sich, den Benutzerkontennamen von dem Namen des Servers abzuleiten, auf den Sie zugreifen m
  2578. chten. Wenn Sie beispielsweise ein Benutzerkonto f
  2579. r einen IMAP-Server mit dem Namen 'imap.myisp.com' einrichten m
  2580. chten, geben Sie dem Konto den Namen 'imap myisp'. 
  2581. Geben Sie in das Feld 'Server f
  2582. r dieses Benutzerkonto' den vollst
  2583. ndigen Internet-Namen des Servers ein, auf den Sie zugreifen m
  2584. chten, z. B. 'imap.myisp.com' f
  2585. r einen IMAP-Mail-Server. 
  2586. Falls der Server eine Authentifizierung erwartet, geben Sie Ihren Anmeldenamen und Ihr Kennwort ein. Das gilt f
  2587. r die meisten IMAP-Server. X
  2588. hlen Sie 'IMAP Online' als Dienst im Feld 'Protokoll' aus. X
  2589. Wenn Ihr Internet-Server SSL (Secure Sockets Layer) ben
  2590. tigt, setzen Sie das Feld 'SSL' auf 'Aktiviert'. Wenn Sie SSL aktivieren, sollten Sie die SSL-Einstellungen im Register 'Erweitert' der Maske 'Benutzerkonto' 
  2591. berpr
  2592. fen. Weitere Informationen zu SSL finden Sie weiter unten im Abschnitt 'Weiterf
  2593. hrende Themen'. X
  2594. Wenn Sie dieses Konto nur in ausgew
  2595. hlten Arbeitsumgebungen verwenden m
  2596. chten, 
  2597. ndern Sie das Feld 'Nur von folgenden Arbeitsumgebungen'. Wenn Ihr IMAP-Konto beispielsweise nur verf
  2598. gbar ist, wenn Sie Ihren Internet Service Provider (ISP) von zu Hause aus anw
  2599. hlen, sollten Sie auch nur die Arbeitsumgebung 'Zuhause' ausw
  2600. hlen. 
  2601. IMAP verwenden
  2602. Um Ihre IMAP-Mail online zu lesen, verwenden Sie eine 'Mail (IMAP)'-Datenbank. Obwohl es sich um eine lokale Datenbank handelt, werden Ihre IMAP-Nachrichten dort nicht lokal gespeichert. Die Datenbank enth
  2603. lt statt dessen bestimmte Gestaltungselemente wie Ordner und Masken und ruft Nachrichten bzw. Nachrichten-Zusammenfassungen von Ihrem IMAP-Server ab.
  2604. So lesen Sie Ihre IMAP-Mail: 
  2605. Wechseln Sie zur Internet-Arbeitsumgebung oder zu einer Arbeitsumgebung, die Sie manuell f
  2606. r IMAP-Internet-Mail eingerichtet haben. 
  2607. hlen Sie 'Datei - Datenbank - 
  2608. ffnen', und w
  2609. hlen Sie die Datenbank f
  2610. r eingehende Internet-Mail aus. Wenn Sie das IMAP-Benutzerkonto manuell erstellt haben, hei
  2611. t die Datenbank '<Benutzerkontenname> (IMAP)', wobei <Benutzerkontenname> der von Ihnen vergebene Name ist. 
  2612. Wenn Sie die richtige Datenbank ausgew
  2613. hlt haben, klicken Sie auf '
  2614. ffnen'. Notes V5 stellt eine Verbindung zu Ihrem IMAP-Server her und ruft Nachrichten-Zusammenfassungen von Ihrem IMAP-Posteingang ab. X
  2615. Um eine Mail-Nachricht zu lesen, w
  2616. hlen Sie die Nachricht aus, und dr
  2617. cken Sie die Eingabetaste. X
  2618. tzlich zum IMAP-Online-Modus unterst
  2619. tzt Notes V5 den IMAP-Offline-Modus. Weitere Informationen finden Sie im Unterabschnitt 'IMAP-Replik erstellen' weiter unten im Abschnitt 'Weiterf
  2620. hrende Themen'. 
  2621. Internet-Mail zum Senden einrichtenX
  2622. Wenn Sie Notes zum ersten Mal starten, k
  2623. nnen Sie das Produkt so konfigurieren, da
  2624.  es automatisch Internet-Benutzerkontendokumente f
  2625. r ausgehende Mail erstellt. 
  2626. Um Notes zum Senden von Internet-Mail einzurichten, m
  2627. ssen Sie ein Internet-Benutzerkontendokument f
  2628. r ausgehende SMTP-Mail erstellen. Lesen Sie dazu weiter oben den Abschnitt 'Internet-Benutzerkontendokumente', und beachten Sie folgendes. W
  2629. hlen Sie 'SMTP' als Dienst im Feld 'Protokoll' aus. 
  2630. Wenn Sie das SMTP-Konto erstellt haben, m
  2631. ssen Sie ein Arbeitsumgebungsdokument erstellen oder entsprechend bearbeiten. SMTP wird dazu verwendet, Mail nur in Arbeitsumgebungen zu senden, bei denen das Feld 'Ausgehende Mail senden' im  Arbeitsumgebungsdokument auf 'Direkt ins Internet' gesetzt ist. 
  2632. Internet-Mail senden
  2633. Wenn Sie IMAP f
  2634. r eingehende Mail verwenden, senden Sie Mail bei ge
  2635. ffnetem Posteingang oder einem anderen ge
  2636. ffneten Mail-Ordner: X
  2637. Klicken Sie auf die Schaltfl
  2638. che 'Neues Memo'. X
  2639. Nehmen Sie in den Feldern 'An:', 'Thema:' und 'Kopie:' die gew
  2640. nschten Eintr
  2641. ge vor. X
  2642. Geben Sie den Nachrichtentext ein 
  2643. Klicken Sie auf 'Senden'. Kann auf Ihr SMTP-Konto zugegriffen werden, sendet Notes Ihre Mail sofort. Kann auf Ihr SMTP-Konto nicht zugegriffen werden, speichert Notes Ihre Mail in einer lokalen Datenbank f
  2644. r ausgehende Mail (SMTP.BOX). Um Mail aus der Datenbank f
  2645. r ausgehende Mail zu senden, gehen Sie zur Replikatorseite, aktivieren Sie den Eintrag 'Ausgehende Internet-Mail senden', und klicken Sie auf 'Start'. X
  2646. Weiterf
  2647. hrende Themen 
  2648. Notes V5 unterst
  2649. tzt Secure Sockets Layer (SSL), um eine sichere Kommunikation bei Verwendung von IMAP, POP3, LDAP und NNTP zu gew
  2650. hrleisten. Um SSL zu aktivieren, m
  2651. ssen Sie wissen, welche SSL-Version von Ihrem Server unterst
  2652. tzt wird. Notes unterst
  2653. tzt die SSL-Versionen 2.0 und 3.0 und kann die geeignete SSL-Version f
  2654. r den jeweiligen Server automatisch bestimmen. X
  2655. So aktivieren Sie SSL f
  2656. r ein bestimmtes Benutzerkonto: 
  2657. ffnen Sie Ihr pers
  2658. nliches Adre
  2659. buch. X
  2660. Erweitern Sie 'Erweitert'. X
  2661. Klicken Sie auf den Kontenordner. 
  2662. ffnen Sie das entsprechende Benutzerkonto, z. B. POP3. 
  2663. Setzen Sie im Register 'Allgemein' das Feld 'SSL' auf 'Aktiviert'. X
  2664. hlen Sie im Register 'Erweitert' die korrekte Version f
  2665. r das SSL-Protokoll aus. Wenn Sie etwas anderes w
  2666. hlen als 'Nur V2.0', sollten Sie unbedingt die Anweisungen im nachfolgenden Abschnitt 'Internet-Gegenzertifikat abrufen' befolgen. X
  2667. Klicken Sie auf 'Speichern' und dann auf 'Schlie
  2668. en'. 
  2669. Internet-Gegenzertifikat abrufen X
  2670. Bevor Sie SSL Version 3.0 mit IMAP, LDAP, NNTP oder POP3 verwenden k
  2671. nnen, m
  2672. ssen Sie ein Gegenzertifikat f
  2673. r den Server abrufen. F
  2674. hren Sie dazu folgende Schritte aus: X
  2675. hlen Sie 'Datei - Extras - Internet-Gegenzertifikat hinzuf
  2676. gen'. X
  2677. hlen Sie ein Protokoll, mit dem das Gegenzertifikat abgerufen werden soll. Der Server mu
  2678.  auf dem angegebenen Anschlu
  2679.  empfangsbereit sein. Wenn Sie das Gegenzertifikat abgerufen haben, kann es unter Verwendung eines beliebigen Protokolls zur SSL-Kommunikation benutzt werden. X
  2680. Geben Sie den Servernamen ein. X
  2681. Klicken Sie auf 'Gegenzertifizieren'. Ein Dialogfeld wird angezeigt, in dem Sie das zum Gegenzertifizieren gew
  2682. nschte Zertifikat ausw
  2683. hlen k
  2684. nnen. X
  2685. Bearbeiten Sie das Arbeitsumgebungsdokument
  2686. Klicken Sie auf das Register 'Allgemein'
  2687. Klicken Sie auf die Schaltfl
  2688. che neben dem Feld 'Proxy'. Das Dialogfeld 'Proxy-Server-Konfiguration' wird eingeblendet
  2689. Stellen Sie sicher, da
  2690.  das Proxy-Kontrollk
  2691. stchen entsprechend aktiviert ist, je nachdem, ob Sie einen Proxy-Server f
  2692. r den Internet-Zugang benutzen oder nicht
  2693. Speichern Sie Ihre 
  2694. nderungen
  2695. Hinweis:
  2696.  Erscheint das Dialogfeld nicht, besitzen Sie kein Gegenzertifikat. 
  2697. berpr
  2698. fen Sie, ob der Server f
  2699. r den angegebenen Anschlu
  2700.  empfangsbereit ist und das Kontrollk
  2701. stchen X
  2702. ProxyX
  2703.  korrekt eingestellt ist. W
  2704. hlen Sie das Serverzertifikat, und klicken Sie auf 'OK'.
  2705. IMAP-Replik erstellen 
  2706. Wie bereits erw
  2707. hnt, werden Nachrichten nicht lokal in der 'Mail (IMAP)'-Datenbank gespeichert. M
  2708. glicherweise ben
  2709. tigen Sie aber eine Replik der 'Mail (IMAP)'-Datenbank, in der Nachrichten lokal gespeichert werden. Dies w
  2710. re beispielsweise dann erforderlich, wenn Sie auf eine Gesch
  2711. ftsreise gehen und deshalb zeitweise keine Verbindung zum Netzwerk haben, aber Ihre Mails lesen m
  2712. chten. X
  2713. Beim Erstellen einer Replik werden Nachrichten aus allen IMAP-Ordnern in eine separate lokale Datenbank gezogen. X
  2714. So erstellen Sie aus einer bestehenden 'Mail (IMAP)'-Datenbank eine Replik: 
  2715. ffnen Sie die 'Mail (IMAP)'-Datenbank. 
  2716. hlen Sie 'Datei - Replizierung - Neue Replik'. X
  2717. ndern Sie den Dateinamen. Wenn die 'Mail (IMAP)'-Datenbank beispielsweise den Namen IMAP.NSF hat, 
  2718. ndern Sie ihn in IMAPREP.NSF. 
  2719. Klicken Sie auf 'OK'. 
  2720. ffnen Sie die Replikatorseite. Beachten Sie, da
  2721.  es einen neuen Repliziereintrag f
  2722. r Ihre 'Mail (IMAP)'-Datenbank gibt. X
  2723. Klicken Sie auf 'Start', um mit der Replizierung zu beginnen. 
  2724. Wenn die Replizierung abgeschlossen ist, doppelklicken Sie auf den IMAP-Replizierungseintrag, um die IMAP-Replik zu 
  2725. ffnen. Sie k
  2726. nnen nun Mail-Nachrichten lokal lesen und senden. Wenn keine Verbindung zum Netzwerk besteht, werden ausgehende Mails in einer daf
  2727. r vorgesehenen Datenbank (SMTP.BOX) abgelegt. Wenn die Verbindung wiederhergestellt ist und Sie die Replizierung starten, werden die ausgehenden Mails gesendet. 
  2728. O=Lotus Notes
  2729. O=Lotus Notes
  2730. PURSAFO
  2731. |.:#U
  2732. O=Lotus Notes
  2733. CN=Lotus Notes Template Development/O=Lotus Notes
  2734. PURSAFO
  2735. $Info
  2736. $Body
  2737. $Language
  2738. $LastBuildTime
  2739. $BabelInfo
  2740. RSAFO
  2741. Sendenb
  2742. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  2743.     0R7S9S
  2744. Now save the message to the Sent folder
  2745.     0RR1S
  2746. tmpFolder
  2747. IMAPSent
  2748.     0R1S2S3S7S
  2749.     0R7S9S
  2750. Als Entwurf speichernX
  2751. Save the message to the Drafts folder
  2752. tmpFolder
  2753. IMAPDrafts
  2754.     0R1S2S3S7S
  2755.     0R7S9S
  2756. schenX 
  2757.     0S0E
  2758. Antwort\AntwortX.
  2759. Reply
  2760.     4S6S
  2761. Antwort\Antwort mit ProtokollX
  2762. Antwort mit Protokoll
  2763. Dieses Dokument ist nicht vollst
  2764. ndig.
  2765.     4S8S10S13S
  2766. Reply with history
  2767. Allen antwortenX'++LotusScript Development Environment:2:5:(Options):0:74
  2768. Option Declare
  2769. '++LotusScript Development Environment:2:5:(Forward):0:1
  2770. Declare Sub Click(Source As Button)
  2771. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  2772. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  2773. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  2774. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2775. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2776. Private Sub BindEvents(Byval Objectname_ As String)
  2777.     Static Source As BUTTON
  2778.     Set Source = Bind(Objectname_)
  2779.     On Event Click From Source Call Click
  2780. End Sub
  2781. '++LotusScript Development Environment:2:2:Click:1:12
  2782. Sub Click(Source As Button)
  2783.     Dim session As New notessession
  2784.     Dim uiwork As New notesuiworkspace
  2785.     Dim uidoc As notesuidocument
  2786.     Dim note As notesdocument
  2787.     Dim vInheritedSendTo As Variant
  2788.     Dim vRealInheritedSendTo As Variant
  2789.     Dim iSenderIndex As Integer
  2790.     Dim x As Integer
  2791.     Dim strOwner As String
  2792.     Dim strInheritedDomain As String
  2793.     Set uidoc = uiwork.currentdocument
  2794.     Set note = uidoc.document
  2795.     strOwner = session.username
  2796.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  2797.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  2798.     ' Remove the sender from the list
  2799.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  2800.     If (iSenderIndex >= 0) Then
  2801.         vInheritedSendTo(iSenderIndex) = ""
  2802.     End If        
  2803.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  2804.     ' Append the inheritedfromdomain
  2805.     If Len(strInheritedDomain) Then
  2806.         For x = 0 To Ubound(vRealInheritedSendTo)
  2807.             If Not vRealInheritedSendTo(x) = "" Then
  2808.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  2809.             End If
  2810.         Next
  2811.     End If
  2812.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  2813.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  2814.     ' Find all addresses without a domain and append FromDomain
  2815.     ' Find all addresses whose domain is the same as ours and strip it off
  2816. End Sub
  2817. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  2818. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  2819.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  2820. %END REM 
  2821.     Dim x As Integer
  2822.     Dim iNames As Integer
  2823.     NAMEFindInList = -1
  2824.     If Isempty(vListOfNames) Then
  2825.         Exit Function
  2826.     End If
  2827.     If Isarray(vListOfNames) Then
  2828.         iNames = Ubound(vListOfNames)
  2829.         For x = 0 To iNames
  2830.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  2831.                 NAMEFindInList = x
  2832.                 Exit Function
  2833.             End If
  2834.         Next
  2835.     Else
  2836.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  2837.     End If
  2838. End Function
  2839. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  2840. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  2841.     Returns true if two names are equal, False otherwise
  2842. %END REM
  2843.     Dim sCanName1 As String
  2844.     Dim sDomainName1 As String
  2845.     Dim sCanName2 As String
  2846.     Dim sDomainName2 As String
  2847.     Dim nLenName1 As Integer
  2848.     Dim nLenName2 As Integer
  2849.     Dim name1 As NotesName
  2850.     Dim name2 As NotesName
  2851.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  2852.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  2853.     Set name1 = New NotesName(sCanName1)
  2854.     Set name2 = New NotesName(sCanName2)
  2855.     ' Do a canonical comparison if both names are hierarchical
  2856.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  2857.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  2858.             NAMECompare = True
  2859.             Exit Function
  2860.         Else
  2861.             Exit Function        
  2862.         End If
  2863.     End If
  2864.      ' Compare the common names
  2865.     If (Strcompare(name1.common, name2.common) = 0) Then
  2866.         NAMECompare = True
  2867.         Exit Function
  2868.     End If
  2869.     NAMECompare = False
  2870. End Function
  2871. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  2872. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  2873.     Dim nameUser As NotesName
  2874.     Set nameUser = New NotesName(sUsername) 
  2875.     If Instr(sUserName,"@") Then
  2876.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  2877.         sRetDomain = Strright(nameUser.abbreviated,"@")
  2878.     Else
  2879.         sRetAbbreviatedName = nameUser.abbreviated
  2880.         sRetDomain = ""
  2881.     End If
  2882. End Sub
  2883. Adresse... 
  2884.     0S0E
  2885. Zustelloptionen...
  2886. DeliveryOptions
  2887. Zustelloptionen
  2888.     4S5S6S7S8S10S
  2889. Sendenb
  2890. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  2891.     0R7S9S
  2892. Now save the message to the Sent folder
  2893.     0RR1S
  2894. tmpFolder
  2895. IMAPSent
  2896.     0R1S2S3S7S
  2897.     0R7S9S
  2898. act_SEND.GIF|act_SENDX
  2899. Als Entwurf speichernX
  2900. Save the message to the Drafts folder
  2901. tmpFolder
  2902. IMAPDrafts
  2903.     0R1S2S3S7S
  2904.     0R7S9S
  2905. act_SAVEASDRAFT.GIF|act_SAVEASDRAFTX
  2906. schenX 
  2907.     0S0E
  2908. act_DELETE.GIF|act_DELETEX
  2909. Antwort\AntwortX.
  2910. Reply
  2911.     4S6S
  2912. act_REPLY.GIF|act_REPLYX
  2913. Antwort\Antwort mit ProtokollX
  2914. Antwort mit Protokoll
  2915. Dieses Dokument ist nicht vollst
  2916. ndig.
  2917.     4S8S10S13S
  2918. Reply with history
  2919. act_REPLY.GIF|act_REPLYX
  2920. Allen antwortenX'++LotusScript Development Environment:2:5:(Options):0:74
  2921. Option Declare
  2922. '++LotusScript Development Environment:2:5:(Forward):0:1
  2923. Declare Sub Click(Source As Button)
  2924. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  2925. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  2926. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  2927. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2928. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2929. Private Sub BindEvents(Byval Objectname_ As String)
  2930.     Static Source As BUTTON
  2931.     Set Source = Bind(Objectname_)
  2932.     On Event Click From Source Call Click
  2933. End Sub
  2934. '++LotusScript Development Environment:2:2:Click:1:12
  2935. Sub Click(Source As Button)
  2936.     Dim session As New notessession
  2937.     Dim uiwork As New notesuiworkspace
  2938.     Dim uidoc As notesuidocument
  2939.     Dim note As notesdocument
  2940.     Dim vInheritedSendTo As Variant
  2941.     Dim vRealInheritedSendTo As Variant
  2942.     Dim iSenderIndex As Integer
  2943.     Dim x As Integer
  2944.     Dim strOwner As String
  2945.     Dim strInheritedDomain As String
  2946.     Set uidoc = uiwork.currentdocument
  2947.     Set note = uidoc.document
  2948.     strOwner = session.username
  2949.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  2950.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  2951.     ' Remove the sender from the list
  2952.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  2953.     If (iSenderIndex >= 0) Then
  2954.         vInheritedSendTo(iSenderIndex) = ""
  2955.     End If        
  2956.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  2957.     ' Append the inheritedfromdomain
  2958.     If Len(strInheritedDomain) Then
  2959.         For x = 0 To Ubound(vRealInheritedSendTo)
  2960.             If Not vRealInheritedSendTo(x) = "" Then
  2961.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  2962.             End If
  2963.         Next
  2964.     End If
  2965.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  2966.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  2967.     ' Find all addresses without a domain and append FromDomain
  2968.     ' Find all addresses whose domain is the same as ours and strip it off
  2969. End Sub
  2970. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  2971. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  2972.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  2973. %END REM 
  2974.     Dim x As Integer
  2975.     Dim iNames As Integer
  2976.     NAMEFindInList = -1
  2977.     If Isempty(vListOfNames) Then
  2978.         Exit Function
  2979.     End If
  2980.     If Isarray(vListOfNames) Then
  2981.         iNames = Ubound(vListOfNames)
  2982.         For x = 0 To iNames
  2983.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  2984.                 NAMEFindInList = x
  2985.                 Exit Function
  2986.             End If
  2987.         Next
  2988.     Else
  2989.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  2990.     End If
  2991. End Function
  2992. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  2993. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  2994.     Returns true if two names are equal, False otherwise
  2995. %END REM
  2996.     Dim sCanName1 As String
  2997.     Dim sDomainName1 As String
  2998.     Dim sCanName2 As String
  2999.     Dim sDomainName2 As String
  3000.     Dim nLenName1 As Integer
  3001.     Dim nLenName2 As Integer
  3002.     Dim name1 As NotesName
  3003.     Dim name2 As NotesName
  3004.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  3005.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  3006.     Set name1 = New NotesName(sCanName1)
  3007.     Set name2 = New NotesName(sCanName2)
  3008.     ' Do a canonical comparison if both names are hierarchical
  3009.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  3010.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  3011.             NAMECompare = True
  3012.             Exit Function
  3013.         Else
  3014.             Exit Function        
  3015.         End If
  3016.     End If
  3017.      ' Compare the common names
  3018.     If (Strcompare(name1.common, name2.common) = 0) Then
  3019.         NAMECompare = True
  3020.         Exit Function
  3021.     End If
  3022.     NAMECompare = False
  3023. End Function
  3024. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  3025. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  3026.     Dim nameUser As NotesName
  3027.     Set nameUser = New NotesName(sUsername) 
  3028.     If Instr(sUserName,"@") Then
  3029.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  3030.         sRetDomain = Strright(nameUser.abbreviated,"@")
  3031.     Else
  3032.         sRetAbbreviatedName = nameUser.abbreviated
  3033.         sRetDomain = ""
  3034.     End If
  3035. End Sub
  3036. act_REPLY.GIF|act_REPLYX
  3037. Adresse... 
  3038.     0S0E
  3039. act_ADDRESSBOOK.GIF|act_ADDRESSBOOKX
  3040. Zustelloptionen...
  3041. DeliveryOptions
  3042. Zustelloptionen
  3043.     4S5S6S7S8S10S
  3044. act_DELIVERYOPTIONS.GIF|act_DELIVERYOPTIONSX
  3045. Lotus Product
  3046. ^$    +`
  3047. ^4    +`
  3048. #K4    -
  3049. #K4    -
  3050. O=Lotus Notes
  3051. O=Lotus Notes
  3052. PURSAFO
  3053. |.:#U
  3054. O=Lotus Notes
  3055. CN=Lotus Notes Template Development/O=Lotus Notes
  3056. PURSAFO
  3057. g[P8r
  3058. $Info
  3059. $ACTIONS
  3060. $V5ACTIONS
  3061. $Body
  3062. $SCRIPTOBJ_5
  3063. $Language
  3064. $LastBuildTime
  3065. $BabelInfo
  3066. CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Rob Shaver/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotwsCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3067. TemplateNameTemplateName
  3068. dspDbTitledspDbTitle
  3069. act_DELETE.GIFact_DELETE
  3070. MemoMemo
  3071. (Delivery Options)DeliveryOptions
  3072. act_FOLDER.GIFact_FOLDER
  3073. act_DEGIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3074. act_EDIT.GIFact_EDIT
  3075. OutlineDisplayOutlineDisplay
  3076. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3077. act_completed.GIFact_CSCOMPLETED
  3078. act_FORWARD.GIFact_FORWARD
  3079. act_NEWMEMO.GIFact_NEWMEMO
  3080. act_ok.GIFact_CSOK
  3081. act_REPLY.GIFact_REPLY
  3082. act_INSERTSIG.GIFact_INSERTSIG
  3083. act_save.GIFact_CSSAVE
  3084. act_SEND.GIFact_SEND
  3085. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3086. memoBG.gifmemoBG.gif
  3087. ImapOutline.gifImapOutline.gif
  3088. AntwortReply
  3089. MemoGR.gifMemoGR.gif
  3090. Antwort mit ProtokollReply with history
  3091. Antwort mit ProtokollReply
  3092. (Delivery Options)DeliveryOptions
  3093. Fact_INSERTSIG
  3094. act_NEWMEM
  3095. CN=William Zircher/O=IrisCN=Debbie B
  3096. Antwort mit ProtokollReply
  3097. RTSIG.GIFact_INSERTSIG
  3098. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3099. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3100. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3101. act_completed.GI
  3102. act_SEND.GIFact_SEND
  3103. pOutline.gif
  3104. memoBG.gifmemoBG.gif
  3105. Antwort mit ProtokollReply
  3106. act_FOLDER.GIFact_FOLDER
  3107. ND.GIFact_SEND
  3108. ImapOutline.gifImapOut
  3109. act_completed.GIFact
  3110. Fact_I
  3111. save.GIFact_CSSAVE
  3112. MemoGR.gifMemoGR.gif
  3113. AntwortReply
  3114. TemplateNameTemplateName
  3115. dspDbTitledspDbTitle
  3116. act_DELETE.GIFact_DELETE
  3117. MemoMemo
  3118. (Delgvery Options)DeliveryOptions
  3119. Antwort mit ProtokollReply
  3120. act_FOLDER.GIFact_FOLDER
  3121. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3122. act_EDIT.GIFact_EDIT
  3123. OutlineDisplayOutlineDisplay
  3124. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3125. act_completed.GIFact_CSCOMPLETED
  3126. act_FORWARD.GIFact_FORWARD
  3127. act_NEWMEMO.GIFact_NEWMEMO
  3128. act_ok.GIFact_CSOK
  3129. act_REPLY.GIFact_REPLY
  3130. act_INSERTSIG.GIFact_INSERTSIG
  3131. act_save.GIFact_CSSAVE
  3132. act_SEND.GIFact_SEND
  3133. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3134. memoBG.gifmemoBG.gif
  3135. ImapOutline.gifImapOutline.gif
  3136. Antwort mit ProtokollReply
  3137. (Delivery Options)DeliveryOptions
  3138. Fact_INSERTSIG
  3139. act_NEWMEM
  3140. CN=William Zircher/O=IrisCN=Gebbie B
  3141. Antwort mit ProtokollReply
  3142. RTSIG.GIFact_INSERTSIG
  3143. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3144. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3145. t_ADDRESSBGOK.GIFact_ADDRESSBOOK
  3146. act_completed.GI
  3147. act_SEND.GIFact_SEND
  3148. pOutline.gif
  3149. memoBG.gifmemoBG.gif
  3150. Antwort mit ProtokollReply
  3151. act_FOLDER.GIFact_FOLDER
  3152. ND.GIFact_SEND
  3153. ImapOutline.gifImapOut
  3154. act_completed.GIFact_CSCOMPLETED
  3155. act_DELETE.GIFact_DELETE
  3156. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3157. TemplateNameTemplateName
  3158. dspDbTitledspDbTitle
  3159. act_DELETE.GIFact_DELETE
  3160. MemoMemo
  3161. (Delivery Options)DeliveryOptions
  3162. act_FOLDER.GIFact_FOLDER
  3163. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3164. act_EDIT.GIFact_EDIT
  3165. OutlineDisplayOutlineDisplay
  3166. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3167. act_completed.GIFact_CSCOMPLETED
  3168. act_FORWARD.GIFact_FORWARD
  3169. act_NEWMEMO.GIFact_NEWMEMO
  3170. act_ok.GIFact_CSOK
  3171. act_REPLY.GIFact_REPLY
  3172. act_INSERTSIG.GIFact_INSERTSIG
  3173. act_save.GIFact_CSSAVE
  3174. act_SEND.GIFact_SEND
  3175. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3176. memoBG.gifmemoBG.gif
  3177. ImapOutline.gifImapOutline.gif
  3178. AntwortReply
  3179. MemoGR.gifMemoGR.gif
  3180. MemoGR.gifMemoGR.gif
  3181. ifMemoGR.gif
  3182. Antwort mit ProtokollReply
  3183. (Delivery Options)DeliveryOptions
  3184. Fact_INSERTSIG
  3185. act_NEWMEM
  3186. CN=William Zircher/O=IrisCN=Debbie B
  3187. Antwort mit ProtokollReply
  3188. RTSIG.GIFact_INSERTSIG
  3189. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3190. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3191. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3192. act_completed.GI
  3193. act_SEND.GIFact_SEND
  3194. pOutline.gif
  3195. memoBG.gifmemoBG.gif
  3196. Antwort mit ProtokollReply
  3197. act_FOLDER.GIFact_FOLDER
  3198. ND.GIFact_SEND
  3199. ImapOutline.gifImapOut
  3200. act_completed.GIFact
  3201. Fact_I
  3202. save.GIFact_CSSAVE
  3203. MemoGR.gifMemoGR.gif
  3204. TemplateNameTemplateName
  3205. dspDbTitledspDbTitle
  3206. act_DELETE.GIFact_DELETE
  3207. MemoMemo
  3208. (Delivery Options)DeliveryOptions
  3209. Antwort mit ProtokollReply
  3210. act_FOLDER.GIFact_FOLDER
  3211. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3212. act_EDIT.GIFact_EDIT
  3213. OutlineDisplayOutlineDisplay
  3214. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3215. act_completed.GIFact_CSCOMPLETED
  3216. act_FORWARD.GIFact_FORWARD
  3217. act_NEWMEMO.GIFact_NEWMEMO
  3218. act_ok.GIFact_CSOK
  3219. act_TEPLY.GIFact_REPLY
  3220. act_INSERTSIG.GIFact_INSERTSIG
  3221. act_save.GIFact_CSSAVE
  3222. act_SEND.GIFact_SEND
  3223. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3224. memoBG.gifmemoBG.gif
  3225. ImapOutline.gifImapOutline.gif
  3226. Antwort mit ProtokollReply
  3227. (Delivery Options)DeliveryOptions
  3228. Fact_INSERTSIG
  3229. act_NEWMEM
  3230. CN=William Zircher/O=IrisCN=Debbie B
  3231. Antwort mit ProtokollReply
  3232. RTSIG.GIFact_INSERTSIG
  3233. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3234. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3235. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3236. act_completed.GI
  3237. act_SEND.GIFact_SEND
  3238. pOutline.gif
  3239. memoBG.gifmemoBG.gif
  3240. Antwort mit ProtokollReply
  3241. act_FOLDER.GIFact_FOLDER
  3242. ND.GIFact_SEND
  3243. ImapOutline.gifImapOut
  3244. act_completed.GIFact
  3245. Fact_INSERTSIG
  3246. act_NEWMEM
  3247. CN=William Zircher/O=IrisCN=Debbie B
  3248. Antwort mit ProtokollReply
  3249. RTSIG.GIFact_INSERTSIG
  3250. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3251. MemoGR.gifMemoGR.gif
  3252. TemplateNameTemplateName
  3253. dspDbTitledspDbTitle
  3254. act_DELETE.GIFact_DELETE
  3255. MemoMemo
  3256. (Delivery Options)DeliveryOptions
  3257. Antwort mit ProtokollReply
  3258. act_FOLDER.GIFact_FOLDER
  3259. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3260. act_EDIT.GIFact_EDIT
  3261. OutlineDisplayOutlineDisplay
  3262. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3263. act_completed.GIFact_CSCOMPLETED
  3264. act_FORWARD.GIFact_FORWARD
  3265. act_NEWMEMO.GIFact_NEWMEMO
  3266. act_ok.GIFact_CSOK
  3267. act_REPLY.GIFact_REPLY
  3268. act_INSERTSIG.GIFact_INSERTSIG
  3269. act_save.GIFact_CSSAVE
  3270. act_SEND.GIFact_SEND
  3271. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3272. memoBG.gifmemoBG.gif
  3273. ImapOutline.gifImapOutline.gif
  3274. AntwortReply
  3275. AntwortReply
  3276. AntwortReply
  3277. Antwort mit ProtokollReply
  3278. (Delivery Options)DeliveryOptions
  3279. Fact_INSERTSIG
  3280. act_NEWMEM
  3281. CN=William Zircher/O=IrisCN=Debbie B
  3282. Antwort mit ProtokollReply
  3283. RTSIG.GIFact_INSERTSIG
  3284. r_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3285. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3286. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3287. act_completed.GI
  3288. act_SEND.GIFact_SEND
  3289. pOutline.gif
  3290. memoBG.gifmemoBG.gif
  3291. Antwort mit ProtokollReply
  3292. act_FOLDER.GIFact_FOLDER
  3293. ND.GIFact_SEND
  3294. ImapOutline.gifImapOut
  3295. act_completed.GIFact
  3296. Fact_I
  3297. TemplateNameTemplateName
  3298. dspDbTitledspDbTitle
  3299. act_DELETE.GIFact_DELETE
  3300. MemoMemo
  3301. (Delivery Options)DeliveryOptions
  3302. Antwort mit ProtokollReply
  3303. act_FOLDER.GIFact_FOLDER
  3304. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3305. act_EDIT.GIFact_EDIT
  3306. OutlineDisplayOutlineDisplay
  3307. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3308. act_completed.GIFact_CSCOMPLETED
  3309. act_FORWARD.GIFact_FORWARD
  3310. act_NEWMEMO.GIFact_NEWMEMO
  3311. act_ok.GIFact_CSOK
  3312. act_REPLY.GIFact_REPLY
  3313. act_INSERTSIG.GIFact_INSERTSIG
  3314. act_save.GIFact_CSSAVE
  3315. act_SEND.GIFact_SEND
  3316. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3317. memoBG.gifmemoBG.gif
  3318. ImapOutline.gifImapOutline.gif
  3319. AntwortReply
  3320. AntwortReply
  3321. Antwort mit ProtokollReply
  3322. (Delivery Options)DeliveryOptions
  3323. Fact_INSERTSIG
  3324. act_NEWMEM
  3325. CN=Wblliam Zircher/O=IrisCN=Debbie B
  3326. Antwort mit ProtokollReply
  3327. RTSIG.GIFact_INSERTSIG
  3328. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3329. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3330. t_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3331. act_completed.GI
  3332. act_SEND.GIFact_SEND
  3333. pOutline.gif
  3334. memoBG.gifmemoBG.gif
  3335. Antwort mit ProtokollReply
  3336. act_FOLDER.GIFact_FOLDER
  3337. ND.GIFact_SEND
  3338. ImapOutline.gifImapOut
  3339. act_completed.GIFact
  3340. Fact_I
  3341. save.GIFact_CSSAVE
  3342. act_SEND.GIFact_SEND
  3343. ImapOutline.gifImapOutbine.gif
  3344. acq_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3345. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3346. act_completed.GIFact_CSCOMPLETED
  3347. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun MaGale/OU=DUB/O=Lotus
  3348. #0|VF
  3349. act_DELETE.GIFact_DELETE
  3350. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3351. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3352. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Temqlate Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3353. act_EDIT.GIFact_EDIT
  3354. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3355. act_FOLDER.GIFact_FOLDER
  3356. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3357. act_FORWARD.GIFact_FORWARD
  3358. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3359. act_INSERTSIG.GIFact_INSERQSIG
  3360. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3361. act_NEWMEMO.GIFact_NEWMEMO
  3362. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3363. act_ok.GIFact_CSOK
  3364. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3365. act_REPLY.GIFact_REPLY
  3366. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN1Shaun McGale/OU=DUB/O=Lotus
  3367. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3368. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3369. act_save.GIFact_CSSAVE
  3370. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Templata Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusNx?
  3371. 0mZhQ
  3372. act_SEND.GIFact_SEND
  3373. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3374. AntwortReply
  3375. CN=Debbie Branco!O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3376. Antwort mit ProtokollReply
  3377. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3378. dspDbTitledspDbTitle
  3379. CN=Debbie Branco/O1IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3380. ImapOutline.gifImapOutline.gif
  3381. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3382. CN=Debbie Branco/O1IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3383. CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Rob Shaver/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=Ryan Jansen/O=IrisCN=Teresa Deane/O=IrisCN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DQB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3384. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3385. MemoMemo
  3386. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3387. memoBG.gifmemoBG.gif
  3388. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3389. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3390. act_SAQEASDRAFT.GIFact_SAVEASDRAFT
  3391. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3392. act_save.GIFact_CSSAVE
  3393. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O1LotusNx?
  3394. 0mZhQ
  3395. act_INSERTSIG.GIFact_INSERTSIG
  3396. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3397. act_REPLY.GIFact_REPLY
  3398. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Deveaopment/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3399. act_ok.GIFact_CSOK
  3400. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3401. act_NEWMEMO.GIFactQNEWMEMO
  3402. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3403. act_FORWARD.GIFact_FORWARD
  3404. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Karr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3405. act_completed.GIFact_CSCOMPLETED
  3406. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3407. #0|VF
  3408. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3409. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3410. act_EDIT.GIFact_EDIT 
  3411. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesAN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3412. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3413. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3414. act_FOLDER.GAFact_FOLDER
  3415. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3416. act_DELETE.GIFact_DELETE
  3417. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul!Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3418. act_save.GIFact_CSSAVE
  3419. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusNx?
  3420. 0mZhQ
  3421. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3422. AN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3423. act_REPLY.GIFact_REPLY
  3424. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3425. act_ok.GIFact_CSOK
  3426. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3427. act_NEWMEMO.GIFact_NEWMEMO
  3428. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3429. act_INSERTSIG.GIFact_INSERTSIG
  3430. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3431. act_FORWARD.GIFact_FORWARD
  3432. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaqn McGale/OU=DUB/O=Lotus
  3433. act_FOLDER.GIFact_FOLDER
  3434. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3435. act_EDIT.GIFact_EDIT
  3436. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Noqes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3437. act_DELIVERYOPTIONS.GIFact_DELIVERYOPTIONS
  3438. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3439. act_completed.GIFact_CSCOMPLETED
  3440. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3441. #0|VF
  3442. act_ADDRESSBOOK.GIFact_ADDRESSBOOK
  3443. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3444. MemoMemo
  3445. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3446. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3447. ImapOutline.gifImapOutline.gif
  3448. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3449. memoBG.gifmemoBG.gif
  3450. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3451. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3452. Antwort mit ProtokollReply with history
  3453. MemoGR.gifMemoGR.gif
  3454. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3455. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Cotus Notes
  3456. AntwortReply
  3457. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3458. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3459. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3460. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3461. ImapOutline.gifImapOutline.gif
  3462. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3463. memoBG.gifmemoBG.gif
  3464. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Dcvelopment/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3465. act_SAVEASDRAFT.GIFact_SAVEASDRAFT
  3466. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3467. act_SEND.GIFact_SEND 
  3468. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3469. act_save.GIFact_CSSAVE
  3470. CN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Devecopment/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3471. 0mZhQ
  3472. OutlineDisplayOutlineDisplay
  3473. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3474. CN=Dave Delay/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3475. CN=Marc Zehngut/O=IrisCN=Mike Palone/O=IrisCN=Teresa Deane/O=IrisCN=Rob Slapikoff/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCC=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3476. Antwort mit ProtokollReply
  3477. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3478. (Delivery Options)DeliveryOptions
  3479. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/C=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesk#
  3480. MemoMemo
  3481. CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3482. dspDbTitledspDbTitle
  3483. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=CUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3484. TemplateNameTemplateName
  3485. CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
  3486. MemoGR.gifMemoGR.gif
  3487. CN=Debbie Branco/O=IrisCC=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3488. AntwortReply0
  3489. CN=William Zircher/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Paul Kerr/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=Lotus
  3490. act_REPLY.GIFact_REPLYr
  3491. act_SAVEASDRAFT.GIFact_SAVEASDRAFTv
  3492. act_save.GIFact_CSSAVE
  3493. Lotus Product
  3494. OBJECT
  3495. Lotus ProductQ
  3496. V0.0L
  3497. J,|}8r
  3498. J,|}8r
  3499. ^,|J,|
  3500. JT~KD~-
  3501. JT~KD~-
  3502. KD~-<
  3503. ~}8rKD~-`
  3504. Lotus Product
  3505. OBJECT
  3506. Lotus Product
  3507. OBJECT
  3508. Lotus Product
  3509. OBJECT
  3510. Lotus Product
  3511. OBJECT
  3512. Lotus Product1
  3513. KV0.0}
  3514. Kl*,|$}0
  3515. Kl*U|*
  3516. Kl*,|$}`
  3517. Kl*,|$}
  3518.  -$&#,
  3519.  -$&#,|$}p
  3520.  -$&#,
  3521.  -$&#,
  3522.  -$&#,|$}p
  3523.  -$&#,
  3524.  -$&#,|$}
  3525. memoBG.gif|memoBG.gif
  3526. HeaderRegion
  3527. BodyRegion
  3528. Neues Memo
  3529. Subject
  3530. Subject
  3531. Subject
  3532.     4S6S12S13S14S15S17S21S23S25S26S28S
  3533. &Arial
  3534. Times New Roman
  3535. FComic Sans MS
  3536. '++LotusScript Development Environment:2:5:(Options):0:74
  3537. Option Public
  3538. '++LotusScript Development Environment:2:5:(Forward):0:1
  3539. Declare Sub Initialize
  3540. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3541. Dim glbDraftsFolderName As String
  3542. Dim glbSentFolderName As String
  3543. Dim glbCurrentFolderName As String
  3544. '++LotusScript Development Environment:2:2:Initialize:1:10
  3545. Sub Initialize
  3546.     Dim Sess As NotesSession
  3547.     Dim Value As String
  3548.     'Set Defaults for Drafts and Sent folders
  3549.     glbDraftsFolderName = "Drafts"
  3550.     glbSentFolderName = "Sent"
  3551.     'Get overrides from NOTES.INI
  3552.     Set Sess = New NotesSession
  3553.     Value = Sess.GetEnvironmentString("IMAPDrafts")
  3554.     If ( Value <> "" ) Then
  3555.         glbDraftsFolderName = Value
  3556.     End If
  3557.     Value = Sess.GetEnvironmentString("IMAPSent")
  3558.     If ( Value <> "" ) Then
  3559.         glbSentFolderName = Value
  3560.     End If
  3561. End Sub
  3562. Lotus Product
  3563.  Reply with history'++LotusScript Development Environment:2:5:(Options):0:66
  3564. '++LotusScript Development Environment:2:5:(Forward):0:1
  3565. Declare Sub Postrecalc(Source As Notesuidocument)
  3566. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  3567. Declare Sub Postsave(Source As Notesuidocument)
  3568. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3569. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3570. Private Sub BindEvents(Byval Objectname_ As String)
  3571.     Static Source As NOTESUIDOCUMENT
  3572.     Set Source = Bind(Objectname_)
  3573.     On Event Postrecalc From Source Call Postrecalc
  3574.     On Event Queryopen From Source Call Queryopen
  3575.     On Event Postsave From Source Call Postsave
  3576. End Sub
  3577. '++LotusScript Development Environment:2:2:Postrecalc:1:12
  3578. Sub Postrecalc(Source As Notesuidocument)
  3579. End Sub
  3580. '++LotusScript Development Environment:2:2:Queryopen:1:12
  3581. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  3582.     If Not Isempty(Source.ParentViewName)  Then
  3583.         glbCurrentFolderName = Source.ParentViewName
  3584.     Else
  3585.         glbCurrentFolderName = "Inbox"
  3586.     End If
  3587. End Sub
  3588. '++LotusScript Development Environment:2:2:Postsave:1:12
  3589. Sub Postsave(Source As Notesuidocument)
  3590.     Dim Note As NotesDocument
  3591.     Dim TargetFolderName As String
  3592.     Set Note = Source.Document
  3593.     'Put the document in the current folder
  3594.     Call Note.PutInFolder(glbCurrentFolderName)
  3595.     'Determine target folder
  3596.     TargetFolderName = Note.TmpFolder(0)
  3597.     'Move the document to the target folder
  3598.     If ( TargetFolderName <> ""  And  TargetFolderName <> glbCurrentFolderName ) Then
  3599.         'Move it
  3600.         Call Note.PutInFolder(TargetFolderName)
  3601.         Call Note.RemoveFromFolder(glbCurrentFolderName)
  3602.         'The following was an attempt to update the current folder.  Doesn't work in IMAP on-line
  3603.         'mode because the collection behind the folder is not the right collection
  3604.         'glbCurrentFolder.Refresh
  3605.     End If
  3606. End Sub
  3607. Lotus Product
  3608. Hidden:
  3609. Principal
  3610. Principal
  3611. Principal
  3612. Fromh
  3613.     1S2S8S9S10S11S13S15S20S22S
  3614. FromDomainh
  3615. FromDomain"
  3616.     0R7S8S9S10S11S13SInheritedFrom
  3617. InheritedFrom
  3618. Subject
  3619. InheritedSubject
  3620. getLoc
  3621.     1S2S
  3622. getLoc
  3623. getLoc
  3624.     0R3S4S6S8S2E
  3625. Notes
  3626. PostedDateh
  3627. NamePreference
  3628. AltSendTo
  3629. AltSendTo
  3630. AltCopyTo
  3631. SendTo
  3632. CopyTo
  3633. InheritedSendTo
  3634. SendTo
  3635. CopyTo
  3636.     9S10S12S13S30S31S36S37S39S41SInheritedSendTo
  3637. InheritedSendTo
  3638. Notes
  3639. PostedDateh
  3640. ReplyTo
  3641. ReplyTo
  3642.     9S10S12S13SInheritedReplyToz
  3643. InheritedReplyTo
  3644. Notes
  3645. PostedDateh
  3646. FromDomain
  3647. InheritedFromDomain
  3648. FromDomain
  3649.     9S10S12S13SInheritedFromDomain
  3650. InheritedFromDomain
  3651. StdNotesLtr21
  3652. Logoz
  3653. Principal
  3654. Principal
  3655. Principal
  3656. NamePreference
  3657. AltFrom
  3658. $LangFrom
  3659. LanguagePreferencet
  3660. AltFrom
  3661.     1S2S3RTTTT4RTTTT5S7S8S9S10S12RTTTTT14TRTTTT15RTTTTT16RTTTTT19RTTTTT20S21S23RTTTTT24S25RTTTTTTT26RTTTTTTT28RTTTTTTTT30RTTTTTTT36RTTTTTTT38RTTTTTT40RTTTTT41RTTTTT42RTTTT
  3662.     0RR1S2S8S
  3663.     0R1S2S5S6S8S14S18S
  3664.     0R1S2S5S6S8S14S18S
  3665. SentBy
  3666. X400FreeForm^
  3667.     0RR1S2S5S6S8S10S11S12S14S15S16S17S18S20S21S22S24S26S
  3668. SentBy
  3669. FromDomain
  3670. FromDomain
  3671. FromDomain
  3672. FromDomain
  3673.     0RR7S10S13S14S18S20S23S24S26S28S29S30S36S39S43S46S52S
  3674. FromName
  3675. Principal
  3676. Principal
  3677. Principal
  3678.     0RR1S2S10S11S16S18S
  3679. FromStops
  3680.     0RR1S2S6S
  3681. FromName
  3682. FromStops
  3683. FromStops
  3684. FromStops
  3685.     0RR1S2S3S4S10S13S17S20StmpDisplayFrom_Previewz
  3686. tmpDisplayFrom_Preview
  3687.     0S0E
  3688. Signz
  3689.     0S0E
  3690. Encrypt
  3691. Encrypt
  3692. $AutoSpell
  3693.     Von:
  3694. tmpDisplayFrom_Preview
  3695. tmpDisplayFrom_NoLogo
  3696. tmpDisplayFrom_NoLogo
  3697. NamesList
  3698. SendTo
  3699. ImplodedNamesList
  3700. NamesList
  3701. ImplodedNamesList
  3702. ImplodedNamesList
  3703. ImplodedNamesList
  3704. tmpDisplaySendTo
  3705.     Thema:
  3706. Subject
  3707. Subject
  3708. Subject
  3709.     0S0E
  3710. TmpDisplaySubject_1
  3711.     Kopie:
  3712. CC_Content
  3713. CopyTo
  3714. BCC_Content
  3715. DeliveredDate
  3716. BlindCopyTo
  3717.  (Blindkopie: 
  3718. BlindCopyTo
  3719.     0R5S6S7S8S9S10S12S13S14S18S20S21S23S
  3720. NamesList
  3721. CC_Content
  3722. BCC_Content
  3723.     0R9S10S
  3724. ImplodedNamesList
  3725. NamesList
  3726. ImplodedNamesList
  3727. ImplodedNamesList
  3728. ImplodedNamesList
  3729. tmpDisplayCC
  3730. tmpDisplayFrom_Preview
  3731. DisplayFrom_Pre
  3732. DisplayFrom_Pre
  3733. $HideMailHeader
  3734. Principal
  3735. Principal
  3736. Principal
  3737. Principal
  3738. Principal
  3739.     4S5S9S10S11S12S13S14S19S20S24S26S27S31S33S34S37S38S40S41S45S47S48S52S
  3740.     Gesendet von: 
  3741. FromDomain
  3742. FromDomain
  3743. FromDomain
  3744. FromDomain
  3745.     4S10S14S21S24S32S33S36S37S39S41S42S43S49S52S56S59S64S
  3746. FromName
  3747.     0RR1S2S6S
  3748. FromStops
  3749.     0R1S2S6S
  3750. FromName
  3751. FromStops
  3752. FromStops
  3753. FromStops
  3754.     0RR1S2S3S4S10S13S17S20StmpDisplaySentz
  3755. tmpDisplaySent
  3756. PostedDateh
  3757. PostedDate
  3758.     4S5S10S12S
  3759. tmpDisplayDate_PreDatum/Uhrzeit, zu dem das Memo erstellt oder gesendet wurde.z
  3760. tmpDisplayDate_Pre
  3761. ReplyDate
  3762. ReplyTo
  3763. $HideMailHeader
  3764.     2S3S4S5S6S7S9S10S14S15R
  3765. Bitte antworten
  3766. ReplyTo
  3767. ReplyTo
  3768. ReplyDate
  3769.  bis 
  3770. ReplyDate
  3771.     1S2S5S6S8S10S11S12S19S20S23S24S26S28S29S30StmpDisplayReply
  3772. tmpDisplayReply
  3773. MemoGR.gif
  3774. $HideMailHeader
  3775.     0S0E
  3776.         An:    
  3777. MailAddress
  3778. InheritedFrom
  3779.     1S2S
  3780. MailAddress
  3781. SendTo}
  3782.     0S0E
  3783. SendTo
  3784.         Kopie:    
  3785. CopyTo
  3786.     0S0E
  3787. CopyTo}
  3788.     0S0E
  3789. CopyTo
  3790.         Kopie:    
  3791. CC_Content
  3792. CopyTo
  3793.     0S0E
  3794. BCC_Content
  3795. BlindCopyTo
  3796.  (Blindkopie: 
  3797. BlindCopyTo
  3798.     0R5S6S8S9S10S14S16S17S19S
  3799. CC_Content
  3800. BCC_Content
  3801.     0R3S4S
  3802. tmpCopyTo
  3803.         Blindkopie:
  3804. BlindCopyTo
  3805.     0S0E
  3806. BlindCopyTo
  3807.     0S0E
  3808. BlindCopyTo
  3809.         Thema:    
  3810. SIZE=50
  3811. Subject
  3812. Topic
  3813. Subject
  3814.     1S2S5S6S8S10S
  3815. ANTWORT
  3816. Antwort: 
  3817. Subj"
  3818.     0R10S12S16S17S19S21S22S23S
  3819. Subject
  3820.         Thema:    
  3821. Subject
  3822. tmpDisplaySubject
  3823. BodyText der Nachrichtz
  3824. _Kategorisieren
  3825. Dokument _bearbeiten
  3826. Dokument _senden
  3827. In Ordner verschieben
  3828. Aus Ordner _entfernen
  3829. Sendenb
  3830. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  3831.     0R7S9S
  3832. Now save the message to the Sent folder
  3833.     0RR1S
  3834. tmpFolder
  3835. IMAPSent
  3836.     0R1S2S3S7S
  3837.     0R7S9S
  3838. act_SEND.GIF|act_SEND?
  3839. Als Entwurf speichern
  3840. Save the message to the Drafts folder
  3841. tmpFolder
  3842. IMAPDrafts
  3843.     0R1S2S3S7S
  3844.     0R7S9S
  3845. act_SAVEASDRAFT.GIF|act_SAVEASDRAFT?
  3846. _Weiterleiten
  3847. act_FORWARD.GIF|act_FORWARD?
  3848. schen_ 
  3849.     0S0E
  3850. act_DELETE.GIF|act_DELETE?
  3851. Antwort\Antwort
  3852. Reply
  3853.     4S6S
  3854. act_REPLY.GIF|act_REPLY?
  3855. Antwort\Antwort mit Protokoll
  3856. Antwort mit Protokoll
  3857. Dieses Dokument ist nicht vollst
  3858. ndig.
  3859.     4S8S10S13S
  3860. Reply with history
  3861. act_REPLY.GIF|act_REPLY?
  3862. Allen antworten
  3863. '++LotusScript Development Environment:2:5:(Options):0:74
  3864. Option Declare
  3865. '++LotusScript Development Environment:2:5:(Forward):0:1
  3866. Declare Sub Click(Source As Button)
  3867. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  3868. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  3869. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  3870. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3871. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3872. Private Sub BindEvents(Byval Objectname_ As String)
  3873.     Static Source As BUTTON
  3874.     Set Source = Bind(Objectname_)
  3875.     On Event Click From Source Call Click
  3876. End Sub
  3877. '++LotusScript Development Environment:2:2:Click:1:12
  3878. Sub Click(Source As Button)
  3879.     Dim session As New notessession
  3880.     Dim uiwork As New notesuiworkspace
  3881.     Dim uidoc As notesuidocument
  3882.     Dim note As notesdocument
  3883.     Dim vInheritedSendTo As Variant
  3884.     Dim vRealInheritedSendTo As Variant
  3885.     Dim iSenderIndex As Integer
  3886.     Dim x As Integer
  3887.     Dim strOwner As String
  3888.     Dim strInheritedDomain As String
  3889.     Set uidoc = uiwork.currentdocument
  3890.     Set note = uidoc.document
  3891.     strOwner = session.username
  3892.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  3893.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  3894.     ' Remove the sender from the list
  3895.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  3896.     If (iSenderIndex >= 0) Then
  3897.         vInheritedSendTo(iSenderIndex) = ""
  3898.     End If        
  3899.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  3900.     ' Append the inheritedfromdomain
  3901.     If Len(strInheritedDomain) Then
  3902.         For x = 0 To Ubound(vRealInheritedSendTo)
  3903.             If Not vRealInheritedSendTo(x) = "" Then
  3904.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  3905.             End If
  3906.         Next
  3907.     End If
  3908.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  3909.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  3910.     ' Find all addresses without a domain and append FromDomain
  3911.     ' Find all addresses whose domain is the same as ours and strip it off
  3912. End Sub
  3913. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  3914. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  3915.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  3916. %END REM 
  3917.     Dim x As Integer
  3918.     Dim iNames As Integer
  3919.     NAMEFindInList = -1
  3920.     If Isempty(vListOfNames) Then
  3921.         Exit Function
  3922.     End If
  3923.     If Isarray(vListOfNames) Then
  3924.         iNames = Ubound(vListOfNames)
  3925.         For x = 0 To iNames
  3926.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  3927.                 NAMEFindInList = x
  3928.                 Exit Function
  3929.             End If
  3930.         Next
  3931.     Else
  3932.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  3933.     End If
  3934. End Function
  3935. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  3936. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  3937.     Returns true if two names are equal, False otherwise
  3938. %END REM
  3939.     Dim sCanName1 As String
  3940.     Dim sDomainName1 As String
  3941.     Dim sCanName2 As String
  3942.     Dim sDomainName2 As String
  3943.     Dim nLenName1 As Integer
  3944.     Dim nLenName2 As Integer
  3945.     Dim name1 As NotesName
  3946.     Dim name2 As NotesName
  3947.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  3948.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  3949.     Set name1 = New NotesName(sCanName1)
  3950.     Set name2 = New NotesName(sCanName2)
  3951.     ' Do a canonical comparison if both names are hierarchical
  3952.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  3953.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  3954.             NAMECompare = True
  3955.             Exit Function
  3956.         Else
  3957.             Exit Function        
  3958.         End If
  3959.     End If
  3960.      ' Compare the common names
  3961.     If (Strcompare(name1.common, name2.common) = 0) Then
  3962.         NAMECompare = True
  3963.         Exit Function
  3964.     End If
  3965.     NAMECompare = False
  3966. End Function
  3967. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  3968. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  3969.     Dim nameUser As NotesName
  3970.     Set nameUser = New NotesName(sUsername) 
  3971.     If Instr(sUserName,"@") Then
  3972.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  3973.         sRetDomain = Strright(nameUser.abbreviated,"@")
  3974.     Else
  3975.         sRetAbbreviatedName = nameUser.abbreviated
  3976.         sRetDomain = ""
  3977.     End If
  3978. End Sub
  3979. act_REPLY.GIF|act_REPLY?
  3980. Adresse... 
  3981.     0S0E
  3982. act_ADDRESSBOOK.GIF|act_ADDRESSBOOK?
  3983. Zustelloptionen...
  3984. DeliveryOptions
  3985. Zustelloptionen
  3986.     4S5S6S7S8S10S
  3987. act_DELIVERYOPTIONS.GIF|act_DELIVERYOPTIONS?
  3988. _Kategorisieren
  3989. Dokument _bearbeiten
  3990. Dokument _senden
  3991. In Ordner verschieben
  3992. Aus Ordner _entfernen
  3993. Sendenb
  3994. Send the message (MailOptions == 1 skips the Sign/Seal dialog)
  3995.     0R7S9S
  3996. Now save the message to the Sent folder
  3997.     0RR1S
  3998. tmpFolder
  3999. IMAPSent
  4000.     0R1S2S3S7S
  4001.     0R7S9S
  4002. Als Entwurf speichern
  4003. Save the message to the Drafts folder
  4004. tmpFolder
  4005. IMAPDrafts
  4006.     0R1S2S3S7S
  4007.     0R7S9S
  4008. _Weiterleiten
  4009. schen7 
  4010.     0S0E
  4011. Antwort\Antwort
  4012. Reply
  4013.     4S6S
  4014. Antwort\Antwort mit Protokoll
  4015. Antwort mit Protokoll
  4016. Dieses Dokument ist nicht vollst
  4017. ndig.
  4018.     4S8S10S13S
  4019. Reply with history
  4020. Allen antworten
  4021. '++LotusScript Development Environment:2:5:(Options):0:74
  4022. Option Declare
  4023. '++LotusScript Development Environment:2:5:(Forward):0:1
  4024. Declare Sub Click(Source As Button)
  4025. Declare Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  4026. Declare Function NAMECompare(sName1 As String, sName2 As String) As Integer
  4027. Declare Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  4028. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4029. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4030. Private Sub BindEvents(Byval Objectname_ As String)
  4031.     Static Source As BUTTON
  4032.     Set Source = Bind(Objectname_)
  4033.     On Event Click From Source Call Click
  4034. End Sub
  4035. '++LotusScript Development Environment:2:2:Click:1:12
  4036. Sub Click(Source As Button)
  4037.     Dim session As New notessession
  4038.     Dim uiwork As New notesuiworkspace
  4039.     Dim uidoc As notesuidocument
  4040.     Dim note As notesdocument
  4041.     Dim vInheritedSendTo As Variant
  4042.     Dim vRealInheritedSendTo As Variant
  4043.     Dim iSenderIndex As Integer
  4044.     Dim x As Integer
  4045.     Dim strOwner As String
  4046.     Dim strInheritedDomain As String
  4047.     Set uidoc = uiwork.currentdocument
  4048.     Set note = uidoc.document
  4049.     strOwner = session.username
  4050.     vInheritedSendTo = note.GetItemValue("InheritedSendTo")
  4051.     strInheritedDomain = note.GetItemValue("InheritedFromDomain")(0)
  4052.     ' Remove the sender from the list
  4053.     iSenderIndex = NAMEFindInList(strOwner, vInheritedSendTo)
  4054.     If (iSenderIndex >= 0) Then
  4055.         vInheritedSendTo(iSenderIndex) = ""
  4056.     End If        
  4057.     vRealInheritedSendTo = Fulltrim(vInheritedSendTo)
  4058.     ' Append the inheritedfromdomain
  4059.     If Len(strInheritedDomain) Then
  4060.         For x = 0 To Ubound(vRealInheritedSendTo)
  4061.             If Not vRealInheritedSendTo(x) = "" Then
  4062.                 vRealInheritedSendTo(x) = vRealInheritedSendTo(x) & "@" & strInheritedDomain
  4063.             End If
  4064.         Next
  4065.     End If
  4066.     Call note.ReplaceItemValue("CopyTo", vRealInheritedSendTo)
  4067.     ' Look for all addresses whose last domain is the same as the sender's domain -> append from domain
  4068.     ' Find all addresses without a domain and append FromDomain
  4069.     ' Find all addresses whose domain is the same as ours and strip it off
  4070. End Sub
  4071. '++LotusScript Development Environment:2:1:NAMEFindInList:1:8
  4072. Function NAMEFindInList(sKeyName As String, vListOfNames As Variant) As Integer
  4073.     Given a name and a list of names return the index position if the user is found, -1 otherwise
  4074. %END REM 
  4075.     Dim x As Integer
  4076.     Dim iNames As Integer
  4077.     NAMEFindInList = -1
  4078.     If Isempty(vListOfNames) Then
  4079.         Exit Function
  4080.     End If
  4081.     If Isarray(vListOfNames) Then
  4082.         iNames = Ubound(vListOfNames)
  4083.         For x = 0 To iNames
  4084.             If (NAMECompare(sKeyName,Cstr(vListOfNames(x)))) Then
  4085.                 NAMEFindInList = x
  4086.                 Exit Function
  4087.             End If
  4088.         Next
  4089.     Else
  4090.         NAMEFindInList = NAMECompare(sKeyName, Cstr(vListOfNames))
  4091.     End If
  4092. End Function
  4093. '++LotusScript Development Environment:2:1:NAMECompare:1:8
  4094. Function NAMECompare(sName1 As String, sName2 As String) As Integer
  4095.     Returns true if two names are equal, False otherwise
  4096. %END REM
  4097.     Dim sCanName1 As String
  4098.     Dim sDomainName1 As String
  4099.     Dim sCanName2 As String
  4100.     Dim sDomainName2 As String
  4101.     Dim nLenName1 As Integer
  4102.     Dim nLenName2 As Integer
  4103.     Dim name1 As NotesName
  4104.     Dim name2 As NotesName
  4105.     Call NAMEGetComponents(sName1, sCanName1, sDomainName1)
  4106.     Call NAMEGetComponents(sName2, sCanName2, sDomainName2)
  4107.     Set name1 = New NotesName(sCanName1)
  4108.     Set name2 = New NotesName(sCanName2)
  4109.     ' Do a canonical comparison if both names are hierarchical
  4110.     If (name1.IsHierarchical) And (name2.IsHierarchical) Then    
  4111.         If (Strcompare(Lcase(sCanName1), Lcase(sCanName2)) = 0) Then
  4112.             NAMECompare = True
  4113.             Exit Function
  4114.         Else
  4115.             Exit Function        
  4116.         End If
  4117.     End If
  4118.      ' Compare the common names
  4119.     If (Strcompare(name1.common, name2.common) = 0) Then
  4120.         NAMECompare = True
  4121.         Exit Function
  4122.     End If
  4123.     NAMECompare = False
  4124. End Function
  4125. '++LotusScript Development Environment:2:2:NAMEGetComponents:1:8
  4126. Sub NAMEGetComponents(sUserName As String,sRetAbbreviatedName As String,sRetDomain As String)
  4127.     Dim nameUser As NotesName
  4128.     Set nameUser = New NotesName(sUsername) 
  4129.     If Instr(sUserName,"@") Then
  4130.         sRetAbbreviatedName = Strleft(nameUser.abbreviated,"@")
  4131.         sRetDomain = Strright(nameUser.abbreviated,"@")
  4132.     Else
  4133.         sRetAbbreviatedName = nameUser.abbreviated
  4134.         sRetDomain = ""
  4135.     End If
  4136. End Sub
  4137. Adresse... 
  4138.     0S0E
  4139. Zustelloptionen...
  4140. DeliveryOptions
  4141. Zustelloptionen
  4142.     4S5S6S7S8S10S
  4143. Lotus Product
  4144. ^8    +t
  4145. ^H    +t
  4146. #KH    -
  4147. #KH    -
  4148. O=Lotus Notes
  4149. O=Lotus Notes
  4150. PURSAFO
  4151. |.:#U
  4152. O=Lotus Notes
  4153. CN=Lotus Notes Template Development/O=Lotus Notes
  4154. PURSAFO
  4155. CZAeT
  4156. $SubForms
  4157. $SCRIPTOBJ_21
  4158. $SCRIPTOBJ_25
  4159. $SCRIPTOBJ_29
  4160. $SCRIPTOBJ_30
  4161. $SCRIPTOBJ_31
  4162. $SCRIPTOBJ_36
  4163. $SCRIPTOBJ_37
  4164. $Language
  4165. $LastBuildTime
  4166. $BabelInfo
  4167. $BackgroundR5
  4168. $HeaderArea
  4169. $RegionFrameset
  4170. $Info
  4171. $WindowTitle
  4172. $Script
  4173. $$Script_O
  4174. $$ScriptName
  4175. $$FormScript
  4176. $$$FormScript_O
  4177. $Body
  4178. $V5ACTIONS
  4179. $ACTIONS
  4180. $SCRIPTOBJ_11
  4181. $SCRIPTOBJ_30
  4182. $SCRIPTOBJ_31
  4183.