home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 1999 April / APC443.iso / features / grpware / notes / 50lbwic.exe / DATA1.CAB / NotesDataFilesRequiredDataFiles / pernames.ntf (.txt) < prev    next >
Encoding:
Lotus Notes Storage Facility  |  1999-01-29  |  1.9 MB  |  17,881 lines
  1. Personal Address Book
  2. #1StdR4PersonalAddressBook
  3. O=Lotus Notes
  4. O=Lotus Notes
  5. PURSAFO
  6. |.:#U
  7. O=Lotus Notes
  8. CN=Lotus Notes Template Development/O=Lotus Notes
  9. PURSAFO
  10. $TITLE
  11. $INFO
  12. $BODY
  13. GW4fbE
  14. wo.Y7X\(
  15. AC(9ulZ
  16. NC:]@
  17. mSkEWY(
  18. CN=Lotus Notes Template Development/O=Lotus Notes
  19. $Modified
  20.     1S2S3S
  21. $TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE
  22. $Flags
  23.     0SL1S4S5S3724
  24. $TITLE
  25. CN=Rob Slapikoff/O=Iris##############
  26. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##############################################
  27. CN=Rob Slapikoff/O=IrisLotus NotesCN=Rob Slapikoff/O=IrisLotus NotesCN=Lotus Notes Template Development/O=Lotus Notesz
  28. Personal Address Book
  29. #1StdR4PersonalAddressBook
  30. CN=Rob Slapikoff/O=Iris
  31. MainbFContacts#######################
  32. YGreg Pflaum_Advanced\Connections|ConnectionsP
  33. ConnectionType
  34. ConnectionType
  35. ConnectionType
  36. ConnectionType
  37. ConnectionType
  38.     2S3S4S8RS9E9S10S14RS9E15S16S20RS9E21S22S26RS9E27S28S32R
  39. Destination
  40. ConnectionType
  41. RLANTag
  42. ConnectionType
  43. PassthruServer
  44. ConnectionType
  45. CountryCode
  46. AreaCode
  47. AreaCodeV
  48. LocalPhoneNumber"
  49. PhoneNumber
  50.     0S0E
  51. Source
  52.     0S0E
  53. $32$16PortName$31$27ConnectionLocation$Conflict$REF
  54. Connection
  55.     L1S2S3S1
  56. $16PortName
  57. ConnectionLocation
  58. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########################
  59. GW4fbE
  60. -Craig Richards1
  61. Server ConnectionlocalremoteConnection[NetCreator]
  62. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#################################################
  63. AreaCodeAreaCode
  64. AreaCodeInput
  65.     0S0E
  66. AreaCodeInput
  67.     0R1S
  68. AreaCodeEnter the Area Code.
  69. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes############################################
  70. DocumentAccessDocumentAccess
  71. Person
  72. [UserModifier]
  73. Group
  74. [GroupModifier]
  75. Server
  76. [ServerModifier]
  77. [NetModifier]
  78.     3S4S6S8S9S10S12S14S15S16S18S20SDocumentAccess
  79. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  80. CountryCountry
  81. CountryEnter Country Code.
  82. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######################
  83. #(Notes Address Helper)
  84. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  85. 3(Internet Address Helper)CD
  86. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########################
  87. Len Kawell1
  88. ContactCompanyPerson[UserCreator]
  89. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########
  90. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##############################################
  91. $ConferencingPersonFormSubform1.0$ConferencingPersonFormSubformCUA3
  92. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################
  93. LocalAdminLocalAdmin
  94. LocalAdminEnter the names or group names which should have edit capabilities for this record.
  95. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######################
  96. OwnerOwner
  97. OwnerFull name of person allowed to modify this document.
  98. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes############
  99. (Other Address Helper)
  100. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  101. (FAX Address Helper)
  102. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################
  103. (X400 Address Helper)CD
  104. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################
  105.     (ccMail Address Helper)
  106. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################
  107. AreaCodeInputAreaCodeInput
  108. AreaCode
  109. AreaCodeInputEnter the area code.
  110. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##############################################
  111. (BusinessAddressHelper)CD
  112. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####################
  113. (HomeAddressHelper)CD
  114. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#################################
  115. (NameHelper)CD
  116. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  117. (PhoneHelper)CD
  118. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################################################
  119. AddressParsers34Q1
  120. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes####################
  121. GlobalDeclarationss34Q1
  122. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############
  123. CN=Ryan Jansen/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesMailLibrarys34Q1
  124. ##########################################################
  125. PhoneParsers34Q1
  126. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######################
  127. (CreateMailMemo)
  128. EH4fPL3
  129. CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################################
  130. (ScheduleMeeting)
  131. EH4fPL3
  132. CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################################
  133. $SUBVIEWLastName\Last Name:15;FirstName\First Name:15;PhoneNumber\Phone Number:15Contacts|People1
  134. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########
  135. Groups
  136. Group
  137. GroupType
  138. GroupType
  139. GroupType
  140. GroupType
  141. GroupType
  142. GroupType
  143.     9S10S16S17S19S23S25S29S31S35S44S
  144. ListName
  145. $3$2ListDescription$Conflict$REF
  146. Group
  147. GroupType
  148.     L1S2S3S4S5S1
  149. Group
  150. GroupType
  151. GroupType
  152. GroupType
  153. GroupType
  154. GroupType
  155. GroupType
  156.     9S10S16S17S19S23S25S29S31S35S44S
  157. $2Group:
  158. ListName
  159. ListDescriptionDescription&
  160. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################################
  161. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####
  162. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####
  163. Times New Roman
  164. "MS Sans Serif
  165. Using Personal Address Book
  166. Basic
  167. This  database is designed to keep information about the people, companies, locations, and server computers with which you communicate.  Every user has his or her own Personal Address Book and learning how to use it is important to getting the most value out of Lotus Notes.
  168. Headline
  169. Types of documents
  170. There are five basic types of document in the Personal Address Book -  a Person entry, a Company entry, a Group entry, a Location entry, and a Server Connection entry.
  171. Person entry.   A person entry records information about an individual - names, phone numbers, addresses, etc.  To create a person entry choose "Business Card" from the create menu .  Fill in at least the Name field.  All the other fields are optional.  However, if you want to send electronic mail to the person, you must fill in the E-mail address fields.  Then save and close the Business Card entry.  You will find the title of the Business Card entry listed in the "Business Cards" view or the "By Category" view.
  172. Company entry.  A company entry records information about a company - name, phone number, address, etc.  To create a company entry choose "Business Card" from the create menu .  Fill in at least the Name field. All the other fields are optional.  Then save and close the Company entry.  You will find the title of the Company entry listed in the "Business Cards" view or the "By Category" view.
  173. Group entry.   A group entry provides a way to maintain a mailing list of people.  To create a group entry choose "Group" from the create menu .  Fill in at least the Group name field and the Members field.  In the Members field list the names of the people to whom you which to mail.  All the other fields are optional.  Then save and close the Group entry.  You will find the title of the Group entry listed in the "Groups" view.
  174. Location entry.   A location entry is used to record essential information about the different locations from which you use Notes.  Notes creates three Locations for you the first time you start it: Office, Home, Disconnected. Typically, a non-mobile user will simply edit the Office entry, and a mobile  laptop or notebook computer user will edit the Office and Home entries. However, to create an additional location entry choose "Location" from the create menu .  Fill in at least the Location name, Location type, Ports to use, and Home/mail server fields. All the other fields are optional.  Then save and close the Location entry.  You will find the title of the Location entry listed in the "Locations" view and on the status bar at the bottom of the Notes window.
  175. Server Connection entry.   A server connection entry is usually only needed to record the phone number of a dial-up Notes server. To create a server connection entry choose "Server Connection" from the create menu .  Fill in at least the Server name and Phone number fields. All the other fields are optional.  Then save and close the Server Connection entry  You will find the title of the Server Connection entry listed in the "Server/Connections" view.
  176. Views and folders
  177. As described above, each type of entry in your personal address book has a corresponding view.  The "Business Cards" view lists the Person entries and the Company entries, the "Groups" view lists the Group entries, the "Locations" view lists the Location entries, and the "Server/Connections" view lists the Server Connection entries.
  178. Special features worth exploring
  179. Each form provides pop-up help for each field.  To display the help, simply click on the "static" text label in front of every field.  For example, clicking anywhere on "Company" in the Person form displays the following:
  180. ?_?__
  181. `!b`1
  182. 7`^///?
  183. ?b___
  184. `bOOO
  185. `<b!R
  186. The Business Card form provides Mail Address Assistants to help you correctly compose a person's electronic mail address.  Click on the 
  187. ?_?__
  188. `!b`1
  189. 7`^///?
  190. ?b___
  191. `bOOO
  192. `<b!R
  193. button next to the Mail address field to start an Assistant.
  194. To easily add the sender of an electronic mail message to your Personal Address Book, choose "Add Sender to Address Book" on the Actions / Mail Tools menu when you are viewing the electronic mail message.
  195. O=Lotus Notes
  196. O=Lotus Notes
  197. PURSAFO
  198. |.:#U
  199. O=Lotus Notes
  200. CN=Lotus Notes Template Development/O=Lotus Notes
  201. PURSAFO
  202. $INFO
  203. $BODY
  204. O=Lotus Notes
  205. O=Lotus Notes
  206. PURSAFO
  207. |.:#U
  208. O=Lotus Notes
  209. CN=Lotus Notes Template Development/O=Lotus Notes
  210. PURSAFO
  211. Fde!f^^
  212. $ACLDigest
  213. ConnectionType
  214. ConnectionType
  215. ConnectionType
  216. ConnectionType
  217. ConnectionType
  218.     2S3S4S8RS9E9S10S14RS9E15S16S20RS9E21S22S26RS9E27S28S32R$16Server4
  219. Destination
  220. PortNamePort$31Via4
  221. ConnectionType
  222. RLANTag
  223. ConnectionType
  224. PassthruServer
  225. ConnectionType
  226. CountryCode
  227. AreaCode
  228. AreaCodeV
  229. LocalPhoneNumber"
  230. PhoneNumber
  231.     0S0E
  232. $27For User0
  233. Source
  234.     0S0E
  235. ConnectionLocationApplies to Location(s)&
  236. Add Connection.
  237. Connection
  238.     0S0E
  239. _Edit Connection
  240. Delete Connection
  241.     0S0E
  242. Send Docu_ment
  243. Categori_zeK
  244. _Forward
  245. _Move to Folder...
  246. _Remove from Folder...
  247. Tools...\Preferences...K4
  248. DirectoryProfile
  249.     0S0E
  250. Add Connection.
  251. Connection
  252.     0S0E
  253. _Edit Connection
  254. Delete Connection
  255.     0S0E
  256. Send Docu_ment
  257. Categori_zeK
  258. _Forward
  259. _Move to Folder...
  260. _Remove from Folder...
  261. Tools...\Preferences...K4
  262. DirectoryProfile
  263.     0S0E
  264. O=Lotus Notes
  265. O=Lotus Notes
  266. PURSAFO
  267. |.:#U
  268. O=Lotus Notes
  269. CN=Lotus Notes Template Development/O=Lotus Notes
  270. PURSAFO
  271. d?m\}
  272. $Author
  273. $TITLE
  274. $Index
  275. $Formula
  276. $FormulaClass
  277. $VIEWFORMAT
  278. $Comment
  279. $V5ACTIONS
  280. $ACTIONS
  281.  $ConferencingPersonFormSubform
  282. O=Lotus Notes
  283. O=Lotus Notes
  284. PURSAFO
  285. |.:#U
  286. O=Lotus Notes
  287. CN=Lotus Notes Template Development/O=Lotus Notes
  288. PURSAFO
  289. Fde!f^^
  290. $TITLE
  291. $INFO
  292. $$ScriptName
  293. $BODY
  294. O=Lotus Notes
  295. O=Lotus Notes
  296. PURSAFO
  297. |.:#U
  298. O=Lotus Notes
  299. CN=Lotus Notes Template Development/O=Lotus Notes
  300. PURSAFO
  301. Fde!f^^
  302. $TITLE
  303. $INFO
  304. $Header
  305. $BODY
  306. &Arial
  307. connectionpic.gif|connectionpic
  308. New Server Connection
  309. Source
  310.  to "
  311. Destination
  312.  via 
  313. PortName"
  314.     4S6S12S13S14S15S21S22S23S24S
  315. Lotus Product
  316. V0.0O
  317. Rob Slapikoff-Rob
  318.     0S0E
  319. SERVER CONNECTION
  320. Destination
  321. Destination
  322.     0S0E
  323. DisplayName
  324. ConnectionType
  325. RLANTag
  326. ConnectionType
  327. PassthruServer
  328. ConnectionType
  329. CountryCode
  330. AreaCode
  331. AreaCodeV
  332. LocalPhoneNumber"
  333. PhoneNumber
  334.     0S0E
  335. DisplayPhoneNumber
  336. Connection
  337. /    Basics
  338. /    Destination
  339. #$1@8
  340. Choose the type of connection you want to establish, for example, Dialup Modem.
  341.     Connection type:
  342. PortName
  343. NETBIOS
  344. TCPIP
  345.     6S13S15S
  346. ConnectionType
  347. You must choose a Connection Type before filling out the rest of the document.{
  348.     0S0E
  349. ConnectionType
  350. Local Area Network|0Notes Direct Dialup|1Passthru Server|2Network Dialup|5Hunt Group|9
  351. ConnectionType
  352.     0S0E
  353. Enter the name of the server you want to access, for example, Sales/Chicago. 
  354.     Server name:
  355. ConnectionType
  356.     0S0E
  357. Enter the name you want to use for the hunt group. You can use any name you want.
  358.     Hunt group name:
  359. #$1@8
  360. Destination
  361.     0S0E
  362. Destination
  363. You must enter a valid server name for your destination.{
  364.     0S0E
  365. DestinationRemote server's name - e.g. Chicago.
  366. ConnectionType
  367. ConnectionType
  368.     1S2S3S4S5S6S
  369. Enter the network port to use for the connection, for example, LAN0.
  370.     Use LAN port:
  371. ConnectionType
  372.     1S2S
  373. Enter the name of the intermediate (passthru) server or hunt group to use to get to the destination server. You must also have a Connection document that provides a path to the passthru server or hunt group. You can also define a path to a server using multiple Passthru or Hunt Group Connection documents; this lets you have more control over the path used.
  374.     Passthru server name or hunt group name:
  375. ConnectionType
  376.     0S0E
  377. The name of the Remote LAN Service used to connect to the destination server.
  378. Select Yes if you want Notes to always dial the area code -- even if it is the same as the area code defined in current Location document. The default is No.
  379.     Always use area code:
  380. LanPortName
  381. PortName
  382. LanPortName
  383. LanPortName
  384.     0S0E
  385. LanPortNameLAN port name - e.g. LAN0, TCPIP.
  386.     0S0E
  387. PassthruServer^
  388.     0S0E
  389. ConnectionType
  390. PassthruServer
  391. You must fill in the name of a Passthru server when filling in a Passthru connection record.{
  392.     5S6S
  393. PassthruServerThe name of the Passthru server used to connect to the destination server.
  394. DialAreaCodeChoose Yes if you want Notes to dial the area code even if it is the same as the area code in the current location.
  395. Yes|1No|0
  396. ConnectionType
  397.     0S0E
  398. Enter the country code for the server or hunt group you want to access. For the United States, enter 1; for Great Britain, enter 44; for Italy, enter 39; and so on.
  399.     Country code:
  400. #$1@8
  401. CountryEnter Country Code.
  402. Enter the area code or city code of the server or hunt group you want to access.
  403.     Area code:
  404. #$1@8
  405. AreaCode
  406. AreaCodeInputEnter the area code.
  407. Enter the phone number of the server or hunt group you want to access, for example, 555-1234. If the remote server or hunt group has more than one phone number, enter each phone number separated by a semicolon.
  408. You should enter a * for null modems and leased lines.
  409.     Phone number:
  410. #$1@8
  411. PhoneNumber
  412.     0S0E
  413. ConnectionType
  414. LocalPhoneNumber
  415. You must enter a Phone Number for a connection of this type.{
  416.     5S6S
  417. LocalPhoneNumberRemote server's phone number - e.g. 555-1234
  418. Basics
  419. ConnectionType
  420.     0S0E
  421. $ConFormRLANSubform
  422. Network Dialup
  423. CommentsComments about the connection.
  424. Comments
  425. /    Advanced
  426. ##1B8
  427. Select the locations where you want to use this connection. An asterisk ( * ) means all locations.
  428.     Only from Location(s):
  429. ConnectionLocationj
  430. ConnectionLocation
  431. ConnectionLocation
  432.     0S0E
  433. ConnectionLocationj
  434. ConnectionLocationt
  435. You have an * and at least one named location specified.  You can either enter multiple locations or use an * for all locations.{
  436.     8S9S21SConnectionLocationSpecify the Location name you want this record to apply to.  * means all Locations.
  437. NoCache
  438. ($Locations)
  439.     0S0E
  440. ConnectionType
  441.     0S0E
  442. Enter the destination server's network address, for example, 192.22.554.36. This field is necessary only if you use TCP/IP or another protocol that needs an explicit network address to make the connection. 
  443.     Destination server address:
  444. Enter the name of the connect script file to use when connecting to the server.
  445.     Login script file name:
  446. ##1B8
  447. OptionalNetworkAddress
  448. LanPortName
  449. LanPortName
  450. You must supply a specific Port Name if you want to use a Destination Network Address.{
  451.     5S6S9S10S11S
  452. OptionalNetworkAddressEnter the network address for the destination server if known.  e.g. If this is a connection via TCP/IP you would enter the IP address or hostname.
  453. ScriptNameName of script file to run after modem connection established.
  454. Enter a user name if more than one user will be using the workstation.
  455.     Only for user:
  456. ThisFileIsOnServer
  457.     1S2S6S
  458. ThisFileIsOnServer
  459. ThisFileIsOnServer
  460.     0R3S4S6S8S
  461. Source^
  462.     0S0E
  463. SourceSource server or workstation name - e.g. Marketing (for dialup users: your username).
  464. Enter any script arguments that are necessary when dialing the server, for example, a login name or password.
  465.     Login script arguments:
  466. ##1B8
  467. ScriptArg1First argument to be passed to script.
  468. ScriptArg2Second argument to be passed to script.
  469. ScriptArg3Third argument to be passed to script.
  470. ScriptArg4Fourth argument to be passed to script.
  471. ScriptName
  472. ScriptArg1"
  473. ScriptArg2"
  474. ScriptArg3"
  475. ScriptArg4"
  476. LinkScriptInfo
  477. Select Normal or Low to specify when to use this connection information in a search for the destination server path. Default is Normal. 
  478. Notes and Domino use the following steps when determining how to connect to a server:
  479. 1.  Try to determine a path to the destination by examining all Connection documents with the Usage priority set to Normal.
  480. 2.  If step 1 fails, ask the home server for connection information and/or probe all enabled ports.
  481. 3.  If step 2 fails, look at all Connection documents with the Usage priority set to Low.
  482. 4.  If step 3 fails, attempt to use a default passthru server to connect.
  483. Set the Usage priority to Low if you only want the Connection documents used after attempting to connect over the LAN.
  484.     Usage priority
  485.     0S0E
  486. ConnectionRecordFirstChoose Low for R3 behavior and Normal for R4 behavior for determining path to server. 
  487. Normal|1Low|0
  488. Enter the destination server's Notes domain name.
  489.     Only to servers in domain:
  490. ##1B8
  491. DestinationDomain
  492. DestinationDomainRemote server's domain name (optional for dialup users).
  493. ConnectionType
  494.     1S2S3S
  495. Select the enabled modem ports you want to use with this server connection.
  496.     Modem port(s):
  497. ConnectionType
  498. RemotePortNamej
  499. RemotePortName
  500. RemotePortName
  501.     0S0E
  502. RemotePortNameCommunications port name - e.g. COM1, MODEM.
  503.     0S0E
  504. ##1B8
  505. Advanced
  506.     0S0E
  507. (V3 Scheduled Calling)
  508.     Enabled/disabled:
  509. SCHEDULE DISABLED
  510. EnabledScheduled calling enabled or disabled.
  511. SCHEDULE ENABLED | 1SCHEDULE DISABLED | 0
  512.     Call at times:
  513. ScheduleL
  514. Enabled
  515. Interval
  516. Schedule
  517. You must enter an Interval and/or a Schedule, or else specify DISABLED.
  518. ScheduleTimes to call the server - e.g. 8:00 AM,10:00 AM-6:00 PM.
  519.      each day
  520.     Repeat interval of:
  521. Interval
  522. IntervalInterval to repeat calls - 0 means call once.
  523.     minutes 
  524.     Days of week:
  525. WeekDaysDays of week - e.g. Mon, Tue, Wed.
  526. Sun | 1Mon | 2Tue | 3Wed | 4Thu | 5Fri | 6Sat | 7
  527.     Tasks:
  528. TasksTasks to be performed - e.g. Replication, Mail Routing
  529. Mail Routing | Mail RoutingReplication | Replication
  530.     Route at once if:
  531. MailThreshold
  532. MailThresholdNumber of waiting messages that will force a connection - e.g. 3.
  533.      mail messages pending
  534.     Routing cost:
  535. ConnectionType
  536. ConnectionType
  537.     0S0E
  538. Routing cost must be between 1 and 10
  539.     3S4S5S6S7S8S10S15S
  540. CostRelative cost of this connection (1-10).
  541.     Replicate databases of priority:
  542. RepPriorityReplication priority level.
  543. High | 2Medium & High | 1Low & Medium & High | 0
  544. AreaCodeInput
  545.     0S0E
  546. AreaCodeInput
  547.     0R1S
  548. AreaCodeEnter the Area Code.
  549. Connection
  550. OwnerFull name of person allowed to modify this document.
  551. Person
  552. [UserModifier]
  553. Group
  554. [GroupModifier]
  555. Server
  556. [ServerModifier]
  557. [NetModifier]
  558.     3S4S6S8S9S10S12S14S15S16S18S20SDocumentAccess
  559. ConnectionType
  560. LanPortName
  561. ConnectionType
  562. RemotePortName
  563. ConnectionType
  564. PortName
  565.     0S0E
  566. PortNameCommunications port name - e.g. COM1, MODEM.
  567. ConnectionType
  568. OptionalNetworkAddress
  569. AreaCode
  570. Country
  571. Country
  572. DialAreaCode
  573. AreaCodeV
  574. LocalPhoneNumber"
  575. DialAreaCode
  576. AreaCodeV
  577. LocalPhoneNumber"
  578. LocalPhoneNumber
  579.     10R26S27SPhoneNumber
  580. For V3 compatibility (sigh)
  581. ConnectionType
  582. local
  583. remote
  584. Categori_zeK
  585. Close
  586.     0S0E
  587. Save and CloseB
  588.     0S0E
  589. _Edit Connection
  590. Send Docu_ment
  591. _Forward
  592. _Move to Folder...
  593. _Remove from Folder...
  594. Categori_zeK
  595. Close
  596.     0S0E
  597. Save and CloseB
  598.     0S0E
  599. _Edit Connection
  600. Send Docu_ment
  601. _Forward
  602. _Move to Folder...
  603. _Remove from Folder...
  604. O=Lotus Notes
  605. O=Lotus Notes
  606. PURSAFO
  607. |.:#U
  608. O=Lotus Notes
  609. CN=Lotus Notes Template Development/O=Lotus Notes
  610. PURSAFO
  611. $Author
  612. $BackgroundRepeat
  613. $Background
  614. $FormUsers
  615. $AUTOLAUNCH
  616. $INFO
  617. $WINDOWTITLE
  618. $$Script_O
  619. country
  620. Schedule
  621. Interval
  622. MailThreshold
  623. $BODY
  624. $V5ACTIONS
  625. $ACTIONS
  626. O=Lotus Notes
  627. O=Lotus Notes
  628. PURSAFO
  629. |.:#U
  630. O=Lotus Notes
  631. CN=Lotus Notes Template Development/O=Lotus Notes
  632. PURSAFO
  633. Fde!f^^
  634. yR*B8#6
  635. $TITLE
  636. $INFO
  637. $BODY
  638. O=Lotus Notes
  639. O=Lotus Notes
  640. PURSAFO
  641. |.:#U
  642. O=Lotus Notes
  643. CN=Lotus Notes Template Development/O=Lotus Notes
  644. PURSAFO
  645. ?x/SL
  646. $INFO
  647. country
  648. $BODY
  649. (Notes Address Helper)
  650. Notes Mail Address
  651.     User name:
  652.     Notes domain:
  653. Get user name from left of domain
  654. name1
  655. MailAddress
  656.     0R1S2S8S
  657. If nothing to left of domain, use everything
  658.     0R1S
  659. name2
  660. name1
  661. name1
  662. MailAddress
  663.     0R1S2S5S6S8S10S
  664. Get full name
  665.     0R1S
  666. name3
  667. FullName
  668.     0R1S2S6S
  669. If no full name, use first + middle + last names
  670.     0R1S
  671. name4
  672. name3
  673. name3
  674. FirstName
  675. MiddleInitial
  676. MiddleInitial
  677. LastName
  678. LastName"
  679.     0R1S2S5S6S8S10RS25E11S12S15S16S18S19S22S24S25RS25E28S29S31S32S33S35S
  680. If no address, use name
  681.     0R1S
  682. name2
  683. name2
  684. name4
  685.     0R5S6S8S10SUserName
  686. Include both any domain from address and anyone from MailDomain field
  687. MailAddress
  688.     0R1S2S
  689. MailDomain
  690. MailDomain"
  691. MailDomain
  692.     0R3S4S5S6S7S8S10S11S12S13S14S16S17S18S20S22S
  693. Domain
  694. UserName
  695. Domain
  696. Domain"
  697.     1S2S5S6S8S9S10S12S
  698. MailAddress
  699. MailSystem
  700. Always zero-out MailDomain because it is now always appended to MailAddress
  701. MailDomain
  702. Categori_ze
  703. _Edit Document
  704. Send Docu_ment
  705. _Forward
  706. _Move to Folder...
  707. _Remove from Folder...
  708. O=Lotus Notes
  709. O=Lotus Notes
  710. PURSAFO
  711. |.:#U
  712. O=Lotus Notes
  713. CN=Lotus Notes Template Development/O=Lotus Notes
  714. PURSAFO
  715. $TITLE
  716. $INFO
  717. $$ScriptName
  718. $BODY
  719. $ACTIONS
  720. (Internet Address Helper)
  721. Internet Mail Address
  722.     Address (e.g., smith@acme.com):
  723.     Internet mail gateway domain (optional):
  724. Get username and first domain name
  725. MailAddress
  726.     0R1S2S6S
  727.     0R3S4S6S10S12S13S15S21S28S
  728. InternetAddress
  729. Include both any domain from MailAddress and any from MailDomain field
  730. MailAddress
  731. MailDomain
  732. MailDomain"
  733.     0R1S2S
  734.     0R1S2S
  735.     0R1S2S5S6S8S12S15S16S20S
  736.     0R1S2S8S
  737. InternetDomain|
  738.     0R3S4S6S8S
  739. Save the gateway domain in the user's profile for future addresses
  740. InternetDomain
  741. InternetDomain|
  742.     0R4S
  743. InternetDomain
  744. InternetDomain
  745. InternetAddress
  746. InternetDomain
  747. InternetDomain"
  748.     1S2S5S6S8S9S10S12S
  749. MailAddress
  750. MailSystem
  751. Always zero out the MailDomain because it is now part of MailAddress
  752. MailDomain
  753. Categori_zeK
  754. _Edit Document
  755. Send Docu_ment
  756. _Forward
  757. _Move to Folder...
  758. _Remove from Folder...
  759. O=Lotus Notes
  760. O=Lotus Notes
  761. PURSAFO
  762. |.:#U
  763. O=Lotus Notes
  764. CN=Lotus Notes Template Development/O=Lotus Notes
  765. PURSAFO
  766. $TITLE
  767. $INFO
  768. $$ScriptName
  769. $BODY
  770. $ACTIONS
  771. O=Lotus Notes
  772. O=Lotus Notes
  773. PURSAFO
  774. |.:#U
  775. O=Lotus Notes
  776. CN=Lotus Notes Template Development/O=Lotus Notes
  777. PURSAFO
  778. $INFO
  779. $BODY
  780. '++LotusScript Development Environment:2:5:(Options):0:66
  781. '++LotusScript Development Environment:2:5:(Forward):0:1
  782. Declare Sub Exiting(Source As Field)
  783. '++LotusScript Development Environment:2:5:(Declarations):0:2
  784. '++LotusScript Development Environment:2:2:BindEvents:1:129
  785. Private Sub BindEvents(Byval Objectname_ As String)
  786.      Static Source As FIELD
  787.      Set Source = Bind(Objectname_)
  788.      On Event Exiting From Source Call Exiting
  789. End Sub
  790. '++LotusScript Development Environment:2:2:Exiting:1:12
  791. Sub Exiting(Source As Field)
  792.      If doc.Name(0) = "" And (doc.LastName(0) = "" And doc.FirstName(0)="") Then
  793.           Exit Sub
  794.      End If
  795.      Call ParseNameField
  796.      Call uidoc.refresh
  797. End Sub
  798. Lotus Product
  799. OBJECT
  800. beach
  801. New Contact
  802. Contact: 
  803. FullName
  804.     0S0E
  805. "Small Fonts
  806. '++LotusScript Development Environment:2:5:(Options):0:74
  807. Option Public
  808. Use "PhoneParser"
  809. Use "AddressParser"
  810. '++LotusScript Development Environment:2:5:(Forward):0:1
  811. '++LotusScript Development Environment:2:5:(Declarations):0:10
  812. Dim DocWasSaved As Integer
  813. Lotus Product
  814. V0.0k
  815.  Person'++LotusScript Development Environment:2:5:(Options):0:66
  816. '++LotusScript Development Environment:2:5:(Forward):0:1
  817. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  818. Declare Sub Postopen(Source As Notesuidocument)
  819. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  820. '++LotusScript Development Environment:2:5:(Declarations):0:2
  821. '++LotusScript Development Environment:2:2:BindEvents:1:129
  822. Private Sub BindEvents(Byval Objectname_ As String)
  823.     Static Source As NOTESUIDOCUMENT
  824.     Set Source = Bind(Objectname_)
  825.     On Event Querysave From Source Call Querysave
  826.     On Event Postopen From Source Call Postopen
  827.     On Event Queryclose From Source Call Queryclose
  828. End Sub
  829. '++LotusScript Development Environment:2:2:Querysave:1:12
  830. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  831.     source.refresh  
  832.     If doc.LastName(0) <> "" Then
  833.         NumNames=Evaluate(|@Elements(FullName)|,doc)
  834.         First = doc.FirstName(0)
  835.         Last = doc.LastName(0)
  836.         Full = doc.FullName(0)
  837.         LastinFull=Evaluate(|@Ends(@Name([CN];FullName);LastName)|,doc)
  838.         If Last <> "" And ((Full = "") Or (LastinFull(0) <>"1")) Then Call doc.ReplaceItemValue("FullName", First & " " & Last)
  839.     End If
  840.     If doc.BusinessAddress(0)<>"" Or (doc.BusinessAddress(0)="" And (doc.OfficeStreetAddress(0)<>"" And doc.OfficeCity(0)<>"" And doc.OfficeState(0)<>"")) Then
  841.         Dim Num As Variant
  842.         Dim FieldName As String
  843.         Dim Address As Variant
  844.         FieldName = "B"
  845.         Num=Evaluate(|@Elements(@Explode(@Trim(BusinessAddress);@Char(13)))|,doc)          
  846.         If Num(0) = 1 Then
  847.             doc.BusinessAddress=Evaluate(|@Trim(@ReplaceSubstring(BusinessAddress;@NewLine;" "))|,doc)
  848.         End If          
  849.         Address=doc.BusinessAddress(0)          
  850.         Call ParseAddress(Address, Num, FieldName)
  851.     End If
  852.     If doc.CompanyName(0) <> ""  Or doc.LastName(0)<> "" Or doc.FullName(0) <>"" Then
  853.         DocWasSaved=True
  854.     End If
  855. End Sub
  856. '++LotusScript Development Environment:2:2:Postopen:1:12
  857. Sub Postopen(Source As Notesuidocument)
  858.     Dim w As New NotesUIWorkspace 
  859.     Dim s As New NotesSession
  860.     Set db = s.CurrentDatabase
  861.     Set uidoc=source
  862.     Set doc = uidoc.document
  863.     locarea=doc.AreaCodeFromLoc
  864. End Sub
  865. '++LotusScript Development Environment:2:2:Queryclose:1:12
  866. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  867.     doc.RemoveItem("Name")
  868.     doc.RemoveItem("ParseFlag")
  869.     If DocWasSaved=True Then    
  870.         Call doc.Save(True,False,True)
  871.     End If
  872. End Sub
  873. Lotus Product
  874. OBJECT
  875. FullNamej
  876.     0S0E
  877. FullName
  878. LastNameH
  879.     0S0E
  880. BusinessAddress
  881.     0S0E
  882. BusinessAddress
  883.     0S0E
  884. '++LotusScript Development Environment:2:5:(Options):0:66
  885. '++LotusScript Development Environment:2:5:(Forward):0:1
  886. Declare Sub Exiting(Source As Field)
  887. '++LotusScript Development Environment:2:5:(Declarations):0:2
  888. '++LotusScript Development Environment:2:2:BindEvents:1:129
  889. Private Sub BindEvents(Byval Objectname_ As String)
  890.      Static Source As FIELD
  891.      Set Source = Bind(Objectname_)
  892.      On Event Exiting From Source Call Exiting
  893. End Sub
  894. '++LotusScript Development Environment:2:2:Exiting:1:12
  895. Sub Exiting(Source As Field)
  896.      
  897.      
  898.      F=Evaluate(|@False|)
  899.      T=Evaluate(|@True|)
  900.      
  901.      l=Len(doc.OfficePhoneNumber(0))
  902. REM "Test to see if the number contains any letters. 
  903. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  904. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  905. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  906.      
  907.      x=Evaluate(|!@Matches(OfficePhoneNumber;"+{!a-zA-Z}")|, doc)
  908.      
  909.      letters=Evaluate(|@Trim(@ReplaceSubstring(OfficePhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  910.      FirstLet=Left(letters(0),1)
  911.      
  912.      p=Evaluate(|@Begins(OfficePhoneNumber;"1")|,doc)
  913.      
  914.      sep=Evaluate(|@Contains(OfficePhoneNumber;"-")|,doc)
  915.      
  916.      par=Evaluate(|@Contains(OfficePhoneNumber;"(") & @Contains(OfficePhoneNumber;")")|,doc)
  917.      
  918.      num=doc.OfficePhoneNumber(0)
  919.      
  920.      If num="" Then
  921.           Exit Sub
  922.      End If
  923.      
  924.      Call ParsePhoneNumber(num)
  925.      
  926.      doc.OfficePhoneNumber=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  927.      
  928.      Call uidoc.refresh
  929. End Sub
  930. Lotus Product
  931. OBJECT
  932. OfficePhoneNumber
  933. +{!a-zA-Z}I
  934.     0S0E
  935. OfficePhoneNumber
  936.     0S0E
  937. OfficePhoneNumber
  938.     0S0E
  939. OfficePhoneNumber
  940.     0S0E
  941. OfficePhoneNumber
  942. OfficePhoneNumber
  943.     6S7S
  944. '++LotusScript Development Environment:2:5:(Options):0:66
  945. '++LotusScript Development Environment:2:5:(Forward):0:1
  946. Declare Sub Exiting(Source As Field)
  947. Declare Sub Terminate
  948. '++LotusScript Development Environment:2:5:(Declarations):0:2
  949. '++LotusScript Development Environment:2:2:BindEvents:1:129
  950. Private Sub BindEvents(Byval Objectname_ As String)
  951.      Static Source As FIELD
  952.      Set Source = Bind(Objectname_)
  953.      On Event Exiting From Source Call Exiting
  954. End Sub
  955. '++LotusScript Development Environment:2:2:Exiting:1:12
  956. Sub Exiting(Source As Field)
  957.      
  958.      
  959.      F=Evaluate(|@False|)
  960.      T=Evaluate(|@True|)
  961.      
  962.      l=Len(doc.OfficeFAXPhoneNumber(0))
  963. REM "Test to see if the number contains any letters. 
  964. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  965. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  966. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  967.      
  968.      x=Evaluate(|!@Matches(OfficeFAXPhoneNumber;"+{!a-zA-Z}")|, doc)
  969.      
  970.      letters=Evaluate(|@Trim(@ReplaceSubstring(OfficeFAXPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  971.      FirstLet=Left(letters(0),1)
  972.      
  973.      p=Evaluate(|@Begins(OfficeFAXPhoneNumber;"1")|,doc)
  974.      
  975.      sep=Evaluate(|@Contains(OfficeFAXPhoneNumber;"-")|,doc)
  976.      
  977.      par=Evaluate(|@Contains(OfficeFAXPhoneNumber;"(") & @Contains(OfficeFAXPhoneNumber;")")|,doc)
  978.      
  979.      num=doc.OfficeFAXPhoneNumber(0)
  980.      
  981.      If num="" Then
  982.           Exit Sub
  983.      End If
  984.      
  985.      Call ParsePhoneNumber(num)
  986.      
  987.      doc.OfficeFAXPhoneNumber=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  988.      
  989.      Call uidoc.refresh
  990. End Sub
  991. '++LotusScript Development Environment:2:2:Terminate:1:10
  992. Sub Terminate
  993.      
  994. End Sub
  995. Lotus Product
  996. OBJECT
  997. OfficeFAXPhoneNumber
  998. +{!a-zA-Z}I
  999.     0S0E
  1000. OfficeFAXPhoneNumber
  1001.     0S0E
  1002. OfficeFAXPhoneNumber
  1003.     0S0E
  1004. OfficeFAXPhoneNumber
  1005.     0S0E
  1006. OfficeFAXPhoneNumber
  1007. OfficeFAXPhoneNumber
  1008.     6S7S
  1009. '++LotusScript Development Environment:2:5:(Options):0:66
  1010. '++LotusScript Development Environment:2:5:(Forward):0:1
  1011. Declare Sub Exiting(Source As Field)
  1012. Declare Sub Terminate
  1013. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1014. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1015. Private Sub BindEvents(Byval Objectname_ As String)
  1016.      Static Source As FIELD
  1017.      Set Source = Bind(Objectname_)
  1018.      On Event Exiting From Source Call Exiting
  1019. End Sub
  1020. '++LotusScript Development Environment:2:2:Exiting:1:12
  1021. Sub Exiting(Source As Field)
  1022.      
  1023.      
  1024.      F=Evaluate(|@False|)
  1025.      T=Evaluate(|@True|)
  1026.      
  1027.      l=Len(doc.CellPhoneNumber(0))
  1028. REM "Test to see if the number contains any letters. 
  1029. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  1030. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  1031. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  1032.      
  1033.      x=Evaluate(|!@Matches(CellPhoneNumber;"+{!a-zA-Z}")|, doc)
  1034.      
  1035.      letters=Evaluate(|@Trim(@ReplaceSubstring(CellPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  1036.      FirstLet=Left(letters(0),1)
  1037.      
  1038.      p=Evaluate(|@Begins(CellPhoneNumber;"1")|,doc)
  1039.      
  1040.      sep=Evaluate(|@Contains(CellPhoneNumber;"-")|,doc)
  1041.      
  1042.      par=Evaluate(|@Contains(CellPhoneNumber;"(") & @Contains(CellPhoneNumber;")")|,doc)
  1043.      
  1044.      num=doc.CellPhoneNumber(0)
  1045.      
  1046.      If num="" Then
  1047.           Exit Sub
  1048.      End If
  1049.      
  1050.      Call ParsePhoneNumber(num)
  1051.      
  1052.      doc.CellPhoneNumber=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  1053.      
  1054.      Call uidoc.refresh
  1055. End Sub
  1056. '++LotusScript Development Environment:2:2:Terminate:1:10
  1057. Sub Terminate
  1058.      
  1059. End Sub
  1060. Lotus Product
  1061. OBJECT
  1062. CellPhoneNumber
  1063. +{!a-zA-Z}I
  1064.     0S0E
  1065. CellPhoneNumber
  1066.     0S0E
  1067. CellPhoneNumber
  1068.     0S0E
  1069. CellPhoneNumber
  1070.     0S0E
  1071. CellPhoneNumber
  1072. CellPhoneNumber
  1073.     6S7S
  1074. '++LotusScript Development Environment:2:5:(Options):0:66
  1075. '++LotusScript Development Environment:2:5:(Forward):0:1
  1076. Declare Sub Exiting(Source As Field)
  1077. Declare Sub Terminate
  1078. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1079. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1080. Private Sub BindEvents(Byval Objectname_ As String)
  1081.      Static Source As FIELD
  1082.      Set Source = Bind(Objectname_)
  1083.      On Event Exiting From Source Call Exiting
  1084. End Sub
  1085. '++LotusScript Development Environment:2:2:Exiting:1:12
  1086. Sub Exiting(Source As Field)
  1087.      
  1088.      
  1089.      F=Evaluate(|@False|)
  1090.      T=Evaluate(|@True|)
  1091.      
  1092.      l=Len(doc.PhoneNumber(0))
  1093. REM "Test to see if the number contains any letters. 
  1094. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  1095. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  1096. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  1097.      
  1098.      x=Evaluate(|!@Matches(PhoneNumber;"+{!a-zA-Z}")|, doc)
  1099.      
  1100.      letters=Evaluate(|@Trim(@ReplaceSubstring(PhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  1101.      FirstLet=Left(letters(0),1)
  1102.      
  1103.      p=Evaluate(|@Begins(PhoneNumber;"1")|,doc)
  1104.      
  1105.      sep=Evaluate(|@Contains(PhoneNumber;"-")|,doc)
  1106.      
  1107.      par=Evaluate(|@Contains(PhoneNumber;"(") & @Contains(PhoneNumber;")")|,doc)
  1108.      
  1109.      num=doc.PhoneNumber(0)
  1110.      
  1111.      If num="" Then
  1112.           Exit Sub
  1113.      End If
  1114.      
  1115.      Call ParsePhoneNumber(num)
  1116.      
  1117.      doc.PhoneNumber=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  1118.      
  1119.      Call uidoc.refresh
  1120. End Sub
  1121. '++LotusScript Development Environment:2:2:Terminate:1:10
  1122. Sub Terminate
  1123.      
  1124. End Sub
  1125. Lotus Product
  1126. OBJECT
  1127. PhoneNumber
  1128. +{!a-zA-Z}I
  1129.     0S0E
  1130. PhoneNumber
  1131.     0S0E
  1132. PhoneNumber
  1133.     0S0E
  1134. PhoneNumber
  1135.     0S0E
  1136. PhoneNumber
  1137. PhoneNumber
  1138.     6S7S
  1139. '++LotusScript Development Environment:2:5:(Options):0:66
  1140. '++LotusScript Development Environment:2:5:(Forward):0:1
  1141. Declare Sub Exiting(Source As Field)
  1142. Declare Sub Terminate
  1143. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1144. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1145. Private Sub BindEvents(Byval Objectname_ As String)
  1146.      Static Source As FIELD
  1147.      Set Source = Bind(Objectname_)
  1148.      On Event Exiting From Source Call Exiting
  1149. End Sub
  1150. '++LotusScript Development Environment:2:2:Exiting:1:12
  1151. Sub Exiting(Source As Field)
  1152.      
  1153.      
  1154.      F=Evaluate(|@False|)
  1155.      T=Evaluate(|@True|)
  1156.      
  1157.      l=Len(doc.HomeFAXPhoneNumber(0))
  1158. REM "Test to see if the number contains any letters. 
  1159. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  1160. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  1161. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  1162.      
  1163.      x=Evaluate(|!@Matches(HomeFAXPhoneNumber;"+{!a-zA-Z}")|, doc)
  1164.      
  1165.      letters=Evaluate(|@Trim(@ReplaceSubstring(HomeFAXPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  1166.      FirstLet=Left(letters(0),1)
  1167.      
  1168.      p=Evaluate(|@Begins(HomeFAXPhoneNumber;"1")|,doc)
  1169.      
  1170.      sep=Evaluate(|@Contains(HomeFAXPhoneNumber;"-")|,doc)
  1171.      
  1172.      par=Evaluate(|@Contains(HomeFAXPhoneNumber;"(") & @Contains(HomeFAXPhoneNumber;")")|,doc)
  1173.      
  1174.      num=doc.HomeFAXPhoneNumber(0)
  1175.      
  1176.      If num="" Then
  1177.           Exit Sub
  1178.      End If
  1179.      
  1180.      Call ParsePhoneNumber(num)
  1181.      
  1182.      doc.HomeFAXPhoneNumber=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  1183.      
  1184.      Call uidoc.refresh
  1185. End Sub
  1186. '++LotusScript Development Environment:2:2:Terminate:1:10
  1187. Sub Terminate
  1188.      
  1189. End Sub
  1190. Lotus Product
  1191. OBJECT
  1192. HomeFAXPhoneNumber
  1193. +{!a-zA-Z}I
  1194.     0S0E
  1195. HomeFAXPhoneNumber
  1196.     0S0E
  1197. HomeFAXPhoneNumber
  1198.     0S0E
  1199. HomeFAXPhoneNumber
  1200.     0S0E
  1201. HomeFAXPhoneNumber
  1202. HomeFAXPhoneNumber
  1203.     6S7S
  1204. '++LotusScript Development Environment:2:5:(Options):0:66
  1205. '++LotusScript Development Environment:2:5:(Forward):0:1
  1206. Declare Sub Exiting(Source As Field)
  1207. Declare Sub Terminate
  1208. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1209. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1210. Private Sub BindEvents(Byval Objectname_ As String)
  1211.      Static Source As FIELD
  1212.      Set Source = Bind(Objectname_)
  1213.      On Event Exiting From Source Call Exiting
  1214. End Sub
  1215. '++LotusScript Development Environment:2:2:Exiting:1:12
  1216. Sub Exiting(Source As Field)
  1217.      
  1218.      
  1219.      F=Evaluate(|@False|)
  1220.      T=Evaluate(|@True|)
  1221.      
  1222.      l=Len(doc.PhoneNumber_6(0))
  1223. REM "Test to see if the number contains any letters. 
  1224. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  1225. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  1226. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  1227.      
  1228.      x=Evaluate(|!@Matches(PhoneNumber_6;"+{!a-zA-Z}")|, doc)
  1229.      
  1230.      letters=Evaluate(|@Trim(@ReplaceSubstring(PhoneNumber_6;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-":" ";""))|, doc)
  1231.      FirstLet=Left(letters(0),1)
  1232.      
  1233.      p=Evaluate(|@Begins(PhoneNumber_6;"1")|,doc)
  1234.      
  1235.      sep=Evaluate(|@Contains(PhoneNumber_6;"-")|,doc)
  1236.      
  1237.      par=Evaluate(|@Contains(PhoneNumber_6;"(") & @Contains(PhoneNumber_6;")")|,doc)
  1238.      
  1239.      num=doc.PhoneNumber_6(0)
  1240.      
  1241.      If num="" Then
  1242.           Exit Sub
  1243.      End If
  1244.      
  1245.      Call ParsePhoneNumber(num)
  1246.      
  1247.      doc.PhoneNumber_6=Trim(Trim(Prefix) & " " & Trim(tel) & " " & Trim(Suffix))
  1248.      
  1249.      Call uidoc.refresh
  1250. End Sub
  1251. '++LotusScript Development Environment:2:2:Terminate:1:10
  1252. Sub Terminate
  1253.      
  1254. End Sub
  1255. Lotus Product
  1256. OBJECT
  1257. PhoneNumber_6
  1258. +{!a-zA-Z}I
  1259.     0S0E
  1260. PhoneNumber_6
  1261.     0S0E
  1262. PhoneNumber_6
  1263.     0S0E
  1264. PhoneNumber_6
  1265.     0S0E
  1266. PhoneNumber_6
  1267. PhoneNumber_6
  1268.     6S7S
  1269. '++LotusScript Development Environment:2:5:(Options):0:66
  1270. '++LotusScript Development Environment:2:5:(Forward):0:1
  1271. Declare Sub Exiting(Source As Field)
  1272. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1273. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1274. Private Sub BindEvents(Byval Objectname_ As String)
  1275.      Static Source As FIELD
  1276.      Set Source = Bind(Objectname_)
  1277.      On Event Exiting From Source Call Exiting
  1278. End Sub
  1279. '++LotusScript Development Environment:2:2:Exiting:1:12
  1280. Sub Exiting(Source As Field)
  1281.      
  1282.      
  1283.      Dim localView As NotesView
  1284.      Dim othernote As NotesDocument     
  1285.      Dim CompName As String
  1286.      
  1287.      If doc.BusinessAddress(0)<>"" Then
  1288.           Exit Sub
  1289.      End If
  1290.      
  1291.      CompName=doc.CompanyName(0)
  1292.      
  1293.      If CompName ="" Then
  1294.           Exit Sub
  1295.      End If
  1296.      
  1297.      Set localView = db.GetView("($CompanyList)")
  1298.      Set othernote = localView.GetDocumentByKey(CompName, True)
  1299.      
  1300.      
  1301.      If (othernote Is Nothing) Then
  1302.           Exit Sub
  1303.      End If
  1304.      
  1305.      doc.OfficeStreetAddress=othernote.OfficeStreetAddress
  1306.      doc.OfficeCity=othernote.OfficeCity
  1307.      doc.OfficeState=othernote.OfficeState
  1308.      doc.OfficeZip=othernote.OfficeZip
  1309.      doc.OfficeCountry=othernote.OfficeCountry
  1310.      doc.BusinessAddress=othernote.BusinessAddress
  1311.      
  1312.      Call uidoc.refresh
  1313.      
  1314.      
  1315.      
  1316. End Sub
  1317. Lotus Product
  1318. OBJECT
  1319. '++LotusScript Development Environment:2:5:(Options):0:66
  1320. '++LotusScript Development Environment:2:5:(Forward):0:1
  1321. Declare Sub Entering(Source As Field)
  1322. Declare Sub Exiting(Source As Field)
  1323. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1324. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1325. Private Sub BindEvents(Byval Objectname_ As String)
  1326.      Static Source As FIELD
  1327.      Set Source = Bind(Objectname_)
  1328.      On Event Entering From Source Call Entering
  1329.      On Event Exiting From Source Call Exiting
  1330. End Sub
  1331. '++LotusScript Development Environment:2:2:Entering:1:12
  1332. Sub Entering(Source As Field)
  1333.      
  1334. End Sub
  1335. '++LotusScript Development Environment:2:2:Exiting:1:12
  1336. Sub Exiting(Source As Field)
  1337.      
  1338.      
  1339.      Dim Num As Variant
  1340.      Dim FieldName As String
  1341.      Dim Address As Variant
  1342.      
  1343.      FieldName = "B"
  1344.      Num=Evaluate(|@Elements(@Explode(@Trim(BusinessAddress);@Char(13)))|,doc)
  1345.      
  1346.      If Num(0) = 1 Then
  1347.           doc.BusinessAddress=Evaluate(|@Trim(@ReplaceSubstring(BusinessAddress;@NewLine;" "))|,doc)
  1348.      End If
  1349.      
  1350.      Address=doc.BusinessAddress(0)
  1351.      If Address="" And (doc.OfficeStreetAddress(0)="" And doc.OfficeCity(0)="" And doc.OfficeState(0)="")Then
  1352.           Exit Sub
  1353.      End If
  1354.      
  1355.      Call ParseAddress(Address, Num, FieldName)
  1356.      
  1357.      Call uidoc.refresh
  1358.      
  1359. End Sub
  1360. Lotus Product
  1361. OBJECT
  1362. BusinessAddress
  1363.     0S0E
  1364. BusinessAddress
  1365.     0S0E
  1366. '++LotusScript Development Environment:2:5:(Options):0:66
  1367. '++LotusScript Development Environment:2:5:(Forward):0:1
  1368. Declare Sub Exiting(Source As Field)
  1369. '++LotusScript Development Environment:2:5:(Declarations):0:2
  1370. '++LotusScript Development Environment:2:2:BindEvents:1:129
  1371. Private Sub BindEvents(Byval Objectname_ As String)
  1372.      Static Source As FIELD
  1373.      Set Source = Bind(Objectname_)
  1374.      On Event Exiting From Source Call Exiting
  1375. End Sub
  1376. '++LotusScript Development Environment:2:2:Exiting:1:12
  1377. Sub Exiting(Source As Field)
  1378.      
  1379.      
  1380.      Dim Num As Variant
  1381.      Dim FieldName As String
  1382.      Dim Address As Variant
  1383.      
  1384.      FieldName = "H"
  1385.      Num=Evaluate(|@Elements(@Explode(HomeAddress;@Char(13)))|,doc)
  1386.      
  1387.      Address=doc.HomeAddress(0)
  1388.      If Address="" And (doc.StreetAddress(0)="" And doc.City(0)="" And doc.State(0)="")Then
  1389.           Exit Sub
  1390.      End If
  1391.      
  1392.      Call ParseAddress(Address, Num, FieldName)
  1393.      
  1394.      Call uidoc.refresh
  1395. End Sub
  1396. Lotus Product
  1397. OBJECT
  1398. HomeAddress
  1399.     0S0E
  1400. Field Label
  1401.     Phone labels:
  1402. Office phone
  1403. PhoneLabel_1
  1404. Office fax
  1405. PhoneLabel_3
  1406. Cell phone
  1407. PhoneLabel_5
  1408. Home phone
  1409. PhoneLabel_2
  1410. Home fax
  1411. PhoneLabel_4
  1412. Pager
  1413. PhoneLabel_6
  1414.     Business address fields:
  1415. StreetAddress_1
  1416. OfficeStreetAddressStreet address.
  1417. City_1
  1418. OfficeCityCity or town name.
  1419. State_1
  1420. OfficeStateState or province name.
  1421.     Home Address: 
  1422. StreetAddressStreet address.
  1423. CityCity or town name.
  1424. StateState or province name.
  1425.     0S0E
  1426. AreaCodeFromLoc
  1427.     Profile flags: 
  1428. PersonalAddressBookProfile
  1429. ParseFlag
  1430.     0S0E
  1431. ParseFlag
  1432. LastName
  1433. FirstName
  1434. CompanyName
  1435. NameDisplayPref
  1436. NameDisplayPref
  1437. FirstName
  1438. LastName"
  1439. NameDisplayPref
  1440. Lastname
  1441. FirstName
  1442.     5S6S17S18S25S34S35S36S37SDisplayName
  1443. JobTitle
  1444. DisplayJobTitle
  1445. WebSite
  1446.     1S2S
  1447. CompanyName
  1448.     1S2S
  1449. LastName
  1450. FirstName
  1451. CompanyName
  1452.     5S6S
  1453. DisplayCompanyName
  1454. CompanyName
  1455. HomeAddress
  1456. Country
  1457.      
  1458. Country
  1459. BusinessAddress
  1460. OfficeZip
  1461. OfficeCountry
  1462. OfficeCountry
  1463.     25S27S28S29S
  1464. DisplayAddress
  1465. <unknown> 
  1466.     0S0E
  1467. OfficePhoneNumber
  1468. PhoneLabel_1
  1469. PhoneLabel_1
  1470. OfficeFAXPhoneNumber
  1471. PhoneLabel_3
  1472. PhoneLabel_3
  1473. CellPhoneNumber
  1474. PhoneLabel_5
  1475. PhoneLabel_5
  1476. PhoneNumber
  1477. PhoneLabel_2
  1478. PhoneLabel_2
  1479. HomeFAXPhoneNumber
  1480. PhoneLabel_4
  1481. PhoneLabel_4
  1482. PhoneNumber_6
  1483. PhoneLabel_6
  1484. PhoneLabel_6
  1485.     0R2RS11E5S6S15S16S23S24RS11E27S37S38S45S46RS11E49S50S59S67S68RS11E71S72S74S81S89S90RS11E93S103S111S112RS11E115S125S126S133RS10EDisplayPhoneLabels
  1486. OfficePhoneNumber
  1487. OfficePhoneNumber
  1488. OfficeFAXPhoneNumber
  1489. OfficeFAXPhoneNumber
  1490. CellPhoneNumber
  1491. CellPhoneNumber
  1492. PhoneNumber
  1493. PhoneNumber
  1494. HomeFAXPhoneNumber
  1495. HomeFAXPhoneNumber
  1496. PhoneNumber_6
  1497. PhoneNumber_6
  1498.     2RS11E5S12S13RS11E16S24RS11E27S28S34S35RS11E38S39S41S42S43S45S46RS11E49S53S56S57RS11E60S64S67RS10E
  1499. DisplayPhones
  1500. MailAddress
  1501.     1S2S
  1502. eMail: 
  1503. Error
  1504. You must use Notes 4.6 or above to use this action.
  1505. (CreateMailMemo)
  1506.     6S7S9S
  1507. MailAddress
  1508. DisplayEmail
  1509. URL:   
  1510. WebSite
  1511.     0S0E
  1512. WebSite
  1513. DisplayURL
  1514. /    Name
  1515. dialogbutton.GIF|dialogbutton
  1516. PhoneHelperHotspot
  1517. (PhoneHelper)
  1518. Phones
  1519.     0R3S
  1520. /    Phones 
  1521.     First name:
  1522. FirstNameFirst name(s) and nicknames - e.g. John; Johnny
  1523. PhoneLabel_1
  1524. PhoneLabel1
  1525. OfficePhoneNumberOffice phone number.
  1526.     Middle name:
  1527. MiddleInitialMiddle Initial with a trailing period (optional).
  1528. PhoneLabel_3
  1529. PhoneLabel3
  1530. OfficeFAXPhoneNumberOffice FAX phone number.
  1531.     Last name:
  1532. LastName
  1533. CompanyName
  1534. A person's lastname or a company name is required
  1535.     3S4S5S6S9S10S12S17SLastNameLast name - e.g. Smith.
  1536. PhoneLabel_5
  1537. PhoneLabel5
  1538. CellPhoneNumberCellular phone number.
  1539.     Title:
  1540. Title
  1541. -None-|Dr.|Dr.Prof.|Prof.Mr.|Mr.Ms.|Ms.Miss|MissMrs.|Mrs.
  1542.     Suffix:
  1543. Suffix
  1544. -None-|Jr.|Jr.Sr.|Sr.IIIIII
  1545. PhoneLabel_2
  1546. PhoneLabel2
  1547. PhoneNumberHome phone number.
  1548. PhoneLabel_4
  1549. PhoneLabel4
  1550. HomeFAXPhoneNumberHome FAX phone number.
  1551. PhoneLabel_6
  1552. PhoneLabel6
  1553. PhoneNumber_6Pager phone number.
  1554. /    Business
  1555. /    Email and Web Page
  1556.     Company:
  1557. CompanyNameCompany name.
  1558. ($CompanyList)
  1559. Enter the job title.
  1560. Enter the person's email address.
  1561.     eMail address:
  1562. MailAddress
  1563. dialogbutton.GIF|dialogbutton
  1564. EmailAddressHotspot
  1565. Put document in Edit Mode.
  1566. Get the default for the listbox
  1567.     0R1S
  1568. MailSystem
  1569. Lotus Notes
  1570. MailSystem
  1571. Lotus cc:Mail
  1572. MailSystem
  1573. Other
  1574. MailSystem
  1575. X.400 Mail
  1576. MailSystem
  1577. Internet Mail
  1578. MailSystem
  1579. Lotus Notes
  1580.     0R1S2S5S6S8S10S11S12S14S16RS19E17S18S20S22S23S24S26S28RS19E29S30S32S34S35S36S38S40S
  1581. Get the type of mail system
  1582.     0RR1S
  1583. Mail Address Assistant
  1584. Choose the type of mail system the person uses:
  1585. Lotus Notes
  1586. Lotus cc:Mail
  1587. Internet Mail
  1588. X.400 Mail
  1589. Other
  1590.     0R1S2S8RS19E12RS20E
  1591. Determine the helper form name
  1592.     0RR1S
  1593. helper
  1594. Lotus Notes
  1595. (Notes Address Helper)
  1596. Lotus cc:Mail
  1597. (ccMail Address Helper)
  1598. Internet Mail
  1599. (Internet Address Helper)
  1600. X.400 Mail
  1601. (X400 Address Helper)
  1602. (Fax Address Helper)
  1603. (Other Address Helper)
  1604.     0R1S2S5S6S8S10S11S12S14S16RS26E17S18S20S22S23S24S26S28RS26E30S32S34S
  1605. Display the helper form - results are returned to current document
  1606.     0RR1S
  1607. helper
  1608. helper
  1609. Mail Address Assistant
  1610.     0R3S4S6S10S19S
  1611.     Job title:
  1612. JobTitleJob title(s).
  1613. Enter the URL for the person's web page.
  1614.     Web page:
  1615. WebSite
  1616. Basics
  1617. /    Business
  1618. /    Home
  1619.     Address: 
  1620. Business Address Helper
  1621. dialogbutton.GIF|dialogbutton
  1622. BusinessAddressHotspot
  1623. (BusinessAddressHelper)
  1624. Business Address
  1625. OfficeStreetAddress
  1626. OfficeCity
  1627. OfficeCity"
  1628. OfficeState
  1629. OfficeCity
  1630. OfficeState
  1631.     19S20S
  1632. BusinessAddress
  1633.     0S0E
  1634. BusinessAddress
  1635.     Home address: 
  1636. Home Address Helper
  1637. dialogbutton.GIF|dialogbutton
  1638. HomeAddressHotspot
  1639. (HomeAddressHelper)
  1640. Home Address
  1641. StreetAddress
  1642. City"
  1643. State
  1644. State
  1645.     19S20S
  1646. HomeAddress
  1647. Enter the ZIP code or Postal code for the business address.
  1648.     ZIP/Postal code:
  1649. Zip_1
  1650. OfficeZipEnter the ZIP or postal code.
  1651. Enter the ZIP code or Postal code for the home address.
  1652.     ZIP/Postal code:
  1653. ZipEnter the ZIP or postal code.
  1654. Enter the country for the business address.
  1655.     Country:
  1656. Country_1
  1657. OfficeCountryPerson's home country.
  1658. Enter the country for the home address.
  1659.     Country:
  1660. CountryPerson's home country.
  1661. Office location or mailstop.
  1662.     Location:
  1663. LocationOffice location or mailstop.
  1664. Spouse's name.
  1665.     Spouse:
  1666. SpouseSpouse's name.
  1667. Department name(s).
  1668.     Department:
  1669. DepartmentDepartment name(s).
  1670. Children's names.
  1671.     Children:
  1672. ChildrenChildren's names.
  1673. Name of the person's manager or supervisor.
  1674.     Manager:
  1675. ManagerManager's name.
  1676. Name of person's assistant or secretary.
  1677.     Assistant:
  1678. AssistantAssistant's name.
  1679.     Birthday:
  1680. Birthday
  1681. Details
  1682. CommentEnter a comment.
  1683. Comments
  1684. /    Name
  1685. /    Organize
  1686. Enter the user's hierarchical name and any other variations, for example, Jon Smith/Sales/Acme; Jonathan M. Smith. You can use any of these names in the To field of Notes mail messages. 
  1687.     Full user name:
  1688. FullNameDistinguished name and aliases - e.g. Jon Smith/Sales/Acme; Jonathan M. Smith.
  1689. Enter the categories for this business card. 
  1690.     Categories:
  1691. Categories
  1692. Categories
  1693. Electronic mail domain name component of the person's electronic mail address.  Choose the button next to the Mail address field for further assistance.
  1694.     Mail domain:
  1695. MailDomainDomain name of person's mail server.
  1696. MailSystem
  1697. Notes|1cc:Mail|2Internet|5X.400|4Other|3None|100
  1698.     Logo:
  1699. DirectoryProfile
  1700. $BusinessCardBkg
  1701.     0S0E
  1702. Beach Texture|beachCanvas Texture|canvasCircuits|circuitLight Texture|lightPuffin|puffin
  1703. Short "nickname" to be used when addressing mail to the person.
  1704.     Short name:
  1705. ShortNameShort username used by some foreign mail gateways (e.g. PROFS).
  1706. /    Internet Certificate
  1707.     Internet certificate:
  1708. UserCertificate
  1709. UserCertificate
  1710.     6S7S
  1711. userCertificateDisplay
  1712. Present|1Not Available|0
  1713.     Internet certificate issuers:
  1714.     6S7S9S
  1715. Issuers
  1716. UserCertificate
  1717.     0R6S
  1718. leftissuers
  1719. issuers
  1720. leftissuers
  1721. X509Issuers
  1722. /    Notes Certificates
  1723. Use this field only if the user has a hierarchical, ID.
  1724. In most cases, leave this field blank. Use only if you want to send encrypted mail to a user who is in a different domain and the servers in your domain do not have access to the Public Address Book for the recipient's domain, or you want so send encrypted mail and you operate in a disconnected fashion and do not have access to the Public Address Book when you want to send mail. In such a case, the user can send you a copy of the public key for you to paste into this field. 
  1725.     Certified public key:
  1726. CertificatePerson's certified public key.
  1727. Use this field only if the user has a flat, not a hierarchical, ID.
  1728. In most cases, leave this field blank. Use only if you want to send encrypted mail to a user who is in a different domain and the servers in your domain do not have access to the Public Address Book for the recipient's domain, or you want so send encrypted mail and you operate in a disconnected fashion and do not have access to the Public Address Book when you want to send mail. In such a case, the user can send you a copy of the public key for you to paste into this field. 
  1729.     Flat name key:   
  1730. PublicKeyPerson's public key.
  1731. Advanced
  1732. Person
  1733. Person
  1734. [UserModifier]
  1735. Group
  1736. [GroupModifier]
  1737. Server
  1738. [ServerModifier]
  1739. [NetModifier]
  1740.     3S4S6S8S9S10S12S14S15S16S18S20SDocumentAccess
  1741. Close
  1742.     0S0E
  1743. Save and CloseB
  1744.     0S0E
  1745. _Edit Card
  1746. Categori_zeK
  1747. Create Cross Certificate
  1748. UserCertificate
  1749. Certificate
  1750.     0S0E
  1751. leftsubs
  1752. rightsubs
  1753. Create Cross Certificate
  1754. What certificate do you want to cross certify?
  1755. leftsubs
  1756.     0R1S2S6S8S10S12S
  1757.     0R5S6S
  1758. leftsubsv
  1759. leftsubsj
  1760. rightsubs
  1761. rightsubs
  1762. rightsubs
  1763. UserCertificate
  1764. Certificate
  1765. Examine X.509 Certificate(s)`
  1766. (DeleteCertDialog)
  1767. Delete X.509 Certificates
  1768.     0S0E
  1769. Send Docu_ment
  1770. _Forward
  1771. _Move to Folder...    
  1772. _Remove from Folder...
  1773. Close
  1774.     0S0E
  1775. Save and CloseB
  1776.     0S0E
  1777. _Edit Card
  1778. Categori_zeK
  1779. Create Cross Certificate
  1780. UserCertificate
  1781. Certificate
  1782.     0S0E
  1783. leftsubs
  1784. rightsubs
  1785. Create Cross Certificate
  1786. What certificate do you want to cross certify?
  1787. leftsubs
  1788.     0R1S2S6S8S10S12S
  1789.     0R5S6S
  1790. leftsubsv
  1791. leftsubsj
  1792. rightsubs
  1793. rightsubs
  1794. rightsubs
  1795. UserCertificate
  1796. Certificate
  1797. Examine X.509 Certificate(s)`
  1798. (DeleteCertDialog)
  1799. Delete X.509 Certificates
  1800.     0S0E
  1801. Send Docu_ment
  1802. _Forward
  1803. _Move to Folder...    
  1804. _Remove from Folder...
  1805. O=Lotus Notes
  1806. O=Lotus Notes
  1807. PURSAFO
  1808. |.:#U
  1809. O=Lotus Notes
  1810. CN=Lotus Notes Template Development/O=Lotus Notes
  1811. PURSAFO
  1812. !RL;/
  1813. $Author
  1814. $$Name
  1815. $Name_O
  1816. $BackgroundRepeat
  1817. $Background
  1818. $FormUsers
  1819. $INFO
  1820. $WINDOWTITLE
  1821. $Script
  1822. $$Script_O
  1823. $$ScriptName
  1824. $$FormScript
  1825. $$$FormScript_O
  1826. $$OfficePhoneNumber
  1827. $OfficePhoneNumber_O
  1828. $$OfficeFAXPhoneNumber
  1829. $OfficeFAXPhoneNumber_O
  1830. $$CellPhoneNumber
  1831. $CellPhoneNumber_O
  1832. $$PhoneNumber
  1833. $PhoneNumber_O
  1834. $$HomeFAXPhoneNumber
  1835. $HomeFAXPhoneNumber_O
  1836. $$PhoneNumber_6
  1837. $PhoneNumber_6_O
  1838. $$CompanyName
  1839. $CompanyName_O
  1840. $$BusinessAddress
  1841. $BusinessAddress_O
  1842. $$HomeAddress
  1843. $HomeAddress_O
  1844. Birthday
  1845. $BODY
  1846. $V5ACTIONS
  1847. $ACTIONS
  1848. Times New Roman
  1849. About Personal Address Book
  1850. Basic
  1851. Welcome to the Notes Personal Address Book.  A personal address book database is designed to keep information about the people, companies, and server computers with which you communicate.  Every Notes user is required to have his or her own personal address book database stored on the user's personal computer (never on a server).
  1852. Choose "Using This Database" in the Help menu for suggestions on tailoring this database for your personal use.
  1853. ---------------
  1854. (Close this window to return to the database)
  1855. O=Lotus Notes
  1856. O=Lotus Notes
  1857. PURSAFO
  1858. |.:#U
  1859. O=Lotus Notes
  1860. CN=Lotus Notes Template Development/O=Lotus Notes
  1861. PURSAFO
  1862. $INFO
  1863. $BODY
  1864. O=Lotus Notes
  1865. O=Lotus Notes
  1866. PURSAFO
  1867. |.:#U
  1868. O=Lotus Notes
  1869. CN=Lotus Notes Template Development/O=Lotus Notes
  1870. PURSAFO
  1871. Fde!f^^
  1872. $TITLE
  1873. $INFO
  1874. $BODY
  1875. (Other Address Helper)
  1876. Other Mail Address
  1877.     Other mail system address:
  1878.     Notes gateway domain:
  1879. MailAddress
  1880.     1S2S6S
  1881. MailAddress
  1882. MailAddress
  1883. FullName
  1884.     0R5S6S8S10S20S
  1885. UserName
  1886. Include both any domain from address and anyone from MailDomain field
  1887. MailAddress
  1888.     0R1S2S
  1889. MailDomain
  1890. MailDomain"
  1891. MailDomain
  1892.     0R3S4S5S6S7S8S10S11S12S13S14S16S17S18S20S22S
  1893. Domain
  1894. UserName
  1895. Domain
  1896. Domain"
  1897.     1S2S5S6S8S12SMailAddress
  1898. MailSystem
  1899. Always zero out the MailDomain because it is now part of MailAddress
  1900. MailDomain
  1901. Categori_ze 
  1902. _Edit Document
  1903. Send Docu_ment
  1904. _Forward
  1905. _Move to Folder...
  1906. _Remove from Folder...
  1907. O=Lotus Notes
  1908. O=Lotus Notes
  1909. PURSAFO
  1910. |.:#U
  1911. O=Lotus Notes
  1912. CN=Lotus Notes Template Development/O=Lotus Notes
  1913. PURSAFO
  1914. $TITLE
  1915. $INFO
  1916. $$ScriptName
  1917. $BODY
  1918. $ACTIONS
  1919. (FAX Address Helper)
  1920. Fax Mail Address
  1921.     Person's name:
  1922.     Notes fax gateway domain:
  1923. Fax machine phone number:
  1924. MailAddress
  1925. MailAddress
  1926. FullName
  1927.     3S4S6S12S16S20SUserName
  1928. Get the phone number from the middle of the address
  1929. MailAddress
  1930.     0R1S2S6S
  1931.     0R1S2S8S10S11S13S17S20S
  1932. OfficeFAXPhoneNumber
  1933.     0R5S6S8S10SFaxNumber
  1934. Get the third thru nth domain names
  1935. MailAddress
  1936. MailDomain
  1937. MailDomain"
  1938.     0R1S2S8S11S
  1939. FaxDomain
  1940.     0R5S6S8S10S
  1941. Save the gateway domain in the user's profile for future addresses
  1942. FaxDomain
  1943. FaxDomain
  1944.     0R4S
  1945. FaxDomain
  1946. FaxDomain
  1947. UserName
  1948. FaxNumber
  1949. FaxDomain
  1950. FaxDomain
  1951.     5S6S9S10S12S13S14S16SMailAddress
  1952. MailSystem
  1953. Always zero out the MailDomain because it is now part of MailAddress
  1954. MailDomain
  1955. Categori_ze
  1956. _Edit Document
  1957. Send Docu_ment
  1958. _Forward
  1959. _Move to Folder...
  1960. _Remove from Folder...
  1961. O=Lotus Notes
  1962. O=Lotus Notes
  1963. PURSAFO
  1964. |.:#U
  1965. O=Lotus Notes
  1966. CN=Lotus Notes Template Development/O=Lotus Notes
  1967. PURSAFO
  1968. {AwyD1
  1969. $TITLE
  1970. $INFO
  1971. $$ScriptName
  1972. $BODY
  1973. $ACTIONS
  1974. Started running agent 'Remove Address Book Preferences' on 01/12/99 01:10:42 PM
  1975. Ran LotusScript code
  1976. Done running agent 'Remove Address Book Preferences' on 01/12/99 01:10:42 PM
  1977. Add AccountK,
  1978. Account
  1979.     0S0E
  1980. _Edit Account
  1981. Delete Account 
  1982.     0S0E
  1983. Send Docu_ment
  1984. Categori_zeK
  1985. _Forward
  1986. _Move to Folder...
  1987. _Remove from Folder...
  1988. Tools...\Preferences...K4
  1989. DirectoryProfile
  1990.     0S0E
  1991. Add AccountK,
  1992. Account
  1993.     0S0E
  1994. _Edit Account
  1995. Delete Account 
  1996.     0S0E
  1997. Send Docu_ment
  1998. Categori_zeK
  1999. _Forward
  2000. _Move to Folder...
  2001. _Remove from Folder...
  2002. Tools...\Preferences...K4
  2003. DirectoryProfile
  2004.     0S0E
  2005. O=Lotus Notes
  2006. O=Lotus Notes
  2007. PURSAFO
  2008. |.:#U
  2009. O=Lotus Notes
  2010. CN=Lotus Notes Template Development/O=Lotus Notes
  2011. PURSAFO
  2012. flfS?8eI
  2013. $TITLE
  2014. $Index
  2015. $Formula
  2016. $FormulaClass
  2017. $VIEWFORMAT
  2018. $Comment
  2019. $V5ACTIONS
  2020. $ACTIONS
  2021. O=Lotus Notes
  2022. O=Lotus Notes
  2023. PURSAFO
  2024. |.:#U
  2025. O=Lotus Notes
  2026. CN=Lotus Notes Template Development/O=Lotus Notes
  2027. PURSAFO
  2028. .!o0VFXR
  2029. $TITLE
  2030. $Index
  2031. $Formula
  2032. $FormulaClass
  2033. $VIEWFORMAT
  2034. $Comment
  2035. (X400 Address Helper)
  2036.  Extract X400 O/R address portion (address) from MailAddress
  2037. MailAddress
  2038. address
  2039. MailAddress
  2040.     0R5S6S8S10S
  2041. Check to see if the string '/DDA.' exists in the MailAddress, and if not return.
  2042.     0RR1S
  2043. check
  2044. address
  2045. /DDA.
  2046.  Assign substring between 1st '/DDA.' and the next '/'  to DDA1 field. 
  2047.     0RR1S
  2048. address
  2049. /DDA.
  2050.     0R1S
  2051.  Assign substring between 2nd '/dda.' and the next '/'  to DDA2 field. 
  2052.     0RR1S
  2053. address
  2054. DDA1`
  2055. /DDA.
  2056. address
  2057. /DDA.
  2058. DDA1"
  2059. /DDA.
  2060.     0R1S7S17S
  2061.  Assign substring between 3nd '/dda.' and the next '/'  to DDA3 field. 
  2062.     0RR1S
  2063. address
  2064. DDA2`
  2065. /DDA.
  2066. address
  2067. /DDA.
  2068. DDA2"
  2069. /DDA.
  2070.     0R1S7S17S
  2071.  Assign substring between 4th '/dda.' and the next '/'  to DDA4 field. 
  2072.     0RR1S
  2073. address
  2074. DDA3`
  2075. /DDA.
  2076. address
  2077. /DDA.
  2078. DDA3"
  2079. /DDA.
  2080.     0R1S7S17S
  2081.  Dummy value. 
  2082.     0RR1S
  2083. X.400 Address
  2084. Given name (/G):
  2085. Surname (/S):
  2086. Organization (/O):
  2087. Country (/C):
  2088. MailAddress
  2089.     1S2S
  2090. MailAddress
  2091. MailAddress
  2092. FirstName
  2093.     0R5S6S8S10S18S19S25S26S28S30SG
  2094. MailAddress
  2095.     1S2S
  2096. MailAddress
  2097. MailAddress
  2098. LastName
  2099.     0R5S6S8S10S18S2E19S25S26S28S30SS
  2100. MailAddress
  2101.     0S0E
  2102. MailAddress
  2103.     0S0E
  2104. MailAddress
  2105.     0S0E
  2106. MailAddress
  2107.     0S0E
  2108. MailAddress
  2109.     0S0E
  2110. MailAddress
  2111.     0S0E
  2112. Org Unit 1 (/OU1):
  2113. Org Unit 4 (/OU4):
  2114. Org Unit2 (/OU2):
  2115. Org Unit 3 (/OU3):
  2116. MailAddress
  2117.     0S0E
  2118. Initials (/I):
  2119. MailAddress
  2120.     0S0E
  2121. Generational qualifier (/Q):
  2122. MailAddress
  2123.     0S0E
  2124. MailAddress
  2125.     0S0E
  2126. PRMD (/P):
  2127. ADMD (/A):
  2128. MailAddress
  2129.     0S0E
  2130. Common name (/CN):
  2131. Include both any domain from MailAddress and any from MailDomain field
  2132. MailAddress
  2133.     0R1S2S
  2134. domain
  2135. MailDomain
  2136. MailDomain"
  2137. MailDomain
  2138.     0R1S2S5S6S7S8S9S10S12S13S14S15S16S18S19S20S22S24S
  2139. domain
  2140. domain
  2141. X400Domain|
  2142.     0R3S4S6S8S
  2143. Save the gateway domain in the user's profile for future addresses
  2144. X400Domain
  2145. X400Domain|
  2146.     0R4S
  2147. X400Domain
  2148. X400Domain
  2149. Gateway domain (optional):
  2150. DDA (/DDA.type=value):
  2151. DDA (/DDA.type=value):
  2152. DDA (/DDA.type=value):
  2153. DDA (/DDA.type=value):
  2154. /OU4=
  2155. /OU3=
  2156. /OU2=
  2157. /OU1=
  2158. PRMD"
  2159. ADMD"
  2160. /DDA.
  2161. DDA1"
  2162. /DDA.
  2163. DDA2"
  2164. /DDA.
  2165. DDA3"
  2166. /DDA.
  2167. DDA4"
  2168. X400Domain
  2169. X400Domain"
  2170.     13R65R117R169R201R233R236S237S239S
  2171. MailAddress
  2172. MailSystem
  2173. Always zero out the MailDomain because it is now part of MailAddress
  2174. MailDomain
  2175. Categori_ze 
  2176. _Edit Document
  2177. Send Docu_ment
  2178. _Forward
  2179. _Move to Folder...
  2180. _Remove from Folder...
  2181. O=Lotus Notes
  2182. O=Lotus Notes
  2183. PURSAFO
  2184. |.:#U
  2185. O=Lotus Notes
  2186. CN=Lotus Notes Template Development/O=Lotus Notes
  2187. PURSAFO
  2188. $TITLE
  2189. $INFO
  2190. $$ScriptName
  2191. $BODY
  2192. $ACTIONS
  2193. (ccMail Address Helper)
  2194. cc:Mail Address
  2195.     User name:
  2196.     Post Office:
  2197.     cc:Mail domain:
  2198.  Extract cc:Mail address portion (address) from MailAddress
  2199. MailAddress
  2200. address
  2201. MailAddress
  2202.     0R5S6S8S10S
  2203. Find the position (at) of a case independent ' at ' substring in address. 
  2204.     0R1S
  2205. address
  2206.  at _
  2207. Use text to left of ' at ' as username. If no ' at ' found, use entire address
  2208.     0R1S
  2209. address
  2210. address
  2211.     0R1S2S7S8S10S12S
  2212. If no username yet, use the FullName field
  2213.     0R1S
  2214. FullName
  2215.     0R3S4S7S8S
  2216. ccMailUserName
  2217.  Extract cc:Mail address portion (address) from MailAddress
  2218. MailAddress
  2219. address
  2220. MailAddress
  2221.     0R5S6S8S10S
  2222. Find the position (at) of a case independent ' at ' substring in address. 
  2223.     0R1S
  2224. address
  2225.  at `
  2226. Use text to right of ' at ' as post office name. If no ' at ' found, there is no post office name
  2227.     0R1S
  2228. address
  2229.     0R5S6S8S15SccMailPO
  2230. Include both any domain from MailAddress and any from MailDomain field
  2231. MailAddress
  2232.     0R1S2S
  2233. domain
  2234. MailDomain
  2235. MailDomain"
  2236. MailDomain
  2237.     0R1S2S5S6S7S8S9S10S12S13S14S15S16S18S19S20S22S24S
  2238. domain
  2239. domain
  2240. ccMailDomain|
  2241.     0R3S4S6S8S
  2242. ccMailDomain
  2243. ccMailDomain|
  2244. ccMailDomain
  2245. ccMailDomain
  2246. Concatenate username + PO + domain
  2247. ccMailUserName
  2248. ccMailPO
  2249. ccMailPO"
  2250. ccMailDomain
  2251. ccMailDomain"
  2252.     0R1S2S5S6S8S9S10S14S15S18S19S21S22S23S25SMailAddress
  2253. MailSystem
  2254. Always zero out the MailDomain because it is now part of MailAddress
  2255. MailDomain
  2256. Categori_ze 
  2257. _Edit Document
  2258. Send Docu_ment
  2259. _Forward
  2260. _Move to Folder...
  2261. _Remove from Folder...
  2262. O=Lotus Notes
  2263. O=Lotus Notes
  2264. PURSAFO
  2265. |.:#U
  2266. O=Lotus Notes
  2267. CN=Lotus Notes Template Development/O=Lotus Notes
  2268. PURSAFO
  2269. "<#Td
  2270. (h*Z 
  2271. |{R>i
  2272. $TITLE
  2273. $INFO
  2274. $$ScriptName
  2275. $BODY
  2276. $ACTIONS
  2277. (BusinessAddressHelper)
  2278.     Street:
  2279.     City:
  2280.     Zip/Postal code:
  2281.     State:
  2282.     Country:
  2283. StreetAddress_1
  2284.     0S0E
  2285. OfficeStreetAddressStreet address.
  2286. City_1^
  2287.     0S0E
  2288. OfficeCityCity or town name.
  2289. State_1
  2290.     0S0E
  2291. OfficeStateState or province name.
  2292. Zip_1
  2293.     0S0E
  2294. OfficeZipEnter the ZIP or postal code.
  2295. Country_1
  2296.     0S0E
  2297. OfficeCountryPerson's home country.
  2298. OfficeStreetAddress
  2299. OfficeCity
  2300. OfficeStreetAddress
  2301. OfficeCity"
  2302. OfficeCity
  2303. OfficeState
  2304. OfficeCity
  2305. OfficeState
  2306.     4RS11E21RS11E26S27SBusinessAddress
  2307. O=Lotus Notes
  2308. O=Lotus Notes
  2309. PURSAFO
  2310. |.:#U
  2311. O=Lotus Notes
  2312. CN=Lotus Notes Template Development/O=Lotus Notes
  2313. PURSAFO
  2314. $TITLE
  2315. $INFO
  2316. $$Script_O
  2317. $$ScriptName
  2318. $BODY
  2319. (HomeAddressHelper)
  2320.     Street:
  2321.     City:
  2322.     Zip/Postal code:
  2323.     State:
  2324.     Country:
  2325. StreetAddress
  2326. StreetAddressStreet address.
  2327. CityCity or town name.
  2328. State
  2329. StateState or province name.
  2330. ZipEnter the ZIP or postal code.
  2331. Country
  2332. CountryPerson's home country.
  2333. StreetAddress
  2334. StreetAddress
  2335. City"
  2336. State
  2337. State
  2338.     4RS11E21RS11E26S27SHomeAddress
  2339. O=Lotus Notes
  2340. O=Lotus Notes
  2341. PURSAFO
  2342. |.:#U
  2343. O=Lotus Notes
  2344. CN=Lotus Notes Template Development/O=Lotus Notes
  2345. PURSAFO
  2346. $TITLE
  2347. $INFO
  2348. $$ScriptName
  2349. $BODY
  2350. (NameHelper)
  2351.     First name:
  2352.     Middle name:
  2353.     Last name:
  2354.     Title:
  2355.     Suffix:
  2356. Name_Edit
  2357. FirstNameFirst name(s) and nicknames - e.g. John; Johnny
  2358. MiddleInitial_Edit
  2359. MiddleInitialMiddle Initial with a trailing period (optional).
  2360. LastName_Edit
  2361. LastNameLast name - e.g. Smith.
  2362. Title
  2363. -None-|Dr.|Dr.Prof.|Prof.Mr.|Mr.Ms.|Ms.Miss|MissMrs.|Mrs.
  2364. Suffix
  2365. -None-|Jr.|Jr.Sr.|Sr.IIIIII
  2366. Title
  2367. FirstName
  2368. MiddleInitial
  2369. LastName"
  2370. Suffix"
  2371.     12SName
  2372. O=Lotus Notes
  2373. O=Lotus Notes
  2374. PURSAFO
  2375. |.:#U
  2376. O=Lotus Notes
  2377. CN=Lotus Notes Template Development/O=Lotus Notes
  2378. PURSAFO
  2379. l-d6h
  2380. th?8D,\%
  2381. $TITLE
  2382. $INFO
  2383. $$Script_O
  2384. $$ScriptName
  2385. $BODY
  2386. '++LotusScript Development Environment:2:5:(Options):0:74
  2387. Option Public
  2388. Use "PhoneParser"
  2389. '++LotusScript Development Environment:2:5:(Forward):0:1
  2390. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2391. (PhoneHelper)'++LotusScript Development Environment:2:5:(Options):0:66
  2392. '++LotusScript Development Environment:2:5:(Forward):0:1
  2393. Declare Sub Postopen(Source As Notesuidocument)
  2394. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2395. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2396. Private Sub BindEvents(Byval Objectname_ As String)
  2397.      Static Source As NOTESUIDOCUMENT
  2398.      Set Source = Bind(Objectname_)
  2399.      On Event Postopen From Source Call Postopen
  2400. End Sub
  2401. '++LotusScript Development Environment:2:2:Postopen:1:12
  2402. Sub Postopen(Source As Notesuidocument)
  2403.      Dim w As New NotesUIWorkspace 
  2404.      Dim s As New NotesSession
  2405.      Set db = s.CurrentDatabase
  2406.      Set uidoc=source
  2407.      Set doc = uidoc.document
  2408. End Sub
  2409. '++LotusScript Development Environment:2:5:(Options):0:66
  2410. '++LotusScript Development Environment:2:5:(Forward):0:1
  2411. Declare Sub Exiting(Source As Field)
  2412. Declare Sub Entering(Source As Field)
  2413. Declare Sub Initialize
  2414. Declare Sub Terminate
  2415. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2416. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2417. Private Sub BindEvents(Byval Objectname_ As String)
  2418.      Static Source As FIELD
  2419.      Set Source = Bind(Objectname_)
  2420.      On Event Exiting From Source Call Exiting
  2421.      On Event Entering From Source Call Entering
  2422. End Sub
  2423. '++LotusScript Development Environment:2:2:Exiting:1:12
  2424. Sub Exiting(Source As Field)
  2425.      
  2426.      
  2427.      F=Evaluate(|@False|)
  2428.      T=Evaluate(|@True|)
  2429.      
  2430.      l=Len(doc.OfficePhoneNumber(0))
  2431. REM "Test to see if the number contains any letters. 
  2432. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2433. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2434. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2435.      
  2436.      x=Evaluate(|!@Matches(OfficePhoneNumber;"+{!a-zA-Z}")|, doc)
  2437.      
  2438.      letters=Evaluate(|@ReplaceSubstring(OfficePhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2439.      FirstLet=Left(letters(0),1)
  2440.      
  2441.      p=Evaluate(|@Begins(OfficePhoneNumber;"1")|,doc)
  2442.      
  2443.      sep=Evaluate(|@Contains(OfficePhoneNumber;"-")|,doc)
  2444.      
  2445.      par=Evaluate(|@Contains(OfficePhoneNumber;"(") & @Contains(OfficePhoneNumber;")")|,doc)
  2446.      locarea=Evaluate(|locarea|)
  2447.      num=doc.OfficePhoneNumber(0)
  2448.      
  2449.      Call ParsePhoneNumber(num)
  2450.      
  2451.      doc.OfficePhoneNumber=Trim(Prefix & " " & tel & " " & Suffix)
  2452.      
  2453.      Call uidoc.refresh
  2454. End Sub
  2455. '++LotusScript Development Environment:2:2:Entering:1:12
  2456. Sub Entering(Source As Field)
  2457.      
  2458. End Sub
  2459. '++LotusScript Development Environment:2:2:Initialize:1:10
  2460. Sub Initialize
  2461.      
  2462. End Sub
  2463. '++LotusScript Development Environment:2:2:Terminate:1:10
  2464. Sub Terminate
  2465.      
  2466. End Sub
  2467. OfficePhoneNumber
  2468. +{!a-zA-Z}I
  2469.     0S0E
  2470. OfficePhoneNumber
  2471.     0S0E
  2472. OfficePhoneNumber
  2473.     0S0E
  2474. OfficePhoneNumber
  2475.     0S0E
  2476. OfficePhoneNumber
  2477. OfficePhoneNumber
  2478.     6S7S
  2479. locarea
  2480. '++LotusScript Development Environment:2:5:(Options):0:66
  2481. '++LotusScript Development Environment:2:5:(Forward):0:1
  2482. Declare Sub Exiting(Source As Field)
  2483. Declare Sub Entering(Source As Field)
  2484. Declare Sub Initialize
  2485. Declare Sub Terminate
  2486. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2487. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2488. Private Sub BindEvents(Byval Objectname_ As String)
  2489.      Static Source As FIELD
  2490.      Set Source = Bind(Objectname_)
  2491.      On Event Exiting From Source Call Exiting
  2492.      On Event Entering From Source Call Entering
  2493. End Sub
  2494. '++LotusScript Development Environment:2:2:Exiting:1:12
  2495. Sub Exiting(Source As Field)
  2496.      
  2497.      
  2498.      F=Evaluate(|@False|)
  2499.      T=Evaluate(|@True|)
  2500.      
  2501.      l=Len(doc.OfficeFAXPhoneNumber(0))
  2502. REM "Test to see if the number contains any letters. 
  2503. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2504. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2505. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2506.      
  2507.      x=Evaluate(|!@Matches(OfficeFAXPhoneNumber;"+{!a-zA-Z}")|, doc)
  2508.      
  2509.      letters=Evaluate(|@ReplaceSubstring(OfficeFAXPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2510.      FirstLet=Left(letters(0),1)
  2511.      
  2512.      p=Evaluate(|@Begins(OfficeFAXPhoneNumber;"1")|,doc)
  2513.      
  2514.      sep=Evaluate(|@Contains(OfficeFAXPhoneNumber;"-")|,doc)
  2515.      
  2516.      par=Evaluate(|@Contains(OfficeFAXPhoneNumber;"(") & @Contains(OfficeFAXPhoneNumber;")")|,doc)
  2517.      locarea=Evaluate(|locarea|)
  2518.      num=doc.OfficeFAXPhoneNumber(0)
  2519.      
  2520.      Call ParsePhoneNumber(num)
  2521.      
  2522.      doc.OfficeFAXPhoneNumber=Trim(Prefix & " " & tel & " " & Suffix)
  2523.      
  2524.      Call uidoc.refresh
  2525. End Sub
  2526. '++LotusScript Development Environment:2:2:Entering:1:12
  2527. Sub Entering(Source As Field)
  2528.      
  2529. End Sub
  2530. '++LotusScript Development Environment:2:2:Initialize:1:10
  2531. Sub Initialize
  2532.      
  2533. End Sub
  2534. '++LotusScript Development Environment:2:2:Terminate:1:10
  2535. Sub Terminate
  2536.      
  2537. End Sub
  2538. OfficeFAXPhoneNumber
  2539. +{!a-zA-Z}I
  2540.     0S0E
  2541. OfficeFAXPhoneNumber
  2542.     0S0E
  2543. OfficeFAXPhoneNumber
  2544.     0S0E
  2545. OfficeFAXPhoneNumber
  2546.     0S0E
  2547. OfficeFAXPhoneNumber
  2548. OfficeFAXPhoneNumber
  2549.     6S7S
  2550. locarea
  2551. '++LotusScript Development Environment:2:5:(Options):0:66
  2552. '++LotusScript Development Environment:2:5:(Forward):0:1
  2553. Declare Sub Exiting(Source As Field)
  2554. Declare Sub Entering(Source As Field)
  2555. Declare Sub Initialize
  2556. Declare Sub Terminate
  2557. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2558. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2559. Private Sub BindEvents(Byval Objectname_ As String)
  2560.      Static Source As FIELD
  2561.      Set Source = Bind(Objectname_)
  2562.      On Event Exiting From Source Call Exiting
  2563.      On Event Entering From Source Call Entering
  2564. End Sub
  2565. '++LotusScript Development Environment:2:2:Exiting:1:12
  2566. Sub Exiting(Source As Field)
  2567.      
  2568.      
  2569.      F=Evaluate(|@False|)
  2570.      T=Evaluate(|@True|)
  2571.      
  2572.      l=Len(doc.CellPhoneNumber(0))
  2573. REM "Test to see if the number contains any letters. 
  2574. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2575. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2576. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2577.      
  2578.      x=Evaluate(|!@Matches(CellPhoneNumber;"+{!a-zA-Z}")|, doc)
  2579.      
  2580.      letters=Evaluate(|@ReplaceSubstring(CellPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2581.      FirstLet=Left(letters(0),1)
  2582.      
  2583.      p=Evaluate(|@Begins(CellPhoneNumber;"1")|,doc)
  2584.      
  2585.      sep=Evaluate(|@Contains(CellPhoneNumber;"-")|,doc)
  2586.      
  2587.      par=Evaluate(|@Contains(CellPhoneNumber;"(") & @Contains(CellPhoneNumber;")")|,doc)
  2588.      locarea=Evaluate(|locarea|)
  2589.      num=doc.CellPhoneNumber(0)
  2590.      
  2591.      Call ParsePhoneNumber(num)
  2592.      
  2593.      doc.CellPhoneNumber=Trim(Prefix & " " & tel & " " & Suffix)
  2594.      
  2595.      Call uidoc.refresh
  2596. End Sub
  2597. '++LotusScript Development Environment:2:2:Entering:1:12
  2598. Sub Entering(Source As Field)
  2599.      
  2600. End Sub
  2601. '++LotusScript Development Environment:2:2:Initialize:1:10
  2602. Sub Initialize
  2603.      
  2604. End Sub
  2605. '++LotusScript Development Environment:2:2:Terminate:1:10
  2606. Sub Terminate
  2607.      
  2608. End Sub
  2609. CellPhoneNumber
  2610. +{!a-zA-Z}I
  2611.     0S0E
  2612. CellPhoneNumber
  2613.     0S0E
  2614. CellPhoneNumber
  2615.     0S0E
  2616. CellPhoneNumber
  2617.     0S0E
  2618. CellPhoneNumber
  2619. CellPhoneNumber
  2620.     6S7S
  2621. locarea
  2622. '++LotusScript Development Environment:2:5:(Options):0:66
  2623. '++LotusScript Development Environment:2:5:(Forward):0:1
  2624. Declare Sub Exiting(Source As Field)
  2625. Declare Sub Entering(Source As Field)
  2626. Declare Sub Initialize
  2627. Declare Sub Terminate
  2628. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2629. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2630. Private Sub BindEvents(Byval Objectname_ As String)
  2631.      Static Source As FIELD
  2632.      Set Source = Bind(Objectname_)
  2633.      On Event Exiting From Source Call Exiting
  2634.      On Event Entering From Source Call Entering
  2635. End Sub
  2636. '++LotusScript Development Environment:2:2:Exiting:1:12
  2637. Sub Exiting(Source As Field)
  2638.      
  2639.      F=Evaluate(|@False|)
  2640.      T=Evaluate(|@True|)
  2641.      
  2642.      l=Len(doc.PhoneNumber(0))
  2643. REM "Test to see if the number contains any letters. 
  2644. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2645. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2646. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2647.      
  2648.      x=Evaluate(|!@Matches(PhoneNumber;"+{!a-zA-Z}")|, doc)
  2649.      
  2650.      letters=Evaluate(|@ReplaceSubstring(PhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2651.      FirstLet=Left(letters(0),1)
  2652.      
  2653.      p=Evaluate(|@Begins(PhoneNumber;"1")|,doc)
  2654.      
  2655.      sep=Evaluate(|@Contains(PhoneNumber;"-")|,doc)
  2656.      
  2657.      par=Evaluate(|@Contains(PhoneNumber;"(") & @Contains(PhoneNumber;")")|,doc)
  2658.      locarea=Evaluate(|locarea|)
  2659.      num=doc.PhoneNumber(0)
  2660.      
  2661.      Call ParsePhoneNumber(num)
  2662.      
  2663.      doc.PhoneNumber=Trim(Prefix & " " & tel & " " & Suffix)
  2664.      
  2665.      Call uidoc.refresh
  2666. End Sub
  2667. '++LotusScript Development Environment:2:2:Entering:1:12
  2668. Sub Entering(Source As Field)
  2669.      
  2670. End Sub
  2671. '++LotusScript Development Environment:2:2:Initialize:1:10
  2672. Sub Initialize
  2673.      
  2674. End Sub
  2675. '++LotusScript Development Environment:2:2:Terminate:1:10
  2676. Sub Terminate
  2677.      
  2678. End Sub
  2679. PhoneNumber
  2680. +{!a-zA-Z}I
  2681.     0S0E
  2682. PhoneNumber
  2683.     0S0E
  2684. PhoneNumber
  2685.     0S0E
  2686. PhoneNumber
  2687.     0S0E
  2688. PhoneNumber
  2689. PhoneNumber
  2690.     6S7S
  2691. locarea
  2692. '++LotusScript Development Environment:2:5:(Options):0:66
  2693. '++LotusScript Development Environment:2:5:(Forward):0:1
  2694. Declare Sub Exiting(Source As Field)
  2695. Declare Sub Entering(Source As Field)
  2696. Declare Sub Initialize
  2697. Declare Sub Terminate
  2698. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2699. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2700. Private Sub BindEvents(Byval Objectname_ As String)
  2701.      Static Source As FIELD
  2702.      Set Source = Bind(Objectname_)
  2703.      On Event Exiting From Source Call Exiting
  2704.      On Event Entering From Source Call Entering
  2705. End Sub
  2706. '++LotusScript Development Environment:2:2:Exiting:1:12
  2707. Sub Exiting(Source As Field)
  2708.      
  2709.      
  2710.      F=Evaluate(|@False|)
  2711.      T=Evaluate(|@True|)
  2712.      
  2713.      l=Len(doc.HomeFAXPhoneNumber(0))
  2714. REM "Test to see if the number contains any letters. 
  2715. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2716. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2717. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2718.      
  2719.      x=Evaluate(|!@Matches(HomeFAXPhoneNumber;"+{!a-zA-Z}")|, doc)
  2720.      
  2721.      letters=Evaluate(|@ReplaceSubstring(HomeFAXPhoneNumber;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2722.      FirstLet=Left(letters(0),1)
  2723.      
  2724.      p=Evaluate(|@Begins(HomeFAXPhoneNumber;"1")|,doc)
  2725.      
  2726.      sep=Evaluate(|@Contains(HomeFAXPhoneNumber;"-")|,doc)
  2727.      
  2728.      par=Evaluate(|@Contains(HomeFAXPhoneNumber;"(") & @Contains(HomeFAXPhoneNumber;")")|,doc)
  2729.      locarea=Evaluate(|locarea|)
  2730.      num=doc.HomeFAXPhoneNumber(0)
  2731.      
  2732.      Call ParsePhoneNumber(num)
  2733.      
  2734.      doc.HomeFAXPhoneNumber=Trim(Prefix & " " & tel & " " & Suffix)
  2735.      
  2736.      Call uidoc.refresh
  2737. End Sub
  2738. '++LotusScript Development Environment:2:2:Entering:1:12
  2739. Sub Entering(Source As Field)
  2740.      
  2741. End Sub
  2742. '++LotusScript Development Environment:2:2:Initialize:1:10
  2743. Sub Initialize
  2744.      
  2745. End Sub
  2746. '++LotusScript Development Environment:2:2:Terminate:1:10
  2747. Sub Terminate
  2748.      
  2749. End Sub
  2750. HomeFAXPhoneNumber
  2751. +{!a-zA-Z}I
  2752.     0S0E
  2753. HomeFAXPhoneNumber
  2754.     0S0E
  2755. HomeFAXPhoneNumber
  2756.     0S0E
  2757. HomeFAXPhoneNumber
  2758.     0S0E
  2759. HomeFAXPhoneNumber
  2760. HomeFAXPhoneNumber
  2761.     6S7S
  2762. locarea
  2763. '++LotusScript Development Environment:2:5:(Options):0:66
  2764. '++LotusScript Development Environment:2:5:(Forward):0:1
  2765. Declare Sub Exiting(Source As Field)
  2766. Declare Sub Entering(Source As Field)
  2767. Declare Sub Initialize
  2768. Declare Sub Terminate
  2769. '++LotusScript Development Environment:2:5:(Declarations):0:2
  2770. '++LotusScript Development Environment:2:2:BindEvents:1:129
  2771. Private Sub BindEvents(Byval Objectname_ As String)
  2772.      Static Source As FIELD
  2773.      Set Source = Bind(Objectname_)
  2774.      On Event Exiting From Source Call Exiting
  2775.      On Event Entering From Source Call Entering
  2776. End Sub
  2777. '++LotusScript Development Environment:2:2:Exiting:1:12
  2778. Sub Exiting(Source As Field)
  2779.      
  2780.      F=Evaluate(|@False|)
  2781.      T=Evaluate(|@True|)
  2782.      
  2783.      l=Len(doc.PhoneNumber_6(0))
  2784. REM "Test to see if the number contains any letters. 
  2785. REM " We do the test this way because it appears that @matches does not return consistent results without doing the ! of the pattern.
  2786. REM " In order to make it easier to understand the logic, we do another ! at the begining, so that if it does contain letters 
  2787. REM " the result is TRUE, otherwise it does not contain any letters the result is FALSE.";
  2788.      
  2789.      x=Evaluate(|!@Matches(PhoneNumber_6;"+{!a-zA-Z}")|, doc)
  2790.      
  2791.      letters=Evaluate(|@ReplaceSubstring(PhoneNumber_6;"0":"1":"2":"3":"4":"5":"6":"7":"8":"9":"(":")":"-";"")|, doc)
  2792.      FirstLet=Left(letters(0),1)
  2793.      
  2794.      p=Evaluate(|@Begins(PhoneNumber_6;"1")|,doc)
  2795.      
  2796.      sep=Evaluate(|@Contains(PhoneNumber_6;"-")|,doc)
  2797.      
  2798.      par=Evaluate(|@Contains(PhoneNumber_6;"(") & @Contains(PhoneNumber_6;")")|,doc)
  2799.      locarea=Evaluate(|locarea|)
  2800.      num=doc.PhoneNumber_6(0)
  2801.      
  2802.      Call ParsePhoneNumber(num)
  2803.      
  2804.      doc.PhoneNumber_6=Trim(Prefix & " " & tel & " " & Suffix)
  2805.      
  2806.      Call uidoc.refresh
  2807. End Sub
  2808. '++LotusScript Development Environment:2:2:Entering:1:12
  2809. Sub Entering(Source As Field)
  2810.      
  2811. End Sub
  2812. '++LotusScript Development Environment:2:2:Initialize:1:10
  2813. Sub Initialize
  2814.      
  2815. End Sub
  2816. '++LotusScript Development Environment:2:2:Terminate:1:10
  2817. Sub Terminate
  2818.      
  2819. End Sub
  2820. PhoneNumber_6
  2821. +{!a-zA-Z}I
  2822.     0S0E
  2823. PhoneNumber_6
  2824.     0S0E
  2825. PhoneNumber_6
  2826.     0S0E
  2827. PhoneNumber_6
  2828.     0S0E
  2829. PhoneNumber_6
  2830. PhoneNumber_6
  2831.     6S7S
  2832. locarea
  2833.     Phone Labels:
  2834.     Phone Numbers:
  2835. PhoneLabel_1
  2836. OfficePhoneNumberOffice phone number.
  2837. PhoneLabel_3
  2838. OfficeFAXPhoneNumberOffice FAX phone number.
  2839. PhoneLabel_5
  2840. CellPhoneNumberCellular phone number.
  2841. PhoneLabel_2
  2842. PhoneNumberHome phone number.
  2843. PhoneLabel_4
  2844. HomeFAXPhoneNumberHome FAX phone number.
  2845. PhoneLabel_6
  2846. PhoneNumber_6Home FAX phone number.
  2847. O=Lotus Notes
  2848. O=Lotus Notes
  2849. PURSAFO
  2850. |.:#U
  2851. O=Lotus Notes
  2852. CN=Lotus Notes Template Development/O=Lotus Notes
  2853. PURSAFO
  2854. $TITLE
  2855. $INFO
  2856. $Script
  2857. $$Script_O
  2858. $$ScriptName
  2859. $$FormScript
  2860. $$$FormScript_O
  2861. $$OfficePhoneNumber
  2862. $OfficePhoneNumber_O
  2863. $$OfficeFAXPhoneNumber
  2864. $OfficeFAXPhoneNumber_O
  2865. $$CellPhoneNumber
  2866. $CellPhoneNumber_O
  2867. $$PhoneNumber
  2868. $PhoneNumber_O
  2869. $$HomeFAXPhoneNumber
  2870. $HomeFAXPhoneNumber_O
  2871. $$PhoneNumber_6
  2872. $PhoneNumber_6_O
  2873. $BODY
  2874. '++LotusScript Development Environment:2:5:(Options):0:74
  2875. Option Public
  2876. Use "GlobalDeclarations"
  2877. '++LotusScript Development Environment:2:5:(Forward):0:1
  2878. Declare Sub ParseAddress(add As Variant, elements As Variant, whichfield As String)
  2879. '++LotusScript Development Environment:2:5:(Declarations):0:10
  2880. Dim City As Variant
  2881. Dim State As Variant
  2882. Dim Address As Variant
  2883. Dim Punct As Integer
  2884. Dim LastLine As Variant
  2885. Dim OtherLines As Variant
  2886. '++LotusScript Development Environment:2:2:ParseAddress:1:8
  2887. Sub ParseAddress(add As Variant, elements As Variant, whichfield As String)
  2888.      REM "Clear out the existing fields so that new/modified address is correct"
  2889.      If whichfield = "B" Then
  2890.           doc.OfficeStreetAddress=""
  2891.           doc.OfficeCity=""
  2892.           doc.OfficeState=""
  2893.      End If
  2894.      If whichfield = "H" Then
  2895.           doc.StreetAddress=""
  2896.           doc.City=""
  2897.           doc.State=""
  2898.      End If
  2899.      
  2900.      
  2901.      REM " The rules to parse an address are as follows:"
  2902.      REM " If there is only one word, assume it is the city."
  2903.      REM " If there is more than one word and no punctuation, still assume it is the city."
  2904.      REM " If there is more than one word and there is a comma, assume left of the comma is city, right is state or province"
  2905.      REM " If there are two lines, assume the first line is the address and the second line is the city/state"
  2906.      REM " If there are more than two lines, assume the last is city/state, the rest are address"
  2907.      REM " Country and ZIP/Postal codes go into different fields."
  2908.      
  2909.      Punct=Instr(add,",")
  2910.      
  2911.      If elements(0) = 1 And Punct=0 Then
  2912.           If whichfield = "B" Then
  2913.                doc.OfficeCity=Trim(add)
  2914.                Exit Sub
  2915.           End If
  2916.           If whichfield = "H" Then
  2917.                doc.City=Trim(add)
  2918.                Exit Sub
  2919.           End If
  2920.      End If
  2921.      
  2922.      If elements(0) = 1 And Punct>0 Then
  2923.           If whichfield = "B" Then
  2924.                doc.OfficeCity=Trim(Left(add,Punct-1))
  2925.                doc.OfficeState=Trim(Right(add, Len(add)-Punct))
  2926.                Exit Sub
  2927.           End If
  2928.           If whichfield = "H" Then
  2929.                doc.City=Trim(Left(add,Punct-1))
  2930.                doc.State=Trim(Right(add, Len(add)-Punct))
  2931.                Exit Sub
  2932.           End If
  2933.      End If
  2934.      
  2935.      If elements(0) > 1 Then
  2936.           If whichfield="B" Then
  2937.                LastLine=Evaluate(|@Subset(@Explode(BusinessAddress;@Char(13));-1)|,doc)  
  2938.                OtherLines=Evaluate(|@Implode(@Subset(@Explode(BusinessAddress;@Char(13));@Elements(@Explode(BusinessAddress;@Char(13)))-1);@NewLine)|,doc)
  2939.                doc.OfficeStreetAddress=OtherLines
  2940.                Punct=Instr(LastLine(0),",")
  2941.                If  Punct >0 Then
  2942.                     doc.OfficeCity=Trim(Left(LastLine(0),Punct-1))
  2943.                     doc.OfficeState=Trim(Right(LastLine(0), Len(LastLine(0))-Punct))
  2944.                Else
  2945.                     doc.OfficeCity=Trim(LastLine(0))
  2946.                End If
  2947.                Exit Sub
  2948.           End If
  2949.           If whichfield="H" Then
  2950.                LastLine=Evaluate(|@Subset(@Explode(HomeAddress;@Char(13));-1)|,doc)
  2951.                OtherLines=Evaluate(|@Implode(@Subset(@Explode(HomeAddress;@Char(13));@Elements(@Explode(HomeAddress;@Char(13)))-1);@NewLine)|,doc)
  2952.                doc.StreetAddress=OtherLines
  2953.                Punct=Instr(LastLine(0),",")
  2954.                If  Punct >0 Then
  2955.                     doc.City=Trim(Left(LastLine(0),Punct-1))
  2956.                     doc.State=Trim(Right(LastLine(0), Len(LastLine(0))-Punct))
  2957.                Else
  2958.                     doc.City=Trim(LastLine(0))
  2959.                End If
  2960.                Exit Sub
  2961.           End If
  2962.      End If
  2963.      
  2964. End Sub
  2965. BusinessAddress
  2966.     0S0E
  2967. BusinessAddress
  2968. BusinessAddress
  2969.     0S0E
  2970. HomeAddress
  2971.     0S0E
  2972. HomeAddress
  2973. HomeAddress
  2974.     0S0E
  2975. O=Lotus Notes
  2976. O=Lotus Notes
  2977. PURSAFO
  2978. |.:#U
  2979. O=Lotus Notes
  2980. CN=Lotus Notes Template Development/O=Lotus Notes
  2981. PURSAFO
  2982. $ScriptLib
  2983. $ScriptLib_O
  2984. $TITLE
  2985. $Flags
  2986. $PublicAccess
  2987. '++LotusScript Development Environment:2:5:(Options):0:66
  2988. Option Public
  2989. '++LotusScript Development Environment:2:5:(Forward):0:1
  2990. '++LotusScript Development Environment:2:5:(Declarations):0:10
  2991. Dim db As NotesDatabase
  2992. Dim doc As NotesDocument
  2993. Dim uidoc As notesuidocument
  2994. O=Lotus Notes
  2995. O=Lotus Notes
  2996. PURSAFO
  2997. |.:#U
  2998. O=Lotus Notes
  2999. CN=Lotus Notes Template Development/O=Lotus Notes
  3000. PURSAFO
  3001. $ScriptLib
  3002. $ScriptLib_O
  3003. $TITLE
  3004. $Flags
  3005. $PublicAccess
  3006. '++LotusScript Development Environment:2:5:(Options):0:66
  3007. Option Public
  3008. '++LotusScript Development Environment:2:5:(Forward):0:1
  3009. Declare Sub Initialize
  3010. Declare Sub InstantiateVariables
  3011. Declare Function GetMailAddress() As String
  3012. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3013. Dim ws As NotesUIWorkspace
  3014. Dim session As NotesSession
  3015. Dim db As NotesDatabase
  3016. Dim maildb As NotesDatabase
  3017. Dim note As NotesDocument
  3018. Dim mailnote As NotesDocument
  3019. Dim collection As NotesDocumentCollection
  3020. Dim profile As NotesDocument
  3021. Dim SendToNames() As String
  3022. Dim counter As Integer
  3023. '++LotusScript Development Environment:2:2:Initialize:1:10
  3024. Sub Initialize
  3025. End Sub
  3026. '++LotusScript Development Environment:2:2:InstantiateVariables:1:8
  3027. Sub InstantiateVariables
  3028.     Set ws = New NotesUIWorkspace
  3029.     Set session = New NotesSession
  3030.     Set db = session.CurrentDatabase
  3031.     Set maildb = New NotesDatabase("","")
  3032.     maildb.OpenMail
  3033.     Set profile = maildb.GetProfileDocument("CalendarProfile")
  3034.     counter = 0
  3035.     Set collection = db.UnprocessedDocuments
  3036. End Sub
  3037. '++LotusScript Development Environment:2:1:GetMailAddress:1:8
  3038. Function GetMailAddress() As String
  3039.     If note.Type(0) = "Person" Then    
  3040.         If note.MailAddress(0) <> "" Then
  3041.             GetMailAddress = note.MailAddress(0)
  3042.         Else
  3043.             GetMailAddress= note.FullName(0)
  3044.         End If
  3045.     Elseif note.Type(0) = "Group" Then
  3046.         GetMailAddress = note.ListName(0)
  3047.     Else
  3048.         GetMailAddress=""
  3049.     End If
  3050. End Function
  3051. Lotus Product
  3052. O=Lotus Notes
  3053. O=Lotus Notes
  3054. PURSAFO
  3055. |.:#U
  3056. O=Lotus Notes
  3057. CN=Lotus Notes Template Development/O=Lotus Notes
  3058. PURSAFO
  3059. UjCNh
  3060. $TITLE
  3061. $Flags
  3062. $PublicAccess
  3063. $ScriptLib
  3064. $ScriptLib_O
  3065. '++LotusScript Development Environment:2:5:(Options):0:74
  3066. Option Public
  3067. Use "GlobalDeclarations"
  3068. '++LotusScript Development Environment:2:5:(Forward):0:1
  3069. Declare Sub FormatNum(num As Variant)
  3070. Declare Sub ParsePhoneNumber(num As Variant)
  3071. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3072. Dim l As Variant
  3073. Dim x As Variant
  3074. Dim letters As Variant
  3075. Dim sep As Variant
  3076. Dim p As Variant
  3077. Dim par As Variant
  3078. Dim locarea As Variant
  3079. Dim num As Variant
  3080. Dim OriginalNum As Variant
  3081. Dim tel As Variant
  3082. Dim F As Variant
  3083. Dim T As Variant
  3084. Dim locsep As Integer
  3085. Dim lennum As Integer
  3086. Dim InPar As Variant
  3087. Dim LPar As Variant
  3088. Dim LocLPar As Integer
  3089. Dim LocRPar As Integer
  3090. Dim RPar As Variant
  3091. Dim Prefix As String
  3092. Dim Suffix As String
  3093. Dim FirstLet As String
  3094. Dim LocFirstLet As Integer
  3095. Dim hasspace As Variant
  3096. '++LotusScript Development Environment:2:2:FormatNum:1:8
  3097. Sub FormatNum(num As Variant)
  3098.      num=Trim(num)
  3099.      lennum=Len(num)
  3100.      hasspace=Instr(num," ")
  3101.      REM "No separator"
  3102.      If (sep(0)=F(0)) Then 
  3103.           If lennum=7 And hasspace=0Then
  3104.                tel=Left(num,3)&"-"&Right(num,4)
  3105.                Exit Sub
  3106.           End If
  3107.           If lennum < 7 Then
  3108.                tel=num
  3109.                Exit Sub
  3110.           End If
  3111.           If lennum = 10 And hasspace=0 Then
  3112.                tel="(" & Left(num,3) & ") " & Left(Right(num,7),3) & "-" & Right(num,4)
  3113.                Exit Sub
  3114.           End If 
  3115.           If (lennum > 7 And lennum < 10) Or lennum > 10  Then
  3116.                tel=num
  3117.                Exit Sub
  3118.           End If
  3119.           
  3120.      End If 
  3121.      REM "Separator is present"
  3122.      If (sep(0)=T(0))  Then
  3123.           locsep=Instr(num,"-")
  3124.           tel=Left(num,locsep-1)&"-"&Right(num,lennum-locsep)
  3125.           Exit Sub
  3126.      End If
  3127.      tel=num
  3128. End Sub
  3129. '++LotusScript Development Environment:2:2:ParsePhoneNumber:1:8
  3130. Sub ParsePhoneNumber(num As Variant)
  3131.      
  3132.      OriginalNum=num
  3133.      
  3134.       REM "Check to see if there is a prefix"     
  3135.      If (p(0)=T(0)) Then
  3136.           Prefix="+" & Left(num,1)
  3137.           num=Trim(Right(num,l-1))
  3138.      Else
  3139.           Prefix=""
  3140.      End If
  3141.      
  3142.      
  3143.      REM "Check to see if there are letters and if so, parse them out"
  3144.      
  3145.      If (x(0)=T(0)) Then
  3146.           LocFirstLet=Instr(num,FirstLet)
  3147.           Suffix=Right(num,l-LocFirstLet)
  3148.           num=Left(num,LocFirstLet-1)
  3149.           
  3150.           If Len(num)<7 Then
  3151.                tel=OriginalNum
  3152.                Suffix=""
  3153.                Exit Sub
  3154.           Else
  3155.                Call FormatNum(num)
  3156.           End If
  3157.      Else
  3158.           Suffix=""
  3159.           
  3160.      End If       
  3161.      
  3162.      
  3163.      REM " Check to see if there are parens.  If so parse out the insides, left and right"
  3164.      
  3165.      If (par(0)=T(0)) Then
  3166.           LocLPar=Instr(num,"(")
  3167.           LPar=Trim(Left(num,LocLPar-1))
  3168.           If Len(LPar) >0 And Left(LPar,1) <>"+" Then
  3169.                LPar="+" & LPar
  3170.           End If
  3171.           LocRPar=Instr(num,")")
  3172.           RPar=Right(num,(Len(num))-LocRPar)
  3173.           InPar=Mid(num,LocLPar+1,LocRPar-LocLPar-1)
  3174.           Call FormatNum(RPar)
  3175.           tel=Trim(LPar) &" (" & InPar & ") " & tel
  3176.      Else
  3177.           InPar=Null
  3178.           LPar=Null
  3179.           LocRPar=0
  3180.           RPar=Null
  3181.      End If
  3182.      
  3183.      If (par(0)=F(0)) And (x(0)=F(0)) Then
  3184.           Call FormatNum(num)          
  3185.      End If
  3186.      
  3187.      
  3188.      
  3189. End Sub
  3190. O=Lotus Notes
  3191. O=Lotus Notes
  3192. PURSAFO
  3193. |.:#U
  3194. O=Lotus Notes
  3195. CN=Lotus Notes Template Development/O=Lotus Notes
  3196. PURSAFO
  3197. $TITLE
  3198. $Flags
  3199. $PublicAccess
  3200. $ScriptLib
  3201. $ScriptLib_O
  3202. '++LotusScript Development Environment:2:5:(Options):0:74
  3203. Option Public
  3204. Use "MailLibrary"
  3205. '++LotusScript Development Environment:2:5:(Forward):0:1
  3206. Declare Sub Initialize
  3207. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3208. '++LotusScript Development Environment:2:2:Initialize:1:10
  3209. Sub Initialize
  3210. 'declare local variables
  3211.      Dim x As Integer
  3212.      
  3213. 'instantiate objects     
  3214.      InstantiateVariables
  3215.      
  3216.      
  3217.      If (collection.Count = 0) Then
  3218.           Messagebox "No documents were selected.",0,"Error"
  3219.           Exit Sub
  3220.      End If
  3221.      
  3222.      Redim SendToNames(collection.Count-1)
  3223.      
  3224. 'for each document in the collection, get the mail address
  3225. 'we use the GetNth method since the resulting collection is an IDTable
  3226.      For x = 1 To collection.Count
  3227.           Set note = collection.GetNthDocument(x)
  3228.           SendToNames(counter) = GetMailAddress
  3229.           counter = counter + 1
  3230.      Next
  3231.      
  3232.      Set mailnote = New NotesDocument(maildb)
  3233.      mailnote.SendTo = SendToNames
  3234.      mailnote.Form = "Memo"
  3235.      mailnote.Logo = session.GetEnvironmentString("DefaultLogo",False)
  3236.      mailnote.Principal = profile.Owner(0)
  3237.      
  3238.      Call ws.EditDocument(True,mailnote)
  3239. End Sub
  3240. O=Lotus Notes
  3241. O=Lotus Notes
  3242. PURSAFO
  3243. |.:#U
  3244. O=Lotus Notes
  3245. CN=Lotus Notes Template Development/O=Lotus Notes
  3246. PURSAFO
  3247. $TITLE
  3248. $AssistType
  3249. $AssistLastRun
  3250. $AssistDocCount
  3251. $AssistFlags
  3252. $AssistTrigger
  3253. $AssistInfo
  3254. $AssistQuery
  3255. $AssistAction
  3256. $AssistAction_Ex
  3257. '++LotusScript Development Environment:2:5:(Options):0:74
  3258. Option Public
  3259. Use "MailLibrary"
  3260. '++LotusScript Development Environment:2:5:(Forward):0:1
  3261. Declare Sub Initialize
  3262. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3263. '++LotusScript Development Environment:2:2:Initialize:1:10
  3264. Sub Initialize
  3265.      Dim nMinutes As Integer
  3266.      Dim nSeconds As Integer
  3267.      Dim x As Integer
  3268.      
  3269.      Dim startdt As NotesDateTime
  3270.      Dim enddt As NotesDateTime
  3271.      Dim trdr As NotesDateRange
  3272.      
  3273.      InstantiateVariables
  3274.      
  3275.      If (collection.Count = 0) Then
  3276.           Messagebox "No documents were selected.",0,"Error"
  3277.           Exit Sub
  3278.      End If
  3279.      
  3280.      Redim SendToNames(collection.Count-1)
  3281.      
  3282. 'for each document in the collection, get the mail address
  3283. 'we use the GetNth method since the resulting collection is an IDTable
  3284.      For x = 1 To collection.Count
  3285.           Set note = collection.GetNthDocument(x)
  3286.           SendToNames(counter) = GetMailAddress
  3287.           counter = counter + 1
  3288.      Next
  3289.      
  3290.      Set mailnote = New NotesDocument(maildb)
  3291.      mailnote.SendTo = SendToNames
  3292.      mailnote.Form = "Appointment"
  3293.      mailnote.AppointmentType = "3"
  3294.      mailnote.Chair = profile.Owner(0)
  3295.      mailnote.Principal = profile.Owner(0)
  3296.      
  3297. 'add the date/time values     
  3298.      Set startdt = New NotesDateTime("")
  3299.      startdt.SetNow
  3300.      
  3301.      nMinutes = Minute(startdt.LSLocalTime)
  3302.      nSeconds = 0 - Second(startdt.LSLocalTime)
  3303.      
  3304.      If (nMinutes > 45) Then          
  3305.           startdt.AdjustMinute(60 - nMinutes)
  3306.      Elseif (nMinutes > 30) Then
  3307.           startdt.AdjustMinute(45 - nMinutes)
  3308.      Elseif (nMinutes > 15) Then
  3309.           startdt.AdjustMinute(30 - nMinutes)
  3310.      Else
  3311.           startdt.AdjustMinute(15 - nMinutes)
  3312.      End If               
  3313.      
  3314.      startdt.AdjustSecond(nSeconds)
  3315.      
  3316.      Set mailnote.StartDate = startdt
  3317.      Set mailnote.StartDateTime = startdt
  3318.      
  3319.      Set enddt = New NotesDateTime(startdt.LSLocalTime)
  3320.      enddt.AdjustMinute(profile.DefaultDuration(0))
  3321.      
  3322.      Set trdr = session.CreateDateRange
  3323.      Set trdr.StartDateTime = startdt
  3324.      Set trdr.EndDateTime = enddt
  3325.      Set mailnote.TimeRange = trdr
  3326.      
  3327.      Call ws.EditDocument(True,mailnote)
  3328. End Sub
  3329. O=Lotus Notes
  3330. O=Lotus Notes
  3331. PURSAFO
  3332. |.:#U
  3333. O=Lotus Notes
  3334. CN=Lotus Notes Template Development/O=Lotus Notes
  3335. PURSAFO
  3336. $TITLE
  3337. $AssistType
  3338. $AssistLastRun
  3339. $AssistDocCount
  3340. $AssistFlags
  3341. $AssistTrigger
  3342. $AssistInfo
  3343. $AssistQuery
  3344. $AssistAction
  3345. $AssistAction_Ex
  3346. LastName
  3347. FirstName
  3348. LastName
  3349. Firstname
  3350. FirstName
  3351. CompanyName
  3352.     3S5S6S7S8S10R23S41R
  3353. OfficePhoneNumber
  3354. PhoneLabel_1
  3355. PhoneLabel_1
  3356. Office phone:
  3357. OfficePhoneNumber
  3358. OfficeFAXPhoneNumber
  3359. PhoneLabel_3
  3360. PhoneLabel_3
  3361. Office fax:
  3362. OfficeFAXPhoneNumber"
  3363. CellPhoneNumber
  3364. PhoneLabel_5
  3365. PhoneLabel_5
  3366. Cell phone:
  3367. CellPhoneNumber
  3368. PhoneNumber
  3369. PhoneLabel_2
  3370. PhoneLabel_2
  3371. Home phone:
  3372. PhoneNumber
  3373. HomeFAXPhoneNumber
  3374. PhoneLabel_4
  3375. PhoneLabel_4
  3376. Home fax:
  3377. HomeFAXPhoneNumber"
  3378. PhoneNumber_6
  3379. PhoneLabel_6
  3380. PhoneLabel_6
  3381. Pager:
  3382. PhoneNumber_6
  3383.     2RS11E5S6S15S16S20S21S25S26RS11E29S39S40S44S45S49S50RS11E53S54S63S68S69S70S73S74RS11E77S78S80S87S92S93S94S95S97S98RS11E101S111S116S117S118S121S122RS11E125S135S136S140S141S142S145RS10E
  3384. CompanyName
  3385. CompanyName
  3386. JobTitle
  3387. JobTitle
  3388. BusinessAddress
  3389. OfficeStreetAddress
  3390. OfficeCity
  3391. OfficeCity
  3392. OfficeState
  3393. OfficeState
  3394. OfficeZip
  3395. OfficeCountry
  3396.     2RS11E5S6S13RS11E16S17S24RS11E27S28S31S32RS17E35S36S39S40S41S42S43S44S50S51S52S53S54S55S57S62RRS12E
  3397. $126$19$20$Conflict$REF
  3398. Person
  3399. Company
  3400.     L1S2S3S
  3401. @$126Name
  3402. LastName
  3403. FirstName
  3404. LastName
  3405. Firstname
  3406. FirstName
  3407. CompanyName
  3408.     3S5S6S7S8S10R23S41R$19PhonesB
  3409. OfficePhoneNumber
  3410. PhoneLabel_1
  3411. PhoneLabel_1
  3412. Office phone:
  3413. OfficePhoneNumber
  3414. OfficeFAXPhoneNumber
  3415. PhoneLabel_3
  3416. PhoneLabel_3
  3417. Office fax:
  3418. OfficeFAXPhoneNumber"
  3419. CellPhoneNumber
  3420. PhoneLabel_5
  3421. PhoneLabel_5
  3422. Cell phone:
  3423. CellPhoneNumber
  3424. PhoneNumber
  3425. PhoneLabel_2
  3426. PhoneLabel_2
  3427. Home phone:
  3428. PhoneNumber
  3429. HomeFAXPhoneNumber
  3430. PhoneLabel_4
  3431. PhoneLabel_4
  3432. Home fax:
  3433. HomeFAXPhoneNumber"
  3434. PhoneNumber_6
  3435. PhoneLabel_6
  3436. PhoneLabel_6
  3437. Pager:
  3438. PhoneNumber_6
  3439.     2RS11E5S6S15S16S20S21S25S26RS11E29S39S40S44S45S49S50RS11E53S54S63S68S69S70S73S74RS11E77S78S80S87S92S93S94S95S97S98RS11E101S111S116S117S118S121S122RS11E125S135S136S140S141S142S145RS10E$20Business
  3440. CompanyName
  3441. CompanyName
  3442. JobTitle
  3443. JobTitle
  3444. BusinessAddress
  3445. OfficeStreetAddress
  3446. OfficeCity
  3447. OfficeCity
  3448. OfficeState
  3449. OfficeState
  3450. OfficeZip
  3451. OfficeCountry
  3452.     2RS11E5S6S13RS11E16S17S24RS11E27S28S31S32RS17E35S36S39S40S41S42S43S44S50S51S52S53S54S55S57S62RRS12E&
  3453. Add ContactK 
  3454. CurrentServer
  3455.     0S0E
  3456. CurrentServer
  3457. Person
  3458. [UserCreator]
  3459. Person
  3460. Not Authorized
  3461. You are not authorized to add Person documents to this database.
  3462.     0R6R10S13R
  3463. _Edit Card
  3464. Delete 
  3465.     0S0E
  3466.     11S12S13S17S18S
  3467. DirectoriesK 
  3468.     0S0E
  3469. Send Docu_ment
  3470. _Forward
  3471. _Move to Folder...
  3472. _Remove from Folder...
  3473. Write Memo
  3474. Error
  3475. You must use Notes 4.6 or above to use this action.
  3476. (CreateMailMemo)
  3477.     6S7S9S
  3478. Schedule Meeting
  3479. Error
  3480. You must use Notes 4.6 or above to use this action.
  3481. (ScheduleMeeting)
  3482.     6S7S9S
  3483. Tools...\Create Group
  3484. '++LotusScript Development Environment:2:5:(Options):0:66
  3485. '++LotusScript Development Environment:2:5:(Forward):0:1
  3486. Declare Sub Click(Source As Button)
  3487. Declare Function GetFullName() As String
  3488. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3489. Dim ws As NotesUIWorkspace
  3490. Dim session As NotesSession
  3491. Dim db As NotesDatabase
  3492. Dim note As NotesDocument
  3493. Dim groupnote As NotesDocument
  3494. Dim collection As NotesDocumentCollection
  3495. Dim Names() As String
  3496. Dim counter As Integer
  3497. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3498. Private Sub BindEvents(Byval Objectname_ As String)
  3499.     Static Source As BUTTON
  3500.     Set Source = Bind(Objectname_)
  3501.     On Event Click From Source Call Click
  3502. End Sub
  3503. '++LotusScript Development Environment:2:2:Click:1:12
  3504. Sub Click(Source As Button)
  3505.     Set ws = New NotesUIWorkspace
  3506.     Set session = New NotesSession
  3507.     Set db = session.CurrentDatabase
  3508.     counter = 0
  3509.     Set collection = db.UnprocessedDocuments
  3510.     If (collection.Count = 0) Then
  3511.         Messagebox "No documents were selected.",0,"Error"
  3512.         Exit Sub
  3513.     End If
  3514.     Redim Names(collection.Count-1)
  3515. 'for each document in the collection, get the first value of FullName
  3516. 'we use the GetNth method since the resulting collection is an IDTable
  3517.     For x = 1 To collection.Count
  3518.         Set note = collection.GetNthDocument(x)
  3519.         Names(counter) = GetFullName
  3520.         counter = counter + 1
  3521.     Next
  3522.     Set groupnote = New NotesDocument(db)
  3523.     groupnote.Members = Names
  3524.     groupnote.Form = "Group"
  3525.     groupnote.Type = "Group"
  3526.     Call ws.EditDocument(True,groupnote)
  3527. End Sub
  3528. '++LotusScript Development Environment:2:1:GetFullName:1:8
  3529. Function GetFullName() As String
  3530.     If note.FullName(0) <> "" Then
  3531.         GetFullName = note.FullName(0)
  3532.     Else
  3533.         GetFullName= note.LastName(0)
  3534.     End If
  3535. End Function
  3536. Tools...\CategorizeK
  3537. Tools...\Visit Web PageK
  3538. WebSite
  3539. WebSite
  3540. No Web Page Defined
  3541. This document has no Web page defined.
  3542.     3S7S
  3543. Tools...\Preferences...K4
  3544. DirectoryProfile
  3545.     0S0E
  3546. Add ContactK 
  3547. CurrentServer
  3548.     0S0E
  3549. CurrentServer
  3550. Person
  3551. [UserCreator]
  3552. Person
  3553. Not Authorized
  3554. You are not authorized to add Person documents to this database.
  3555.     0R6R10S13R
  3556. _Edit Card
  3557. Delete 
  3558.     0S0E
  3559.     11S12S13S17S18S
  3560. DirectoriesK 
  3561.     0S0E
  3562. Send Docu_ment
  3563. _Forward
  3564. _Move to Folder...
  3565. _Remove from Folder...
  3566. Write Memo
  3567. Error
  3568. You must use Notes 4.6 or above to use this action.
  3569. (CreateMailMemo)
  3570.     6S7S9S
  3571. Schedule Meeting
  3572. Error
  3573. You must use Notes 4.6 or above to use this action.
  3574. (ScheduleMeeting)
  3575.     6S7S9S
  3576. Tools...\Create Group
  3577. '++LotusScript Development Environment:2:5:(Options):0:66
  3578. '++LotusScript Development Environment:2:5:(Forward):0:1
  3579. Declare Sub Click(Source As Button)
  3580. Declare Function GetFullName() As String
  3581. '++LotusScript Development Environment:2:5:(Declarations):0:10
  3582. Dim ws As NotesUIWorkspace
  3583. Dim session As NotesSession
  3584. Dim db As NotesDatabase
  3585. Dim note As NotesDocument
  3586. Dim groupnote As NotesDocument
  3587. Dim collection As NotesDocumentCollection
  3588. Dim Names() As String
  3589. Dim counter As Integer
  3590. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3591. Private Sub BindEvents(Byval Objectname_ As String)
  3592.     Static Source As BUTTON
  3593.     Set Source = Bind(Objectname_)
  3594.     On Event Click From Source Call Click
  3595. End Sub
  3596. '++LotusScript Development Environment:2:2:Click:1:12
  3597. Sub Click(Source As Button)
  3598.     Set ws = New NotesUIWorkspace
  3599.     Set session = New NotesSession
  3600.     Set db = session.CurrentDatabase
  3601.     counter = 0
  3602.     Set collection = db.UnprocessedDocuments
  3603.     If (collection.Count = 0) Then
  3604.         Messagebox "No documents were selected.",0,"Error"
  3605.         Exit Sub
  3606.     End If
  3607.     Redim Names(collection.Count-1)
  3608. 'for each document in the collection, get the first value of FullName
  3609. 'we use the GetNth method since the resulting collection is an IDTable
  3610.     For x = 1 To collection.Count
  3611.         Set note = collection.GetNthDocument(x)
  3612.         Names(counter) = GetFullName
  3613.         counter = counter + 1
  3614.     Next
  3615.     Set groupnote = New NotesDocument(db)
  3616.     groupnote.Members = Names
  3617.     groupnote.Form = "Group"
  3618.     groupnote.Type = "Group"
  3619.     Call ws.EditDocument(True,groupnote)
  3620. End Sub
  3621. '++LotusScript Development Environment:2:1:GetFullName:1:8
  3622. Function GetFullName() As String
  3623.     If note.FullName(0) <> "" Then
  3624.         GetFullName = note.FullName(0)
  3625.     Else
  3626.         GetFullName= note.LastName(0)
  3627.     End If
  3628. End Function
  3629. Tools...\CategorizeK
  3630. Tools...\Visit Web PageK
  3631. WebSite
  3632. WebSite
  3633. No Web Page Defined
  3634. This document has no Web page defined.
  3635.     3S7S
  3636. Tools...\Preferences...K4
  3637. DirectoryProfile
  3638.     0S0E
  3639. O=Lotus Notes
  3640. O=Lotus Notes
  3641. PURSAFO
  3642. |.:#U
  3643. O=Lotus Notes
  3644. CN=Lotus Notes Template Development/O=Lotus Notes
  3645. PURSAFO
  3646. ;m`Jk
  3647. $TABLEFORMAT
  3648. $TITLE
  3649. $Index
  3650. $Formula
  3651. $FormulaClass
  3652. $VIEWFORMAT
  3653. $Comment
  3654. $V5ACTIONS
  3655. $ACTIONS
  3656. Add Group
  3657. CurrentServer
  3658.     0S0E
  3659. CurrentServer
  3660. Group
  3661. [GroupCreator]
  3662. Group
  3663. Not Authorized
  3664. You are not authorized to add Group documents to this database.
  3665.     0R6R10S13R
  3666. Add Mailing List'++LotusScript Development Environment:2:5:(Options):0:66
  3667. '++LotusScript Development Environment:2:5:(Forward):0:1
  3668. Declare Sub Click(Source As Button)
  3669. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3670. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3671. Private Sub BindEvents(Byval Objectname_ As String)
  3672.     Static Source As BUTTON
  3673.     Set Source = Bind(Objectname_)
  3674.     On Event Click From Source Call Click
  3675. End Sub
  3676. '++LotusScript Development Environment:2:2:Click:1:12
  3677. Sub Click(Source As Button)
  3678.     Dim w As New NotesUIWorkspace
  3679.     Dim uidoc As NotesUIDocument
  3680.     Set uidoc=w.ComposeDocument("","","Group")
  3681.     Call uidoc.FieldSetText("GroupType","1")
  3682.     Call uidoc.FieldSetText("GroupTitle","1")    
  3683. End Sub
  3684. _Edit GroupK
  3685. Delete Group 
  3686.     0S0E
  3687.     0S0E
  3688. Write Memo
  3689. Error
  3690. You must use Notes 4.6 or above to use this action.
  3691. (CreateMailMemo)
  3692.     6S7S9S
  3693. Schedule Meeting
  3694. Error
  3695. You must use Notes 4.6 or above to use this action.
  3696. (ScheduleMeeting)
  3697.     6S7S9S
  3698. Send Docu_ment
  3699. _Forward
  3700. Categori_zeK    
  3701. _Move to Folder...
  3702. _Remove from Folder...
  3703. Tools...\Preferences...K4
  3704. DirectoryProfile
  3705.     0S0E
  3706. Add Group
  3707. CurrentServer
  3708.     0S0E
  3709. CurrentServer
  3710. Group
  3711. [GroupCreator]
  3712. Group
  3713. Not Authorized
  3714. You are not authorized to add Group documents to this database.
  3715.     0R6R10S13R
  3716. Add Mailing List'++LotusScript Development Environment:2:5:(Options):0:66
  3717. '++LotusScript Development Environment:2:5:(Forward):0:1
  3718. Declare Sub Click(Source As Button)
  3719. '++LotusScript Development Environment:2:5:(Declarations):0:2
  3720. '++LotusScript Development Environment:2:2:BindEvents:1:129
  3721. Private Sub BindEvents(Byval Objectname_ As String)
  3722.     Static Source As BUTTON
  3723.     Set Source = Bind(Objectname_)
  3724.     On Event Click From Source Call Click
  3725. End Sub
  3726. '++LotusScript Development Environment:2:2:Click:1:12
  3727. Sub Click(Source As Button)
  3728.     Dim w As New NotesUIWorkspace
  3729.     Dim uidoc As NotesUIDocument
  3730.     Set uidoc=w.ComposeDocument("","","Group")
  3731.     Call uidoc.FieldSetText("GroupType","1")
  3732.     Call uidoc.FieldSetText("GroupTitle","1")    
  3733. End Sub
  3734. _Edit GroupK
  3735. Delete Group 
  3736.     0S0E
  3737.     0S0E
  3738. Write Memo
  3739. Error
  3740. You must use Notes 4.6 or above to use this action.
  3741. (CreateMailMemo)
  3742.     6S7S9S
  3743. Schedule Meeting
  3744. Error
  3745. You must use Notes 4.6 or above to use this action.
  3746. (ScheduleMeeting)
  3747.     6S7S9S
  3748. Send Docu_ment
  3749. _Forward
  3750. Categori_zeK    
  3751. _Move to Folder...
  3752. _Remove from Folder...
  3753. Tools...\Preferences...K4
  3754. DirectoryProfile
  3755.     0S0E
  3756. Lotus Product
  3757. O=Lotus Notes
  3758. O=Lotus Notes
  3759. PURSAFO
  3760. |.:#U
  3761. O=Lotus Notes
  3762. CN=Lotus Notes Template Development/O=Lotus Notes
  3763. PURSAFO
  3764. $TITLE
  3765. $Index
  3766. $Formula
  3767. $FormulaClass
  3768. $VIEWFORMAT
  3769. $Comment
  3770. $V5ACTIONS
  3771. $ACTIONS
  3772. $SCRIPTOBJ_1
  3773. $ViewGlobalScript_O
  3774. $$SUBVIEWDomainName\Domain Name:23_Advanced\Certificates|Server\Certificates|Certificates,
  3775. CrossCertificate
  3776. CertificateType
  3777. Internet Cross Certificates
  3778. Notes Cross Certificates
  3779. Certifier
  3780. CertificateType
  3781. Internet Certifiers
  3782. Notes Certifiers
  3783. Unknown
  3784.     0S0E
  3785. IssuedBy
  3786. IssuedTo
  3787. $7$3$4$Conflict$REF
  3788. CrossCertificate
  3789. Certifier
  3790. SSLCertificate
  3791.     L1S2S3S4S5S6S7S8S9S1!
  3792. $7$3$4
  3793. CrossCertificate
  3794. CertificateType
  3795. Internet Cross Certificates
  3796. Notes Cross Certificates
  3797. Certifier
  3798. CertificateType
  3799. Internet Certifiers
  3800. Notes Certifiers
  3801. Unknown
  3802.     0S0E
  3803. $3Issued By.
  3804. IssuedBy
  3805. $4Issued To.
  3806. IssuedTo
  3807. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes####
  3808. ._Advanced\Locations|Locations
  3809. Source
  3810.   - for 
  3811. Source
  3812.  only
  3813.     6S7S23S24S
  3814. $20$Conflict$REF
  3815. Location
  3816.     L1S2S3S1
  3817. $20Location
  3818. Source
  3819.   - for 
  3820. Source
  3821.  only
  3822.     6S7S23S24S
  3823. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#################################
  3824. By Category|By Category1"
  3825. Categories$102T
  3826. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  3827. ##########################################################
  3828. $SUBVIEWLastName\Last Name:15;FirstName\First Name:15;PhoneNumber\Phone Number:15($CompanyList)|CompaniesB
  3829. CompanyName
  3830. Location
  3831. Location"
  3832.     1S2S8S12S
  3833. BusinessAddress
  3834. BusinessAddress
  3835. HomeAddress
  3836.     0S0E
  3837. $16OfficePhoneNumber$17$Conflict$REF
  3838. Company
  3839. Person
  3840.     L1S2S3S1
  3841. $16$17
  3842. $16Companyl
  3843. CompanyName
  3844. Location
  3845. Location"
  3846.     1S2S8S12SOfficePhoneNumberTelephone$17Addressh
  3847. BusinessAddress
  3848. BusinessAddress
  3849. HomeAddress
  3850.     0S0E
  3851. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes####################
  3852. #Database Scriptt34Q1
  3853. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##################
  3854. (PersonalAddressBookProfile)DirectoryProfileCD
  3855. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########
  3856. Edit Address Book Preferences
  3857. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############
  3858. AccountAccount
  3859. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################
  3860. Remove Address Book Preferences
  3861. E4fL3
  3862. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################
  3863. AC(9ulZ
  3864. _Advanced\Accounts|Accounts
  3865. AccountProtocol
  3866. AccountProtocol
  3867. IMAP Online
  3868. AccountProtocol
  3869. IMAP Offline
  3870. AccountProtocol
  3871. AccountProtocol
  3872. AccountProtocol
  3873.     2S3S4S8RS9E9S10S14RS9E20RS9E21S22S26RS9E27S28S32RTT33S34S38R
  3874. AccountName$33AccountLocation$Conflict$REF
  3875. Account
  3876.     L1S2S3S1"
  3877. AccountName$33
  3878. AccountNameAccount Name$33Protocol
  3879. AccountProtocol
  3880. AccountProtocol
  3881. IMAP Online
  3882. AccountProtocol
  3883. IMAP Offline
  3884. AccountProtocol
  3885. AccountProtocol
  3886. AccountProtocol
  3887.     2S3S4S8RS9E9S10S14RS9E20RS9E21S22S26RS9E27S28S32RTT33S34S38R
  3888. AccountLocationApplies to Location(s)&
  3889. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################################################
  3890. ($Accounts)/O
  3891. %AccountFileList
  3892. AccountFileName
  3893. AccountReplicas
  3894.     0S0E
  3895. AccountNameAccountPortNumberAccountLocation%AccountFileList$Conflict$REF
  3896. Account
  3897.     L1S2S3S10
  3898. AccountNameAccountPortNumber
  3899. AccountNameNameAccountPortNumberPortAccountLocationAccountLocation%AccountFileListP
  3900. %AccountFileList
  3901. AccountFileName
  3902. AccountReplicas
  3903.     0S0E
  3904. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################
  3905. _Advanced\International MIME SettingsConversionOptions
  3906. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############################
  3907. _Advanced\International MIME Settings|InternationalMIMESettings
  3908. ConnectionLocation
  3909. * - [All Locations]
  3910. ConnectionLocation
  3911.     0S0E
  3912. $1$Conflict$REF
  3913. ConversionOptions
  3914.     L1S1
  3915. $1Conversion Options for Locationt
  3916. ConnectionLocation
  3917. * - [All Locations]
  3918. ConnectionLocation
  3919.     0S0E
  3920. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############################
  3921. !($NetworkDialup Wizard)DC
  3922. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  3923. ##########################################################
  3924. ($NotesDirectDialup Wizard)DC
  3925. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################
  3926. RLANRoutiness34Q1
  3927. CN=Marina Bodik/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  3928. ##########################################################
  3929. StackContainers34Q1
  3930. CN=Damien Katz/O=IrisCN=Marina Bodik/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes####################################
  3931. CN=Damien Katz/O=IrisCN=Marina Bodik/O=IrisCN=Mike Carroll/O=IrisCN=Damien Katz/O=IrisCN=Marina Bodik/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesWizards34Q1#####################################
  3932. ($InternationalMIMESettings)
  3933. ConnectionLocation
  3934. ConnectionLocation
  3935. ConnectionLocation$Conflict$REF
  3936. ConversionOptions
  3937.     L1S1
  3938. ConnectionLocation
  3939. ConnectionLocationConnectionLocation2
  3940. ConnectionLocation
  3941. ConnectionLocation
  3942. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################################
  3943. $ACTIONSCny
  3944. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################
  3945. RAS0home.notes.net10
  3946. 23456710ConnectionCN=Rob Slapikoff/O=Iris[NetModifer]0CN=home/OU=notes/O=netTCPIP**
  3947. @TCPIPhome.notes.netlocal
  3948. CN=Rob Slapikoff/O=Iris
  3949. ########################################
  3950. 505Accountldap.four11.com5*
  3951. Px@010001AccountCN=Rob Slapikoff/O=IrisFour110SentDrafts
  3952. CN=Rob Slapikoff/O=Iris
  3953. ##########################################################
  3954. 505Accountldap.bigfoot.com5*
  3955. Px@010001AccountCN=Rob Slapikoff/O=IrisBigfoot0SentDrafts
  3956. CN=Rob Slapikoff/O=Iris
  3957. ##########################################################
  3958. 505Accountldap.infospace.com5*
  3959. Px@010001AccountCN=Rob Slapikoff/O=IrisInfoSpace0SentDrafts
  3960. CN=Rob Slapikoff/O=Iris#########################################################
  3961. account.gif
  3962. account.gifaccount
  3963. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############
  3964. Add Certifier
  3965. CurrentServer
  3966.     0S0E
  3967. CurrentServer
  3968. Certifier
  3969. [NetCreator]
  3970. Certifier
  3971. Not Authorized
  3972. You are not authorized to add Certifier documents to this database.
  3973.     0R6R10S13R
  3974. Categori_zeK
  3975. _Edit CertifierK
  3976. Send Docu_ment
  3977. _Forward
  3978. Delete Certifier 
  3979.     0S0E
  3980. _Move to Folder...
  3981. _Remove from Folder...
  3982. Tools...\Preferences...K4
  3983. DirectoryProfile
  3984.     0S0E
  3985. Add Certifier
  3986. CurrentServer
  3987.     0S0E
  3988. CurrentServer
  3989. Certifier
  3990. [NetCreator]
  3991. Certifier
  3992. Not Authorized
  3993. You are not authorized to add Certifier documents to this database.
  3994.     0R6R10S13R
  3995. Categori_zeK
  3996. _Edit CertifierK
  3997. Send Docu_ment
  3998. _Forward
  3999. Delete Certifier 
  4000.     0S0E
  4001. _Move to Folder...
  4002. _Remove from Folder...
  4003. Tools...\Preferences...K4
  4004. DirectoryProfile
  4005.     0S0E
  4006. O=Lotus Notes
  4007. O=Lotus Notes
  4008. PURSAFO
  4009. |.:#U
  4010. O=Lotus Notes
  4011. CN=Lotus Notes Template Development/O=Lotus Notes
  4012. PURSAFO
  4013. hdhA%
  4014. d-%hS
  4015. $TABLEFORMAT
  4016. $TITLE
  4017. $Index
  4018. $Formula
  4019. $FormulaClass
  4020. $VIEWFORMAT
  4021. $Comment
  4022. $V5ACTIONS
  4023. $ACTIONS
  4024. Add Location$
  4025. CurrentServer
  4026.     0S0E
  4027. CurrentServer
  4028. Location
  4029. [NetCreator]
  4030. Location
  4031. Not Authorized
  4032. You are not authorized to add Location documents to this database.
  4033.     0R6R10S13R
  4034. _Edit Location
  4035. Delete LocationK 
  4036.     0S0E
  4037. Send Docu_ment
  4038. _Forward
  4039. Categori_zeK
  4040. _Move to Folder...
  4041. _Remove from Folder...
  4042. Tools...\Preferences...K4
  4043. DirectoryProfile
  4044.     0S0E
  4045. Add Location$
  4046. CurrentServer
  4047.     0S0E
  4048. CurrentServer
  4049. Location
  4050. [NetCreator]
  4051. Location
  4052. Not Authorized
  4053. You are not authorized to add Location documents to this database.
  4054.     0R6R10S13R
  4055. _Edit Location
  4056. Delete LocationK 
  4057.     0S0E
  4058. Send Docu_ment
  4059. _Forward
  4060. Categori_zeK
  4061. _Move to Folder...
  4062. _Remove from Folder...
  4063. Tools...\Preferences...K4
  4064. DirectoryProfile
  4065.     0S0E
  4066. O=Lotus Notes
  4067. O=Lotus Notes
  4068. PURSAFO
  4069. |.:#U
  4070. O=Lotus Notes
  4071. CN=Lotus Notes Template Development/O=Lotus Notes
  4072. PURSAFO
  4073. $TITLE
  4074. $Index
  4075. $Formula
  4076. $FormulaClass
  4077. $VIEWFORMAT
  4078. $Comment
  4079. $V5ACTIONS
  4080. $ACTIONS
  4081. O=Lotus Notes
  4082. O=Lotus Notes
  4083. PURSAFO
  4084. |.:#U
  4085. O=Lotus Notes
  4086. CN=Lotus Notes Template Development/O=Lotus Notes
  4087. PURSAFO
  4088. Fde!f^^
  4089. sZ%!ZM}
  4090. $Flags
  4091. LastName
  4092. FirstName
  4093. LastName
  4094. Firstname
  4095. FirstName
  4096. CompanyName
  4097.     3S5S6S7S8S10R23S41R
  4098. OfficePhoneNumber
  4099. PhoneLabel_1
  4100. PhoneLabel_1
  4101. Office phone:
  4102. OfficePhoneNumber
  4103. OfficeFAXPhoneNumber
  4104. PhoneLabel_3
  4105. PhoneLabel_3
  4106. Office fax:
  4107. OfficeFAXPhoneNumber"
  4108. CellPhoneNumber
  4109. PhoneLabel_5
  4110. PhoneLabel_5
  4111. Cell phone:
  4112. CellPhoneNumber
  4113. PhoneNumber
  4114. PhoneLabel_2
  4115. PhoneLabel_2
  4116. Home phone:
  4117. PhoneNumber
  4118. HomeFAXPhoneNumber
  4119. PhoneLabel_4
  4120. PhoneLabel_4
  4121. Home fax:
  4122. HomeFAXPhoneNumber"
  4123. PhoneNumber_6
  4124. PhoneLabel_6
  4125. PhoneLabel_6
  4126. Pager:
  4127. PhoneNumber_6
  4128.     2RS11E5S6S15S16S20S21S25S26RS11E29S39S40S44S45S49S50RS11E53S54S63S68S69S70S73S74RS11E77S78S80S87S92S93S94S95S97S98RS11E101S111S116S117S118S121S122RS11E125S135S136S140S141S142S145RS10E
  4129. CompanyName
  4130. CompanyName
  4131. JobTitle
  4132. JobTitle
  4133. BusinessAddress
  4134. OfficeStreetAddress
  4135. OfficeCity
  4136. OfficeCity
  4137. OfficeState
  4138. OfficeState
  4139. OfficeZip
  4140. OfficeCountry
  4141.     2RS11E5S6S13RS11E16S17S24RS11E27S28S31S32RS17E35S36S39S40S41S42S43S44S50S51S52S53S54S55S57S62RRS12E
  4142. Categories$102$103$104$Conflict$REF
  4143. Person
  4144. Company
  4145.     L1S2S3S
  4146. @Categories$102Name
  4147. LastName
  4148. FirstName
  4149. LastName
  4150. Firstname
  4151. FirstName
  4152. CompanyName
  4153.     3S5S6S7S8S10R23S41R$103PhoneB
  4154. OfficePhoneNumber
  4155. PhoneLabel_1
  4156. PhoneLabel_1
  4157. Office phone:
  4158. OfficePhoneNumber
  4159. OfficeFAXPhoneNumber
  4160. PhoneLabel_3
  4161. PhoneLabel_3
  4162. Office fax:
  4163. OfficeFAXPhoneNumber"
  4164. CellPhoneNumber
  4165. PhoneLabel_5
  4166. PhoneLabel_5
  4167. Cell phone:
  4168. CellPhoneNumber
  4169. PhoneNumber
  4170. PhoneLabel_2
  4171. PhoneLabel_2
  4172. Home phone:
  4173. PhoneNumber
  4174. HomeFAXPhoneNumber
  4175. PhoneLabel_4
  4176. PhoneLabel_4
  4177. Home fax:
  4178. HomeFAXPhoneNumber"
  4179. PhoneNumber_6
  4180. PhoneLabel_6
  4181. PhoneLabel_6
  4182. Pager:
  4183. PhoneNumber_6
  4184.     2RS11E5S6S15S16S20S21S25S26RS11E29S39S40S44S45S49S50RS11E53S54S63S68S69S70S73S74RS11E77S78S80S87S92S93S94S95S97S98RS11E101S111S116S117S118S121S122RS11E125S135S136S140S141S142S145RS10E$104Business
  4185. CompanyName
  4186. CompanyName
  4187. JobTitle
  4188. JobTitle
  4189. BusinessAddress
  4190. OfficeStreetAddress
  4191. OfficeCity
  4192. OfficeCity
  4193. OfficeState
  4194. OfficeState
  4195. OfficeZip
  4196. OfficeCountry
  4197.     2RS11E5S6S13RS11E16S17S24RS11E27S28S31S32RS17E35S36S39S40S41S42S43S44S50S51S52S53S54S55S57S62RRS12E&
  4198. Add ContactK 
  4199. CurrentServer
  4200.     0S0E
  4201. CurrentServer
  4202. Person
  4203. [UserCreator]
  4204. Person
  4205. Not Authorized
  4206. You are not authorized to add Person documents to this database.
  4207.     0R6R10S13R
  4208. _Edit Card
  4209. Delete 
  4210.     0S0E
  4211.     11S12S13S17S18S
  4212. Directories... 
  4213.     0S0E
  4214. Categori_zeK
  4215. Send Docu_ment
  4216. _Forward
  4217. _Move to Folder...
  4218. _Remove from Folder...    
  4219. Write Memo
  4220. Error
  4221. You must use Notes 4.6 or above to use this action.
  4222. (CreateMailMemo)
  4223.     6S7S9S
  4224. Schedule Meeting
  4225. Error
  4226. You must use Notes 4.6 or above to use this action.
  4227. (ScheduleMeeting)
  4228.     6S7S9S
  4229. Tools...\Create Group
  4230. '++LotusScript Development Environment:2:5:(Options):0:66
  4231. '++LotusScript Development Environment:2:5:(Forward):0:1
  4232. Declare Sub Click(Source As Button)
  4233. Declare Function GetFullName() As String
  4234. '++LotusScript Development Environment:2:5:(Declarations):0:10
  4235. Dim ws As NotesUIWorkspace
  4236. Dim session As NotesSession
  4237. Dim db As NotesDatabase
  4238. Dim note As NotesDocument
  4239. Dim groupnote As NotesDocument
  4240. Dim collection As NotesDocumentCollection
  4241. Dim Names() As String
  4242. Dim counter As Integer
  4243. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4244. Private Sub BindEvents(Byval Objectname_ As String)
  4245.     Static Source As BUTTON
  4246.     Set Source = Bind(Objectname_)
  4247.     On Event Click From Source Call Click
  4248. End Sub
  4249. '++LotusScript Development Environment:2:2:Click:1:12
  4250. Sub Click(Source As Button)
  4251.     Set ws = New NotesUIWorkspace
  4252.     Set session = New NotesSession
  4253.     Set db = session.CurrentDatabase
  4254.     counter = 0
  4255.     Set collection = db.UnprocessedDocuments
  4256.     If (collection.Count = 0) Then
  4257.         Messagebox "No documents were selected.",0,"Error"
  4258.         Exit Sub
  4259.     End If
  4260.     Redim Names(collection.Count-1)
  4261. 'for each document in the collection, get the first value of FullName
  4262. 'we use the GetNth method since the resulting collection is an IDTable
  4263.     For x = 1 To collection.Count
  4264.         Set note = collection.GetNthDocument(x)
  4265.         Names(counter) = GetFullName
  4266.         counter = counter + 1
  4267.     Next
  4268.     Set groupnote = New NotesDocument(db)
  4269.     groupnote.Members = Names
  4270.     groupnote.Form = "Group"
  4271.     groupnote.Type = "Group"
  4272.     Call ws.EditDocument(True,groupnote)
  4273. End Sub
  4274. '++LotusScript Development Environment:2:1:GetFullName:1:8
  4275. Function GetFullName() As String
  4276.     If note.FullName(0) <> "" Then
  4277.         GetFullName = note.FullName(0)
  4278.     Else
  4279.         GetFullName= note.LastName(0)
  4280.     End If
  4281. End Function
  4282. Tools...\Visit Web PageK
  4283. WebSite
  4284. WebSite
  4285. No Web Page Defined
  4286. This document has no Web page defined.
  4287.     3S7S
  4288. Tools...\Preferences...K4
  4289. DirectoryProfile
  4290.     0S0E
  4291. Add ContactK 
  4292. CurrentServer
  4293.     0S0E
  4294. CurrentServer
  4295. Person
  4296. [UserCreator]
  4297. Person
  4298. Not Authorized
  4299. You are not authorized to add Person documents to this database.
  4300.     0R6R10S13R
  4301. _Edit Card
  4302. Delete 
  4303.     0S0E
  4304.     11S12S13S17S18S
  4305. Directories... 
  4306.     0S0E
  4307. Categori_zeK
  4308. Send Docu_ment
  4309. _Forward
  4310. _Move to Folder...
  4311. _Remove from Folder...    
  4312. Write Memo
  4313. Error
  4314. You must use Notes 4.6 or above to use this action.
  4315. (CreateMailMemo)
  4316.     6S7S9S
  4317. Schedule Meeting
  4318. Error
  4319. You must use Notes 4.6 or above to use this action.
  4320. (ScheduleMeeting)
  4321.     6S7S9S
  4322. Tools...\Create Group
  4323. '++LotusScript Development Environment:2:5:(Options):0:66
  4324. '++LotusScript Development Environment:2:5:(Forward):0:1
  4325. Declare Sub Click(Source As Button)
  4326. Declare Function GetFullName() As String
  4327. '++LotusScript Development Environment:2:5:(Declarations):0:10
  4328. Dim ws As NotesUIWorkspace
  4329. Dim session As NotesSession
  4330. Dim db As NotesDatabase
  4331. Dim note As NotesDocument
  4332. Dim groupnote As NotesDocument
  4333. Dim collection As NotesDocumentCollection
  4334. Dim Names() As String
  4335. Dim counter As Integer
  4336. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4337. Private Sub BindEvents(Byval Objectname_ As String)
  4338.     Static Source As BUTTON
  4339.     Set Source = Bind(Objectname_)
  4340.     On Event Click From Source Call Click
  4341. End Sub
  4342. '++LotusScript Development Environment:2:2:Click:1:12
  4343. Sub Click(Source As Button)
  4344.     Set ws = New NotesUIWorkspace
  4345.     Set session = New NotesSession
  4346.     Set db = session.CurrentDatabase
  4347.     counter = 0
  4348.     Set collection = db.UnprocessedDocuments
  4349.     If (collection.Count = 0) Then
  4350.         Messagebox "No documents were selected.",0,"Error"
  4351.         Exit Sub
  4352.     End If
  4353.     Redim Names(collection.Count-1)
  4354. 'for each document in the collection, get the first value of FullName
  4355. 'we use the GetNth method since the resulting collection is an IDTable
  4356.     For x = 1 To collection.Count
  4357.         Set note = collection.GetNthDocument(x)
  4358.         Names(counter) = GetFullName
  4359.         counter = counter + 1
  4360.     Next
  4361.     Set groupnote = New NotesDocument(db)
  4362.     groupnote.Members = Names
  4363.     groupnote.Form = "Group"
  4364.     groupnote.Type = "Group"
  4365.     Call ws.EditDocument(True,groupnote)
  4366. End Sub
  4367. '++LotusScript Development Environment:2:1:GetFullName:1:8
  4368. Function GetFullName() As String
  4369.     If note.FullName(0) <> "" Then
  4370.         GetFullName = note.FullName(0)
  4371.     Else
  4372.         GetFullName= note.LastName(0)
  4373.     End If
  4374. End Function
  4375. Tools...\Visit Web PageK
  4376. WebSite
  4377. WebSite
  4378. No Web Page Defined
  4379. This document has no Web page defined.
  4380.     3S7S
  4381. Tools...\Preferences...K4
  4382. DirectoryProfile
  4383.     0S0E
  4384. Lotus Product
  4385. OBJECT
  4386. O=Lotus Notes
  4387. O=Lotus Notes
  4388. PURSAFO
  4389. |.:#U
  4390. O=Lotus Notes
  4391. CN=Lotus Notes Template Development/O=Lotus Notes
  4392. PURSAFO
  4393. $TITLE
  4394. $Index
  4395. $Formula
  4396. $FormulaClass
  4397. $VIEWFORMAT
  4398. $Comment
  4399. $V5ACTIONS
  4400. $ACTIONS
  4401. $ViewGlobalScript_O
  4402. Add CompanyK,
  4403. Company
  4404.     0S0E
  4405. _Edit Company
  4406. Delete Company 
  4407.     0S0E
  4408. Categori_zeK
  4409. Send Docu_ment
  4410. _Forward
  4411. _Move to Folder...
  4412. _Remove from Folder...
  4413. O=Lotus Notes
  4414. O=Lotus Notes
  4415. PURSAFO
  4416. |.:#U
  4417. O=Lotus Notes
  4418. CN=Lotus Notes Template Development/O=Lotus Notes
  4419. PURSAFO
  4420. $TABLEFORMAT
  4421. $TITLE
  4422. $Index
  4423. $Formula
  4424. $FormulaClass
  4425. $VIEWFORMAT
  4426. $Comment
  4427. $ACTIONS
  4428. '++LotusScript Development Environment:2:5:(Options):0:66
  4429. '++LotusScript Development Environment:2:5:(Forward):0:1
  4430. Declare Sub Postopen(Source As Notesuidatabase)
  4431. Declare Sub CreateDefaultPersonalAddressBookProfile
  4432. Declare Sub Postdocumentdelete(Source As Notesuidatabase)
  4433. Declare Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
  4434. '++LotusScript Development Environment:2:5:(Declarations):0:10
  4435. Dim ws As NotesUIWorkspace
  4436. Dim uidoc As NotesUIDocument
  4437. Dim session As NotesSession
  4438. Dim db As NotesDatabase
  4439. Dim note As NotesDocument
  4440. Dim profile As NotesDocument
  4441. Dim exprofile As NotesDocument
  4442. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4443. Private Sub BindEvents(Byval Objectname_ As String)
  4444.     Static Source As NOTESUIDATABASE
  4445.     Set Source = Bind(Objectname_)
  4446.     On Event Postopen From Source Call Postopen
  4447.     On Event Postdocumentdelete From Source Call Postdocumentdelete
  4448.     On Event Querydocumentdelete From Source Call Querydocumentdelete
  4449. End Sub
  4450. '++LotusScript Development Environment:2:2:Postopen:1:12
  4451. Sub Postopen(Source As Notesuidatabase)
  4452.     Set session = New NotesSession
  4453.     Set db = session.CurrentDatabase   
  4454.     Set ws = New NotesUIWorkspace
  4455.     Set profile=db.GetProfileDocument("DirectoryProfile")
  4456.     If profile.Owner(0)="" Then
  4457.         Set exprofile=db.GetProfileDocument("PersonalAddressBookProfile") 
  4458.         Call CreateDefaultPersonalAddressBookProfile
  4459.     End If
  4460. End Sub
  4461. '++LotusScript Development Environment:2:2:CreateDefaultPersonalAddressBookProfile:1:8
  4462. Sub CreateDefaultPersonalAddressBookProfile
  4463. 'the global variable "profile" is a profile document already
  4464. 'we need to add the fields to it
  4465.     Call profile.ReplaceItemValue("Owner",exprofile.GetItemValue("Owner")(0))
  4466. ' remove the old 4.6 profile
  4467.     Call exprofile.remove(True)
  4468.     Call profile.ReplaceItemValue("Form", "DirectoryProfile")
  4469.     Call profile.ComputeWithForm(False, False)
  4470.     Call profile.Save(True,True,True)
  4471. '    Call ws.EditProfile("DirectoryProfile")  
  4472. End Sub
  4473. '++LotusScript Development Environment:2:2:Postdocumentdelete:1:12
  4474. Sub Postdocumentdelete(Source As Notesuidatabase)
  4475.     Dim w As New notesuiworkspace
  4476.     Dim uiview As NotesUIView
  4477.     Dim session As New NotesSession
  4478.     Dim db As NotesDatabase
  4479.     Dim removedb As New NotesDatabase ("","")
  4480.     Dim doc As NotesDocument
  4481.     Dim collection As NotesDocumentCollection
  4482.     Dim strViewName As String
  4483.     Set uiview = w.CurrentView
  4484.     ' IF we do not have a current view, bail
  4485.     If uiview Is Nothing Then Exit Sub
  4486.     strViewName = uiview.ViewName
  4487.     If Strcompare(strViewName, "_Advanced\Accounts")  = 0 Then
  4488.         Set db = session.currentdatabase
  4489.         Set collection = source.documents        
  4490.         Set doc = collection.GetFirstDocument
  4491.         While Not(doc Is Nothing)
  4492.             If doc.GetItemValue("Type")(0)="Account"  And doc.GetItemValue("AccountFileName")(0) <>"" Then
  4493.                 flag = removedb.Open("", doc.GetItemValue("AccountFileName")(0))
  4494.                 If flag = True Then
  4495.                     Call removedb.remove
  4496.                     Set removedb = New NotesDatabase("","")
  4497.                 End If
  4498.             End If
  4499.             Set doc = collection.GetNextDocument(doc)            
  4500.         Wend
  4501.         Call w.ViewRefresh
  4502.     End If
  4503. End Sub
  4504. '++LotusScript Development Environment:2:2:Querydocumentdelete:1:12
  4505. Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
  4506.     Dim w As New notesuiworkspace
  4507.     Dim uiview As NotesUIView
  4508.     Dim session As New NotesSession
  4509.     Dim db As NotesDatabase
  4510.     Dim removedb As NotesDatabase
  4511.     Dim doc As NotesDocument
  4512.     Dim collection As NotesDocumentCollection
  4513.     Dim strViewName As String
  4514.     Set uiview = w.CurrentView
  4515.     ' IF we do not have a current view, bail
  4516.     If uiview Is Nothing Then Exit Sub
  4517.     strViewName = uiview.ViewName
  4518.     If Strcompare(strViewName, "_Advanced\Accounts")  = 0 Then
  4519.         Set db = session.currentdatabase
  4520.         Set collection = source.documents        
  4521.         Set doc = collection.GetFirstDocument
  4522.         While Not(doc Is Nothing)
  4523.             If doc.GetItemValue("Type")(0)="Account"  And doc.GetItemValue("AccountFileName")(0) <>"" Then
  4524.                 answer = Messagebox("Deleting the account '" & doc.GetItemValue("AccountName")(0) &"' will also delete it's proxy database.  Do you want to continue?", 4+32, "Continue?")
  4525.                 If answer = 7 Then
  4526.                     Continue = False
  4527.                 End If
  4528.             End If
  4529.             Set doc = collection.GetNextDocument(doc)            
  4530.         Wend        
  4531.         Call w.ViewRefresh
  4532.     End If
  4533. End Sub
  4534. Lotus Product
  4535. OBJECT
  4536. O=Lotus Notes
  4537. O=Lotus Notes
  4538. PURSAFO
  4539. |.:#U
  4540. O=Lotus Notes
  4541. CN=Lotus Notes Template Development/O=Lotus Notes
  4542. PURSAFO
  4543. WW\!$
  4544. $DBScript
  4545. $DBScript_O
  4546. $TITLE
  4547. $Flags
  4548. $PublicAccess
  4549. "Small Fonts
  4550. location.gif|location
  4551. New Personal Address Book Preferences
  4552. Preferences for 
  4553. Owner
  4554.     0S0E
  4555.  DirectoryProfile'++LotusScript Development Environment:2:5:(Options):0:66
  4556. '++LotusScript Development Environment:2:5:(Forward):0:1
  4557. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  4558. '++LotusScript Development Environment:2:5:(Declarations):0:2
  4559. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4560. Private Sub BindEvents(Byval Objectname_ As String)
  4561.     Static Source As NOTESUIDOCUMENT
  4562.     Set Source = Bind(Objectname_)
  4563.     On Event Querysave From Source Call Querysave
  4564. End Sub
  4565. '++LotusScript Development Environment:2:2:Querysave:1:12
  4566. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  4567.     Dim s As New NotesSession
  4568.     Dim db As NotesDatabase
  4569.     Dim doc As NotesDocument
  4570.     Dim uidoc As NotesUIDocument
  4571.     Set db=s.CurrentDatabase
  4572.     Set uidoc=source
  4573.     Set doc=uidoc.document
  4574.     If doc.GetItemValue("LDAPFTI")(0)="1" Then
  4575.         Call db.UpdateFTIndex(True)
  4576.     End If
  4577. End Sub
  4578. Lotus Product
  4579. PERSONAL ADDRESS BOOK PREFERENCES
  4580.     Address Book owner:
  4581. Owner
  4582.     Default Contact image:  
  4583. beach
  4584. $BusinessCardBkg
  4585. Beach Texture|beachCanvas Texture|canvasCircuits|circuitLight Texture|lightPuffin|puffin
  4586.         Sample:  
  4587. $BusinessCardBkg
  4588. GroupSortDefault
  4589. Sort all new groups by default|1
  4590. LDAPFTI
  4591. Allow detailed LDAP queries of this address book|1
  4592. Preferences
  4593. Save and CloseB
  4594.     0S0E
  4595. Categori_zeK
  4596. _Edit Document
  4597. Send Docu_ment
  4598. _Forward
  4599. _Move To Folder...
  4600. _Remove From FolderK
  4601. Save and CloseB
  4602.     0S0E
  4603. Categori_zeK
  4604. _Edit Document
  4605. Send Docu_ment
  4606. _Forward
  4607. _Move To Folder...
  4608. _Remove From FolderK
  4609. O=Lotus Notes
  4610. O=Lotus Notes
  4611. PURSAFO
  4612. |.:#U
  4613. O=Lotus Notes
  4614. CN=Lotus Notes Template Development/O=Lotus Notes
  4615. PURSAFO
  4616. /pAJPsfR
  4617. $Background
  4618. $INFO
  4619. $WINDOWTITLE
  4620. $$ScriptName
  4621. $$FormScript
  4622. $$$FormScript_O
  4623. $BODY
  4624. $V5ACTIONS
  4625. $ACTIONS
  4626. Started running agent 'Edit Address Book Profile' on 05/11/98 02:12:28 PM
  4627. 1 document(s) were modified by formula
  4628. Done running agent 'Edit Address Book Profile' on 05/11/98 02:12:29 PM
  4629. Started running agent 'Edit Address Book Preferences' on 10/13/98 11:01:37 AM
  4630. 0 document(s) were modified by formula
  4631. Done running agent 'Edit Address Book Preferences' on 10/13/98 11:01:37 AM
  4632. DirectoryProfile
  4633. O=Lotus Notes
  4634. O=Lotus Notes
  4635. PURSAFO
  4636. |.:#U
  4637. O=Lotus Notes
  4638. CN=Lotus Notes Template Development/O=Lotus Notes
  4639. PURSAFO
  4640. ydAK"=
  4641. $TITLE
  4642. $AssistType
  4643. $AssistLastRun
  4644. $AssistDocCount
  4645. $AssistFlags
  4646. $AssistTrigger
  4647. $AssistInfo
  4648. $AssistQuery
  4649. $AssistAction
  4650. $AssistAction_Ex
  4651. Categori_zeK
  4652. Add Settings6
  4653. ConversionOptions
  4654.     0S0E
  4655. _Edit Settings
  4656. Delete 
  4657.     0S0E
  4658. Send Docu_ment
  4659. _Forward
  4660. _Move To Folder...
  4661. _Remove From FolderK
  4662. Tools...\Preferences...K4
  4663. DirectoryProfile
  4664.     0S0E
  4665. Categori_zeK
  4666. Add Settings6
  4667. ConversionOptions
  4668.     0S0E
  4669. _Edit Settings
  4670. Delete 
  4671.     0S0E
  4672. Send Docu_ment
  4673. _Forward
  4674. _Move To Folder...
  4675. _Remove From FolderK
  4676. Tools...\Preferences...K4
  4677. DirectoryProfile
  4678.     0S0E
  4679. O=Lotus Notes
  4680. O=Lotus Notes
  4681. PURSAFO
  4682. |.:#U
  4683. O=Lotus Notes
  4684. CN=Lotus Notes Template Development/O=Lotus Notes
  4685. PURSAFO
  4686. OYXr7
  4687. vJXR>k
  4688. NTGFb
  4689. $TITLE
  4690. $Index
  4691. $Formula
  4692. $FormulaClass
  4693. $VIEWFORMAT
  4694. $Comment
  4695. $V5ACTIONS
  4696. $ACTIONS
  4697. Rob Slapikoff-Rob
  4698.     Internet directory server
  4699. &Arial
  4700. account.gif|account
  4701. New Account
  4702. Account: 
  4703. AccountName
  4704.     0S0E
  4705. '++LotusScript Development Environment:2:5:(Options):0:66
  4706. Option Public
  4707. '++LotusScript Development Environment:2:5:(Forward):0:1
  4708. '++LotusScript Development Environment:2:5:(Declarations):0:10
  4709. Dim sOriginalAccountProtocol As String
  4710. Dim sOriginalAccountServer As String
  4711. Lotus Product
  4712. OBJECT
  4713.  Account'++LotusScript Development Environment:2:5:(Options):0:66
  4714. '++LotusScript Development Environment:2:5:(Forward):0:1
  4715. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  4716. Declare Function CreateDatabase(strTemplateFile As String, strOutput As String, strTitle As String) As Integer
  4717. Declare Sub Postopen(Source As Notesuidocument)
  4718. '++LotusScript Development Environment:2:5:(Declarations):0:10
  4719. Dim strTitle As String
  4720. '++LotusScript Development Environment:2:2:BindEvents:1:129
  4721. Private Sub BindEvents(Byval Objectname_ As String)
  4722.     Static Source As NOTESUIDOCUMENT
  4723.     Set Source = Bind(Objectname_)
  4724.     On Event Querysave From Source Call Querysave
  4725.     On Event Postopen From Source Call Postopen
  4726. End Sub
  4727. '++LotusScript Development Environment:2:2:Querysave:1:12
  4728. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  4729.     Dim  doc As NotesDocument
  4730.     Dim checkdoc As NotesDocument
  4731.     Dim ProtocolType As String
  4732.     Dim strProtocolString As String
  4733.     Dim bSuccess As Integer
  4734.     Dim vAccountName As Variant
  4735.     Dim strFileName As String
  4736.     Dim ws As New NotesUIWorkspace
  4737.     Dim vValid As Variant    
  4738.     Dim dc As NotesDocumentCollection
  4739.     Dim db As NotesDatabase
  4740.     Dim session As New NotesSession
  4741.     Set db = session.CurrentDatabase
  4742.     Set view = db.GetView("($Accounts)")
  4743.     Set uidoc=Source
  4744.     Set doc=source.Document    
  4745.     Call view.refresh
  4746.     Set dc= view.GetAllDocumentsByKey(doc.GetItemValue("AccountName")(0), True)
  4747.     On Error Goto RefreshError
  4748.     Call uidoc.refresh
  4749. Try to move the following code so that it is only called if the proxy db is created)
  4750. %END REM
  4751.     If dc.count >0 Then
  4752.         Set checkdoc=dc.GetFirstDocument
  4753.         If checkdoc.NoteID <> doc.NoteID Then
  4754.             Messagebox "An Account with this name already exists.  Please choose a different Account name."
  4755.             Continue=False
  4756.             Exit Sub
  4757.         End If
  4758.     End If
  4759. To here
  4760. %END REM
  4761.     vValid=Evaluate(|@Contains(AccountName;"\\":"/":":":"+":"=":"*":"<":">":"\"":";":"?":",":"[":"]":"{":"}":"\'":"(":")":".")|,doc)
  4762.     If vValid(0)=1 Then
  4763.         Call uidoc.refresh
  4764.         Continue=False
  4765.         Exit Sub
  4766.     Else 
  4767.         vValid=Evaluate({@Contains(AccountName;"|")},doc)
  4768.         If vValid(0)=1 Then
  4769.             Call uidoc.refresh
  4770.             Continue=False
  4771.             Exit Sub
  4772.         End If
  4773.     End If
  4774.     If doc.GetItemValue("AccountName")(0) = "" Then
  4775.         Call uidoc.refresh
  4776.         Exit Sub
  4777.     End If
  4778.     vAccountName=Evaluate(|@ReplaceSubString(AccountName;" ":".";"")|,doc)
  4779.     strFileName=vAccountName(0)
  4780.     If Len(strFileName) > 8 Then
  4781.         strFileName=Left(strFileName, 8)+".nsf"
  4782.     Else
  4783.         strFileName=strFileName+".nsf"
  4784.     End If
  4785.     strTitle=doc.GetItemValue("AccountName")(0)
  4786.     ProtocolType=doc.GetItemValue("AccountProtocol")(0)
  4787.     If doc.GetItemValue("AccountFileName")(0) <> "" Then
  4788.         If (ProtocolType <> sOriginalAccountProtocol)  And Not doc.IsNewNote Then
  4789.             Set dbOutput = New NotesDatabase("",doc.GetItemValue("AccountFileName")(0))
  4790.             If dbOutput.IsOpen Then
  4791.                 Call dbOutput.Remove
  4792.             End If
  4793.         End If    
  4794.     End If
  4795.     Select Case ProtocolType
  4796.     Case "2"
  4797.           'Check to see if a db with the same name already exists if this is a new document.
  4798.         Set dbOutput = New NotesDatabase("", strFileName)
  4799.         If doc.IsNewNote And dbOutput.IsOpen Then
  4800.             Messagebox "A proxy database cannot be created because a file with this name already exists.  Please change your Account name."
  4801.             Continue=False
  4802.             Exit Sub
  4803.         End If
  4804.         strProtocolString=" (IMAP)"
  4805.         strTitle=strTitle+strProtocolString
  4806.         bSuccess = CreateDatabase("imapcl5.ntf", strFileName, strTitle)
  4807.         If bSuccess = True Then        
  4808.             Call doc.ReplaceItemValue("AccountFileName", strFileName)
  4809.             Call doc.ReplaceItemValue("IMAPFirstOpen", "1")
  4810.             Call ws.AddDatabase("", strFileName)
  4811.         Else
  4812.             Print "Error: Mail (IMAP) template does not exist."
  4813.             Continue=False
  4814.         End If
  4815.     Case "3"
  4816.           'Check to see if a db with the same name already exists if this is a new document.
  4817.         Set dbOutput = New NotesDatabase("", strFileName)
  4818.         If doc.IsNewNote And dbOutput.IsOpen Then
  4819.             Messagebox "A proxy database cannot be created because a file with this name already exists.  Please change your Account name."
  4820.             Continue=False
  4821.             Exit Sub
  4822.         End If
  4823.         strProtocolString=" (NNTP)"
  4824.         strTitle=strTitle+strProtocolString
  4825.         bSuccess = CreateDatabase("nntpcl5.ntf", strFileName, strTitle)
  4826.         If bSuccess = True Then
  4827.             Call doc.ReplaceItemValue("AccountFileName",strFileName)
  4828.             Call ws.AddDatabase("", strFileName)
  4829.         Else
  4830.             Print "Error: News Articles (NNTP) template does not exist."
  4831.             Continue=False
  4832.         End If
  4833.     End Select
  4834.     Call doc.ReplaceItemValue("OriginalAccountProtocol",sOriginalAccountProtocol)
  4835.     Call doc.ReplaceItemValue("OriginalAccountServer",sOriginalAccountServer)
  4836.     If doc.GetItemValue("AccountPassword")(0) <> "" Then
  4837.         Set PkName = New NotesName(doc.GetItemValue("AccountAuthor")(0))
  4838.         Call doc.ReplaceItemValue("PublicEncryptionKeys", PkName.Abbreviated )
  4839.     End If
  4840.     Exit Sub
  4841. RefreshError:
  4842.     Continue=False
  4843.     Exit Sub
  4844. End Sub
  4845. '++LotusScript Development Environment:2:1:CreateDatabase:1:8
  4846. Function CreateDatabase(strTemplateFile As String, strOutput As String, strTitle As String) As Integer
  4847.     Dim dbTemplate As NotesDatabase
  4848.     Dim dbOutput As NotesDatabase
  4849.     ' Open up the template
  4850.     Set dbTemplate = New NotesDatabase("", strTemplateFile)
  4851.     If Not(dbTemplate.IsOpen) Then
  4852.         CreateDatabase = False
  4853.         Exit Function
  4854.     End If
  4855.     Set dbOutput = New NotesDatabase("", strOutput)
  4856.     If (dbOutput.IsOpen) Then          
  4857.         CreateDatabase = True
  4858.         Exit Function
  4859.     End If
  4860.     Set dbOutput = dbTemplate.CreateFromTemplate("", strOutput, True)
  4861.     dbOutput.Title=strTitle
  4862.     CreateDatabase = (dbOutput.IsOpen)
  4863. End Function
  4864. '++LotusScript Development Environment:2:2:Postopen:1:12
  4865. Sub Postopen(Source As Notesuidocument)
  4866.     Dim  doc As NotesDocument
  4867.     Set uidoc=Source
  4868.     Set doc=source.Document    
  4869.     sOriginalAccountProtocol=doc.GetItemValue("AccountProtocol")(0)
  4870.     sOriginalAccountServer=doc.GetItemValue("AccountServer")(0)
  4871.     If uidoc.IsNewDoc Then
  4872.         Call doc.ReplaceItemValue("AccountPFlag",doc.GetItemValue("AccountProtocol"))
  4873.         Call doc.ReplaceItemValue("AccountSFlag",doc.GetItemValue("SSLStatus"))
  4874.     End If
  4875. End Sub
  4876. Lotus Product
  4877. ,x    } 
  4878. Nh    Tl
  4879. Nh    Sx
  4880. }|    ^(
  4881. AccountName
  4882.     0S0E
  4883. AccountName
  4884.     0S0E
  4885. AccountName
  4886.     0S0E
  4887. AccountProtocol
  4888. AccountProtocol
  4889. OriginalAccountServer
  4890. AccountProtocol
  4891. OriginalAccountProtocol
  4892. AccountServer
  4893. OriginalAccountServer
  4894. OriginalAccountServer
  4895. OriginalAccountProtocol
  4896. AccountLocation
  4897. AccountServer
  4898. AccountProtocol
  4899. AccountLocation
  4900. AccountServer
  4901. AccountProtocol
  4902. AccountLocation
  4903. OriginalAccountProtocol
  4904. OriginalAccountServer
  4905. OriginalAccountProtocol
  4906. AccountLocation
  4907.     8S9S16R19S21S22S25S26S28S29S31S32S36R51RTT63R78R79S80S84R97R
  4908.     0S0E
  4909. ACCOUNT 
  4910. AccountName
  4911.     0S0E
  4912. DisplayName
  4913. DisplayName
  4914. /    Basics
  4915. The name for this account.  For example, "My Internet Mail"
  4916.     Account name:
  4917. AccountName
  4918.     0S0E
  4919. AccountName
  4920. You must supply an Account name before saving this document.{
  4921. AccountName
  4922. You cannot use the following characters in Account names:  \ /  : ; + =  " | ? ,  ' < > [ ] { } ( ) . (backslash, forward slash, colon, semi-colon, plus, equal sign, double quote, veritcal bar, question mark, comma, apostrophe, and left and right angle brackets, curly braces,  parentheses, and period){
  4923. NoCache
  4924. ($Accounts)
  4925. AccountName
  4926. NoCache
  4927. ($Accounts)
  4928. AccountName
  4929. You already have an account by this name. Please rename this account in order to save it.
  4930.     58R83S102S103S
  4931. AccountNameThe name for this account.  For example, "My Internet Mail"z
  4932. AccountName
  4933. The DNS server name or IP address for the server you are connecting to when using this account.  For example, pop.isp.com
  4934.     Account server name:
  4935. AccountServerThe DNS server name or IP address for the server you are connecting to when using this account.  For example, pop.isp.comz
  4936. AccountServer
  4937. Your login or user name.  Some protocols may not require login names and passwords.  For example you do not need a login name and password to access newsgroups on public servers or internet LDAP directories.  You may or may not need a login name and password to send SMTP mail.
  4938.     Login name:
  4939. AccountLoginNameEnter your login name to the account server.z
  4940. AccountLoginName
  4941. The password associated with your login or user name for this server.  Some protocols may not require login names and passwords. For example you do not need a login name and password to access newsgroups on public servers or internet LDAP directories.  You may or may not need a login name and password to send SMTP mail.
  4942.     Password:
  4943. AccountPasswordEnter your password used to access the account server.
  4944. AccountPassword
  4945. Select the protocol you will use for this account.  To access an IMAP message store remotely and interactively, select IMAP Online.  To pull mail from the Inbox folder of an IMAP message store into the mail file specified for your current location, select IMAP Offline.
  4946.     Protocol:
  4947. AccountProtocolChoose which protocol you want to use with this account.
  4948. IMAP Offline|6IMAP Online|2LDAP|5NNTP|3POP|1SMTP|4
  4949. AccountProtocol
  4950. Enable or disable SSL support for the selected protocol.  The specified server must have SSL configured in the same manner.  Additional SSL settings are on the Advanced tab.
  4951.     SSL: 
  4952. AccountPortNumber
  4953. AccountPFlag
  4954. AccountProtocol
  4955. AccountPFlagY
  4956. AccountSFlag
  4957. SSLStatus
  4958. AccountSFlagY
  4959. SSLStatus
  4960. AccountProtocol
  4961. AccountProtocol
  4962. AccountProtocol
  4963. AccountProtocol
  4964. AccountProtocol
  4965. AccountProtocol
  4966. SSLStatus
  4967. AccountProtocol
  4968. AccountProtocol
  4969. AccountProtocol
  4970. AccountProtocol
  4971. AccountProtocol
  4972. AccountProtocol
  4973. AccountPortNumber
  4974. AccountPortNumber
  4975.     1S9S10S15S16S20S21S27RS50E33RS58E41RTTTTTTTTTTTTT47RTTTTTTTTTTTTT53RS64E59RS64E65RS64E71RS64E74RS56E78RS58E86RTTTTTTTTTTTTT92RTTTTTTTTTTTTT98RS64E104RS64E110RS64E116RS64E119RS57E122RS55E
  4976. AccountPFlag
  4977. AccountProtocol
  4978.     0R1S
  4979. AccountSFlag
  4980. SSLStatus
  4981.     0R1S
  4982. SSLStatus
  4983. SSLStatusChoose whether to use SSL or not.
  4984. Enabled|1Disabled|0
  4985. SSLStatus
  4986. Select the locations where you want to use this account. An asterisk ( * ) means all locations.
  4987.     Only from location(s):
  4988. AccountLocation
  4989. You must choose a location for this account.{
  4990.     0S0E
  4991. AccountLocationSelect which locations this account is relative to.  * means all locations.
  4992. NoCache
  4993. ($Locations)
  4994.     0S0E
  4995. AccountLocation
  4996.     Account filename:
  4997. AccountFileName
  4998. AccountFileName
  4999. AccountFilename
  5000. AccountFilename
  5001. Basics
  5002. AccountProtocol
  5003.     0S0E
  5004. AccountProtocol
  5005.     0S0E
  5006. /    LDAP Configuration
  5007. Maximum length of time in seconds to wait for search results to be returned.
  5008.     Search timeout:
  5009. LDAPTimeoutMaximum length of time in seconds to wait for search results to be returned.
  5010. LDAPTimeout
  5011.     seconds
  5012. The maximum number of matches to return as results for a search.
  5013.     Maximum entries to return:
  5014. LDAPMaxEntriesThe maximum number of matches to return as results for a search.z
  5015. LDAPMaxEntries
  5016. The base of the directory tree from which to start a search.  For example, you may only want to search for mail addresses in the United States.  The search base for this would be c=us.  If you only wanted to search for mail addresses of people residing in the United States and working for an organization named Acme, the search base would be c=us, o=acme.
  5017.     Search base:
  5018. LDAPSearchBaseThe base of the directory tree from which to start a search.z
  5019. LDAPSearchBase
  5020. Check the LDAP server for names when sending mail.  If a recipient is not found in a Notes address book, this LDAP server will be searched with this field set to Yes.
  5021.     Check names when sending mail:
  5022. LDAPCheckNamesCheck the LDAP server for names when sending mail.  If a recipient is not found in a Notes address book, this LDAP server will be searched with this field set to Yes.
  5023. Yes|1No|0
  5024. LDAPCheckNames
  5025. AccountProtocol
  5026.     0S0E
  5027. /    POP
  5028. When new mail messages are retrieved from the POP server, the copy on the server is will be deleted if this field is set to Yes.  Otherwise, the messages will remain on the server.  
  5029.     Leave mail on server:
  5030. PopDeleteMailWhen new mail messages are retrieved from the POP server, the copy on the server is will be deleted if this field is set to Yes.
  5031. Yes|0No|1z
  5032. PopDeleteMail
  5033. AccountProtocol
  5034.     0S0E
  5035. /    IMAP
  5036. The name of the folder to store sent messages.  If the IMAP server already contains a folder for this purpose, for example a folder called "Sent Items," this field should coincide with the server configuration.  If this field is left blank, sent messages will be stored in the current folder.  If a folder of this name does not exist on the server, Notes will attempt to create one.  Some servers do not allow users to create folders.
  5037.     Sent folder name:
  5038. IMAPSent^
  5039.     0S0E
  5040. IMAPSent
  5041. IMAPSent
  5042. Illegal characters are present in the Sent folder name.  Underscores or only spaces are not allowed.{
  5043.     8S9S
  5044. IMAPSentThe name of the folder to store sent messages.
  5045. The name of the folder to store draft messages.  If the IMAP server already contains a folder for this purpose, this field should coincide with the server configuration.  If this field is left blank, draft messages will be stored in the current folder.  If a folder of this name does not exist on the server, Notes will attempt to create one.  Some servers do not allow users to create folders.
  5046.     Drafts folder name:
  5047. Drafts
  5048. IMAPDrafts^
  5049.     0S0E
  5050. IMAPDrafts
  5051. IMAPDrafts
  5052. Illegal characters are present in the Drafts folder name.  Underscores or only spaces are not allowed.{
  5053.     8S9S
  5054. IMAPDraftsThe name of the folder to store draft messages.
  5055. Protocol Configuration
  5056. /    Advanced
  5057. The internet port used for client/server communication for this particular protocol and for the specified SSL state.  The default value is the standard port number, however some servers may be configured to operate on alternate ports.
  5058.     Port number:
  5059. AccountPortNumber
  5060. You must specify a port number before saving this Account document.
  5061.     0S0E
  5062. AccountPortNumberThe internet port used for client/server communication for this particular protocol and for the specified SSL state.
  5063. AccountPortNumber
  5064. SSLStatus
  5065.     0S0E
  5066. Choose Yes to accept certificates from an unknown certifying authority.
  5067. Choose No not to accept certificates from unknown certifying authorities.
  5068.     Accept SSL site certificates:
  5069. SSLSiteCertsChoose Yes to accept certificates from an unknown certifying authority. Choose No not to accept certificates from unknown certifying authorities.
  5070. Yes|1No|0z
  5071. SSLSiteCerts
  5072. Choose Yes to force SSL to accept remote certificates which have expired.
  5073. Choose No to enforce certificate expiration dates.
  5074.     Accept expired SSL certificates:
  5075. SSLExpiredCertsChoose Yes to force SSL to accept remote certificates which have expired. Choose No to enforce certificate expiration dates.
  5076. Yes|1No|0z
  5077. SSLExpiredCerts
  5078. Choose Yes to send certificates to the server is the server requests them.
  5079. Choose No not to send certificates on request.
  5080.     Send SSL certificates when asked (outbound connections only):
  5081. SSLSendCertificatesChoose Yes to send certificates to the server is the server requests them. Choose No not to send certificates on request.
  5082. Yes|1No|0
  5083. Choose Enabled if you want to request the server's certificate to verify the server's identity is the same as the server name you created the account for. 
  5084. Choose Disabled if you do not want to perform this extra check.
  5085.     Verify account server name with remote server's certificate:
  5086. SSLServerAuthenticateChoose Enabled if you want to request the server's certificate to verify the server's identity is the same as the server name you created the account for.  Choose Disabled if you do not want to perform this extra check.
  5087. Enabled|1Disabled|0
  5088. Choose the SSL protocol version that you want to connect with.  
  5089. V2.0 only - Uses SSL V2.0 handshake and protocol only
  5090. V3.0 handshake - Uses SSL V3.0 handshake and negotiated protocol
  5091. V3.0 only - Uses SSL V3.0 handshake and protocol only
  5092. V3.0 with V2.0 handshake - Uses SSL V2.0 handshake with negotiated protocol
  5093. Negotiated - allow SSL to determine handshake and protocol
  5094.     SSL protocol version:
  5095. SSLProtocolVersionChoose the SSL protocol version that you want to connect with.
  5096. V2.0 only|1V3.0 handshake|2V3.0 only|3V3.0 with V2.0 handshake|4Negotiated|0z
  5097. SSLProtocolVersion
  5098. AccountProtocol
  5099.     0S0E
  5100. When set to 'Yes' the replication for IMAP and NNTP will be optimized to use the account's replication history.  When set to 'No', the replication will search through every document in order to determine whether to replicate it or not, regardless of whether the document has been replicated before.
  5101.     Use Replication history when replicating:
  5102. AccountReplicationHistoryWhen set to 'Yes' the replication for IMAP and NNTP will be optimized to use the account's replication history.
  5103. Yes|1No|0
  5104. Advanced
  5105. Account
  5106. Typez
  5107. AccountAuthor
  5108. Close
  5109.     0S0E
  5110. Categori_zeK
  5111. _Edit Account
  5112. Send Docu_ment
  5113. _Forward
  5114. _Move To Folder...
  5115. _Remove From FolderK
  5116. Open Proxy
  5117. AccountFileName
  5118. AccountFileName
  5119. AccountFileName
  5120.     0S0E
  5121. AccountProtocol
  5122. AccountFileName
  5123.     4S5S6S8S9S
  5124. Save and CloseB
  5125.     0S0E
  5126. Close
  5127.     0S0E
  5128. Categori_zeK
  5129. _Edit Account
  5130. Send Docu_ment
  5131. _Forward
  5132. _Move To Folder...
  5133. _Remove From FolderK
  5134. Open Proxy
  5135. AccountFileName
  5136. AccountFileName
  5137. AccountFileName
  5138.     0S0E
  5139. AccountProtocol
  5140. AccountFileName
  5141.     4S5S6S8S9S
  5142. Save and CloseB
  5143.     0S0E
  5144. O=Lotus Notes
  5145. O=Lotus Notes
  5146. PURSAFO
  5147. |.:#U
  5148. O=Lotus Notes
  5149. CN=Lotus Notes Template Development/O=Lotus Notes
  5150. PURSAFO
  5151. "(*(|>
  5152. $HTMLDocumentStyles
  5153. $BackgroundRepeat
  5154. $Background
  5155. $INFO
  5156. $WINDOWTITLE
  5157. $Script
  5158. $$Script_O
  5159. $$ScriptName
  5160. $$FormScript
  5161. $$$FormScript_O
  5162. $$FormAction7
  5163. LDAPTimeout
  5164. LDAPMaxEntries
  5165. AccountPortNumber
  5166. $BODY
  5167. $V5ACTIONS
  5168. $ACTIONS
  5169. '++LotusScript Development Environment:2:5:(Options):0:66
  5170. Option Public
  5171. '++LotusScript Development Environment:2:5:(Forward):0:1
  5172. Declare Sub Initialize
  5173. '++LotusScript Development Environment:2:5:(Declarations):0:2
  5174. '++LotusScript Development Environment:2:2:Initialize:1:10
  5175. Sub Initialize
  5176.     Set session = New NotesSession
  5177.     Set db = session.CurrentDatabase   
  5178.     Set ws = New NotesUIWorkspace
  5179.     Set profile=db.GetProfileDocument("DirectoryProfile") 
  5180.     Call profile.remove(True)
  5181. End Sub
  5182. Lotus Product
  5183. O=Lotus Notes
  5184. O=Lotus Notes
  5185. PURSAFO
  5186. |.:#U
  5187. O=Lotus Notes
  5188. CN=Lotus Notes Template Development/O=Lotus Notes
  5189. PURSAFO
  5190. $TITLE
  5191. $AssistType
  5192. $AssistLastRun
  5193. $AssistDocCount
  5194. $AssistFlags
  5195. $AssistTrigger
  5196. $AssistInfo
  5197. $AssistQuery
  5198. $AssistAction
  5199. $AssistAction_Ex
  5200. Categori_zeK
  5201. _Edit Document
  5202. Send Docu_ment
  5203. _Forward
  5204. _Move to Folder...
  5205. _Remove from Folder...
  5206. Categori_zeK
  5207. _Edit Document
  5208. Send Docu_ment
  5209. _Forward
  5210. _Move to Folder...
  5211. _Remove from Folder...
  5212. O=Lotus Notes
  5213. O=Lotus Notes
  5214. PURSAFO
  5215. |.:#U
  5216. O=Lotus Notes
  5217. CN=Lotus Notes Template Development/O=Lotus Notes
  5218. PURSAFO
  5219. bOgIca
  5220. $TITLE
  5221. $Index
  5222. $Formula
  5223. $FormulaClass
  5224. $VIEWFORMAT
  5225. $Comment
  5226. $V5ACTIONS
  5227. $ACTIONS
  5228. '++LotusScript Development Environment:2:5:(Options):0:66
  5229. Option Public
  5230. '++LotusScript Development Environment:2:5:(Forward):0:1
  5231. Declare Sub Initialize
  5232. Declare Sub GetRLANList(note As notesdocument, vDriverList() As Variant, vDrivers() As Variant, vDisplayList() As Variant)
  5233. '++LotusScript Development Environment:2:5:(Declarations):0:2
  5234. '++LotusScript Development Environment:2:2:Initialize:1:10
  5235. Sub Initialize
  5236. End Sub
  5237. '++LotusScript Development Environment:2:2:GetRLANList:1:8
  5238. Sub GetRLANList(note As notesdocument, vDriverList() As Variant, vDrivers() As Variant, vDisplayList() As Variant)
  5239.     Dim x As Integer
  5240.     Dim y As Integer
  5241.     Dim flag As String
  5242.     Dim db As NotesDatabase
  5243.     y = 0
  5244.     x = 0
  5245.     Set db = note.ParentDatabase
  5246.     'On Error Resume Next
  5247.     Forall Forms In db.Forms
  5248.         If Forms.IsSubForm Then
  5249.             If Left(Forms.Name, 5) = "$RLAN" Then
  5250.                 Redim Preserve vDriverList(x)
  5251.                 Redim Preserve vDrivers(x)
  5252.                 Redim Preserve vDisplayList(x)
  5253.                 Aliases = Forms.Aliases
  5254.                 vDriverList(x) = Aliases(0) & "|" & Aliases(1)
  5255.                 vDisplayList(x) = Aliases(0)
  5256.                 vDrivers(x)= Aliases(1)                    
  5257.                 x = x + 1
  5258.             End If     
  5259.         End If
  5260.     End Forall
  5261. '    For x = 0 To Ubound(vDriverlist)
  5262. '        Print vDriverList(x)
  5263. '    Next
  5264. End Sub
  5265. Lotus Product
  5266. OBJECT
  5267. O=Lotus Notes
  5268. O=Lotus Notes
  5269. PURSAFO
  5270. |.:#U
  5271. O=Lotus Notes
  5272. CN=Lotus Notes Template Development/O=Lotus Notes
  5273. PURSAFO
  5274. $ScriptLib
  5275. $ScriptLib_O
  5276. $TITLE
  5277. $Flags
  5278. $PublicAccess
  5279. O=Lotus Notes
  5280. O=Lotus Notes
  5281. PURSAFO
  5282. |.:#U
  5283. O=Lotus Notes
  5284. CN=Lotus Notes Template Development/O=Lotus Notes
  5285. PURSAFO
  5286. sZ%!ZM}
  5287. $Flags
  5288. "Small Fonts
  5289. intl.gif|intl
  5290. New International MIME Settings
  5291. International MIME Settings
  5292.     0S0E
  5293.  ConversionOptions&
  5294.     0S0E
  5295. INTERNATIONAL MIME SETTINGS
  5296. Albanian|sq
  5297. Arabic|ar
  5298. Bulgarian|bg
  5299. Byelorussian|be
  5300. Catalan|ca
  5301. Croatian|gr
  5302. Czech|cs
  5303. Danish|da
  5304. Dutch|nl
  5305. English|en
  5306. Estonian|et
  5307. Finnish|fi
  5308. French|fr
  5309. German|de
  5310. Greek|el
  5311. Hebrew|he
  5312. Hungarian|hu
  5313. Italian|it
  5314. Japanese|ja
  5315. Korean|ko
  5316. Latvian|lv
  5317. Lithuanian|lt
  5318. Macedonian|mk
  5319. Norwegian|no
  5320. Polish|pl
  5321. Portuguese|pt
  5322. Romanian|ro
  5323. Russian|ru
  5324. Serbian|sr
  5325. Simplified Chinese|zh-CN
  5326. Slovak|sk
  5327. Slovenian|sl
  5328. Spanish|es
  5329. Swedish|sv
  5330. Thai|th
  5331. Traditional Chinese|zh-TW
  5332. Turkish|tr
  5333. Ukrainian|uk
  5334. Vietnamese|vi
  5335.     20R42R58R74R
  5336. LanguageListz
  5337. LanguageList
  5338. English|EN
  5339. Western Europe|WE
  5340. Central Europe|CE
  5341. Turkish|TR
  5342. Baltic Rim|BR
  5343. Greek|GR
  5344. Cyrillic|CY
  5345. Arabic|AR
  5346. Hebrew|HB
  5347. Japanese|JA
  5348. Korean|KO
  5349. Simplified Chinese|SC
  5350. Traditional Chinese|TC
  5351. Thai|TH
  5352. Vietnamese|VT
  5353. Unicode|UN
  5354.     2R4R6R8R10R12R14R16R18R20R22R24R26R28R30RCharacterSetGroupsz
  5355. CharacterSetGroups
  5356. ar|AR
  5357. be|CY
  5358. bg|CY
  5359. ca|WE
  5360. cs|CE
  5361. da|WE
  5362. de|WE
  5363. el|GR
  5364. en|EN
  5365. es|WE
  5366. et|BR
  5367. fi|WE
  5368. fr|WE
  5369. gr|CE
  5370. he|HB
  5371. hu|CE
  5372. it|WE
  5373. ja|JA
  5374. ko|KO
  5375. lt|BR
  5376. lv|BR
  5377. mk|CY
  5378. nl|WE
  5379. no|WE
  5380. pl|CE
  5381. pt|WE
  5382. ro|CE
  5383. ru|CY
  5384. sk|CE
  5385. sl|CE
  5386. sq|CE
  5387. sr|CE
  5388. sv|WE
  5389. th|TH
  5390. tr|TR
  5391. uk|CY
  5392. vi|VT
  5393. zh-CN|SC
  5394. zh-TW|TC
  5395.     2RS4RS6RS8RS10RS12RS14RS16RS18RS20RS22RS24RS26RS28RS30RS32RS34RS36RS38RS40RS42RS44RS46RS48RS50RS52RS54RS56RS58RS60RS62RS64RS66RS68RS70RS72RS74RS76RS
  5396. LanguageToCharSet
  5397. LanguageToCharSet
  5398. -None-|
  5399.     0S0E
  5400. CharacterSets
  5401. CharacterSets
  5402.     0S0E
  5403. EncodingTypes
  5404. EncodingTypes
  5405. .,$,  , :
  5406. FontList
  5407. /    Basics
  5408. Select the locations where you want to use this connection. An asterisk ( * ) means all locations.
  5409.     Use these settings only for Location(s):
  5410. ConnectionLocationj
  5411. ConnectionLocation
  5412. ConnectionLocation
  5413.     0S0E
  5414. ConnectionLocationj
  5415. ConnectionLocationt
  5416. You have an * and at least one named location specified.  You can either enter multiple locations or use an * for all locations.{
  5417.     8S9S21SConnectionLocationSpecify the Location name you want this record to apply to.  * means all Locations.
  5418. NoCache
  5419. ($Locations)
  5420.     0S0E
  5421. ConnectionLocation
  5422.     Primary character set group:
  5423. CVS_PrimaryGroup
  5424. CharacterSetGroups
  5425.     Secondary character set groups:
  5426. .,$,  , :
  5427. CVS_SecondaryGroups
  5428. CharacterSetGroups
  5429. Basics
  5430. $CharacterSetSettings
  5431. Settings by Character Set
  5432. /    Advanced Inbound Message Options
  5433.     For non-MIME messages or MIME messages with an unknown character set, 8-bit character set is assumed to be:
  5434. CVSI_NonMIMECharSet
  5435. CharacterSets
  5436. CVSI_NonMIMECharSet
  5437.     Character set name aliases
  5438. CVSI_CharsetAlias1z
  5439. CVSI_CharsetAlias1
  5440.     maps to 
  5441. CVSI_CharsetActual1
  5442. CharacterSets
  5443. CVSI_CharsetActual1
  5444. CVSI_CharsetActual1
  5445.     0S0E
  5446. CVSI_CharsetAlias2z
  5447. CVSI_CharsetAlias2
  5448.     maps to 
  5449. CVSI_CharsetActual2
  5450. CharacterSets
  5451. CVSI_CharsetActual2
  5452. CVSI_CharsetActual2
  5453.     0S0E
  5454. CVSI_CharsetAlias3z
  5455. CVSI_CharsetAlias3
  5456.     maps to 
  5457. CVSI_CharsetActual3
  5458. CharacterSets
  5459. CVSI_CharsetActual3
  5460. CVSI_CharsetActual3
  5461.     0S0E
  5462. CVSI_CharsetAlias4z
  5463. CVSI_CharsetAlias4
  5464.     maps to 
  5465. CVSI_CharsetActual4
  5466. CharacterSets
  5467. CVSI_CharsetActual4
  5468. CVSI_CharsetActual4
  5469.     0S0E
  5470. CVSI_CharsetAlias5z
  5471. CVSI_CharsetAlias5
  5472.     maps to 
  5473. CVSI_CharsetActual5
  5474. CharacterSets
  5475. CVSI_CharsetActual5
  5476. Advanced Inbound Message Options
  5477. /    Advanced Outbound Message Options
  5478.     When a Notes user sends a multi-lingual message:
  5479. CVS_MLMessageHandling
  5480. Send it in Unicode (UTF8)|1Send it in most representable charset|2Send it in MHTML with unicode entities|3Refuse sending|4
  5481. CVS_MLMessageHandling
  5482.     Character set name aliases
  5483. CVSO_CharsetActual1
  5484. CharacterSets
  5485.      maps to 
  5486. CVSO_CharsetAlias1
  5487. CVSO_CharsetActual1
  5488.     0S0E
  5489. CVSO_CharsetActual2
  5490. CharacterSets
  5491. CVSO_CharsetActual1
  5492.     0S0E
  5493.      maps to 
  5494. CVSO_CharsetAlias2
  5495. CVSO_CharsetActual2
  5496.     0S0E
  5497. CVSO_CharsetActual3
  5498. CharacterSets
  5499.      maps to 
  5500. CVSO_CharsetAlias3
  5501. CVSO_CharsetActual3
  5502.     0S0E
  5503. CVSO_CharsetActual4
  5504. CharacterSets
  5505.      maps to 
  5506. CVSO_CharsetAlias4
  5507. CVSO_CharsetActual4
  5508.     0S0E
  5509. CVSO_CharsetActual5
  5510. CharacterSets
  5511.      maps to 
  5512. CVSO_CharsetAlias5
  5513. CVSO_CharsetActual5
  5514.     0S0E
  5515. CVSO_CharsetActual6
  5516. CharacterSets
  5517.      maps to 
  5518. CVSO_CharsetAlias6
  5519. CVSO_CharsetActual6
  5520.     0S0E
  5521. CVSO_CharsetActual7
  5522. CharacterSets
  5523.      maps to 
  5524. CVSO_CharsetAlias7
  5525. CVSO_CharsetActual7
  5526.     0S0E
  5527. CVSO_CharsetActual8
  5528. CharacterSets
  5529.      maps to 
  5530. CVSO_CharsetAlias8
  5531. CVSO_CharsetActual8
  5532.     0S0E
  5533. CVSO_CharsetActual9
  5534. CharacterSets
  5535.      maps to 
  5536. CVSO_CharsetAlias9
  5537. CVSO_CharsetActual9
  5538.     0S0E
  5539. CVSO_CharsetActual10
  5540. CharacterSets
  5541.      maps to 
  5542. CVSO_CharsetAlias10
  5543. Advanced Outbound Message Options
  5544. Advanced
  5545. International MIME Settings
  5546. ConversionOptions
  5547. Typez
  5548. Close
  5549.     0S0E
  5550. Save and CloseB
  5551.     0S0E
  5552. Categori_zeK
  5553. _Edit Settings
  5554. Send Docu_ment
  5555. _Forward
  5556. _Move To Folder...
  5557. _Remove From FolderK
  5558. Close
  5559.     0S0E
  5560. Save and CloseB
  5561.     0S0E
  5562. Categori_zeK
  5563. _Edit Settings
  5564. Send Docu_ment
  5565. _Forward
  5566. _Move To Folder...
  5567. _Remove From FolderK
  5568. O=Lotus Notes
  5569. O=Lotus Notes
  5570. PURSAFO
  5571. |.:#U
  5572. O=Lotus Notes
  5573. CN=Lotus Notes Template Development/O=Lotus Notes
  5574. PURSAFO
  5575. CVSI_EN_F_Size
  5576. CVSI_WE_F_Size
  5577. CVSI_CE_F_Size
  5578. CVSI_TR_F_Size
  5579. CVSI_BR_F_Size
  5580. CVSI_GR_F_Size
  5581. CVSI_CY_F_Size
  5582. CVSI_AR_F_Size
  5583. CVSI_HB_F_Size
  5584. CVSI_JA_F_Size
  5585. CVSI_KO_F_Size
  5586. CVSI_SC_F_Size
  5587. CVSI_TC_F_Size
  5588. CVSI_TH_F_Size
  5589. CVSI_VT_F_Size
  5590. CVSI_UN_F_Size
  5591. $BackgroundRepeat
  5592. $Background
  5593. $INFO
  5594. $WINDOWTITLE
  5595. $$ScriptName
  5596. $$FormAction7
  5597. $BODY
  5598. $V5ACTIONS
  5599. $ACTIONS
  5600. "Small Fonts
  5601. '++LotusScript Development Environment:2:5:(Options):0:74
  5602. Option Public
  5603. Option Declare
  5604. Use "Wizard"
  5605. Use "RLANRoutines"
  5606. '++LotusScript Development Environment:2:5:(Forward):0:1
  5607. Declare Class ConnectionWizard As Wizard
  5608. Declare Function RepeatedConnectionID(Destination As Variant)  As String
  5609. '++LotusScript Development Environment:2:5:(Declarations):0:10
  5610. Dim wiz As Wizard
  5611. Const xxstr1="Please enter the organizational hierarchy for the group of servers you want to connect to."
  5612. Const xxstr2="Please enter the remote access server name."
  5613. Const xxstr3="Please select a Dial-Up Networking entry."
  5614. Const xxstr4="Please enter the phone number for the server you want to connect to."
  5615. Const xxstr5="Repeated connection"
  5616. Const xxstr6= "Configuration already exists. Do you want to create another one?"
  5617. Const xxstr7="An error has occurred creating the Network Dialup connection document. Please see your system administrator."
  5618. Const xxstr8="Please enter the name of the Passthru server."
  5619. Const xxstr9="An error has occurred creating the Passthru connection document. Please see your system administrator."
  5620. Const xxstr10="You have successfully created the connection document(s)."
  5621. Class ConnectionWizard As Wizard
  5622.     Sub new( uidoc As NotesUIdocument, tableName As String, firstPanel As String)
  5623.     End Sub
  5624.     Function processNext( note As NotesDocument, currentPanel As String) As String
  5625.         If currentPanel="a" Then
  5626.             processNext="b"
  5627.         Elseif currentPanel = "b" And note.GetItemValue("ConnectChoice")(0)="1" Then
  5628.             processNext = "c"
  5629.         Elseif currentPanel = "b" And note.GetItemValue("ConnectChoice")(0)="2" Then
  5630.             If note.GetitemValue("ApplyToServer")(0)= "2" And Len(note.GetitemValue("ServerGroup")(0))=0 Then 
  5631.                 Msgbox xxstr1
  5632.                 Error WIZ_PROCESS_NEXT_ERROR
  5633.             End If
  5634.             If note.GetitemValue("ApplyToServer")(0)= "3" And Len(note.GetitemValue("SpecificRASName")(0))=0 Then             
  5635.                 Msgbox xxstr2
  5636.                 Error WIZ_PROCESS_NEXT_ERROR
  5637.             End If                
  5638.             processNext = "e"
  5639.         Elseif currentPanel = "c" And note.getItemValue( "AccessLAN")(0) = "1" Then
  5640.             processNext = "d"
  5641.         Elseif currentPanel = "c" And note.getItemValue( "AccessLAN")(0) = "2" Then
  5642.             processNext = "e"
  5643.         Elseif currentpanel="d" Then
  5644.             processNext ="e"
  5645.         Else 
  5646.             If note.getItemValue( "DunEntries")(0) = "" Then
  5647.                 Messagebox xxstr3
  5648.                 Error WIZ_PROCESS_NEXT_ERROR
  5649.             End If    
  5650.             activateNextButton False
  5651.             processNext = "f"
  5652.     'to pull phone number(s) for selected DUN entry            
  5653.             Dim vListEntry As Variant
  5654.             Dim vphone As Variant
  5655.             Dim ws As New NotesUIWorkspace
  5656.             vlistEntry=note.GetitemValue("DUNEntries")
  5657.             If Len(vListEntry(0))<>0 Then            
  5658.                 vphone = ws.Get_DialEntry_Info("RAS", vListEntry(0))
  5659.                 Call note.replaceitemvalue("tmpPhoneNumber", vphone(0))
  5660.                 Call note.replaceitemvalue("tmpAreaCode", vphone(1))
  5661.                 Call note.replaceitemvalue("tmpCountryCode", vphone(2))
  5662.             End If            
  5663.         End If
  5664.     End Function
  5665.     Function processComplete( note As Notesdocument, currentPanel As String) As Integer
  5666.         On Error  Goto errhandle
  5667.         Dim w As New NotesUIWorkspace
  5668.         Dim s As New NotesSession
  5669.         Dim db As NotesDatabase
  5670.         Dim  doc As NotesDocument
  5671.         Dim  newdoc As NotesDocument
  5672.         Dim iPassthruServerName As NotesItem
  5673.         Dim iDominoOrganizationName As NotesItem
  5674.         Dim iPassthruServerHostName As NotesItem
  5675.         Dim iLocationName As NotesItem
  5676.         Dim iLocationType As NotesItem
  5677.         Dim itmpPhoneNumber As NotesItem
  5678.         Dim itmpAreaCode As NotesItem
  5679.         Dim itmpCountryCode As NotesItem
  5680.         Dim itmpLoginName As NotesItem
  5681.         Dim itmpPassword As NotesItem
  5682.         Dim iDUNEntries As NotesItem
  5683.         Dim iServiceType As NotesItem
  5684.         Dim iPortInternet As NotesItem
  5685.         Dim iPortsRAS As NotesItem
  5686.         Dim iConnectChoice As Notesitem
  5687.         Dim iApplyToServer As NotesItem
  5688.         Dim iOptNetworkAddress As NotesItem
  5689.         Dim success As Variant
  5690.         Dim vDriverList() As Variant
  5691.         Dim vDrivers() As Variant
  5692.         Dim vDisplayList() As Variant
  5693.         Dim destination As String
  5694.         Set db=s.CurrentDatabase
  5695.         Set doc=note
  5696.             ' get items from a dialog box
  5697.         Set iPassthruServerName=doc.GetFirstItem("servername") 
  5698.         Set iDominoOrganizationName=doc.GetFirstItem("DominoOrganizationName") 
  5699.         Set iPassthruServerHostName=doc.GetFirstItem("PassthruServerHostName") 
  5700.         Set itmpAreaCode=doc.GetFirstitem("tmpAreaCode")
  5701.         Set itmpCountryCode=doc.GetFirstitem("tmpCountryCode")
  5702.         Set itmpPhoneNumber=doc.GetFirstitem("tmpPhoneNumber")
  5703.         If Len(itmpPhoneNumber.Text)=0 Then
  5704.             Msgbox xxstr4
  5705.             Exit Function
  5706.         End If
  5707.         Set itmpLoginName=doc.GetFirstitem("tmpLoginName")
  5708.         Set itmpPassword=doc.GetFirstitem("tmpPassword")
  5709.         Set iDUNEntries=doc.GetFirstItem("DUNEntries")
  5710.         Set iServiceType=doc.GetFirstItem("ServiceType")
  5711.         Set iPortsRAS=doc.GetFirstItem("PortsRAS")
  5712.         Set iPortInternet=doc.GetFirstItem("PortInternet")        
  5713.         Set iLocationType=doc.GetFirstItem("LocationType")
  5714.         Set iLocationName=doc.GetFirstItem("Name")
  5715.         Set iConnectChoice =doc.GetFirstitem("ConnectChoice")        
  5716.         Set iApplyToServer =doc.GetFirstitem("ApplyToServer")        
  5717.         Set iOptNetworkAddress = doc.GetFirstitem("OptNetworkAddress")
  5718.     'find destination (*, */servergroup or specific server) based on ConnectChoice and ApplyToServer     
  5719.         If iConnectChoice.Text="2" And iApplyToServer.Text="2"Then
  5720.             destination=note.GetitemValue("ServerGroup")(0)
  5721.         Elseif    iConnectChoice.Text="2" And iApplyToServer.Text ="3"Then
  5722.             destination=note.GetitemValue("SpecificName")(0)
  5723.         Else
  5724.             destination="*"
  5725.         End If
  5726. 'create Network Dialup connection
  5727.         Set newdoc=New NotesDocument(db)
  5728.         Call newdoc.ReplaceItemValue("Form","Connection")
  5729.         Call newdoc.ReplaceItemValue("ConnectionType","5")
  5730.         Call newdoc.ReplaceItemValue("ConnectionRecordFirst","1")
  5731.         Call newdoc.ReplaceItemValue("Destination", destination)
  5732.         Call newdoc.ReplaceitemValue("RLANItems", 6)
  5733.         Call GetRLANList(newdoc, vDriverList, vDrivers, vDisplayList)
  5734.         Call newdoc.ReplaceItemValue("DisplayDriverList", vDriverList)
  5735. 'based on ConnectChoice, select port(s) and Network Address to use for LanPortName field on server connection doc            
  5736.         If iConnectChoice.Text="1" Then
  5737.             Call iPortInternet.CopyItemToDocument(newdoc, "LanPortName")
  5738.             Call iPassthruServerHostName.CopyItemToDocument(newdoc,"OptionalNetworkAddress")              
  5739.         Else 
  5740.             If Len(iOptNetworkAddress.Text)<>0 And Len(iPortsRAS.Text)=0 Then
  5741.                 Msgbox "You must supply a specific Port Name if you want to use a Destination Network Address."                
  5742.                 Exit Function                
  5743.             End If            
  5744.             Call iPortsRAS.CopyItemToDocument(newdoc, "LanPortName")
  5745.             Call iOptNetworkAddress.CopyItemToDocument(newdoc,"OptionalNetworkAddress")  
  5746.         End If            
  5747.         Call iDUNEntries.CopyItemToDocument(newdoc,"RLANTag")  
  5748.         Call newdoc.ReplaceItemValue("RLAN3",  itmpPhoneNumber.Text)
  5749.         Call newdoc.ReplaceItemValue("RLAN4", itmpAreaCode.Text)
  5750.         Call newdoc.ReplaceItemValue("RLAN5", itmpCountryCode.Text)
  5751.         Call itmpLoginName.CopyItemToDocument(newdoc,"RLAN1")  
  5752.         Call itmpPassword.CopyItemToDocument(newdoc,"RLAN2")  
  5753.         Call iServiceType.CopyItemToDocument(newdoc,"RemoteLanService")
  5754.         Call iLocationName.CopyItemToDocument(newdoc,"ConnectionLocation")  
  5755. 'set values for StaticTag field
  5756.         If iServiceType.Text="RAS" Then
  5757.             Call newdoc.ReplaceItemValue("StaticTag", "RAS$%^Remote connection name:")
  5758.         Else 
  5759.             Call newdoc.ReplaceItemValue("StaticTag", "ARA$%^Connection document location:")
  5760.         End If
  5761.             'Check for repeated connection
  5762.         Dim answer As Integer
  5763.         Dim docID As String
  5764.         docID=RepeatedConnectionID("*")
  5765.         If docID<>"not found" Then 
  5766.             answer=w.Prompt(prompt_yesno, xxstr5, xxstr6)
  5767.             If answer =0 Then Exit Function
  5768.         End If        
  5769.     'end repeat connection check         
  5770.         success= newdoc.ComputeWithForm(False, False) 
  5771.         If success Then
  5772.             Call newdoc.save(True, True)
  5773.         Else
  5774.             Msgbox xxstr7
  5775.             Exit Function
  5776.         End If
  5777. 'end create Network Dialup connection
  5778. 'if AccessLAN =yes("1"), create Passthru connection
  5779.         If note.GetitemValue("AccessLAN")(0)="1" Then
  5780.             If Len(iPassthruServerName.Text) = 0 Then
  5781.                 Msgbox xxstr8
  5782.             Else 
  5783.                 Set newdoc=New NotesDocument(db) 
  5784.                 If newdoc Is Nothing Then Msgbox "No Document"
  5785.                 Call newdoc.ReplaceItemValue("Form","Connection")
  5786.                 Call newdoc.ReplaceItemValue("ConnectionType","2")
  5787.                 Call newdoc.ReplaceItemValue("ConnectionRecordFirst","1")
  5788.                 Call newdoc.ReplaceItemValue("Destination", "*/"+iDominoOrganizationName.Text)
  5789.                 Call iLocationName.CopyItemToDocument(newdoc,"ConnectionLocation")
  5790.                 Call iPassthruServerName.CopyItemToDocument(newdoc,"PassthruServer")  
  5791.                 success= newdoc.ComputeWithForm(False, False) 
  5792.                 If success Then
  5793.                     Call newdoc.save(True, True)
  5794.                 Else
  5795.                     Msgbox xxstr9  
  5796.                     Exit Function
  5797.                 End If
  5798.             End If
  5799.         End If
  5800. 'end create Passthru connection
  5801.         processComplete = True
  5802.         Msgbox xxstr10
  5803.         Exit Function
  5804. errhandle:
  5805.         Messagebox "Error: (" & Err & "): " & Error$    
  5806.     End Function
  5807. End Class
  5808. '++LotusScript Development Environment:2:1:RepeatedConnectionID:1:8
  5809. Function RepeatedConnectionID(Destination As Variant)  As String
  5810.     Dim s As New NotesSession    
  5811.     Dim w As New NotesUIWorkspace
  5812.     Dim db As NotesDatabase
  5813.     Dim key(0) As String
  5814.     Dim view As NotesView
  5815.     Dim uidoc As NotesUIdocument
  5816.     Dim doc As NotesDocument
  5817.     Dim doc2 As NotesDocument
  5818.     Dim helpdoc As NotesDocument
  5819.     Dim connectiontype As String
  5820.     Dim locationtype As String
  5821.     Dim done As Integer
  5822.     RepeatedConnectionID="not found"
  5823.     Set db=s.CurrentDatabase
  5824.     Set uidoc=w.CurrentDocument
  5825.     Set doc=uidoc.Document
  5826.     Set view=db.GetView("($Connections)")
  5827.     done=False    
  5828.     key(0)=s.Username
  5829.     Set doc2=view.GetDocumentByKey(key,False)
  5830.     If doc2 Is Nothing Then Exit Function
  5831.     While Not done 
  5832.         If destination=doc2.ColumnValues(2) Then
  5833.             If doc2.ColumnValues(0)=key(0) Then                 
  5834.                 RepeatedConnectionID=doc2.NoteID
  5835.                 Exit Function
  5836.             End If
  5837.         End If
  5838.         Set helpdoc=doc2
  5839.         Set doc2=view.GetNextDocument(helpdoc)
  5840.         If doc2 Is Nothing Then Exit Function
  5841.         If doc2.ColumnValues(0)<>key(0) Then done=True
  5842.     Wend
  5843. End Function
  5844. Lotus Product
  5845. ^<    +|
  5846. ^L    K<    -
  5847. ^\    IL
  5848. ^<    +|
  5849. ^L    K<    -
  5850. ^\    IL
  5851. ^l    +d
  5852. ^l    ^d
  5853. Jl    } 
  5854. Jl    }H
  5855. Kl    ,4
  5856. ^l    +d
  5857. Jl    }H
  5858. Kl    ,4
  5859. ($NetworkDialup Wizard)'++LotusScript Development Environment:2:5:(Options):0:74
  5860. Option Declare
  5861. '++LotusScript Development Environment:2:5:(Forward):0:1
  5862. Declare Sub Postopen(Source As Notesuidocument)
  5863. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  5864. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  5865. Declare Sub Postrecalc(Source As Notesuidocument)
  5866. '++LotusScript Development Environment:2:5:(Declarations):0:2
  5867. '++LotusScript Development Environment:2:2:BindEvents:1:129
  5868. Private Sub BindEvents(Byval Objectname_ As String)
  5869.     Static Source As NOTESUIDOCUMENT
  5870.     Set Source = Bind(Objectname_)
  5871.     On Event Postopen From Source Call Postopen
  5872.     On Event Queryopen From Source Call Queryopen
  5873.     On Event Queryclose From Source Call Queryclose
  5874.     On Event Postrecalc From Source Call Postrecalc
  5875. End Sub
  5876. '++LotusScript Development Environment:2:2:Postopen:1:12
  5877. Sub Postopen(Source As Notesuidocument)
  5878.     Dim ws As New notesuiworkspace    
  5879.     Dim doc As NotesDocument
  5880.     Dim x As Long
  5881.     Dim Drivers() As Variant
  5882.     Dim DriverList() As Variant
  5883.     Dim DisplayList() As Variant
  5884.     Dim port As Variant
  5885.     Set doc = source.document
  5886.     On Error  Goto errhandle
  5887. 'get values for DispalyDriverList  which is used in keyword ServiceType fieled
  5888.     Call GetRLANList(doc, DriverList, Drivers, DisplayList)
  5889.     doc.DisplayDriverList =  DriverList
  5890.     doc.OriginalService = doc.ServiceType
  5891.     Exit Sub
  5892. errhandle:
  5893.     Messagebox "Err (" & Err & "): " & Error$    
  5894.     Exit Sub
  5895. End Sub
  5896. '++LotusScript Development Environment:2:2:Queryopen:1:12
  5897. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  5898.     Dim firstPanel As String
  5899.     Dim ws As New NotesUIWorkspace        
  5900.     Dim vList As Variant
  5901.     Dim doc As NotesDocument
  5902. 'Make sure to pass to first panel you want displayed
  5903.     firstPanel = "a"
  5904.     On Error  Goto errhandle
  5905.     Set wiz = New ConnectionWizard( source, "Wiz", "a")
  5906.     'to populate DUNList which used for DUNEntries choices
  5907.     Set doc = source.document
  5908.     vList = ws.Get_DialEntry_List("RAS")    
  5909.     Call doc.replaceitemvalue("DUNList",vList)    
  5910.     Exit Sub
  5911. errhandle:
  5912.     Messagebox "Err (" & Err & "): " & Error$    
  5913.     Exit Sub
  5914. End Sub
  5915. '++LotusScript Development Environment:2:2:Queryclose:1:12
  5916. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  5917.     continue = confirmClose( source)
  5918. End Sub
  5919. '++LotusScript Development Environment:2:2:Postrecalc:1:12
  5920. Sub Postrecalc(Source As Notesuidocument)
  5921. End Sub
  5922. Lotus Product
  5923. OriginalService
  5924. OriginalService
  5925. DisplayDriverList
  5926. DisplayDriverList
  5927. Windows
  5928. Macintosh
  5929.     9S11S18S20SServiceType
  5930. DisplayDriverList
  5931. DefaultPassthruServer
  5932. tmpServerName
  5933. connectionwizard.gif|connectionwizard
  5934. LocationType
  5935.     0S0E
  5936.     Using Network Dialup
  5937.     This configures Notes to use Microsoft Dial-Up Networking to first connect to a remote access server on the Local Area Network and then a Domino server using standard network protocols. 
  5938.     You can also configure Notes to use Microsoft Dial-Up Networking via the Internet to connect Domino or other types of servers. If you have a Microsoft Dial-Up Networking connection already setup to connect to the Internet, you can use the same one.
  5939.     If some Domino servers must be accessed by other means, use a location type of 'Custom' and create a connection document for the type of connection needed.
  5940. ConnectChoice
  5941. Do you want to connect to the Internet?|1Do you want to connect to a remote access server on LAN? |2
  5942. ConnectChoice
  5943.     0S0E
  5944.     Which servers do you want to use this connection for?
  5945. ApplyToServer
  5946. Do you want this to apply to all servers ? | 1Do you want this to apply to a group of servers? |2Do you want this to apply to a specific server? |3
  5947. ConnectChoice
  5948. ApplyToServer
  5949.     Group of servers (ie. */Acme)
  5950. ServerGroup
  5951. ConnectChoice
  5952. ApplyToServer
  5953.     3S4S
  5954.     Server name
  5955. SpecificName
  5956.     Can you access your company's local area network via a passthru                                                   server on the Internet?
  5957.     If you don't know, ask your system administrator.
  5958. AccessLAN
  5959. Yes|1No|2
  5960.     Passthru server name 
  5961. actn019.gif
  5962. DefaultHotspot5
  5963. tmpservername
  5964. Passthru server name
  5965. If you want to change passthru server, please enter server name
  5966.     1S7S9S
  5967. DefaultPassthruServer
  5968. tmpservername
  5969.     0R1S
  5970. tmpServerName
  5971. servername
  5972.     Company's organization name used for Notes IDs 
  5973. DominoOrganizationName
  5974.     Hostname or IP address of the passthru server
  5975. PassthruServerHostName
  5976.     Choose a phonebook entry name from the following list or click
  5977.     the button to create a new one:
  5978. DUNList
  5979.     0S0E
  5980. DUNEntries
  5981. DUNList
  5982. '++LotusScript Development Environment:2:5:(Options):0:66
  5983. '++LotusScript Development Environment:2:5:(Forward):0:1
  5984. Declare Sub Click(Source As Button)
  5985. '++LotusScript Development Environment:2:5:(Declarations):0:2
  5986. '++LotusScript Development Environment:2:2:BindEvents:1:129
  5987. Private Sub BindEvents(Byval Objectname_ As String)
  5988.     Static Source As BUTTON
  5989.     Set Source = Bind(Objectname_)
  5990.     On Event Click From Source Call Click
  5991. End Sub
  5992. '++LotusScript Development Environment:2:2:Click:1:12
  5993. Sub Click(Source As Button)
  5994.     Dim ws As New NotesUIWorkspace    
  5995.     Dim vList As Variant
  5996.     Dim vphone As Variant
  5997.     Dim doc As NotesDocument
  5998.     Set uidoc=ws.CurrentDocument    
  5999.     Set doc = uidoc.document
  6000.     Call ws.Create_DialEntry_Dialog("RAS")
  6001.     'to update DUNEnties,  including and  highlighting  just created entry
  6002.     vList = ws.Get_DialEntry_List("RAS")    
  6003.     Call doc.replaceitemvalue("DUNList",vList)
  6004.     Call uidoc.Refresh
  6005.     Call doc.replaceitemvalue("DUNEntries", vList(Ubound(vList)))
  6006. 'to pull phone number for new entry
  6007.     vphone = ws.Get_DialEntry_Info("RAS", vList(Ubound(vList)))
  6008.     Call doc.replaceitemvalue("tmpPhoneNumber", vphone(0))
  6009.     Call doc.replaceitemvalue("tmpAreaCode", vphone(1))
  6010.     Call doc.replaceitemvalue("tmpCountryCode", vphone(2))
  6011. '    Call uidoc.Refresh
  6012. End Sub
  6013. Lotus Product
  6014. OBJECT
  6015. New Button
  6016. Need a newer version of Notes to execute this button.
  6017.     0S0E
  6018.     Create new...
  6019.     Make sure the following information is correct. You can make any necessary changes. You must supply your login name and password.
  6020.     Service type:
  6021. ServiceType
  6022. Microsoft Dial-Up Networking
  6023. ServiceType
  6024. Apple Talk Remote Access
  6025.     6S8S12S14S
  6026.     Select one:
  6027. PortsRAS
  6028.     0S0E
  6029. ConnectChoice
  6030.     0S0E
  6031.     Port:
  6032. ConnectChoice
  6033.     0S0E
  6034.     0S0E
  6035. PortInternet
  6036.     Hostname for destination server:
  6037. OptNetworkAddress
  6038.     Country code:
  6039. tmpCountryCode
  6040.     Area code:
  6041. tmpAreaCode
  6042.     Phone number:
  6043. tmpPhoneNumber
  6044.     Login name:
  6045. tmpLoginName
  6046.     Password:
  6047. tmpPassword
  6048. WizButtonHide
  6049.     <Previous
  6050. WizButtonHide
  6051. '++LotusScript Development Environment:2:5:(Options):0:66
  6052. '++LotusScript Development Environment:2:5:(Forward):0:1
  6053. Declare Sub Click(Source As Button)
  6054. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6055. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6056. Private Sub BindEvents(Byval Objectname_ As String)
  6057.     Static Source As BUTTON
  6058.     Set Source = Bind(Objectname_)
  6059.     On Event Click From Source Call Click
  6060. End Sub
  6061. '++LotusScript Development Environment:2:2:Click:1:12
  6062. Sub Click(Source As Button)
  6063.     wiz.previous
  6064. End Sub
  6065. Lotus Product
  6066. OBJECT
  6067. New Button
  6068. Need a newer version of Notes to execute this button.
  6069.     0S0E
  6070.     <Previous
  6071. WizButtonHide
  6072. finishH
  6073. '++LotusScript Development Environment:2:5:(Options):0:66
  6074. '++LotusScript Development Environment:2:5:(Forward):0:1
  6075. Declare Sub Click(Source As Button)    
  6076. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6077. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6078. Private Sub BindEvents(Byval Objectname_ As String)
  6079.     Static Source As BUTTON
  6080.     Set Source = Bind(Objectname_)
  6081.     On Event Click From Source Call Click
  6082. End Sub
  6083. '++LotusScript Development Environment:2:2:Click:1:12
  6084. Sub Click(Source As Button)    
  6085.     wiz.next
  6086. End Sub
  6087. Lotus Product
  6088. OBJECT
  6089. New Button
  6090. Need a newer version of Notes to execute this button.
  6091.     0S0E
  6092.        Next>  
  6093. WizButtonHide
  6094. finishH
  6095. '++LotusScript Development Environment:2:5:(Options):0:66
  6096. '++LotusScript Development Environment:2:5:(Forward):0:1
  6097. Declare Sub Click(Source As Button)
  6098. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6099. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6100. Private Sub BindEvents(Byval Objectname_ As String)
  6101.     Static Source As BUTTON
  6102.     Set Source = Bind(Objectname_)
  6103.     On Event Click From Source Call Click
  6104. End Sub
  6105. '++LotusScript Development Environment:2:2:Click:1:12
  6106. Sub Click(Source As Button)
  6107.     wiz.complete
  6108. End Sub
  6109. Lotus Product
  6110. OBJECT
  6111. New Button
  6112. Need a newer version of Notes to execute this button.
  6113.     0S0E
  6114.       Finish   
  6115.     0S0E
  6116.       Cancel  
  6117. O=Lotus Notes
  6118. O=Lotus Notes
  6119. PURSAFO
  6120. |.:#U
  6121. O=Lotus Notes
  6122. CN=Lotus Notes Template Development/O=Lotus Notes
  6123. PURSAFO
  6124. $INFO
  6125. $Script
  6126. $$Script_O
  6127. $$ScriptName
  6128. $$FormScript
  6129. $$$FormScript_O
  6130. $BODY
  6131. Lotus Product
  6132. ConnectionType
  6133.     1S2S
  6134. RAS$%^Remote connection name:
  6135. StaticTag
  6136. RLANItems
  6137.     Dial-Up Networking name:
  6138. RLANTag
  6139.     Login name:
  6140. RLAN1
  6141.     Password:
  6142. RLAN2
  6143.     Phone number:
  6144. RLAN3
  6145.     Area code:
  6146. RLAN4
  6147.     Country code:
  6148. RLAN5
  6149.     Dial-back phone number:
  6150. RLAN6
  6151. O=Lotus Notes
  6152. O=Lotus Notes
  6153. PURSAFO
  6154. |.:#U
  6155. O=Lotus Notes
  6156. CN=Lotus Notes Template Development/O=Lotus Notes
  6157. PURSAFO
  6158. $INFO
  6159. $$Script_O
  6160. $$ScriptName
  6161. RLANItems
  6162. $BODY
  6163. $GroupExtensibleSchema
  6164. O=Lotus Notes
  6165. O=Lotus Notes
  6166. PURSAFO
  6167. |.:#U
  6168. O=Lotus Notes
  6169. CN=Lotus Notes Template Development/O=Lotus Notes
  6170. PURSAFO
  6171. $INFO
  6172. $$ScriptName
  6173. $BODY
  6174. '++LotusScript Development Environment:2:5:(Options):0:74
  6175. Option Public
  6176. Option Declare
  6177. Use "Wizard"
  6178. Use "RLANRoutines"
  6179. '++LotusScript Development Environment:2:5:(Forward):0:1
  6180. Declare Class ConnectionWizard As Wizard
  6181. Declare Function RepeatedConnectionID(Destination As Variant)  As String
  6182. '++LotusScript Development Environment:2:5:(Declarations):0:10
  6183. Dim wiz As Wizard
  6184. Const xxstr1="Please enter the phone number for the server you want to dial."
  6185. Const xxstr2="Please enter the name of the server you want to dial."
  6186. Const xxstr3="Repeated connection"
  6187. Const xxstr4= "Configuration already exists. Do you want to create another one?"
  6188. Const xxstr5="An error has occurred creating the Notes Direct Dialup connection document. Please see your system administrator."
  6189. Const xxstr6="You have successfully created the connection document."
  6190. Class ConnectionWizard As Wizard
  6191.     Sub new( uidoc As NotesUIdocument, tableName As String, firstPanel As String)
  6192.     End Sub
  6193.     Function processNext( note As NotesDocument, currentPanel As String) As String
  6194.         If currentPanel = "a"  Then
  6195.             processNext="b"
  6196.         Elseif currentPanel="b" Then
  6197.             activateNextButton False
  6198.             processNext = "c"
  6199.         End If
  6200.     End Function
  6201.     Function processComplete( note As Notesdocument, currentPanel As String) As Integer
  6202.         On Error  Goto errhandle
  6203.         Dim w As New NotesUIWorkspace
  6204.         Dim s As New NotesSession
  6205.         Dim db As NotesDatabase
  6206.         Dim uidoc As NotesUIDocument
  6207.         Dim  doc As NotesDocument
  6208.         Dim  newdoc As NotesDocument
  6209.         Dim iLocationName As NotesItem
  6210.         Dim iLocationType As NotesItem
  6211.         Dim vlist As Variant
  6212.         Dim iphonenumber As NotesItem
  6213.         Dim iareacode As NotesItem
  6214.         Dim icountrycode As NotesItem
  6215.         Dim iservername As Notesitem
  6216.         Dim iSpecificServer As NotesItem
  6217.         Dim iAccessToServer As Notesitem        
  6218.         Dim success As Integer
  6219.         Set db=s.CurrentDatabase
  6220.         Set uidoc=w.CurrentDocument
  6221.         Set doc=uidoc.Document 
  6222.         Set iLocationType=doc.GetFirstItem("LocationType")
  6223.         Set iLocationName=doc.GetFirstItem("Name") 
  6224.         Set icountrycode=doc.GetFirstItem("tmpCountryCode")    
  6225.         Set iareacode=doc.GetFirstItem("tmpAreaCode")    
  6226.         Set iphonenumber=doc.GetFirstItem("tmpPhoneNumber")
  6227.         Set iServerName=doc.GetFirstItem("servername")
  6228.         Set iSpecificServer=doc.GetFirstItem("SpecificServer")
  6229.         Set iAccessToServer=doc.GetFirstItem("AccessToServer")
  6230.         If Len(iPhoneNumber.Text)=0 Then
  6231.             Msgbox xxstr1
  6232.             Exit Function
  6233.         End If
  6234.         If    Len(iSpecificServer.Text)=0 And  iAccessToServer.Text="2" Then
  6235.             Msgbox    xxstr2
  6236.             Exit Function        
  6237.         End If            
  6238. ' create Dialup connection
  6239.         Set newdoc=New NotesDocument(db) 
  6240.         Call newdoc.ReplaceItemValue("Form","Connection")
  6241.         Call newdoc.ReplaceItemValue("ConnectionType","1")
  6242.         If  iAccessToServer.Text="1" Then
  6243.             Call iserverName.CopyItemToDocument(newdoc,"Destination")  
  6244.         Else 
  6245.             Call iSpecificServer.CopyItemToDocument(newdoc,"Destination")  
  6246.         End If
  6247.         Call iLocationName.CopyItemToDocument(newdoc,"ConnectionLocation")
  6248.         Call icountrycode.CopyItemToDocument(newdoc,"Country")
  6249.         Call iareacode.CopyItemToDocument(newdoc,"AreaCodeInput")
  6250.         Call iphonenumber.CopyItemToDocument(newdoc,"LocalPhoneNumber")
  6251.         'Check for repeated connection
  6252.         Dim answer As Integer
  6253.         Dim docID As String
  6254.         Dim tmpdestination As String
  6255.         If iAccessToServer.text="1" Then
  6256.             tmpdestination=iServerName.Text
  6257.         Else
  6258.             tmpdestination=iSpecificServer.Text
  6259.         End If
  6260.         docID=RepeatedConnectionID(tmpdestination)
  6261.         If docID<>"not found" Then 
  6262.             answer=w.Prompt(prompt_yesno, xxstr3, xxstr4)
  6263.             If answer =0 Then
  6264.             '    Call uidoc.Close
  6265.                 Exit Function
  6266.             End If                
  6267. '            Else
  6268. 'create new connection
  6269.     '            End If    
  6270.         End If        
  6271.         success= newdoc.ComputeWithForm(False, False)         
  6272.         If success Then
  6273.             Call newdoc.save(True, True)
  6274.         Else
  6275.             Msgbox xxstr5  
  6276.             Exit Function            
  6277.         End If    
  6278. 'end create Dialup connection
  6279.         processComplete = True
  6280.         Msgbox xxstr6
  6281.         Exit Function    
  6282.         Call uidoc.Close
  6283. errhandle:
  6284.         Messagebox "Error: (" & Err & "): " & Error$
  6285.     End Function
  6286. End Class
  6287. '++LotusScript Development Environment:2:1:RepeatedConnectionID:1:8
  6288. Function RepeatedConnectionID(Destination As Variant)  As String
  6289.     Dim s As New NotesSession    
  6290.     Dim w As New NotesUIWorkspace
  6291.     Dim db As NotesDatabase
  6292.     Dim key(0) As String
  6293.     Dim view As NotesView
  6294.     Dim uidoc As NotesUIdocument
  6295.     Dim doc As NotesDocument
  6296.     Dim doc2 As NotesDocument
  6297.     Dim helpdoc As NotesDocument
  6298.     Dim connectiontype As String
  6299.     Dim locationtype As String
  6300.     Dim done As Integer
  6301.     RepeatedConnectionID="not found"
  6302.     Set db=s.CurrentDatabase
  6303.     Set uidoc=w.CurrentDocument
  6304.     Set doc=uidoc.Document
  6305.     Set view=db.GetView("($Connections)")
  6306.     done=False    
  6307.     key(0)=s.Username
  6308.     Set doc2=view.GetDocumentByKey(key,False)
  6309.     If doc2 Is Nothing Then Exit Function
  6310.     While Not done 
  6311.         If destination=doc2.ColumnValues(2) Then
  6312.             If doc2.ColumnValues(0)=key(0) Then 
  6313.                 RepeatedConnectionID=doc2.NoteID
  6314.                 Exit Function
  6315.             End If
  6316.         End If
  6317.         Set helpdoc=doc2
  6318.         Set doc2=view.GetNextDocument(helpdoc)
  6319.         If doc2 Is Nothing Then Exit Function
  6320.         If doc2.ColumnValues(0)<>key(0) Then done=True
  6321.     Wend
  6322. End Function
  6323. Lotus Product
  6324. ($NotesDirectDialup Wizard)'++LotusScript Development Environment:2:5:(Options):0:74
  6325. Option Declare
  6326. '++LotusScript Development Environment:2:5:(Forward):0:1
  6327. Declare Sub Postopen(Source As Notesuidocument)
  6328. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  6329. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  6330. Declare Sub Postrecalc(Source As Notesuidocument)
  6331. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6332. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6333. Private Sub BindEvents(Byval Objectname_ As String)
  6334.     Static Source As NOTESUIDOCUMENT
  6335.     Set Source = Bind(Objectname_)
  6336.     On Event Postopen From Source Call Postopen
  6337.     On Event Queryopen From Source Call Queryopen
  6338.     On Event Queryclose From Source Call Queryclose
  6339.     On Event Postrecalc From Source Call Postrecalc
  6340. End Sub
  6341. '++LotusScript Development Environment:2:2:Postopen:1:12
  6342. Sub Postopen(Source As Notesuidocument)
  6343. End Sub
  6344. '++LotusScript Development Environment:2:2:Queryopen:1:12
  6345. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  6346.     Dim firstPanel As String
  6347. 'Make sure to pass to first panel you want displayed
  6348.     firstPanel = "a"
  6349.     On Error  Goto errhandle
  6350.     Set wiz = New ConnectionWizard( source, "Wiz", "a")
  6351.     Exit Sub
  6352. errhandle:
  6353.     Messagebox "Err (" & Err & "): " & Error$    
  6354.     Exit Sub
  6355. End Sub
  6356. '++LotusScript Development Environment:2:2:Queryclose:1:12
  6357. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  6358.     continue = confirmClose( source)
  6359. End Sub
  6360. '++LotusScript Development Environment:2:2:Postrecalc:1:12
  6361. Sub Postrecalc(Source As Notesuidocument)
  6362. End Sub
  6363. Lotus Product
  6364. OriginalService
  6365. OriginalService
  6366. DisplayDriverList
  6367. DisplayDriverList
  6368. Windows
  6369. Macintosh
  6370.     9S11S18S20SServiceType
  6371. DisplayDriverList
  6372. DefaultPassthruServer
  6373. tmpServerName
  6374. connectionwizard.gif|connectionwizard
  6375.     Using Notes Direct Dialup
  6376.     This configures Notes to connect directly to a Domino server over a phone line using the Notes dialup protocol. Connections are made by default to a passthru server, which will connect you to the destination server.
  6377.     If you wish to have Notes dial a Domino server directly, rather than using passthru server, you can do this by using this Wizard to step you though creating the appropriate connection document.
  6378.     If some Domino servers must be accessed by other means, use a location type of 'Custom' and create a connection document for the type of connection needed.
  6379. AccessToServer
  6380. Do you want to access all servers through your passthru server? | 1Do you want to dial directly to a specific server? |2
  6381. AccessToServer
  6382.     0S0E
  6383.     Passthru server name
  6384. actn019.gif
  6385. DefaultHotspot5
  6386. tmpservername
  6387. Passthru server name
  6388. If you want to change passthru server, please enter server name:
  6389.     1S7S9S
  6390. DefaultPassthruServer
  6391. tmpservername
  6392.     0R1S
  6393. tmpServerName
  6394. servername
  6395. AccessToServer
  6396.     0S0E
  6397.     Direct dial to server: 
  6398. SpecificServer
  6399.     The area code and country code are optional, but should be supplied if you may be calling from outside your area.
  6400.     Country code:  
  6401. tmpCountryCode
  6402.     Area code:
  6403. tmpAreaCode
  6404.     Phone number: 
  6405. tmpPhoneNumber
  6406. WizButtonHide
  6407.     <Previous
  6408. WizButtonHide
  6409. '++LotusScript Development Environment:2:5:(Options):0:66
  6410. '++LotusScript Development Environment:2:5:(Forward):0:1
  6411. Declare Sub Click(Source As Button)
  6412. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6413. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6414. Private Sub BindEvents(Byval Objectname_ As String)
  6415.     Static Source As BUTTON
  6416.     Set Source = Bind(Objectname_)
  6417.     On Event Click From Source Call Click
  6418. End Sub
  6419. '++LotusScript Development Environment:2:2:Click:1:12
  6420. Sub Click(Source As Button)
  6421.     wiz.previous
  6422. End Sub
  6423. Lotus Product
  6424. OBJECT
  6425. New Button
  6426. Need a newer version of Notes to execute this button.
  6427.     0S0E
  6428.     <Previous
  6429. WizButtonHide
  6430. finishH
  6431. '++LotusScript Development Environment:2:5:(Options):0:66
  6432. '++LotusScript Development Environment:2:5:(Forward):0:1
  6433. Declare Sub Click(Source As Button)    
  6434. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6435. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6436. Private Sub BindEvents(Byval Objectname_ As String)
  6437.     Static Source As BUTTON
  6438.     Set Source = Bind(Objectname_)
  6439.     On Event Click From Source Call Click
  6440. End Sub
  6441. '++LotusScript Development Environment:2:2:Click:1:12
  6442. Sub Click(Source As Button)    
  6443.     wiz.next
  6444. End Sub
  6445. Lotus Product
  6446. V0.0S
  6447. New Button
  6448. Need a newer version of Notes to execute this button.
  6449.     0S0E
  6450.        Next>  
  6451. WizButtonHide
  6452. finishH
  6453. '++LotusScript Development Environment:2:5:(Options):0:66
  6454. '++LotusScript Development Environment:2:5:(Forward):0:1
  6455. Declare Sub Click(Source As Button)
  6456. '++LotusScript Development Environment:2:5:(Declarations):0:2
  6457. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6458. Private Sub BindEvents(Byval Objectname_ As String)
  6459.     Static Source As BUTTON
  6460.     Set Source = Bind(Objectname_)
  6461.     On Event Click From Source Call Click
  6462. End Sub
  6463. '++LotusScript Development Environment:2:2:Click:1:12
  6464. Sub Click(Source As Button)
  6465.     wiz.complete
  6466. End Sub
  6467. Lotus Product1
  6468. KV0.0,
  6469. New Button
  6470. Need a newer version of Notes to execute this button.
  6471.     0S0E
  6472.       Finish   
  6473.     0S0E
  6474.       Cancel  
  6475. O=Lotus Notes
  6476. O=Lotus Notes
  6477. PURSAFO
  6478. |.:#U
  6479. O=Lotus Notes
  6480. CN=Lotus Notes Template Development/O=Lotus Notes
  6481. PURSAFO
  6482. $INFO
  6483. $Script
  6484. $$Script_O
  6485. $$ScriptName
  6486. $$FormScript
  6487. $$$FormScript_O
  6488. $BODY
  6489. '++LotusScript Development Environment:2:5:(Options):0:74
  6490. Option Public
  6491. Option Declare
  6492. '++LotusScript Development Environment:2:5:(Forward):0:1
  6493. Declare Class StackContainer
  6494. '++LotusScript Development Environment:2:5:(Declarations):0:10
  6495. Class StackContainer
  6496.     Private Sub SetValue( Value1 As Variant, Value2 As Variant)
  6497.           'This allows you set value1 to value2's value or object reference
  6498.         If Isobject( Value2) Then
  6499.             Set Value1 = Value2
  6500.         Else
  6501.             Value1 = Value2
  6502.         End If                      
  6503.     End Sub
  6504.     Private valueArray() As Variant
  6505.     Private size As Long
  6506.     Property Get count As Long
  6507.         count = size
  6508.     End Property
  6509.     Sub push( value As Variant)
  6510.         Redim Preserve valueArray(size) As Variant
  6511.         setValue valueArray(size), value
  6512.         size = size + 1
  6513.     End Sub
  6514.     Function pop As Variant
  6515.         If size > 0 Then
  6516.             size = size -1
  6517.             If Isobject( valueArray(size)) Then
  6518.                 Set pop = valueArray( size)
  6519.             Else
  6520.                 pop = valueArray( size)
  6521.             End If
  6522.             If size = 0 Then
  6523.                 Erase valuearray
  6524.             Else
  6525.                 Redim Preserve valueArray( size -1) As Variant
  6526.             End If
  6527.         End If
  6528.     End Function
  6529.     Function array As Variant
  6530.         If size > 0 Then
  6531.             Redim newarray( size - 1) As Variant
  6532.             Dim count As Long
  6533.             For count = 0 To size -1
  6534.                 newArray(size - count - 1) = valueArray( count)
  6535.             Next
  6536.             array = newArray
  6537.         End If
  6538.     End Function
  6539.     Function reverseArray As Variant
  6540.         If size > 0 Then
  6541.             Redim newarray( size - 1) As Variant
  6542.             Dim count As Long
  6543.             For count = 0 To size -1
  6544.                 newArray(count) = valueArray( count)
  6545.             Next
  6546.             reverseArray = newArray
  6547.         End If
  6548.     End Function
  6549.     Function peek As Variant
  6550.         If size > 0 Then
  6551.             If Isobject( valueArray( size -1)) Then
  6552.                 Set peek = valueArray( size - 1)
  6553.             Else
  6554.                 peek = valueArray( size - 1)
  6555.             End If
  6556.         End If
  6557.     End Function
  6558. End Class
  6559. Lotus Product
  6560. O=Lotus Notes
  6561. O=Lotus Notes
  6562. PURSAFO
  6563. |.:#U
  6564. O=Lotus Notes
  6565. CN=Lotus Notes Template Development/O=Lotus Notes
  6566. PURSAFO
  6567. $ScriptLib
  6568. $ScriptLib_O
  6569. $TITLE
  6570. $Flags
  6571. $PublicAccess
  6572. '++LotusScript Development Environment:2:5:(Options):0:74
  6573. Option Public
  6574. Option Declare
  6575. %INCLUDE "lsxuierr.lss"
  6576. Use "StackContainer"
  6577. '++LotusScript Development Environment:2:5:(Forward):0:1
  6578. Declare Class Wizard
  6579. Declare Class SimpleWizard As Wizard
  6580. Declare Class Wiz
  6581. Declare Sub Terminate
  6582. Declare Function confirmClose( source As NotesUIDocument) As Integer
  6583. '++LotusScript Development Environment:2:5:(Declarations):0:10
  6584. Const WIZ_CANCEL_CONFIRM_MESSAGE = "The wizard has not completed yet.  Are you sure you want to cancel?"
  6585. Const WIZ_CANCEL_CONFIRM_TITLE = "Cancel"
  6586. Const WIZ_BUTTON_HIDE_FIELD = "WizButtonHide"
  6587. Const WIZ_SHOW_PRE_NEXT = "prenext"
  6588. Const WIZ_SHOW_PRE_DONE = "prefinish"
  6589. Const WIZ_SHOW_NEXT = "next"
  6590. Const WIZ_SHOW_DONE = "done"
  6591. Const WIZ_NEXT_PANEL_FIELD = "WizNext"
  6592. Const WIZ_PROCESS_NEXT_ERROR = 5000
  6593. Class Wizard
  6594.     Private tableName As String
  6595.     Private previousPanels As StackContainer 
  6596.     Private uidoc As NotesUIDocument
  6597.     Private note As NotesDocument
  6598.     Property Get currentPanel As String
  6599.         currentPanel = note.getItemValue( tableName)(0)
  6600.     End Property
  6601.     Sub new( uidoc As NotesUIdocument, tableName As String, firstPanel As String)
  6602.         Me.tableName = "$" + tableName
  6603.         Set previousPanels = New StackContainer
  6604.         Set Me.uidoc = uidoc
  6605.         Set note = uidoc.document
  6606.         note.replaceItemValue Me.tableName, firstPanel
  6607.     End Sub
  6608.     Sub refreshHideFormulas
  6609.         '**This method just refreshes the hide-when formulas for the current wizard doc
  6610.         uidoc.refreshHideFormulas
  6611.     End Sub
  6612.     Sub activatePreviousButton( bActivate As Integer)
  6613.         '**This method will set the appropriate field so the previous button will activate or deactivate.  The method 
  6614.         '**refreshHideFormulas must be invoked after this method to display the activated button 
  6615.         If bActivate Then
  6616.             Select Case note.getItemValue( WIZ_BUTTON_HIDE_FIELD)(0)
  6617.             Case WIZ_SHOW_DONE:
  6618.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_PRE_DONE
  6619.             Case WIZ_SHOW_NEXT:
  6620.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_PRE_NEXT
  6621.             Case ""
  6622.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_PRE_NEXT        
  6623.             End Select    
  6624.         Else
  6625.             Select Case note.getItemValue( WIZ_BUTTON_HIDE_FIELD)(0)
  6626.             Case WIZ_SHOW_PRE_DONE:
  6627.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_DONE
  6628.             Case WIZ_SHOW_PRE_NEXT:
  6629.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_NEXT
  6630.             End Select
  6631.         End If
  6632.     End Sub
  6633.     Sub activateNextButton( bActivate As Integer)
  6634.         '**This method will set the appropriate field so the next button will activate or deactivate.  If the 
  6635.         '**next button is deactivated, the finish button will be activated.  The method 
  6636.         '**refreshHideFormulas must be invoked after this method to display the appropriate  button 
  6637.         If bActivate Then
  6638.             Select Case note.getItemValue( WIZ_BUTTON_HIDE_FIELD)(0)
  6639.             Case WIZ_SHOW_PRE_DONE:
  6640.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_PRE_NEXT
  6641.             Case WIZ_SHOW_PRE_NEXT:
  6642.                 ' do nothing
  6643.             Case WIZ_SHOW_NEXT:
  6644.                 ' do nothing
  6645.             Case Else
  6646.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_NEXT        
  6647.             End Select    
  6648.         Else            
  6649.             Select Case note.getItemValue( WIZ_BUTTON_HIDE_FIELD)(0)
  6650.             Case WIZ_SHOW_PRE_NEXT:
  6651.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_PRE_DONE
  6652.             Case Else
  6653.                 note.replaceItemValue WIZ_BUTTON_HIDE_FIELD, WIZ_SHOW_DONE
  6654.             End Select
  6655.         End If
  6656.     End Sub
  6657.     Private Sub switchToPanel( panel As String)
  6658.         Call note.replaceItemValue( tableName, panel)
  6659.         uidoc.reload
  6660.         uidoc.refreshHideFormulas
  6661.     End Sub
  6662.     Public Sub next
  6663.         '** This method is called when you wish to advance to the next panel
  6664.         '** The next panel is determined by the processNext method, which can be overridden
  6665.         '** to enable custom behaviour
  6666.         'On Error lsERR_LSXUI_NOTES_ERROR Goto validateErr
  6667.         'On Error WIZ_PROCESS_NEXT_ERROR Goto validateErr
  6668.         'The above code used to catch only validation errors and 
  6669.         'errors thrown by the processNext method
  6670.         'It doesn't catch the validation errors for some reason
  6671.         'so now it catches all errors instead
  6672.         On Error  Goto validateErr
  6673.         uidoc.refresh
  6674.         Call previousPanels.push( note.getItemValue(tableName)(0))
  6675.         activatePreviousButton True
  6676.         Call switchToPanel( processNext( note, previousPanels.peek))
  6677. exitProc:
  6678.         Exit Sub
  6679. validateErr:
  6680.         'Do nothing, we just wanted to catch a validation error
  6681.         Resume exitProc
  6682.     End Sub
  6683.     Public Sub previous
  6684.         '** this method is called when you wish go back to the previous panel.  You can use
  6685.         '** the processPrevious method for custom processing or to override what the default
  6686.         '** previous panel is.
  6687.         Dim tempPrevious As String
  6688.         If previousPanels.count > 0 Then
  6689.             activateNextButton True
  6690.             If previousPanels.count = 1 Then
  6691.                 activatePreviousButton False
  6692.             End If
  6693.             tempPrevious = processPrevious( note, note.getItemValue( tableName)(0))
  6694.             If Len( tempPrevious) = 0 Then
  6695.                 switchToPanel previousPanels.pop
  6696.             Else
  6697.                 previousPanels.pop
  6698.                 switchToPanel tempPrevious
  6699.             End If
  6700.         End If
  6701.     End Sub
  6702.     Public Function processNext( note As Notesdocument, currentPanel As String) As String
  6703.         '** This method is used to determine what panel gets displayed next.
  6704.         '** It's default behavior is to return the value in the field WizNext.
  6705.         '** This method can be overridden to provide whatever logic you want and to do custom processing.
  6706.         '** .
  6707.         '** If for some reason you cannot continue to the next panel, then you can throw the 
  6708.         '** error WIZ_PROCESS_NEXT_ERROR, which stop the code from trying to goto the next panel
  6709.         '** You will probably want to display some message to the user when doing this as the existing code
  6710.         '** will not.
  6711.         processNext = note.getItemValue( WIZ_NEXT_PANEL_FIELD )(0)
  6712.     End Function
  6713.     Public Function processPrevious( note As Notesdocument, currentPanel As String) As String
  6714.         '** This method is used to determine what panel displayedwhen previous is called.
  6715.         '** It's default behavior is to return a null string ( "" ), so that last panel shown is what is displayed.
  6716.         '** This method can be overridden to provide whatever logic you want and to do custom processing.
  6717.     End Function
  6718.     Public Sub complete
  6719.         '**This method is called when the wizard should complete.  To provide custom behaviors, 
  6720.         '**override the processComplete method.
  6721.         On Error lsERR_LSXUI_NOTES_ERROR Goto validateErr
  6722.         uidoc.refresh
  6723.         If processComplete( note, note.getItemValue( tableName)(0)) Then
  6724.             Dim ws As New NotesUIWorkspace
  6725.             Dim tempItem As NotesItem
  6726.         'clean up wizard specific fields
  6727.             Set tempItem = note.getFirstItem( tableName)
  6728.             If Not tempItem Is Nothing Then
  6729.                 tempItem.values = ""
  6730.                 tempItem.saveToDisk = False
  6731.             End If
  6732.             Set tempItem = note.getFirstItem( WIZ_NEXT_PANEL_FIELD)
  6733.             If Not tempItem Is Nothing Then
  6734.                 tempItem.values = ""
  6735.                 tempItem.saveToDisk = False
  6736.             End If
  6737.             Set tempItem = note.getFirstItem( WIZ_BUTTON_HIDE_FIELD)
  6738.             If Not tempItem Is Nothing Then
  6739.                 tempItem.values = ""
  6740.                 tempItem.saveToDisk = False
  6741.             End If
  6742.             ws.refreshParentNote
  6743.             uidoc.close
  6744.         End If
  6745. exitProc:
  6746.         Exit Sub
  6747. validateErr:
  6748.         'Do nothing, we just wanted to catch a validation error
  6749.         Resume exitProc
  6750.     End Sub
  6751.     Function processComplete( note As Notesdocument, currentPanel As String) As Integer
  6752.         '** Override the method to provide custom behaviour when the complete method is invoked
  6753.         '** To abort the completion, return false, otherwise return true
  6754.         processComplete = True
  6755.     End Function
  6756. End Class
  6757. Class SimpleWizard As Wizard
  6758.     panels As Variant
  6759.     currentPanelNum As Integer
  6760.     Sub new( uidoc As NotesUIDocument, tableName As String, panels() As String), Wizard( uidoc, tableName, panels(Lbound(panels)))
  6761.         Me.panels = panels
  6762.         currentPanelNum = Lbound(panels)
  6763.     End Sub
  6764.     Private Function processNext( note As Notesdocument, currentPanel As String) As String
  6765.         If currentPanelNum < Ubound(panels) Then
  6766.             If currentPanelNum = Ubound(panels) - 1Then
  6767.                 activateNextButton( False)
  6768.             Else
  6769.                 activateNextButton( True)
  6770.             End If
  6771.             currentPanelNum = currentPanelNum + 1
  6772.             processNext = panels(currentPanelNum)
  6773.         End If
  6774.     End Function
  6775.     Private Function processPrevious( note As Notesdocument, currentPanel As String) As String
  6776.         currentPanelNum = currentPanelNum - 1
  6777.     End Function
  6778. End Class
  6779. Class Wiz
  6780.     '** This class acts a wrapper for launching Wizards
  6781.     Private workspace As NotesUIWorkSpace
  6782.     Private strWizardForm As String
  6783.     Public wizNote As NotesDocument
  6784.     Private strWindowTitle As String
  6785.     Sub new( strWizardForm As String, strWindowTitle As String)
  6786.         Set workspace = New NotesUIWorkSpace
  6787.         Dim session As New NotesSession
  6788.         Dim db As NotesDatabase
  6789.         Set db = session.currentDatabase
  6790.         Me.strWizardForm = strWizardForm
  6791.         Set Me.wizNote = db.createDocument
  6792.         Me.strWindowTitle = strWindowTitle
  6793.     End Sub
  6794.     Function launch As Integer
  6795.         Dim continue As Integer
  6796.         continue = True
  6797.         preLaunch wizNote, continue
  6798.         If continue Then
  6799.             launch = workspace.dialogBox( strWizardForm, True, True, True, False, False, False, strWindowTitle, wizNote, True, True)
  6800.             postLaunch wizNote, (launch)
  6801.         Else
  6802.             launch = False
  6803.         End If
  6804.     End Function
  6805.     Sub preLaunch( wizNote As NotesDocument, continue As Integer)
  6806.         '** This gets called right before the wizard is launched
  6807.         '** set the continue var to false to stop the wizard from launching
  6808.         '** This is meant to be overridden with a sub class method
  6809.     End Sub
  6810.     Sub postLaunch( wizNote As NotesDocument, exitStatus As Integer)
  6811.         '** This gets called right after the wizard is launched
  6812.         '** The exitStatus var will be false if the wizard termintated successfully
  6813.         '** This is meant to be overridden with a sub class method    
  6814.     End Sub
  6815. End Class
  6816. '++LotusScript Development Environment:2:2:Terminate:1:10
  6817. Sub Terminate
  6818. End Sub
  6819. '++LotusScript Development Environment:2:1:confirmClose:1:8
  6820. Function confirmClose( source As NotesUIDocument) As Integer
  6821.     confirmClose = True
  6822.     If source.Dialogboxcanceled Then
  6823.         If Messagebox( WIZ_CANCEL_CONFIRM_MESSAGE , 4 + 32 + 256, WIZ_CANCEL_CONFIRM_TITLE) = 7 Then
  6824.             confirmClose = False
  6825.         End If
  6826.     End If
  6827. End Function
  6828. Lotus Product
  6829. V0.0Y
  6830. O=Lotus Notes
  6831. O=Lotus Notes
  6832. PURSAFO
  6833. |.:#U
  6834. O=Lotus Notes
  6835. CN=Lotus Notes Template Development/O=Lotus Notes
  6836. PURSAFO
  6837. &}=[CmD
  6838. $TITLE
  6839. $Flags
  6840. $PublicAccess
  6841. $ScriptLib
  6842. $ScriptLib_O
  6843. Tools...\Create Group
  6844. '++LotusScript Development Environment:2:5:(Options):0:66
  6845. '++LotusScript Development Environment:2:5:(Forward):0:1
  6846. Declare Sub Click(Source As Button)
  6847. Declare Function GetFullName() As String
  6848. '++LotusScript Development Environment:2:5:(Declarations):0:10
  6849. Dim ws As NotesUIWorkspace
  6850. Dim session As NotesSession
  6851. Dim db As NotesDatabase
  6852. Dim note As NotesDocument
  6853. Dim groupnote As NotesDocument
  6854. Dim collection As NotesDocumentCollection
  6855. Dim Names() As String
  6856. Dim counter As Integer
  6857. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6858. Private Sub BindEvents(Byval Objectname_ As String)
  6859.     Static Source As BUTTON
  6860.     Set Source = Bind(Objectname_)
  6861.     On Event Click From Source Call Click
  6862. End Sub
  6863. '++LotusScript Development Environment:2:2:Click:1:12
  6864. Sub Click(Source As Button)
  6865.     Set ws = New NotesUIWorkspace
  6866.     Set session = New NotesSession
  6867.     Set db = session.CurrentDatabase
  6868.     counter = 0
  6869.     Set collection = db.UnprocessedDocuments
  6870.     If (collection.Count = 0) Then
  6871.         Messagebox "No documents were selected.",0,"Error"
  6872.         Exit Sub
  6873.     End If
  6874.     Redim Names(collection.Count-1)
  6875. 'for each document in the collection, get the first value of FullName
  6876. 'we use the GetNth method since the resulting collection is an IDTable
  6877.     For x = 1 To collection.Count
  6878.         Set note = collection.GetNthDocument(x)
  6879.         Names(counter) = GetFullName
  6880.         counter = counter + 1
  6881.     Next
  6882.     Set groupnote = New NotesDocument(db)
  6883.     groupnote.Members = Names
  6884.     groupnote.Form = "Group"
  6885.     groupnote.Type = "Group"
  6886.     Call ws.EditDocument(True,groupnote)
  6887. End Sub
  6888. '++LotusScript Development Environment:2:1:GetFullName:1:8
  6889. Function GetFullName() As String
  6890.     If note.FullName(0) <> "" Then
  6891.         GetFullName = note.FullName(0)
  6892.     Else
  6893.         GetFullName= note.LastName(0)
  6894.     End If
  6895. End Function
  6896. Tools...\Preferences...K4
  6897. DirectoryProfile
  6898.     0S0E
  6899. Write Memo
  6900. Error
  6901. You must use Notes 4.6 or above to use this action.
  6902. (CreateMailMemo)
  6903.     6S7S9S
  6904. Schedule Meeting
  6905. Error
  6906. You must use Notes 4.6 or above to use this action.
  6907. (ScheduleMeeting)
  6908.     6S7S9S
  6909. Tools...\Create Group
  6910. '++LotusScript Development Environment:2:5:(Options):0:66
  6911. '++LotusScript Development Environment:2:5:(Forward):0:1
  6912. Declare Sub Click(Source As Button)
  6913. Declare Function GetFullName() As String
  6914. '++LotusScript Development Environment:2:5:(Declarations):0:10
  6915. Dim ws As NotesUIWorkspace
  6916. Dim session As NotesSession
  6917. Dim db As NotesDatabase
  6918. Dim note As NotesDocument
  6919. Dim groupnote As NotesDocument
  6920. Dim collection As NotesDocumentCollection
  6921. Dim Names() As String
  6922. Dim counter As Integer
  6923. '++LotusScript Development Environment:2:2:BindEvents:1:129
  6924. Private Sub BindEvents(Byval Objectname_ As String)
  6925.     Static Source As BUTTON
  6926.     Set Source = Bind(Objectname_)
  6927.     On Event Click From Source Call Click
  6928. End Sub
  6929. '++LotusScript Development Environment:2:2:Click:1:12
  6930. Sub Click(Source As Button)
  6931.     Set ws = New NotesUIWorkspace
  6932.     Set session = New NotesSession
  6933.     Set db = session.CurrentDatabase
  6934.     counter = 0
  6935.     Set collection = db.UnprocessedDocuments
  6936.     If (collection.Count = 0) Then
  6937.         Messagebox "No documents were selected.",0,"Error"
  6938.         Exit Sub
  6939.     End If
  6940.     Redim Names(collection.Count-1)
  6941. 'for each document in the collection, get the first value of FullName
  6942. 'we use the GetNth method since the resulting collection is an IDTable
  6943.     For x = 1 To collection.Count
  6944.         Set note = collection.GetNthDocument(x)
  6945.         Names(counter) = GetFullName
  6946.         counter = counter + 1
  6947.     Next
  6948.     Set groupnote = New NotesDocument(db)
  6949.     groupnote.Members = Names
  6950.     groupnote.Form = "Group"
  6951.     groupnote.Type = "Group"
  6952.     Call ws.EditDocument(True,groupnote)
  6953. End Sub
  6954. '++LotusScript Development Environment:2:1:GetFullName:1:8
  6955. Function GetFullName() As String
  6956.     If note.FullName(0) <> "" Then
  6957.         GetFullName = note.FullName(0)
  6958.     Else
  6959.         GetFullName= note.LastName(0)
  6960.     End If
  6961. End Function
  6962. Tools...\Preferences...K4
  6963. DirectoryProfile
  6964.     0S0E
  6965. Write Memo
  6966. Error
  6967. You must use Notes 4.6 or above to use this action.
  6968. (CreateMailMemo)
  6969.     6S7S9S
  6970. Schedule Meeting
  6971. Error
  6972. You must use Notes 4.6 or above to use this action.
  6973. (ScheduleMeeting)
  6974.     6S7S9S
  6975. O=Lotus Notes
  6976. O=Lotus Notes
  6977. PURSAFO
  6978. |.:#U
  6979. O=Lotus Notes
  6980. CN=Lotus Notes Template Development/O=Lotus Notes
  6981. PURSAFO
  6982. `p@<C
  6983. $INFO
  6984. $BODY
  6985. $V5ACTIONS
  6986. $ACTIONS
  6987. 505Accountldapbiz.infospace.com5*
  6988. Px@010001AccountCN=Rob Slapikoff/O=IrisInfoSpace Business0SentDrafts
  6989. CN=Rob Slapikoff/O=Iris#############################################
  6990. 505Accountldap.switchboard.com5*
  6991. Px@010001AccountCN=Rob Slapikoff/O=IrisSwitchBoard0SentDrafts
  6992. CN=Rob Slapikoff/O=Iris#####################################################
  6993. 505Accountdirectory.verisign.com5*
  6994. Y@NULL00
  6995. Px@010001AccountCN=Rob Slapikoff/O=IrisVerisign0SentDrafts
  6996. CN=Rob Slapikoff/O=Iris##################################################
  6997. 505Accountldap.whowhere.com5*
  6998. Px@010001AccountCN=Rob Slapikoff/O=IrisWhoWhere0SentDrafts
  6999. CN=Rob Slapikoff/O=Iris
  7000. ##########################################################
  7001. 505Accountldap.yahoo.com5*
  7002. Px@010001AccountCN=Rob Slapikoff/O=IrisYahoo! People Search0SentDrafts
  7003. CN=Rob Slapikoff/O=Iris##################################################
  7004. Group0You should add all Notes servers in other domains with which you commonly replicate to this group.  Many databases give servers in this group Designer access.  These servers generally have replicas of most or all of the databases in your domain, but each replica does not necessarily have the same Access Control List.1[GroupModifier]0OtherDomainServersGroup
  7005. Debbie BrancoCN=Rob Slapikoff/O=Iris
  7006. Group0You should add all Notes servers in your domain to this group.  Many databases give servers in this group Manager access.  These servers generally have replicas of most or all of the databases in your domain.1[GroupModifier]0LocalDomainServersGroup
  7007. Debbie BrancoCN=Rob Slapikoff/O=Iris
  7008. ########
  7009. 09008602 G001E76A C18A01G0 2A03G002
  7010. 4002G001 40023082 023C3082 01A50210
  7011. 325033CF 50D156F3 5C81AD65 5C4FC825
  7012. 300D0609 2A864886 F70D0101 02050030
  7013. 5F310B30 09060355 04061302 55533117
  7014. 30150603 55040A13 0E566572 69536967
  7015. 6E2C2049 6E632E31 37303506 0355040B
  7016. 132E436C 61737320 31205075 626C6963
  7017. 20507269 6D617279 20436572 74696669
  7018. 63617469 6F6E2041 7574686F 72697479
  7019. 301E170D 39363031 32393030 30303030
  7020. 5A170D32 30303130 37323335 3935395A
  7021. 305F310B 30090603 55040613 02555331
  7022. 17301506 0355040A 130E5665 72695369
  7023. 676E2C20 496E632E 31373035 06035504
  7024. 0B132E43 6C617373 20312050 75626C69
  7025. 63205072 696D6172 79204365 72746966
  7026. 69636174 696F6E20 41757468 6F726974
  7027. 7930819F 300D0609 2A864886 F70D0101
  7028. 01050003 818D0030 81890281 8100E519
  7029. BF6DA356 612D9948 71F667DE B98DEBB7
  7030. 9E86800A 910EFA38 25AF4688 82E573A8
  7031. A09B245D 0D1FCC65 6E0CB0D0 56841887
  7032. 9A069B10 A173DFB4 58396B6E C1F615D5
  7033. A8A83FAA 12068D31 AC7FB034 D78F3467
  7034. 8809CD14 11E24E45 56691F78 0280DADC
  7035. 479129BB 36C9635C C5E0D72D 877BA1B7
  7036. 32B07B30 BA2A2F31 AAEEA367 DADB0203
  7037. 01000130 0D06092A 864886F7 0D010102
  7038. 05000381 81004B44 66606864 E4981BF3
  7039. B072E695 897CDD7B B395C01D 2ED8D819
  7040. D02D343D C6509A10 868CAA3F 3BA804FC
  7041. 375295C3 D9C9DBCD F28606C4 B11BF082
  7042. 8830428E 17501C64 7AB83E99 497497FC
  7043. AC0243FB 960C5604 250C7C7C 879D24A7
  7044. D8F03229 B5A4DF5D A24CC516 32A842F6
  7045. 45A6B636 B9E0BF65 3693C2D2 D76BDCDE
  7046. 59D6A235 F845O=VeriSign, Inc./C=US:O=VeriSign, Inc./C=US1Certifier/OU=Class 1 Public Primary Certification Authority/O=VeriSign, Inc./C=US/OU=Class 1 Public Primary Certification Authority/O=VeriSign, Inc./C=USCertifier[NetModifier]1OU=Class 1 Public Primary Certification Authority/O=VeriSign, Inc./C=US
  7047. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris#############################
  7048. 09008702 G001E622 B4DB01G0 2A03G002
  7049. 4102G001 41023082 023D3082 01A60211
  7050. 00BA5AC9 4C053B92 D6A7B6DF 4ED05392
  7051. 0D300D06 092A8648 86F70D01 01020500
  7052. 305F310B 30090603 55040613 02555331
  7053. 17301506 0355040A 130E5665 72695369
  7054. 676E2C20 496E632E 31373035 06035504
  7055. 0B132E43 6C617373 20322050 75626C69
  7056. 63205072 696D6172 79204365 72746966
  7057. 69636174 696F6E20 41757468 6F726974
  7058. 79301E17 0D393630 31323930 30303030
  7059. 305A170D 30343031 30373233 35393539
  7060. 5A305F31 0B300906 03550406 13025553
  7061. 31173015 06035504 0A130E56 65726953
  7062. 69676E2C 20496E63 2E313730 35060355
  7063. 040B132E 436C6173 73203220 5075626C
  7064. 69632050 72696D61 72792043 65727469
  7065. 66696361 74696F6E 20417574 686F7269
  7066. 74793081 9F300D06 092A8648 86F70D01
  7067. 01010500 03818D00 30818902 818100B6
  7068. 5A8BA30D 6A238380 6BCF3987 F4211333
  7069. 064C25A2 ED551297 C5A780B9 FA83C120
  7070. A0FA2F15 0D7CA160 6B7E792C FA060F3A
  7071. AEF61B6F B1D2FF2F 28525F83 7D4BC47A
  7072. B7F8661F 8054FCB7 C28E594A 145746D1
  7073. 9A93BE41 9103BB15 80935CEB E7CC086C
  7074. 3F3EB34A FCFF4B6C 23D55082 2644198E
  7075. 23C371EA 19244704 9E75BFC8 A6001F02
  7076. 03010001 300D0609 2A864886 F70D0101
  7077. 02050003 818100B6 001F9357 A407A740
  7078. CE65403F 555EEDEF FA5449A5 30D6217C
  7079. 6187EE83 930BBFB4 33F298AC 9F06BF4E
  7080. A8CE1481 4CCB044E 58C3CF5F EE7CD79A
  7081. 6FCB418A B77F81B8 FF8461C6 2743651D
  7082. 0CECB100 0ADD1BA4 BBC77820 28B2A2DD
  7083. 36952EE1 544FBF60 B9776811 9923E8EA
  7084. 52E8AA00 4E674EBB 90B5459B 46EB8E16
  7085. EFC4335B 333DD5O=VeriSign, Inc./C=US:O=VeriSign, Inc./C=US1Certifier/OU=Class 2 Public Primary Certification Authority/O=VeriSign, Inc./C=US/OU=Class 2 Public Primary Certification Authority/O=VeriSign, Inc./C=USCertifier[NetModifier]1OU=Class 2 Public Primary Certification Authority/O=VeriSign, Inc./C=US
  7086. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris###########################
  7087. 09008702 G00124DF C3BB01G0 2A03G002
  7088. 4102G001 41023082 023D3082 01A60211
  7089. 00E49EFD F33AE80E CFA5113E 19A42402
  7090. 32300D06 092A8648 86F70D01 01020500
  7091. 305F310B 30090603 55040613 02555331
  7092. 17301506 0355040A 130E5665 72695369
  7093. 676E2C20 496E632E 31373035 06035504
  7094. 0B132E43 6C617373 20332050 75626C69
  7095. 63205072 696D6172 79204365 72746966
  7096. 69636174 696F6E20 41757468 6F726974
  7097. 79301E17 0D393630 31323930 30303030
  7098. 305A170D 30343031 30373233 35393539
  7099. 5A305F31 0B300906 03550406 13025553
  7100. 31173015 06035504 0A130E56 65726953
  7101. 69676E2C 20496E63 2E313730 35060355
  7102. 040B132E 436C6173 73203320 5075626C
  7103. 69632050 72696D61 72792043 65727469
  7104. 66696361 74696F6E 20417574 686F7269
  7105. 74793081 9F300D06 092A8648 86F70D01
  7106. 01010500 03818D00 30818902 818100C9
  7107. 5C599EF2 1B8A0114 B410DF04 40DBE357
  7108. AF6A4540 8F840C0B D133D9D9 11CFEE02
  7109. 581F25F7 2AA84405 AAEC031F 787F9E93
  7110. B99A00AA 237DD6AC 85A26345 C77227CC
  7111. F44CC675 71D239EF 4F42F075 DF0A90C6
  7112. 8E206F98 0FF8AC23 5F702936 A4C986E7
  7113. B19A20CB 53A585E7 3DBE7D9A FE244533
  7114. DC7615ED 0FA27164 4C652E81 6845A702
  7115. 03010001 300D0609 2A864886 F70D0101
  7116. 02050003 81810061 70EC2F3F 9EFD2BE6
  7117. 685421B0 6779080C 2096318A 0D7ABEB6
  7118. 26DF792C 22694936 E3977762 61A232D7
  7119. 7A542136 BA02C934 E725DA44 35B0D25C
  7120. 805DB394 F8F9ACEE A460752A 1F954923
  7121. B14A7CF4 B3477221 5B7E97AB 54AC62E7
  7122. 5DECAE9B D2C9B224 FB82ADE9 67154BBA
  7123. AAA6F097 A0F6B097 5700C80C 3C09A082
  7124. 04BA41DA F799A4O=VeriSign, Inc./C=US:O=VeriSign, Inc./C=US1Certifier/OU=Class 3 Public Primary Certification Authority/O=VeriSign, Inc./C=US/OU=Class 3 Public Primary Certification Authority/O=VeriSign, Inc./C=USCertifier[NetModifier]1OU=Class 3 Public Primary Certification Authority/O=VeriSign, Inc./C=US
  7125. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris###########################
  7126. 09007C02 G001158C 0C7B01G0 2A03G002
  7127. 3602G001 36023082 02313082 019A0205
  7128. 02A6G001 01300D06 092A8648 86F70D01
  7129. 01020500 305F310B 30090603 55040613
  7130. 02555331 17301506 0355040A 130E5665
  7131. 72695369 676E2C20 496E632E 31373035
  7132. 06035504 0B132E43 6C617373 20342050
  7133. 75626C69 63205072 696D6172 79204365
  7134. 72746966 69636174 696F6E20 41757468
  7135. 6F726974 79301E17 0D393630 31323930
  7136. 30303030 305A170D 39393132 33313233
  7137. 35393539 5A305F31 0B300906 03550406
  7138. 13025553 31173015 06035504 0A130E56
  7139. 65726953 69676E2C 20496E63 2E313730
  7140. 35060355 040B132E 436C6173 73203420
  7141. 5075626C 69632050 72696D61 72792043
  7142. 65727469 66696361 74696F6E 20417574
  7143. 686F7269 74793081 9F300D06 092A8648
  7144. 86F70D01 01010500 03818D00 30818902
  7145. 818100D0 B275F678 D0AE5A50 F4E950A9
  7146. 9F8CD7EF 919470E8 D2249076 8985D6DF
  7147. ACE60117 3280F09D 9347BC9A 659D1F97
  7148. AEBFE986 75632089 BD80589D 040C9DA8
  7149. C124E90B E53178BD FC2D0C37 6A9E7880
  7150. E94675F9 EDA3FB13 7BC8C14C D2A3EFF5
  7151. 3CB0628F 4A5D3BDD 95678F13 B9C13CD6
  7152. A7269BEC C33B7AD9 4DBC6D9B E81501E3
  7153. F047A902 03010001 300D0609 2A864886
  7154. F70D0101 02050003 81810053 DDD3F09C
  7155. 247E40AA E2FC001A D7DA0CFC 3261B815
  7156. 0D96F3FA 571B7F33 7CAFE998 9A61C87A
  7157. B3B7FFB1 DC9983DC AC12FC70 C91F3842
  7158. ED44F680 2E5B6B33 69AC9CD3 5CE75F5A
  7159. 18C7B12D 79049641 919941B1 3C0DBA84
  7160. 39C63B97 F026C98E EEBDCC42 95FF1EC7
  7161. 023F540C 78F5BCAA 607C0269 E8DCACE2
  7162. 027661C4 3E03EAD2 8A24D100O=VeriSign, Inc./C=US:O=VeriSign, Inc./C=US1Certifier/OU=Class 4 Public Primary Certification Authority/O=VeriSign, Inc./C=US/OU=Class 4 Public Primary Certification Authority/O=VeriSign, Inc./C=USCertifier[NetModifier]1OU=Class 4 Public Primary Certification Authority/O=VeriSign, Inc./C=US
  7163. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris####################################################
  7164. 09007304 G00101F8 100001G0 2A03G002
  7165. 2D04G001 2D043082 04293082 0392A003
  7166. 02010202 105C4988 379E491F 76D6CD55
  7167. 78D21FE5 1A300D06 092A8648 86F70D01
  7168. 01020500 305F310B 30090603 55040613
  7169. 02555331 17301506 0355040A 130E5665
  7170. 72695369 676E2C20 496E632E 31373035
  7171. 06035504 0B132E43 6C617373 20332050
  7172. 75626C69 63205072 696D6172 79204365
  7173. 72746966 69636174 696F6E20 41757468
  7174. 6F726974 79301E17 0D393730 34313730
  7175. 30303030 305A170D 30343031 30373233
  7176. 35393539 5A3081BA 311F301D 06035504
  7177. 0A131656 65726953 69676E20 54727573
  7178. 74204E65 74776F72 6B311730 15060355
  7179. 040B130E 56657269 5369676E 2C20496E
  7180. 632E3133 30310603 55040B13 2A566572
  7181. 69536967 6E20496E 7465726E 6174696F
  7182. 6E616C20 53657276 65722043 41202D20
  7183. 436C6173 73203331 49304706 0355040B
  7184. 13407777 772E7665 72697369 676E2E63
  7185. 6F6D2F43 50532049 6E636F72 702E6279
  7186. 20526566 2E204C49 4142494C 49545920
  7187. 4C54442E 28632939 37205665 72695369
  7188. 676E3081 9F300D06 092A8648 86F70D01
  7189. 01010500 03818D00 30818902 818100D8
  7190. 8280E8D6 19027D1F 85183925 A2652BE1
  7191. BFD405D3 BCE6363B AAF04C6C 5BB6E7AA
  7192. 3C734555 B2F1BDEA 9742ED9A 340A15D4
  7193. A95CF540 25DDD907 C132B275 6CC4CABB
  7194. A3FE5627 7143AA63 F5303E93 28E5FAF1
  7195. 093BF3B7 4D4E39F7 5C495AB8 C11DD3B2
  7196. 8AFE7030 9542CBFE 2B518B5A 3C3AF922
  7197. 4F90B202 A7539C4F 34E7AB04 B27B6F02
  7198. 03010001 A3820188 30820184 30820140
  7199. 0603551D 20048201 37308201 33308201
  7200. 2F060B60 86480186 F8450107 01013082
  7201. 011E3033 06082B06 01050507 02011627
  7202. 68747470 733A2F2F 7777772E 76657269
  7203. 7369676E 2E636F6D 2F726570 6F736974
  7204. 6F72792F 43505330 81E60608 2B060105
  7205. 05070202 3081D930 15160E56 65726953
  7206. 69676E2C 20496E63 2E300302 01011A81
  7207. BF566572 69536967 6E277320 43657274
  7208. 69666963 6174696F 6E205072 61637469
  7209. 63652053 74617465 6D656E74 2C207777
  7210. 772E7665 72697369 676E2E63 6F6D2F43
  7211. 50532C20 676F7665 726E7320 74686973
  7212. 20636572 74696669 63617465 20262069
  7213. 7320696E 636F7270 6F726174 65642062
  7214. 79207265 66657265 6E636520 68657265
  7215. 696E2E20 534F4D45 20574152 52414E54
  7216. 49455320 44495343 4C41494D 45442026
  7217. 204C4941 42494C49 5459204C 54442E20
  7218. 28632931 39393720 56657269 5369676E
  7219. 300F0603 551D1304 08300601 01FF0201
  7220. 00300B06 03551D0F 04040302 01063020
  7221. 0603551D 25041930 17060A60 86480186
  7222. F8450108 01060960 86480186 F8420401
  7223. 300D0609 2A864886 F70D0101 02050003
  7224. 8181003F CC23E9A7 D4126AF2 DC623FB7
  7225. F9CC6451 AFEDCA7A 00DA6219 6DD96535
  7226. BAE793D1 2C7911FB 5AAC1B39 010C9BB4
  7227. B21E7A22 0CF538DC 296130F8 FEB55313
  7228. 01DC59F2 9CCDDBB7 AA3DE77A 92C0E0F2
  7229. E4BDA2FB E7859B9E 46B03FB8 00C8E1B8
  7230. 41DB32D2 38AF4BBE B560D158 DD04F2BE
  7231. 7B581E8C 2DD382F3 E5910725 BA078563
  7232. CA6185O=VeriSign, Inc./C=US:O=VeriSign Trust Network1CertifierCN=www.verisign.com/OU=www.verisign.com/OU=VeriSign International Server CA - Class 3/OU=VeriSign, Inc./O=VeriSign Trust Network/OU=Class 3 Public Primary Certification Authority/O=VeriSign, Inc./C=USCertifier[NetModifier]1OU=www.verisign.com/CPS Incorp.by Ref. LIABILITY LTD.(c)97 VeriSign/OU=VeriSign International Server CA - Class 3/OU=VeriSign, Inc./O=VeriSign Trust Network
  7233. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris########################################################
  7234. certifier.gif
  7235. certifier.gifcertifier
  7236. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############
  7237. int'l mime settings.gif
  7238. intl.gifintl
  7239. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######
  7240. location.gif
  7241. location.giflocation
  7242. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########
  7243. people.gif
  7244. people.gifpeople
  7245. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################
  7246. 09007E02 G001EB51 B70801G0 2A03G002
  7247. 3802G001 38023082 02343082 01A10210
  7248. 02AD667E 4E45FE5E 576F3C98 195EDDC0
  7249. 300D0609 2A864886 F70D0101 02050030
  7250. 5F310B30 09060355 04061302 55533120
  7251. 301E0603 55040A13 17525341 20446174
  7252. 61205365 63757269 74792C20 496E632E
  7253. 312E302C 06035504 0B132553 65637572
  7254. 65205365 72766572 20436572 74696669
  7255. 63617469 6F6E2041 7574686F 72697479
  7256. 301E170D 39343131 30393030 30303030
  7257. 5A170D31 30303130 37323335 3935395A
  7258. 305F310B 30090603 55040613 02555331
  7259. 20301E06 0355040A 13175253 41204461
  7260. 74612053 65637572 6974792C 20496E63
  7261. 2E312E30 2C060355 040B1325 53656375
  7262. 72652053 65727665 72204365 72746966
  7263. 69636174 696F6E20 41757468 6F726974
  7264. 7930819B 300D0609 2A864886 F70D0101
  7265. 01050003 81890030 8185027E 0092CE7A
  7266. C1AE833E 5AAA8983 57AC2501 760CADAE
  7267. 8E2C37CE EB357864 5403E584 4051C9BF
  7268. 8F08E28A 8208D216 863755E9 B12102AD
  7269. 7668819A 05A24BC9 4B256622 566C8807
  7270. 8FF78159 6D840765 70137176 3E9B774C
  7271. E3508956 9848B91D A7291A13 2E4A1159
  7272. 9C1E15D5 49542C73 3A6982B1 97399C6D
  7273. 706748E5 DD2DD6C8 1E7B0203 01000130
  7274. 0D06092A 864886F7 0D010102 0500037E
  7275. 0065DD7E E1B2ECB0 E23AE0EC 71469A19
  7276. 11B8D3C7 A0B40340 26023E09 9CE112B3
  7277. D15AF637 A5B76103 B65B1669 3BC64408
  7278. 0C88530C 6B9749C7 3E35DC6C B9BBAADF
  7279. 5CBB3A2F 9360B6A9 4B4DF220 F7CD5F7F
  7280. 647B8EDC 005CD7FA 77CA3916 596F0EEA
  7281. D3B5837F 4D4D4256 76B4C95F 04F838F8
  7282. EBD25F75 5FCD7BFC E58E807C FC50O=RSA Data Security, Inc./C=US:O=RSA Data Security, Inc./C=US1Certifier/OU=Secure Server Certification Authority/O=RSA Data Security, Inc./C=US/OU=Secure Server Certification Authority/O=RSA Data Security, Inc./C=USCertifier[NetModifier]1OU=Secure Server Certification Authority/O=RSA Data Security, Inc./C=US
  7283. CN=Test2 User/O=mytestCN=Rob Slapikoff/O=Iris#############################
  7284. CN=Mark Champine/O=IrisEMAIL=personal-freemail@thawte.com/CN=Thawte Personal Freemail CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZACertifierCertifier09007803 G001B1AD 9C7201G0 2A03G002
  7285. 3203G001 32033082 032D3082 0296A003
  7286. 02010202 0100300D 06092A86 4886F70D
  7287. 01010405 003081D1 310B3009 06035504
  7288. 0613025A 41311530 13060355 0408130C
  7289. 57657374 65726E20 43617065 31123010
  7290. 06035504 07130943 61706520 546F776E
  7291. 311A3018 06035504 0A131154 68617774
  7292. 6520436F 6E73756C 74696E67 31283026
  7293. 06035504 0B131F43 65727469 66696361
  7294. 74696F6E 20536572 76696365 73204469
  7295. 76697369 6F6E3124 30220603 55040313
  7296. 1B546861 77746520 50657273 6F6E616C
  7297. 20467265 656D6169 6C204341 312B3029
  7298. 06092A86 4886F70D 01090116 1C706572
  7299. 736F6E61 6C2D6672 65656D61 696C4074
  7300. 68617774 652E636F 6D301E17 0D393630
  7301. 31303130 30303030 305A170D 32303132
  7302. 33313233 35393539 5A3081D1 310B3009
  7303. 06035504 0613025A 41311530 13060355
  7304. 0408130C 57657374 65726E20 43617065
  7305. 31123010 06035504 07130943 61706520
  7306. 546F776E 311A3018 06035504 0A131154
  7307. 68617774 6520436F 6E73756C 74696E67
  7308. 31283026 06035504 0B131F43 65727469
  7309. 66696361 74696F6E 20536572 76696365
  7310. 73204469 76697369 6F6E3124 30220603
  7311. 55040313 1B546861 77746520 50657273
  7312. 6F6E616C 20467265 656D6169 6C204341
  7313. 312B3029 06092A86 4886F70D 01090116
  7314. 1C706572 736F6E61 6C2D6672 65656D61
  7315. 696C4074 68617774 652E636F 6D30819F
  7316. 300D0609 2A864886 F70D0101 01050003
  7317. 818D0030 81890281 8100D469 D7D4B094
  7318. 645B71E9 47D80C51 B6EA7291 B0845E7D
  7319. 2D0D8F7B 12DF8525 7528743A 422C6327
  7320. 9F957B4B EF7E1987 1D86EAA3 DDB9CE96
  7321. 641AC214 6E44AC7C E68FE84D 0F711F40
  7322. 38A600A3 8778F6F9 94865EAD EAC05E76
  7323. EBD914A3 5D6E7A7C 0CA54B55 7F061929
  7324. 7F9E9A26 D56ABB38 24086A98 C7B1DAA3
  7325. 9891FD79 DBE55AC4 1CB90203 010001A3
  7326. 13301130 0F060355 1D130101 FF040530
  7327. 030101FF 300D0609 2A864886 F70D0101
  7328. 04050003 818100C7 EC927E4E F8F596A5
  7329. 67622AA4 F04D1160 D06F8D60 5861AC26
  7330. BB52355C 08CF30FB A84A968A 1F624223
  7331. 8C170FF4 BA649C17 AC4729DF 9D985ED2
  7332. 6C60715C A2ACDC79 E3E76E00 471FB50D
  7333. 28E8029D E49AFD13 F4A6D97C B1F8DC5F
  7334. 23260991 8073D014 1BDE43A9 8325F2E6
  7335. 9C2F15CA FEA6AB8A 07758B0C DD51846B
  7336. E4F8D1CE 77A28100EMAIL=personal-freemail@thawte.com/CN=Thawte Personal Freemail CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZAEMAIL=personal-freemail@thawte.com/CN=Thawte Personal Freemail CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA:EMAIL=personal-freemai1[NetModifier]1EMAIL=personal-freemail@thawte.com/CN=Thawte Personal Freemail CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA
  7337. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##########################
  7338. CN=Mark Champine/O=IrisEMAIL=personal-basic@thawte.com/CN=Thawte Personal Basic CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZACertifierCertifier09006C03 G0015965 774401G0 2A03G002
  7339. 2603G001 26033082 03213082 028AA003
  7340. 02010202 0100300D 06092A86 4886F70D
  7341. 01010405 003081CB 310B3009 06035504
  7342. 0613025A 41311530 13060355 0408130C
  7343. 57657374 65726E20 43617065 31123010
  7344. 06035504 07130943 61706520 546F776E
  7345. 311A3018 06035504 0A131154 68617774
  7346. 6520436F 6E73756C 74696E67 31283026
  7347. 06035504 0B131F43 65727469 66696361
  7348. 74696F6E 20536572 76696365 73204469
  7349. 76697369 6F6E3121 301F0603 55040313
  7350. 18546861 77746520 50657273 6F6E616C
  7351. 20426173 69632043 41312830 2606092A
  7352. 864886F7 0D010901 16197065 72736F6E
  7353. 616C2D62 61736963 40746861 7774652E
  7354. 636F6D30 1E170D39 36303130 31303030
  7355. 3030305A 170D3230 31323331 32333539
  7356. 35395A30 81CB310B 30090603 55040613
  7357. 025A4131 15301306 03550408 130C5765
  7358. 73746572 6E204361 70653112 30100603
  7359. 55040713 09436170 6520546F 776E311A
  7360. 30180603 55040A13 11546861 77746520
  7361. 436F6E73 756C7469 6E673128 30260603
  7362. 55040B13 1F436572 74696669 63617469
  7363. 6F6E2053 65727669 63657320 44697669
  7364. 73696F6E 3121301F 06035504 03131854
  7365. 68617774 65205065 72736F6E 616C2042
  7366. 61736963 20434131 28302606 092A8648
  7367. 86F70D01 09011619 70657273 6F6E616C
  7368. 2D626173 69634074 68617774 652E636F
  7369. 6D30819F 300D0609 2A864886 F70D0101
  7370. 01050003 818D0030 81890281 8100BCBC
  7371. 93536DC0 504F8215 E6489435 A65ABE6F
  7372. 42FA0F47 EE777572 DD8D499B 9657A078
  7373. D4CA3F51 B3690B91 76172207 976AC451
  7374. 934BE08D EF3795A1 0C4DDA34 901D1789
  7375. 97E03538 574AC0F4 0870E93C 447B507E
  7376. 619A90E3 23D38811 4627F50B 070EBBDD
  7377. D17F200A 88B9560B 2E1C80DA F1E39E29
  7378. EF14BD0A 44FB1B5B 18D1BF23 93210203
  7379. 010001A3 13301130 0F060355 1D130101
  7380. FF040530 030101FF 300D0609 2A864886
  7381. F70D0101 04050003 8181002D E2996BB0
  7382. 3D7A89D7 59A29401 1F2BDD12 4B53C2AD
  7383. 7FAAA700 5C914057 254A38AA 8470B9D9
  7384. 800FA57B 5CFB73C6 BDD78A61 5C03E32D
  7385. 27A817E0 848542DC 5E9BC6B7 B26DBB74
  7386. AFE43FCB A7B7B0E0 5DBE7883 2594D2DB
  7387. 810F7907 6D4FF439 155A5201 7BDE32D6
  7388. 4D38F612 5C0650DF 055BBD14 4BA1DF29
  7389. BA3B418D F76356A1 DF22B100EMAIL=personal-basic@thawte.com/CN=Thawte Personal Basic CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZAEMAIL=personal-basic@thawte.com/CN=Thawte Personal Basic CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA:EMAIL=personal-basic@thawte.1[NetModifier]1EMAIL=personal-basic@thawte.com/CN=Thawte Personal Basic CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA
  7390. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris#######
  7391. CN=Mark Champine/O=IrisEMAIL=personal-premium@thawte.com/CN=Thawte Personal Premium CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZACertifierCertifier09007403 G0012C6E 966701G0 2A03G002
  7392. 2E03G001 2E033082 03293082 0292A003
  7393. 02010202 0100300D 06092A86 4886F70D
  7394. 01010405 003081CF 310B3009 06035504
  7395. 0613025A 41311530 13060355 0408130C
  7396. 57657374 65726E20 43617065 31123010
  7397. 06035504 07130943 61706520 546F776E
  7398. 311A3018 06035504 0A131154 68617774
  7399. 6520436F 6E73756C 74696E67 31283026
  7400. 06035504 0B131F43 65727469 66696361
  7401. 74696F6E 20536572 76696365 73204469
  7402. 76697369 6F6E3123 30210603 55040313
  7403. 1A546861 77746520 50657273 6F6E616C
  7404. 20507265 6D69756D 20434131 2A302806
  7405. 092A8648 86F70D01 0901161B 70657273
  7406. 6F6E616C 2D707265 6D69756D 40746861
  7407. 7774652E 636F6D30 1E170D39 36303130
  7408. 31303030 3030305A 170D3230 31323331
  7409. 32333539 35395A30 81CF310B 30090603
  7410. 55040613 025A4131 15301306 03550408
  7411. 130C5765 73746572 6E204361 70653112
  7412. 30100603 55040713 09436170 6520546F
  7413. 776E311A 30180603 55040A13 11546861
  7414. 77746520 436F6E73 756C7469 6E673128
  7415. 30260603 55040B13 1F436572 74696669
  7416. 63617469 6F6E2053 65727669 63657320
  7417. 44697669 73696F6E 31233021 06035504
  7418. 03131A54 68617774 65205065 72736F6E
  7419. 616C2050 72656D69 756D2043 41312A30
  7420. 2806092A 864886F7 0D010901 161B7065
  7421. 72736F6E 616C2D70 72656D69 756D4074
  7422. 68617774 652E636F 6D30819F 300D0609
  7423. 2A864886 F70D0101 01050003 818D0030
  7424. 81890281 8100C966 D9F80744 CFB98C2E
  7425. F0A1EF13 456C05DF DE271651 3641116C
  7426. 6C3BEDFE 107D129E E59B429A FE6031C3
  7427. 66B7733A 48AE4ED0 32379488 B50DB6D9
  7428. F3F244D9 D58812DD 764DF21A FC6F231E
  7429. 7AF1D898 454E0710 EF1642D0 43756D4A
  7430. DEE2AAC9 31FF1F00 707C66CF 102508BA
  7431. FAEE00E9 46036627 11153BAA 5BF298DD
  7432. 3642B2DA 88750203 010001A3 13301130
  7433. 0F060355 1D130101 FF040530 030101FF
  7434. 300D0609 2A864886 F70D0101 04050003
  7435. 81810069 3689F734 2A33722F 6D3BD422
  7436. B2B86F9A C536660E 1B3CA1B1 755AE6FD
  7437. 35D3F8A8 F2076F85 678EDE2B B9E217B0
  7438. 3AA0F00E A2009ADF F314156E BBC8855A
  7439. 9880F9FF BE741D3D F3FE3025 D1373467
  7440. FAA57179 30612972 C0E02C4C FB56E43A
  7441. A86FE532 5952DB75 2850590C F80B19E4
  7442. ACD9AF96 8D2F50DB 07C3EA1F AB33E0F5
  7443. 2B318900EMAIL=personal-premium@thawte.com/CN=Thawte Personal Premium CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZAEMAIL=personal-premium@thawte.com/CN=Thawte Personal Premium CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA:EMAIL=personal-premium@t1[NetModifier]1EMAIL=personal-premium@thawte.com/CN=Thawte Personal Premium CA/OU=Certification Services Division/O=Thawte Consulting/L=Cape Town/ST=Western Cape/C=ZA
  7444. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris#########################################
  7445. CN=Mark Champine/O=IrisEMAIL=server-certs@thawte.com/CN=Thawte Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZACertifierCertifier09005E03 G0016813 250601G0 2A03G002
  7446. 1803G001 18033082 03133082 027CA003
  7447. 02010202 0101300D 06092A86 4886F70D
  7448. 01010405 003081C4 310B3009 06035504
  7449. 0613025A 41311530 13060355 0408130C
  7450. 57657374 65726E20 43617065 31123010
  7451. 06035504 07130943 61706520 546F776E
  7452. 311D301B 06035504 0A131454 68617774
  7453. 6520436F 6E73756C 74696E67 20636331
  7454. 28302606 0355040B 131F4365 72746966
  7455. 69636174 696F6E20 53657276 69636573
  7456. 20446976 6973696F 6E311930 17060355
  7457. 04031310 54686177 74652053 65727665
  7458. 72204341 31263024 06092A86 4886F70D
  7459. 01090116 17736572 7665722D 63657274
  7460. 73407468 61777465 2E636F6D 301E170D
  7461. 39363038 30313030 30303030 5A170D32
  7462. 30313233 31323335 3935395A 3081C431
  7463. 0B300906 03550406 13025A41 31153013
  7464. 06035504 08130C57 65737465 726E2043
  7465. 61706531 12301006 03550407 13094361
  7466. 70652054 6F776E31 1D301B06 0355040A
  7467. 13145468 61777465 20436F6E 73756C74
  7468. 696E6720 63633128 30260603 55040B13
  7469. 1F436572 74696669 63617469 6F6E2053
  7470. 65727669 63657320 44697669 73696F6E
  7471. 31193017 06035504 03131054 68617774
  7472. 65205365 72766572 20434131 26302406
  7473. 092A8648 86F70D01 09011617 73657276
  7474. 65722D63 65727473 40746861 7774652E
  7475. 636F6D30 819F300D 06092A86 4886F70D
  7476. 01010105 0003818D 00308189 02818100
  7477. D3A4506E C8FF566B E6CF5DB6 EA0C6875
  7478. 47A2AAC2 DA8425FC A8F44751 DA85B520
  7479. 7494861E 0F75C9E9 0861F506 6D306E15
  7480. 1902E952 C062DB4D 999EE26A 0C4438CD
  7481. FEBEE364 0970C5FE B16B29B6 2F49C83B
  7482. D4270425 10972FE7 906DC028 4299D74C
  7483. 43DEC3F5 216D549F 5DC358E1 C0E4D95B
  7484. B0B8DCB4 7BDF363A C2B56622 12D6870D
  7485. 02030100 01A31330 11300F06 03551D13
  7486. 0101FF04 05300301 01FF300D 06092A86
  7487. 4886F70D 01010405 00038181 0007FA4C
  7488. 695CFB95 CC46EE85 834D2130 8ECAD9A8
  7489. 6F491AE6 DA51E360 706C8461 11A11AC8
  7490. 483E5943 7D4F953D A18BB70B 62987A75
  7491. 8ADD884E 4E9E40DB A8CC3274 B96F0DC6
  7492. E3B3440B D98A6F9A 299B9918 283BD1E3
  7493. 40289A5A 3CD5B5E7 201B8BCA A4AB8DE9
  7494. 51D9E24C 2C59A9DA B9B2751B F642F2EF
  7495. C7F218F9 89BCA3FF 8A232E70 4700EMAIL=server-certs@thawte.com/CN=Thawte Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZAEMAIL=server-certs@thawte.com/CN=Thawte Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZA:EMAIL=server-certs@thawte.com/CN=Th1[NetModifier]1EMAIL=server-certs@thawte.com/CN=Thawte Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZA
  7496. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris
  7497. ##########################################################
  7498. CN=Mark Champine/O=IrisEMAIL=webmaster@belsign.be/CN=BelSign Class 1 CA/OU=BelSign Class 1 Certificate Authority/O=BelSign NV/L=Brussels/C=BECertifierCertifier09002603 G0014A70 606601G0 2A03G002
  7499. E002G001 E0023082 02DB3082 0244A003
  7500. 02010202 0101300D 06092A86 4886F70D
  7501. 01010405 003081A7 310B3009 06035504
  7502. 06130242 45311130 0F060355 04071308
  7503. 42727573 73656C73 31133011 06035504
  7504. 0A130A42 656C5369 676E204E 56312E30
  7505. 2C060355 040B1325 42656C53 69676E20
  7506. 436C6173 73203120 43657274 69666963
  7507. 61746520 41757468 6F726974 79311B30
  7508. 19060355 04031312 42656C53 69676E20
  7509. 436C6173 73203120 43413123 30210609
  7510. 2A864886 F70D0109 01161477 65626D61
  7511. 73746572 4062656C 7369676E 2E626530
  7512. 1E170D39 37303731 36323230 3031385A
  7513. 170D3037 30373136 32323030 31385A30
  7514. 81A7310B 30090603 55040613 02424531
  7515. 11300F06 03550407 13084272 75737365
  7516. 6C733113 30110603 55040A13 0A42656C
  7517. 5369676E 204E5631 2E302C06 0355040B
  7518. 13254265 6C536967 6E20436C 61737320
  7519. 31204365 72746966 69636174 65204175
  7520. 74686F72 69747931 1B301906 03550403
  7521. 13124265 6C536967 6E20436C 61737320
  7522. 31204341 31233021 06092A86 4886F70D
  7523. 01090116 14776562 6D617374 65724062
  7524. 656C7369 676E2E62 6530819F 300D0609
  7525. 2A864886 F70D0101 01050003 818D0030
  7526. 81890281 8100B2AF 602FDC2B 6B98512F
  7527. 21F7ADE9 2B2A3A94 23129823 85526AC5
  7528. C73CF189 35D09DAE 1D99B2A7 ACD5CEFD
  7529. FCD917BE E8CB5869 701E0397 E220E59B
  7530. 07F3E282 465FCBB9 FE22000B 4D23DDEB
  7531. 74752284 30AF97BE 7D5AC491 E3CB82E0
  7532. 513B8542 619421D4 E350F38C 8A61626C
  7533. BDF10F00 AC7F68D9 661C9CDD 97C7FF4E
  7534. D4240B9E 5F310203 010001A3 15301330
  7535. 11060960 86480186 F8420101 04040302
  7536. 0007300D 06092A86 4886F70D 01010405
  7537. 00038181 008AF3C7 5CF4571D B621A756
  7538. 7D20E3D8 6EABDE76 2BDDCBE0 35E1449E
  7539. A855C4E9 97AF0E89 2BEF3982 B32AEB6C
  7540. 13BE1405 954092B3 40704FE8 E69BF9B6
  7541. 4873F7E0 1FE41813 0676C694 840DB3C1
  7542. B785A5DB 35210936 1FE0311F 990338D6
  7543. 52923AA6 C409033B 96E99645 A0E62CC3
  7544. F5A4267D A98F2B19 A1EFE5F2 25FDA88F
  7545. E18DA6C6 0A00EMAIL=webmaster@belsign.be/CN=BelSign Class 1 CA/OU=BelSign Class 1 Certificate Authority/O=BelSign NV/L=Brussels/C=BEEMAIL=webmaster@belsign.be/CN=BelSign Class 1 CA/OU=BelSign Class 1 Certificate Authority/O=BelSign NV/L=Brussels/C=BE:EMAIL=webmaster@belsign.be/CN=BelSign Class 1 CA/OU=BelSi1[NetModifier]1EMAIL=webmaster@belsign.be/CN=BelSign Class 1 CA/OU=BelSign Class 1 Certificate Authority/O=BelSign NV/L=Brussels/C=BE
  7546. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris
  7547. ##########################################################
  7548. CN=Mark Champine/O=IrisEMAIL=premium-server@thawte.com/CN=Thawte Premium Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZACertifierCertifier09007203 G001039E DFEB01G0 2A03G002
  7549. 2C03G001 2C033082 03273082 0290A003
  7550. 02010202 0101300D 06092A86 4886F70D
  7551. 01010405 003081CE 310B3009 06035504
  7552. 0613025A 41311530 13060355 0408130C
  7553. 57657374 65726E20 43617065 31123010
  7554. 06035504 07130943 61706520 546F776E
  7555. 311D301B 06035504 0A131454 68617774
  7556. 6520436F 6E73756C 74696E67 20636331
  7557. 28302606 0355040B 131F4365 72746966
  7558. 69636174 696F6E20 53657276 69636573
  7559. 20446976 6973696F 6E312130 1F060355
  7560. 04031318 54686177 74652050 72656D69
  7561. 756D2053 65727665 72204341 31283026
  7562. 06092A86 4886F70D 01090116 19707265
  7563. 6D69756D 2D736572 76657240 74686177
  7564. 74652E63 6F6D301E 170D3936 30383031
  7565. 30303030 30305A17 0D323031 32333132
  7566. 33353935 395A3081 CE310B30 09060355
  7567. 04061302 5A413115 30130603 55040813
  7568. 0C576573 7465726E 20436170 65311230
  7569. 10060355 04071309 43617065 20546F77
  7570. 6E311D30 1B060355 040A1314 54686177
  7571. 74652043 6F6E7375 6C74696E 67206363
  7572. 31283026 06035504 0B131F43 65727469
  7573. 66696361 74696F6E 20536572 76696365
  7574. 73204469 76697369 6F6E3121 301F0603
  7575. 55040313 18546861 77746520 5072656D
  7576. 69756D20 53657276 65722043 41312830
  7577. 2606092A 864886F7 0D010901 16197072
  7578. 656D6975 6D2D7365 72766572 40746861
  7579. 7774652E 636F6D30 819F300D 06092A86
  7580. 4886F70D 01010105 0003818D 00308189
  7581. 02818100 D236366A 8BD7C25B 9EDA8141
  7582. 628F38EE 490455D6 D0EF1C1B 951647EF
  7583. 1848353A 52F42B6A 068F3B2F EA56E3AF
  7584. 868D9E17 F79EB465 75024DEF CB09A221
  7585. 51D89BD0 67D0BA0D 92061473 D493CB97
  7586. 2A009C5C 4E0CBCFA 1552FCF2 446EDA11
  7587. 4A6E089F 2F2DE3F9 AA3A8673 B6465358
  7588. C88905BD 8311B873 3FAA078D F4424DE7
  7589. 409D1C37 02030100 01A31330 11300F06
  7590. 03551D13 0101FF04 05300301 01FF300D
  7591. 06092A86 4886F70D 01010405 00038181
  7592. 0026482C 16C258FA E816740C AAAA5F54
  7593. 3FF2D7C9 78605E5E 6E376322 77367EB2
  7594. 17C434B9 F50885FC C90138FF 4DBEF216
  7595. 4243E7BB 5A46FBC1 C6111FF1 4AB02846
  7596. C9C3C442 7DBCFAAB 596ED5B7 518811E3
  7597. A485196B 824CA40C 12ADE9A4 AE3FF1C3
  7598. 49659A8C C5C83E25 B79499BB 92327107
  7599. F0865EED 5027A60D A623F9BB CBA60714
  7600. 4200EMAIL=premium-server@thawte.com/CN=Thawte Premium Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZAEMAIL=premium-server@thawte.com/CN=Thawte Premium Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZA:EMAIL=premium-server@thaw1[NetModifier]1EMAIL=premium-server@thawte.com/CN=Thawte Premium Server CA/OU=Certification Services Division/O=Thawte Consulting cc/L=Cape Town/ST=Western Cape/C=ZA
  7601. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris################################################
  7602. CN=Mark Champine/O=IrisEMAIL=webmaster@belsign.be/CN=BelSign Secure Server CA/OU=BelSign Secure Server Certificate Authority/O=BelSign NV/L=Brussels/C=BECertifierCertifier09003E03 G001580A D69201G0 2A03G002
  7603. F802G001 F8023082 02F33082 025CA003
  7604. 02010202 0101300D 06092A86 4886F70D
  7605. 01010405 003081B3 310B3009 06035504
  7606. 06130242 45311130 0F060355 04071308
  7607. 42727573 73656C73 31133011 06035504
  7608. 0A130A42 656C5369 676E204E 56313430
  7609. 32060355 040B132B 42656C53 69676E20
  7610. 53656375 72652053 65727665 72204365
  7611. 72746966 69636174 65204175 74686F72
  7612. 69747931 21301F06 03550403 13184265
  7613. 6C536967 6E205365 63757265 20536572
  7614. 76657220 43413123 30210609 2A864886
  7615. F70D0109 01161477 65626D61 73746572
  7616. 4062656C 7369676E 2E626530 1E170D39
  7617. 37303731 36323230 3035345A 170D3037
  7618. 30373136 32323030 35345A30 81B3310B
  7619. 30090603 55040613 02424531 11300F06
  7620. 03550407 13084272 75737365 6C733113
  7621. 30110603 55040A13 0A42656C 5369676E
  7622. 204E5631 34303206 0355040B 132B4265
  7623. 6C536967 6E205365 63757265 20536572
  7624. 76657220 43657274 69666963 61746520
  7625. 41757468 6F726974 79312130 1F060355
  7626. 04031318 42656C53 69676E20 53656375
  7627. 72652053 65727665 72204341 31233021
  7628. 06092A86 4886F70D 01090116 14776562
  7629. 6D617374 65724062 656C7369 676E2E62
  7630. 6530819F 300D0609 2A864886 F70D0101
  7631. 01050003 818D0030 81890281 8100D601
  7632. 127892F8 04427FC9 C72283FC 7C477030
  7633. 2B490B3E 36409028 DA217383 53F2C4D1
  7634. 1640C053 FFAEA6C6 24B3276D A5B33D39
  7635. 775DA806 F6E6E9BC 63114E06 65700A9D
  7636. 93F9A240 8B7F4A84 0E8D16B1 D6CC0864
  7637. 120CE028 4BC8A584 9017FB11 462ED6A7
  7638. 8518CB18 AE639AB0 5806F400 CFF8C409
  7639. 1A350CA1 F9EE4AFD 6DDEFE26 A53B0203
  7640. 010001A3 15301330 11060960 86480186
  7641. F8420101 04040302 00A0300D 06092A86
  7642. 4886F70D 01010405 00038181 006C3D99
  7643. C305E21D CAE52DAA 68858B40 31206613
  7644. 68E6583A 89D08D75 B2C562D8 7D828FF7
  7645. D9328177 F6355B85 29CE67B2 B9BC2B19
  7646. 78CFF387 FD46F195 75B20957 0330C17A
  7647. CD724771 80CA7D9D C9653C47 11227DFA
  7648. 070B2878 A193E805 4548E232 324A3DE8
  7649. 531C10B7 C7738C07 50E1F9C9 2B5341F5
  7650. 838DE509 394A8E03 62AA4063 8B00EMAIL=webmaster@belsign.be/CN=BelSign Secure Server CA/OU=BelSign Secure Server Certificate Authority/O=BelSign NV/L=Brussels/C=BEEMAIL=webmaster@belsign.be/CN=BelSign Secure Server CA/OU=BelSign Secure Server Certificate Authority/O=BelSign NV/L=Brussels/C=BE:EMAIL=webmaster@belsign.be/CN=BelSign Secure 1[NetModifier]1EMAIL=webmaster@belsign.be/CN=BelSign Secure Server CA/OU=BelSign Secure Server Certificate Authority/O=BelSign NV/L=Brussels/C=BE
  7651. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris#################################
  7652. CN=Mark Champine/O=IrisEMAIL=webmaster@belsign.be/CN=BelSign Class 2 CA/OU=BelSign Class 2 Certificate Authority/O=BelSign NV/L=Brussels/C=BECertifierCertifier09002603 G001518D 992C01G0 2A03G002
  7653. E002G001 E0023082 02DB3082 0244A003
  7654. 02010202 0101300D 06092A86 4886F70D
  7655. 01010405 003081A7 310B3009 06035504
  7656. 06130242 45311130 0F060355 04071308
  7657. 42727573 73656C73 31133011 06035504
  7658. 0A130A42 656C5369 676E204E 56312E30
  7659. 2C060355 040B1325 42656C53 69676E20
  7660. 436C6173 73203220 43657274 69666963
  7661. 61746520 41757468 6F726974 79311B30
  7662. 19060355 04031312 42656C53 69676E20
  7663. 436C6173 73203220 43413123 30210609
  7664. 2A864886 F70D0109 01161477 65626D61
  7665. 73746572 4062656C 7369676E 2E626530
  7666. 1E170D39 37303731 37313330 3535375A
  7667. 170D3037 30373137 31333035 35375A30
  7668. 81A7310B 30090603 55040613 02424531
  7669. 11300F06 03550407 13084272 75737365
  7670. 6C733113 30110603 55040A13 0A42656C
  7671. 5369676E 204E5631 2E302C06 0355040B
  7672. 13254265 6C536967 6E20436C 61737320
  7673. 32204365 72746966 69636174 65204175
  7674. 74686F72 69747931 1B301906 03550403
  7675. 13124265 6C536967 6E20436C 61737320
  7676. 32204341 31233021 06092A86 4886F70D
  7677. 01090116 14776562 6D617374 65724062
  7678. 656C7369 676E2E62 6530819F 300D0609
  7679. 2A864886 F70D0101 01050003 818D0030
  7680. 81890281 8100C98E A470F694 C0D6363A
  7681. 8FACA86A 77CC6D3B D8E78597 9A6ED0D4
  7682. EB611EC2 794C430F 6A7EA410 E6F59322
  7683. 6BAEB35B 05986DB1 77F3D723 6463484C
  7684. ED13D4EC 990E5202 88620D77 87B5A2DE
  7685. BFC2C415 96F3848C D0E60E77 BCFAA676
  7686. 9328DBFF 4BB63848 5C7BD68B 4EBEFB43
  7687. EC97F3FE 2E725053 C59B2BD5 EB164FBF
  7688. 6BC1EAFA 2ED90203 010001A3 15301330
  7689. 11060960 86480186 F8420101 04040302
  7690. 0007300D 06092A86 4886F70D 01010405
  7691. 00038181 0088EFE3 D5E5A371 FCBAF7AA
  7692. 1851421B 17541532 D410E466 8DA079BD
  7693. 280BBDEC A2A09E3E F78B34AD 49E5D971
  7694. E3403D5C 109BDFAF BEA7185C 437FC108
  7695. 585BB0D1 D1CFB36C 4D998BE4 59F7C4D8
  7696. 47E54CF8 67856B31 88C2F7D9 9E16B3FD
  7697. 3DC1DB6B 5D187480 4CCB56FA C4EC863E
  7698. 8348367B 547239E0 B2537201 9152AD8E
  7699. 6E152259 C100EMAIL=webmaster@belsign.be/CN=BelSign Class 2 CA/OU=BelSign Class 2 Certificate Authority/O=BelSign NV/L=Brussels/C=BEEMAIL=webmaster@belsign.be/CN=BelSign Class 2 CA/OU=BelSign Class 2 Certificate Authority/O=BelSign NV/L=Brussels/C=BE:EMAIL=webmaster@belsign.be/CN=BelSign Class 2 CA/OU=BelSi1[NetModifier]1EMAIL=webmaster@belsign.be/CN=BelSign Class 2 CA/OU=BelSign Class 2 Certificate Authority/O=BelSign NV/L=Brussels/C=BE
  7700. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris
  7701. ##########################################################
  7702. CN=Mark Champine/O=IrisEMAIL=webmaster@belsign.be/CN=BelSign Class 3 CA/OU=BelSign Class 3 Certificate Authority/O=BelSign NV/L=Brussels/C=BECertifierCertifier09002603 G0016135 FCD501G0 2A03G002
  7703. E002G001 E0023082 02DB3082 0244A003
  7704. 02010202 0101300D 06092A86 4886F70D
  7705. 01010405 003081A7 310B3009 06035504
  7706. 06130242 45311130 0F060355 04071308
  7707. 42727573 73656C73 31133011 06035504
  7708. 0A130A42 656C5369 676E204E 56312E30
  7709. 2C060355 040B1325 42656C53 69676E20
  7710. 436C6173 73203320 43657274 69666963
  7711. 61746520 41757468 6F726974 79311B30
  7712. 19060355 04031312 42656C53 69676E20
  7713. 436C6173 73203320 43413123 30210609
  7714. 2A864886 F70D0109 01161477 65626D61
  7715. 73746572 4062656C 7369676E 2E626530
  7716. 1E170D39 37303731 36323230 3033335A
  7717. 170D3037 30373136 32323030 33335A30
  7718. 81A7310B 30090603 55040613 02424531
  7719. 11300F06 03550407 13084272 75737365
  7720. 6C733113 30110603 55040A13 0A42656C
  7721. 5369676E 204E5631 2E302C06 0355040B
  7722. 13254265 6C536967 6E20436C 61737320
  7723. 33204365 72746966 69636174 65204175
  7724. 74686F72 69747931 1B301906 03550403
  7725. 13124265 6C536967 6E20436C 61737320
  7726. 33204341 31233021 06092A86 4886F70D
  7727. 01090116 14776562 6D617374 65724062
  7728. 656C7369 676E2E62 6530819F 300D0609
  7729. 2A864886 F70D0101 01050003 818D0030
  7730. 81890281 8100B03E 9E15045C 35A15CF8
  7731. E764FC72 DAD4EF05 8CAE38BA A961216D
  7732. 2DE83241 584251DF 0195EFBC 9BCFB013
  7733. 605878B7 5D3D8384 498FF920 F06EA122
  7734. 5FCDF663 2BB2E714 DC7647C5 00226D48
  7735. 600EF147 C23586C5 FD90214D 558CB3DE
  7736. 6FBE8376 4C821CE1 607C0C24 CFA06A4F
  7737. 96B85A9A A9DD377E 34B092ED 4B6148B8
  7738. 54AF7A3E AD0F0203 010001A3 15301330
  7739. 11060960 86480186 F8420101 04040302
  7740. 0007300D 06092A86 4886F70D 01010405
  7741. 00038181 002789B4 87514FB4 69177CED
  7742. 874B1595 02E3A3F2 320D6909 F4E1C672
  7743. 98A3C456 A167C8CD FEC94AFB 363FF6FD
  7744. E6CF6B17 35021E58 45E4FFE4 60F70E64
  7745. EC37A3E8 A561EA3C A505C366 65A76B9C
  7746. 10C45F53 FBC83B6D 9CAE42DB 213564CE
  7747. 4F6B3044 A0E54FEB ACA8DE04 3A7124DA
  7748. CFCA06D0 D8F870AA 2FF3A47A 2AAEF3CF
  7749. 86F718AA 8500EMAIL=webmaster@belsign.be/CN=BelSign Class 3 CA/OU=BelSign Class 3 Certificate Authority/O=BelSign NV/L=Brussels/C=BEEMAIL=webmaster@belsign.be/CN=BelSign Class 3 CA/OU=BelSign Class 3 Certificate Authority/O=BelSign NV/L=Brussels/C=BE:EMAIL=webmaster@belsign.be/CN=BelSign Class 3 CA/OU=BelSi1[NetModifier]1EMAIL=webmaster@belsign.be/CN=BelSign Class 3 CA/OU=BelSign Class 3 Certificate Authority/O=BelSign NV/L=Brussels/C=BE
  7750. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris
  7751. ##########################################################
  7752. CN=Mark Champine/O=IrisEMAIL=webmaster@belsign.be/CN=BelSign Object Publishing CA/OU=BelSign Object Publishing Certificate Authority/O=BelSign NV/L=Brussels/C=BECertifierCertifier09004E03 G001F62C 5AC101G0 2A03G002
  7753. 0803G001 08033082 03033082 026CA003
  7754. 02010202 0101300D 06092A86 4886F70D
  7755. 01010405 003081BB 310B3009 06035504
  7756. 06130242 45311130 0F060355 04071308
  7757. 42727573 73656C73 31133011 06035504
  7758. 0A130A42 656C5369 676E204E 56313830
  7759. 36060355 040B132F 42656C53 69676E20
  7760. 4F626A65 63742050 75626C69 7368696E
  7761. 67204365 72746966 69636174 65204175
  7762. 74686F72 69747931 25302306 03550403
  7763. 131C4265 6C536967 6E204F62 6A656374
  7764. 20507562 6C697368 696E6720 43413123
  7765. 30210609 2A864886 F70D0109 01161477
  7766. 65626D61 73746572 4062656C 7369676E
  7767. 2E626530 1E170D39 37303931 39323230
  7768. 3330305A 170D3037 30393139 32323033
  7769. 30305A30 81BB310B 30090603 55040613
  7770. 02424531 11300F06 03550407 13084272
  7771. 75737365 6C733113 30110603 55040A13
  7772. 0A42656C 5369676E 204E5631 38303606
  7773. 0355040B 132F4265 6C536967 6E204F62
  7774. 6A656374 20507562 6C697368 696E6720
  7775. 43657274 69666963 61746520 41757468
  7776. 6F726974 79312530 23060355 0403131C
  7777. 42656C53 69676E20 4F626A65 63742050
  7778. 75626C69 7368696E 67204341 31233021
  7779. 06092A86 4886F70D 01090116 14776562
  7780. 6D617374 65724062 656C7369 676E2E62
  7781. 6530819F 300D0609 2A864886 F70D0101
  7782. 01050003 818D0030 81890281 8100C42E
  7783. 1FB6BFEE 8240DDF9 B72E41D5 9E05B15A
  7784. D0267C62 55039BFC CB61DE4B EFFEE899
  7785. FE87B988 CF90DA0F 093C76DF 1797B6CB
  7786. 3F2545FD B4BC5800 BEB05AB6 14878FEE
  7787. 6764AD1D 8883BB67 9F656100 58088050
  7788. 9F80C931 F62A901C 2DF74A6C 10F62343
  7789. 5D380960 885702CD 166C18FC CDFB922A
  7790. 77D09E93 A35D8864 D0C8F85D 54510203
  7791. 010001A3 15301330 11060960 86480186
  7792. F8420101 04040302 0007300D 06092A86
  7793. 4886F70D 01010405 00038181 00637617
  7794. 7C96F053 A55D011C 53CE29C2 7E75AC4C
  7795. 0DA20873 B46A31FD 02061499 DC5404A4
  7796. BFC89686 9F314332 2557F685 F625BB37
  7797. BEA17923 C9570625 716B454F F8F40240
  7798. 168222AF 54EA3228 F60DEE99 BA4B0851
  7799. 0F6E8623 214C2D25 8881C42E 0EF1132C
  7800. 388A9502 24C33A95 63E4938E 48BB0847
  7801. 725FAEE6 3A5A47D6 71C69E9A 5200EMAIL=webmaster@belsign.be/CN=BelSign Object Publishing CA/OU=BelSign Object Publishing Certificate Authority/O=BelSign NV/L=Brussels/C=BEEMAIL=webmaster@belsign.be/CN=BelSign Object Publishing CA/OU=BelSign Object Publishing Certificate Authority/O=BelSign NV/L=Brussels/C=BE:EMAIL=webmaster@belsign.be/CN=BelSign1[NetModifier]1EMAIL=webmaster@belsign.be/CN=BelSign Object Publishing CA/OU=BelSign Object Publishing Certificate Authority/O=BelSign NV/L=Brussels/C=BE
  7802. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris#####################################
  7803. wo.Y7X\(
  7804. CN=Rob Shaver/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  7805. ?DialogButton.GIF
  7806. dialogbutton.GIFdialogbutton################################################
  7807. Contacts&Groups
  7808. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  7809. NC:]@
  7810.     1Contacts&GroupsC34WQ
  7811. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#
  7812. Contacts|Contacts&Groups#4C
  7813. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################
  7814. AdvancedAdvanced
  7815. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############################
  7816. 1AdvancedC34WQ
  7817. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########
  7818. Advanced|Advanced#4C
  7819. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################
  7820. ContactSwitcherC34W
  7821. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########
  7822. AdvancedSwitcherC34W
  7823. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########
  7824. CN=Mark Champine/O=IrisEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 0 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DECertifierCertifier09008004 G0011E9B 753F01G0 2A03G002
  7825. 3A04G001 3A043082 04353082 039EA003
  7826. 02010202 0101300D 06092A86 4886F70D
  7827. 01010405 003081BC 310B3009 06035504
  7828. 06130244 45311030 0E060355 04081307
  7829. 48616D62 75726731 10300E06 03550407
  7830. 13074861 6D627572 67313A30 38060355
  7831. 040A1331 54432054 72757374 43656E74
  7832. 65722066 6F722053 65637572 69747920
  7833. 696E2044 61746120 4E657477 6F726B73
  7834. 20476D62 48312230 20060355 040B1319
  7835. 54432054 72757374 43656E74 65722043
  7836. 6C617373 20302043 41312930 2706092A
  7837. 864886F7 0D010901 161A6365 72746966
  7838. 69636174 65407472 75737463 656E7465
  7839. 722E6465 301E170D 39383033 30393133
  7840. 35343438 5A170D30 35313233 31313335
  7841. 3434385A 3081BC31 0B300906 03550406
  7842. 13024445 3110300E 06035504 08130748
  7843. 616D6275 72673110 300E0603 55040713
  7844. 0748616D 62757267 313A3038 06035504
  7845. 0A133154 43205472 75737443 656E7465
  7846. 7220666F 72205365 63757269 74792069
  7847. 6E204461 7461204E 6574776F 726B7320
  7848. 476D6248 31223020 06035504 0B131954
  7849. 43205472 75737443 656E7465 7220436C
  7850. 61737320 30204341 31293027 06092A86
  7851. 4886F70D 01090116 1A636572 74696669
  7852. 63617465 40747275 73746365 6E746572
  7853. 2E646530 819F300D 06092A86 4886F70D
  7854. 01010105 0003818D 00308189 02818100
  7855. DF7DE6BE BFD5F02F 6D4E0ED1 E08D0B7F
  7856. 3B54E88A E2B09F28 C58AC6B9 B33327F5
  7857. 27CA1A4C 54126BB4 B246B31D 4BB3F421
  7858. 0B4B022E A1C2349C 85A0C478 11DBDB6B
  7859. 272B092A 184E40CC 9F711967 9974A27C
  7860. 3FC1D88B 23C8633B 8A21AB5C DE1EF48D
  7861. DCB418C3 0573F46A B4A1FA01 082B010F
  7862. 6D375BAA 38866739 D7E55FFA E47ECCA3
  7863. 02030100 01A38201 43308201 3F304006
  7864. 09608648 0186F842 01030433 16316874
  7865. 7470733A 2F2F7777 772E7472 75737463
  7866. 656E7465 722E6465 2F636769 2D62696E
  7867. 2F636865 636B2D72 65762E63 67693F30
  7868. 40060960 86480186 F8420104 04331631
  7869. 68747470 733A2F2F 7777772E 74727573
  7870. 7463656E 7465722E 64652F63 67692D62
  7871. 696E2F63 6865636B 2D726576 2E636769
  7872. 3F303C06 09608648 0186F842 0107042F
  7873. 162D6874 7470733A 2F2F7777 772E7472
  7874. 75737463 656E7465 722E6465 2F636769
  7875. 2D62696E 2F52656E 65772E63 67693F30
  7876. 3E060960 86480186 F8420108 0431162F
  7877. 68747470 3A2F2F77 77772E74 72757374
  7878. 63656E74 65722E64 652F6775 6964656C
  7879. 696E6573 2F696E64 65782E68 746D6C30
  7880. 28060960 86480186 F842010D 041B1619
  7881. 54432054 72757374 43656E74 65722043
  7882. 6C617373 20302043 41301106 09608648
  7883. 0186F842 01010404 03020007 300D0609
  7884. 2A864886 F70D0101 04050003 8181004D
  7885. 077F5F09 301992AA 05477A94 75542AAE
  7886. CFFCD80C 42E14538 2B2495B2 CA87CA79
  7887. C4C39790 5E6218C6 C938614C 6835D34C
  7888. 1411EBC4 CDA1A9D8 C59E6827 32073545
  7889. 04F85F21 A0601E1C 00480458 D2C5CBAE
  7890. 6D326E3D 77958C85 C7E5AE50 9D754A7B
  7891. FF0B2779 EA4DA459 FFEC5AEA 26A53983
  7892. A4D178CE A7A97EBC DD2BCA12 93034A00EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 0 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DEEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 0 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE:EMAIL=certificate@trustcenter.de/OU=1[NetModifier]1EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 0 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE
  7893. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##################################################
  7894. CN=Mark Champine/O=IrisEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 1 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DECertifierCertifier09008004 G0015207 D0D901G0 2A03G002
  7895. 3A04G001 3A043082 04353082 039EA003
  7896. 02010202 0102300D 06092A86 4886F70D
  7897. 01010405 003081BC 310B3009 06035504
  7898. 06130244 45311030 0E060355 04081307
  7899. 48616D62 75726731 10300E06 03550407
  7900. 13074861 6D627572 67313A30 38060355
  7901. 040A1331 54432054 72757374 43656E74
  7902. 65722066 6F722053 65637572 69747920
  7903. 696E2044 61746120 4E657477 6F726B73
  7904. 20476D62 48312230 20060355 040B1319
  7905. 54432054 72757374 43656E74 65722043
  7906. 6C617373 20312043 41312930 2706092A
  7907. 864886F7 0D010901 161A6365 72746966
  7908. 69636174 65407472 75737463 656E7465
  7909. 722E6465 301E170D 39383033 30393133
  7910. 35363333 5A170D30 35313233 31313335
  7911. 3633335A 3081BC31 0B300906 03550406
  7912. 13024445 3110300E 06035504 08130748
  7913. 616D6275 72673110 300E0603 55040713
  7914. 0748616D 62757267 313A3038 06035504
  7915. 0A133154 43205472 75737443 656E7465
  7916. 7220666F 72205365 63757269 74792069
  7917. 6E204461 7461204E 6574776F 726B7320
  7918. 476D6248 31223020 06035504 0B131954
  7919. 43205472 75737443 656E7465 7220436C
  7920. 61737320 31204341 31293027 06092A86
  7921. 4886F70D 01090116 1A636572 74696669
  7922. 63617465 40747275 73746365 6E746572
  7923. 2E646530 819F300D 06092A86 4886F70D
  7924. 01010105 0003818D 00308189 02818100
  7925. B029EBB4 76B3AED7 B65BB45E E7BDE3B1
  7926. 9C490457 5BA1ABD9 7F131BFD BA61ABD8
  7927. E771DF2D 00945D51 487D23EF 75628490
  7928. 3C0A1F59 11742F8E 80A5FD30 023D2952
  7929. CD721A49 219CBCCB 528E48A1 6396C810
  7930. 85306957 7445C05A 86C6D53D E068577D
  7931. 316A248D 45973E31 7E686632 6E246DEC
  7932. 3236C941 CAF03144 C8A361CA 1BA0361F
  7933. 02030100 01A38201 43308201 3F304006
  7934. 09608648 0186F842 01030433 16316874
  7935. 7470733A 2F2F7777 772E7472 75737463
  7936. 656E7465 722E6465 2F636769 2D62696E
  7937. 2F636865 636B2D72 65762E63 67693F30
  7938. 40060960 86480186 F8420104 04331631
  7939. 68747470 733A2F2F 7777772E 74727573
  7940. 7463656E 7465722E 64652F63 67692D62
  7941. 696E2F63 6865636B 2D726576 2E636769
  7942. 3F303C06 09608648 0186F842 0107042F
  7943. 162D6874 7470733A 2F2F7777 772E7472
  7944. 75737463 656E7465 722E6465 2F636769
  7945. 2D62696E 2F52656E 65772E63 67693F30
  7946. 3E060960 86480186 F8420108 0431162F
  7947. 68747470 3A2F2F77 77772E74 72757374
  7948. 63656E74 65722E64 652F6775 6964656C
  7949. 696E6573 2F696E64 65782E68 746D6C30
  7950. 28060960 86480186 F842010D 041B1619
  7951. 54432054 72757374 43656E74 65722043
  7952. 6C617373 20312043 41301106 09608648
  7953. 0186F842 01010404 03020007 300D0609
  7954. 2A864886 F70D0101 04050003 81810005
  7955. 425226A4 0C270144 AC5C2528 C2444254
  7956. 08B91DC5 3E6C5966 C4B34E50 A7F8F896
  7957. 75A19675 E81638A0 CD5D6EFA 79A71B7B
  7958. 1D1EC300 B966BE5A D6620FE7 F27BB8EF
  7959. 4CE0C03F 59AE39B7 84099EAB F1A92E6B
  7960. 69E2ADCC F2EA7809 05203842 71187EC7
  7961. B297E6D5 02050656 A35FF1AA C2C44FFE
  7962. F7EF160F 9DECAA85 CF3D2924 F104CD00EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 1 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DEEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 1 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE:EMAIL=certificate@trustcenter.de/OU=1[NetModifier]1EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 1 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE
  7963. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##################################################
  7964. CN=Mark Champine/O=IrisEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 2 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DECertifierCertifier09008004 G001A09F 946701G0 2A03G002
  7965. 3A04G001 3A043082 04353082 039EA003
  7966. 02010202 0103300D 06092A86 4886F70D
  7967. 01010405 003081BC 310B3009 06035504
  7968. 06130244 45311030 0E060355 04081307
  7969. 48616D62 75726731 10300E06 03550407
  7970. 13074861 6D627572 67313A30 38060355
  7971. 040A1331 54432054 72757374 43656E74
  7972. 65722066 6F722053 65637572 69747920
  7973. 696E2044 61746120 4E657477 6F726B73
  7974. 20476D62 48312230 20060355 040B1319
  7975. 54432054 72757374 43656E74 65722043
  7976. 6C617373 20322043 41312930 2706092A
  7977. 864886F7 0D010901 161A6365 72746966
  7978. 69636174 65407472 75737463 656E7465
  7979. 722E6465 301E170D 39383033 30393133
  7980. 35373434 5A170D30 35313233 31313335
  7981. 3734345A 3081BC31 0B300906 03550406
  7982. 13024445 3110300E 06035504 08130748
  7983. 616D6275 72673110 300E0603 55040713
  7984. 0748616D 62757267 313A3038 06035504
  7985. 0A133154 43205472 75737443 656E7465
  7986. 7220666F 72205365 63757269 74792069
  7987. 6E204461 7461204E 6574776F 726B7320
  7988. 476D6248 31223020 06035504 0B131954
  7989. 43205472 75737443 656E7465 7220436C
  7990. 61737320 32204341 31293027 06092A86
  7991. 4886F70D 01090116 1A636572 74696669
  7992. 63617465 40747275 73746365 6E746572
  7993. 2E646530 819F300D 06092A86 4886F70D
  7994. 01010105 0003818D 00308189 02818100
  7995. DA38E8ED 32002971 83010DBF 8C01DCDA
  7996. C6AD39A4 A98A2FD5 8B5C685F 50C662F5
  7997. 66BDCA91 22ECAA1D 51D73DB3 51B2834E
  7998. 5DCB49B0 F04C55E5 6B2DC785 0B301C92
  7999. 4E82D4CA 02EDF76F BEDCE0E3 14B80553
  8000. F29AF456 8B5A9E85 93D1B482 56AE4DBB
  8001. A84B5716 BCFEF858 9EF8298D B07BCD78
  8002. C94FAC8B 670CF19C FBFC579B 575C4F0D
  8003. 02030100 01A38201 43308201 3F304006
  8004. 09608648 0186F842 01030433 16316874
  8005. 7470733A 2F2F7777 772E7472 75737463
  8006. 656E7465 722E6465 2F636769 2D62696E
  8007. 2F636865 636B2D72 65762E63 67693F30
  8008. 40060960 86480186 F8420104 04331631
  8009. 68747470 733A2F2F 7777772E 74727573
  8010. 7463656E 7465722E 64652F63 67692D62
  8011. 696E2F63 6865636B 2D726576 2E636769
  8012. 3F303C06 09608648 0186F842 0107042F
  8013. 162D6874 7470733A 2F2F7777 772E7472
  8014. 75737463 656E7465 722E6465 2F636769
  8015. 2D62696E 2F52656E 65772E63 67693F30
  8016. 3E060960 86480186 F8420108 0431162F
  8017. 68747470 3A2F2F77 77772E74 72757374
  8018. 63656E74 65722E64 652F6775 6964656C
  8019. 696E6573 2F696E64 65782E68 746D6C30
  8020. 28060960 86480186 F842010D 041B1619
  8021. 54432054 72757374 43656E74 65722043
  8022. 6C617373 20322043 41301106 09608648
  8023. 0186F842 01010404 03020007 300D0609
  8024. 2A864886 F70D0101 04050003 81810089
  8025. 1BF4EFE9 38E26C0C F6CD6F49 CE29CCFB
  8026. A60FF98D 3E9546D6 FC473289 B2C80661
  8027. 7AD2E70D 1302940B D98B5647 F4BBE7C5
  8028. 5F7BF463 4CAE7C34 EA0DA2A9 B32C85F3
  8029. E3FE2754 1092B08F 92C19842 187048DB
  8030. 4E2CEB0D 2468E4D1 F7BE09A9 2987BBE8
  8031. DADC3EA3 884231F5 D1E37FAE D88E005A
  8032. 7498B04F C6FF237B 5C730078 C9DB4E00EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 2 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DEEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 2 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE:EMAIL=certificate@trustcenter.de/OU=1[NetModifier]1EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 2 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE
  8033. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##################################################
  8034. CN=Mark Champine/O=IrisEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 3 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DECertifierCertifier09008004 G00162CD 6E3A01G0 2A03G002
  8035. 3A04G001 3A043082 04353082 039EA003
  8036. 02010202 0104300D 06092A86 4886F70D
  8037. 01010405 003081BC 310B3009 06035504
  8038. 06130244 45311030 0E060355 04081307
  8039. 48616D62 75726731 10300E06 03550407
  8040. 13074861 6D627572 67313A30 38060355
  8041. 040A1331 54432054 72757374 43656E74
  8042. 65722066 6F722053 65637572 69747920
  8043. 696E2044 61746120 4E657477 6F726B73
  8044. 20476D62 48312230 20060355 040B1319
  8045. 54432054 72757374 43656E74 65722043
  8046. 6C617373 20332043 41312930 2706092A
  8047. 864886F7 0D010901 161A6365 72746966
  8048. 69636174 65407472 75737463 656E7465
  8049. 722E6465 301E170D 39383033 30393133
  8050. 35383439 5A170D30 35313233 31313335
  8051. 3834395A 3081BC31 0B300906 03550406
  8052. 13024445 3110300E 06035504 08130748
  8053. 616D6275 72673110 300E0603 55040713
  8054. 0748616D 62757267 313A3038 06035504
  8055. 0A133154 43205472 75737443 656E7465
  8056. 7220666F 72205365 63757269 74792069
  8057. 6E204461 7461204E 6574776F 726B7320
  8058. 476D6248 31223020 06035504 0B131954
  8059. 43205472 75737443 656E7465 7220436C
  8060. 61737320 33204341 31293027 06092A86
  8061. 4886F70D 01090116 1A636572 74696669
  8062. 63617465 40747275 73746365 6E746572
  8063. 2E646530 819F300D 06092A86 4886F70D
  8064. 01010105 0003818D 00308189 02818100
  8065. B6B4C135 052E0D8D ECA0406A 1C0E27A6
  8066. 50926B50 1B07DE2E E776CCE0 DAFC84A8
  8067. 5E8C636A 2B4DD94E 027611C1 0BF28D79
  8068. CA00B6F1 B00ED7FB A4173DAF AB697A96
  8069. 27BFAF33 A19A2A59 AAC4B537 08F212A5
  8070. 31B643F5 32967128 28AB8D28 86DFBBEE
  8071. E30C7D30 D6C352AB 8F5D279C 6BC0A3E7
  8072. 056B5749 44B36EEA 64CFD28E 7A507777
  8073. 02030100 01A38201 43308201 3F304006
  8074. 09608648 0186F842 01030433 16316874
  8075. 7470733A 2F2F7777 772E7472 75737463
  8076. 656E7465 722E6465 2F636769 2D62696E
  8077. 2F636865 636B2D72 65762E63 67693F30
  8078. 40060960 86480186 F8420104 04331631
  8079. 68747470 733A2F2F 7777772E 74727573
  8080. 7463656E 7465722E 64652F63 67692D62
  8081. 696E2F63 6865636B 2D726576 2E636769
  8082. 3F303C06 09608648 0186F842 0107042F
  8083. 162D6874 7470733A 2F2F7777 772E7472
  8084. 75737463 656E7465 722E6465 2F636769
  8085. 2D62696E 2F52656E 65772E63 67693F30
  8086. 3E060960 86480186 F8420108 0431162F
  8087. 68747470 3A2F2F77 77772E74 72757374
  8088. 63656E74 65722E64 652F6775 6964656C
  8089. 696E6573 2F696E64 65782E68 746D6C30
  8090. 28060960 86480186 F842010D 041B1619
  8091. 54432054 72757374 43656E74 65722043
  8092. 6C617373 20332043 41301106 09608648
  8093. 0186F842 01010404 03020007 300D0609
  8094. 2A864886 F70D0101 04050003 81810084
  8095. 86506279 A027E125 BA09B134 0F1309ED
  8096. 2DCAA3E6 95F930AC CD17A5CE 3D979DEC
  8097. 7C8F267F C061CA22 F791DD3C 36599A9B
  8098. 75F7BCE4 C8EDEC02 B622A7F3 2CF1C892
  8099. 786DB6EE C528EC80 204FB96B 08E72FA7
  8100. 861E7DB1 089F54B9 00373CA0 D81AC896
  8101. 1CF43214 9C3995B7 EEF04349 C25EE8CB
  8102. 796F53BF FB498A2C D84BD955 F2127000EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 3 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DEEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 3 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE:EMAIL=certificate@trustcenter.de/OU=1[NetModifier]1EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 3 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE
  8103. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##################################################
  8104. ContactsTitleC34W
  8105. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############
  8106. AdvancedTitleC34W
  8107. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############
  8108. ($LAN Wizard)DC
  8109. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######
  8110. ?actn019.gif
  8111. CN=Oscar Del Pozo Triscon/OU=DUB/O=LotusCN=Daffy Duck/O=WarnerBrosCN=Marina Bodik/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notesused for connection wizard34CiP
  8112. actn019.gifactn019.gif################################
  8113. comnnection record.gif
  8114. connectionpic.gifconnectionpic
  8115. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######################################################
  8116. connection2.gif
  8117. CN=Marina Bodik/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notesused for connection wizard34CiP
  8118. connectionwizard.gifconnectionwizard####
  8119. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####
  8120. CN=Mark Champine/O=IrisEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 4 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DECertifierCertifier09008004 G001BF38 601A01G0 2A03G002
  8121. 3A04G001 3A043082 04353082 039EA003
  8122. 02010202 0105300D 06092A86 4886F70D
  8123. 01010405 003081BC 310B3009 06035504
  8124. 06130244 45311030 0E060355 04081307
  8125. 48616D62 75726731 10300E06 03550407
  8126. 13074861 6D627572 67313A30 38060355
  8127. 040A1331 54432054 72757374 43656E74
  8128. 65722066 6F722053 65637572 69747920
  8129. 696E2044 61746120 4E657477 6F726B73
  8130. 20476D62 48312230 20060355 040B1319
  8131. 54432054 72757374 43656E74 65722043
  8132. 6C617373 20342043 41312930 2706092A
  8133. 864886F7 0D010901 161A6365 72746966
  8134. 69636174 65407472 75737463 656E7465
  8135. 722E6465 301E170D 39383033 30393134
  8136. 30303230 5A170D30 35313233 31313430
  8137. 3032305A 3081BC31 0B300906 03550406
  8138. 13024445 3110300E 06035504 08130748
  8139. 616D6275 72673110 300E0603 55040713
  8140. 0748616D 62757267 313A3038 06035504
  8141. 0A133154 43205472 75737443 656E7465
  8142. 7220666F 72205365 63757269 74792069
  8143. 6E204461 7461204E 6574776F 726B7320
  8144. 476D6248 31223020 06035504 0B131954
  8145. 43205472 75737443 656E7465 7220436C
  8146. 61737320 34204341 31293027 06092A86
  8147. 4886F70D 01090116 1A636572 74696669
  8148. 63617465 40747275 73746365 6E746572
  8149. 2E646530 819F300D 06092A86 4886F70D
  8150. 01010105 0003818D 00308189 02818100
  8151. BF2F63D6 367BB20D D355F564 6CE6255D
  8152. C6B4C814 BA253883 EB5662A5 55A965A3
  8153. F42399C2 4BB9D0CD 5467A6A3 A0A3A933
  8154. 2B76E4BD AD77B2ED 5C1274C3 C5B60F52
  8155. 9A729343 90626615 0F45A5DD E0DDB86F
  8156. 406E57C1 7972A360 AABA761D 1289535A
  8157. FC02BEE1 0913C54A 2FDC3D8B 19ADD78B
  8158. 2445FB4C F4CD5C35 1D294C51 F3F26C55
  8159. 02030100 01A38201 43308201 3F304006
  8160. 09608648 0186F842 01030433 16316874
  8161. 7470733A 2F2F7777 772E7472 75737463
  8162. 656E7465 722E6465 2F636769 2D62696E
  8163. 2F636865 636B2D72 65762E63 67693F30
  8164. 40060960 86480186 F8420104 04331631
  8165. 68747470 733A2F2F 7777772E 74727573
  8166. 7463656E 7465722E 64652F63 67692D62
  8167. 696E2F63 6865636B 2D726576 2E636769
  8168. 3F303C06 09608648 0186F842 0107042F
  8169. 162D6874 7470733A 2F2F7777 772E7472
  8170. 75737463 656E7465 722E6465 2F636769
  8171. 2D62696E 2F52656E 65772E63 67693F30
  8172. 3E060960 86480186 F8420108 0431162F
  8173. 68747470 3A2F2F77 77772E74 72757374
  8174. 63656E74 65722E64 652F6775 6964656C
  8175. 696E6573 2F696E64 65782E68 746D6C30
  8176. 28060960 86480186 F842010D 041B1619
  8177. 54432054 72757374 43656E74 65722043
  8178. 6C617373 20342043 41301106 09608648
  8179. 0186F842 01010404 03020007 300D0609
  8180. 2A864886 F70D0101 04050003 81810094
  8181. 68141B25 9E2999B1 B223D244 B3959FD1
  8182. 9E5504DD E32F8233 55967719 9D2B9E65
  8183. 1CFA8AE3 C78F25FC B11E5546 0F8FFF4F
  8184. 372FA476 59A664EB D51670BD DD95330C
  8185. A40D24EB 6450B443 11F243BE 0D719822
  8186. EC01AFEC F7C75C71 C3759158 19E8DDA0
  8187. F4B4F1BC 104AF393 B40649BB 1F66D2BD
  8188. 7447E19A F9EBD7AB 6D1FBAE1 1D2CDA00EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 4 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DEEMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 4 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE:EMAIL=certificate@trustcenter.de/OU=1[NetModifier]1EMAIL=certificate@trustcenter.de/OU=TC TrustCenter Class 4 CA/O=TC TrustCenter for Security in Data Networks GmbH/L=Hamburg/ST=Hamburg/C=DE
  8189. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris##################################################
  8190. CN=Mark Champine/O=IrisCN=TC TrustCenter Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DECertifierCertifier0900F103 G001BA28 EEEF01G0 2A03G002
  8191. AB03G001 AB033082 03A63082 028E0201
  8192. 07300D06 092A8648 86F70D01 01040500
  8193. 30819831 0B300906 03550406 13024445
  8194. 3110300E 06035504 08130748 616D6275
  8195. 72673110 300E0603 55040713 0748616D
  8196. 62757267 31173015 06035504 0A130E54
  8197. 43205472 75737443 656E7465 72312030
  8198. 1E060355 040B1317 43657274 69666963
  8199. 6174696F 6E204175 74686F72 69747931
  8200. 2A302806 03550403 13215443 20547275
  8201. 73744365 6E746572 20536572 76657220
  8202. 43657274 69666963 61746530 1E170D39
  8203. 37303630 31313630 3532335A 170D3939
  8204. 31323331 31363035 32335A30 8198310B
  8205. 30090603 55040613 02444531 10300E06
  8206. 03550408 13074861 6D627572 67311030
  8207. 0E060355 04071307 48616D62 75726731
  8208. 17301506 0355040A 130E5443 20547275
  8209. 73744365 6E746572 3120301E 06035504
  8210. 0B131743 65727469 66696361 74696F6E
  8211. 20417574 686F7269 7479312A 30280603
  8212. 55040313 21544320 54727573 7443656E
  8213. 74657220 53657276 65722043 65727469
  8214. 66696361 74653082 0122300D 06092A86
  8215. 4886F70D 01010105 00038201 0F003082
  8216. 010A0282 010100B0 6FFF798D 17F338B9
  8217. 674CF997 7C6F6F18 E20C3D3A A3D1C7DE
  8218. 0AA3B4B9 27460741 EA4E01EA CB8E0BCD
  8219. 99AF1B39 E8AA3978 BC02165F 4ADE2728
  8220. 7EBB75EB 183061A8 FB8CBA23 6C90CCC7
  8221. 9B96845E D6EAEE4E 0B0EB8FD 07368656
  8222. 02AC88A5 1E3D4769 2B57CC42 C668129F
  8223. 6860D9C6 D5990146 384D6847 B1B8F837
  8224. BF8E6812 50061BD0 6EA1B33E BB27C02C
  8225. 00219085 5EA9FC19 6D55175D 1DE977DB
  8226. 6E58C9B8 3A9B63D8 20097ABF 6B1184AD
  8227. 3C18C04C 44E90BEF F74F790F 308DDB41
  8228. 9B1730D9 47D2E65B 3F16311B 25DAF362
  8229. 61F9EA02 011FDEA2 1B9A64E8 7B1CB025
  8230. 035CCA44 10F58A4C 9D0B4130 E48686C4
  8231. E385A092 6019AE29 047E504D 242F32F4
  8232. 56D49CF2 ECAD5902 03010001 300D0609
  8233. 2A864886 F70D0101 04050003 82010100
  8234. 3863D23F C5115E81 2E23356A 25221D58
  8235. 9248FBA0 2D42540B 9DEF49AC 9E739DCD
  8236. 2FEA8D90 5C4AD058 7C4EA72D 8604056A
  8237. A3E5A558 4EF58C15 0EB262C6 A124C11A
  8238. DC2E7CBC 97AE7860 5D26FDBE C5FAB52D
  8239. 928AF3C5 658775B1 E6830A5F 2E788B54
  8240. 548CCD94 C5A0CBB2 AD425ECD ABA0267D
  8241. 78E320F0 6ECF1E12 2B321542 29AA54E7
  8242. 8B715844 CBFEB3A8 AD664E88 855E00F6
  8243. B1C53442 8BC0BCB4 F489AA49 2F7E8A8E
  8244. DF022963 339F80C2 FB332DD4 203219EA
  8245. CC605FF8 C18B6945 356D8074 03C503C2
  8246. 5BD9EC83 D9832E82 8FE8AE82 029842D6
  8247. 892BC8AF A94ADA06 ACFC2A27 61F42B22
  8248. BEE606FE 899B7B46 60A2CA13 80167208
  8249. AD82F0E8 FF049949 0FECE314 09A7FC9E
  8250. 00CN=TC TrustCenter Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DEO=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE:O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE1[NetModifier]1CN=TC TrustCenter Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE
  8251. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris#################################################
  8252. CN=Mark Champine/O=IrisCN=TC TrustCenter Proven Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DECertifierCertifier0900FF03 G001D8CF 9B7B01G0 2A03G002
  8253. B903G001 B9033082 03B43082 029C0201
  8254. 08300D06 092A8648 86F70D01 01040500
  8255. 30819F31 0B300906 03550406 13024445
  8256. 3110300E 06035504 08130748 616D6275
  8257. 72673110 300E0603 55040713 0748616D
  8258. 62757267 31173015 06035504 0A130E54
  8259. 43205472 75737443 656E7465 72312030
  8260. 1E060355 040B1317 43657274 69666963
  8261. 6174696F 6E204175 74686F72 69747931
  8262. 31302F06 03550403 13285443 20547275
  8263. 73744365 6E746572 2050726F 76656E20
  8264. 53657276 65722043 65727469 66696361
  8265. 7465301E 170D3937 30363031 31363131
  8266. 34305A17 0D393931 32333131 36313134
  8267. 305A3081 9F310B30 09060355 04061302
  8268. 44453110 300E0603 55040813 0748616D
  8269. 62757267 3110300E 06035504 07130748
  8270. 616D6275 72673117 30150603 55040A13
  8271. 0E544320 54727573 7443656E 74657231
  8272. 20301E06 0355040B 13174365 72746966
  8273. 69636174 696F6E20 41757468 6F726974
  8274. 79313130 2F060355 04031328 54432054
  8275. 72757374 43656E74 65722050 726F7665
  8276. 6E205365 72766572 20436572 74696669
  8277. 63617465 30820122 300D0609 2A864886
  8278. F70D0101 01050003 82010F00 3082010A
  8279. 02820101 00E19B68 29363422 A783429A
  8280. C6E5D053 B2B5C54D A5884545 7A669A1C
  8281. E0A3E5CB ACF755CE 38B5FD56 A0F730F0
  8282. 7957D8A5 68319445 FAFB4240 D4A65C2B
  8283. 3CFB1D4D C8B61F26 9718D785 C71AAE0C
  8284. DD672A27 C0EEFF14 B2D89C4E A9A12264
  8285. F334582C 9D4886CC D90F8E96 D5E1D8EA
  8286. A3783BF9 1234F378 F449582D 9DDC2DD1
  8287. 0807CB49 76C34D70 68BCD1B6 2EDEF69B
  8288. 299EC850 7B52846F 42158BE3 6F3E0AF0
  8289. 2683C02A 96D2CD8B 23BC74C6 0213E756
  8290. FC66105E A9C0A107 6E1050E4 2B798D25
  8291. B6AF9466 87E905FB BB4E57B6 BC01C727
  8292. 8985F13D 24C88D6C 6F180F1A D0A53108
  8293. F7C69553 0C243A70 90E5C27F 495F132E
  8294. DFF2EDC7 0CD6730C EF08CA9E 4FF3C39E
  8295. 3245506F 39020301 0001300D 06092A86
  8296. 4886F70D 01010405 00038201 01004141
  8297. 592B4994 D76BC18C AF0AB896 7B254921
  8298. B92EAC84 86930518 44C35A07 A203B340
  8299. F1568560 C7FD6A37 B91BA7E7 FB53A7E7
  8300. 172F3E02 15B8136F 927EEFFA BA277D89
  8301. 63385017 0CDF4393 2E7411C9 35723AB1
  8302. C1DDB382 F598EC87 A5806FB0 A75CFEA7
  8303. 63CCB419 8CF1F02D F3E3C144 573C1B6E
  8304. CEB4A1D8 2F13E6CF F701AADD C2B40AEF
  8305. 804A0A77 70D14565 97B56AB7 36DF5E36
  8306. 6F6C441E 246FE6FF 537746D4 F6B5E6F1
  8307. C9105519 2432564E D1805239 D378D472
  8308. C897DDA4 B71C0CC8 AE984111 ADADFA5B
  8309. FF17BAA1 7643D3DD 165D3930 3DEA8004
  8310. C50AA1A1 E79EF163 E72C5423 46657582
  8311. 1D18A7B7 9CF0C5B1 E1309E8C CB0558B9
  8312. 119EFC23 CA39255A 86F8E91C 1FF400CN=TC TrustCenter Proven Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DEO=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE:O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE1[NetModifier]1CN=TC TrustCenter Proven Server Certificate/OU=Certification Authority/O=TC TrustCenter/L=Hamburg/ST=Hamburg/C=DE
  8313. CN=Mark Champine/O=IrisCN=Rob Slapikoff/O=Iris
  8314. ##########################################################
  8315. CN=William Zircher/O=IrisCN=Ryan Jansen/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  8316. act_EDIT.GIFact_EDITedit.GIF134CiP##########################
  8317. advancesw2.gif
  8318. advancesw.gifAdvSwitcher
  8319. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes############
  8320. contactsw2.gif
  8321. contactsw.gifContactSwitcher
  8322. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########
  8323. advancedout.gif
  8324. advancedout.gifAdvOutline
  8325. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##
  8326. contactsout.gif
  8327. contactsout.gifContactsOutline
  8328. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####################################################
  8329. (AddressPicker)AddressPickerPCD
  8330. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############################
  8331. Puffin.gif
  8332. Puffin.gifpuffin
  8333. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################
  8334. Canvas.GIF
  8335. Canvas.GIFcanvas
  8336. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################
  8337. Circuits.gif
  8338. Circuits.gifcircuit
  8339. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################
  8340. mSkEWY(
  8341. Flowers.gif
  8342. Flowers.gifflowers
  8343. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####################
  8344. Light.gif
  8345. Light.giflight
  8346. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########################
  8347. Beach.gif
  8348. Beach.gifbeach
  8349. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###########################
  8350. CN=Debbie Branco/O=IrisCN=Rob Slapikoff/O=IrisCN=Rob Shaver/O=IrisCN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  8351. alph.bmpalph.bmp
  8352. @tab1.gif34CiP#################
  8353. ContactsAndPicker|ContactsAndPicker#4C
  8354. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########
  8355. 2($Connections)/O
  8356. RLAN5
  8357. RLAN5
  8358. RLAN6
  8359. RLAN6
  8360. SMTPPullRouting
  8361. SMTPPullRouting
  8362. PullRoutingTimeout
  8363. PullRoutingTimeout
  8364. PullThisServer
  8365. PullThisServer
  8366. PullAllPrimary
  8367. PullAllPrimary
  8368. PullAllAlternates
  8369. PullAllAlternates
  8370. PullSpecificList
  8371. PullSpecificList
  8372. PullChooseSpecific
  8373. PullChooseSpecific
  8374. SourceSourceDomainDestinationDestinationDomainPortNameEnabledPhoneNumberIntervalScheduleWeekDaysMailThresholdTasksRepPriorityCostLinkInfoLinkScriptInfoRLANTagRLAN1RLAN2RLAN3RLAN4RLAN5RLAN6PassthruServerRepTypeFileNamesConnectionLocationConnectionTypeTimeLimitRemoteLanServiceConnectionRecordFirstCountryRouterTypeSMTPPullRoutingPullRoutingTimeoutPullThisServerPullAllPrimaryPullAllAlternatesPullSpecificListPullChooseSpecific$Conflict$REF
  8375. Connection
  8376.     L1S2S3S1_
  8377. SourceSourceDomainDestinationDestinationDomainPortName
  8378. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##################################
  8379. !$SUBVIEWDomainName\Domain Name:23($CrossCertByName)/ON
  8380. NameCombo$Conflict$REF
  8381. CrossCertificate
  8382. NameCombo
  8383.  NameComboName Combination&
  8384. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############
  8385. ##########################################################
  8386. ##########################################################
  8387. (GIF89a
  8388. WWuzz
  8389. !vp7m
  8390. .n3V+
  8391. B)T'A6`
  8392. Tf8EP
  8393. Ugdx"E
  8394. BcKF<
  8395. d.LY:t8"
  8396. C<QA0M
  8397. fW )A
  8398. 0-iBj
  8399. S%&mIK
  8400. j&)IGq
  8401. d![99
  8402. jV"kh
  8403. Dz@Q!ZD
  8404. S?s<[
  8405. %5Wsw
  8406. pSCcN
  8407. ,rW).
  8408. (`A:a
  8409. 9VhXkF
  8410. I,    uoV
  8411. i~&6$
  8412. 8bIU4
  8413. ?OyjP
  8414. QvIRN
  8415. ~I2q2
  8416. jK)7&:
  8417. xiE(1
  8418. pU+#S!
  8419. +mcAqKr 
  8420. :qGFl
  8421. #YvV9
  8422. `+6dc
  8423. Mp    gpA
  8424. anh\&{
  8425. NdPeXP-A
  8426. \u]J)
  8427. &:U~A
  8428. (}l`z    
  8429. }0[G;v
  8430. L~fM#
  8431. }P#+    6
  8432. xYFMV
  8433. 0+=.i
  8434. !2"Ii
  8435. VCbDH
  8436. -#14C{
  8437. fa&_r
  8438. REVfl!b%
  8439. E0n*-
  8440. Z QG`
  8441. VEWtA_
  8442. jUW#e
  8443. UyuyZ
  8444. tkm4)
  8445. )xtX_
  8446. SW){Gk
  8447. IdLd'f?c
  8448. @>W.(
  8449. YsyZ#
  8450. #e%07s[
  8451. M>sfa
  8452. rd$,pp,hdtY
  8453. _/||p0
  8454. ~={w 
  8455. fd0aq[\
  8456. T8@Db
  8457. %Wsq3
  8458. NH.s5
  8459. "&G=L"obt
  8460. NHff7
  8461. 2b"SFU
  8462. 1g58b
  8463. J@bKx
  8464. W!V&+FD"[
  8465. ##h9v2
  8466. #arj)7
  8467. {'4_q
  8468. #x%rJ
  8469. 4O=fI
  8470. (@&x    
  8471. P5V#T@
  8472. m w}`K
  8473. K<tJ_
  8474. 9Z_6fVB
  8475. 24OF`I
  8476. r&'r4
  8477. ^gVQ)
  8478. . %1W
  8479. *IDTj^/I^#
  8480. {jtel
  8481. <gSi^
  8482. /iVw1/
  8483. (c^B<+
  8484. D@FH6
  8485. P|V07~c}
  8486. {!=ou
  8487. J9 Q9
  8488. !4B@Y
  8489. /?GOW__
  8490. *    |z*
  8491. 4F&$wa
  8492. x.RI%
  8493. N9#y%
  8494. l")ja
  8495. iRSOb
  8496. ,P"Vy
  8497. VPbK^
  8498. `Q92+
  8499. Zc'O{
  8500. ;L([X
  8501. ;    6<A
  8502. $L'+L<
  8503. LH)Mfp
  8504. =h(-    
  8505. D7}\M
  8506. ViU4D[
  8507. A~SHE
  8508. J&1:/`
  8509. ^F9<Z
  8510. xR]2R
  8511. ;G\@Fd
  8512. UR6[MwUSN3_
  8513. >c7v>A
  8514. q&51!a1
  8515. 0qqap
  8516. <]]>O_o
  8517. {v,Y1e
  8518. ![:dT
  8519. ~tRE%
  8520. N{lP.!+
  8521. +0PyI
  8522. &5*K#=
  8523. %I< fx
  8524. kP@m 
  8525. J3Z-X
  8526. qL,,1
  8527. %H;92Z
  8528. 21WbRUb
  8529. /~&&L
  8530. Qklt2
  8531. t>xGc
  8532. O=Lotus Notes
  8533. O=Lotus Notes
  8534. PURSAFO
  8535. |.:#U
  8536. O=Lotus Notes
  8537. CN=Lotus Notes Template Development/O=Lotus Notes
  8538. PURSAFO
  8539. O]iOkO
  8540. $ImagesWide
  8541. $ImagesHigh
  8542. $ImagesColorize
  8543. $ImageData
  8544. $ImageNames
  8545. $TITLE
  8546. (GIF89a
  8547. p0pLfN
  8548. 9y"4`
  8549. AGkUUQ
  8550. 8B<q+!Ul
  8551. Velo\Q
  8552. D~_b`
  8553. ^^)f_
  8554. |g<g;O
  8555. RB?KU
  8556. Y-    ,2g
  8557. !q\JT
  8558. 8pS!L
  8559. /jdR2
  8560. ANeW(r
  8561. x    0UT5
  8562. /xZ(0
  8563. MQ49&{
  8564. &de# 
  8565. BYK3Y@.    &Q
  8566. O?G))
  8567. TA:9o&
  8568. cMB&pnx
  8569. V%GI?Sq3:
  8570. z@vqq8p
  8571. Q1Zc25
  8572. _$KJb>DC?R
  8573. ZZf2Wh
  8574. Q8&Ts}
  8575. !OiSsii
  8576. N*q`&MW
  8577. B(Do$
  8578. XQ6|u
  8579. gGj_<
  8580. $gN\0F
  8581. zrN%H)3
  8582. `    jBVg
  8583. (L6$n
  8584. Q&Y9a
  8585. br?wh
  8586. PT<@802($
  8587. &**.:8;=?;69EAKM/PSS3/4U_a[Ye3+ jqsumkoqiq!
  8588. "(06<PL
  8589. IH<<F4@H>>
  8590. #Q.@Ire
  8591. ?rdIy'M
  8592. K/K H
  8593. 'Iq#'
  8594. @/gTs
  8595.  1&<!=1
  8596. ENr31
  8597. s'    ]MF
  8598. D&zF[
  8599. >> M    
  8600. [8y/t
  8601. 'R'uT
  8602. f!!rnH
  8603.  '%V"s
  8604. bwpm^228f
  8605. ^S4EY4
  8606. iv*VX[p5
  8607. qkUWIg'
  8608. "H9||
  8609. l-L%G|g
  8610. \,)$X
  8611. I|"/$
  8612.  $$B$0B <2>Px
  8613. xhnrvvR
  8614.  (X),$
  8615. &"D+FSW[
  8616. ps[_wK+4D
  8617. !D9bh
  8618. T]e4\^
  8619. ;P-0+X
  8620. l`MF\
  8621. |$"FP
  8622. M\I;v
  8623. Xb@+[E W
  8624. <l&0Q
  8625. WIV.#;u
  8626. ]P{ `9F
  8627. . ::`
  8628. bT~$!
  8629. %LdVy
  8630. E (0A
  8631. 0cfBI
  8632.  }HAY
  8633. lS}C0
  8634. n2-p2*
  8635. Jm<h`
  8636. "ly8@
  8637. =-\]Y
  8638. 2?`3;
  8639. n ?v*
  8640. U tB3
  8641. $g"U [
  8642. ]u >.gr
  8643. c|qkk
  8644. }*5=EM=
  8645. &.6>F
  8646. `\KFG
  8647. c.#;/
  8648. :hRPa
  8649. G<qCi
  8650. +SGO+U
  8651. iKcZ,
  8652. %.k1]
  8653. 92nQ:
  8654. d$%INJV
  8655. HIjsaE
  8656. ({E=jR
  8657. NEojq
  8658. 8@lcO$
  8659. F&8g3
  8660. PC@I 
  8661. @T;5    T
  8662. B)^`Ff
  8663. ;8!*2
  8664. Gys97C
  8665. O=Lotus Notes
  8666. O=Lotus Notes
  8667. PURSAFO
  8668. |.:#U
  8669. O=Lotus Notes
  8670. CN=Lotus Notes Template Development/O=Lotus Notes
  8671. PURSAFO
  8672. $ImagesWide
  8673. $ImagesHigh
  8674. $ImagesColorize
  8675. $ImageData
  8676. $ImageNames
  8677. $TITLE
  8678. (GIF89a
  8679. >(*@?
  8680. _\H_bD
  8681. %P3RH
  8682. a? pP
  8683. E6eli
  8684. V.flx
  8685. C4=t -
  8686. IA=fbJ}$
  8687. -OyXQw
  8688. Q`R*mA
  8689. B<!lvH
  8690. XVixT6
  8691. 2rwbT
  8692. J%~XW
  8693. aBa%L7
  8694. }L1C\
  8695. %bT0f
  8696. SbT.bC5+
  8697. &U0$2
  8698. 7p>qg:
  8699. 7s ;u
  8700. aK|v`jf
  8701. @KRh.D
  8702. D$*d    
  8703. V'y0O/
  8704. 9xl(,
  8705. V/v,6
  8706. ?DWK~^
  8707. JD54wa
  8708. 6ti~Y$E
  8709. RAp5N
  8710. 2;W6k
  8711. tXr=b&
  8712.  >r|K
  8713. @Xhh`
  8714. {#epT
  8715. 9 F7N0H>X
  8716. fg2    a
  8717. QDj(]
  8718. qN@o&
  8719. aXM6#k+
  8720. m*67/
  8721. 88 ++v
  8722. Jq-.!
  8723. +    =J(
  8724. _0AhrD
  8725. U,+K5
  8726. X:2@)D5
  8727. 43&/9&
  8728. 8"V~?!z
  8729. &yT$=Z
  8730. !C*$G
  8731. dWIQ'T
  8732. i5Ain
  8733. \5"Wh
  8734. 4TR~5
  8735. !$#Tl
  8736. ||*4LCR
  8737. 72+V%
  8738. EcL<$ln
  8739. }CoXX[gBVKtM
  8740. HU@o`@,
  8741. VZ(`C]
  8742. b!*PcB
  8743. cPs{1
  8744. Y-=6@
  8745. =HT-@O
  8746. O~DDq
  8747. TC~y@
  8748. g0b1)
  8749. _~X`"
  8750. sxO*\
  8751. T\CzP
  8752.     de%a
  8753. &7xOs
  8754. I+Pjr
  8755. Bu@-s
  8756. L5>%M,
  8757. -DU\eDF
  8758. hEpS0
  8759.     xU4d
  8760. D'/}YA
  8761. %D05d
  8762. si-D5
  8763. #C&tX
  8764.  9E&K
  8765. p~zg0s
  8766. /gUvD K
  8767. ht70t'
  8768. sfFg(`p
  8769. 2NTie
  8770. avl`-9x
  8771. Mj$IU
  8772. -r,.8
  8773. ar^S$
  8774. #;i`Q
  8775. U"#/W0
  8776. #f    K    
  8777. HWELY,qm B
  8778. +hC}G%
  8779. "OKlfP
  8780. \JI)d
  8781. %OxRi
  8782. @_EQR
  8783. dw|Zm
  8784. s1%dB
  8785. d "<F
  8786. aW""N
  8787. LvFxH
  8788. BonlwZm2rkY
  8789.     8\anB
  8790.     _SAR
  8791. _|b`4
  8792. HC0bb
  8793. E6la>~
  8794. DdwXv
  8795. ?4G.B
  8796. +4"#4
  8797. _c8/_
  8798. t1e2B, 
  8799.  F%^V
  8800. jPS0K
  8801. 00K@0
  8802. v~9p@
  8803. @Tv8%
  8804. zR5M;_O
  8805. 8e`@@
  8806. *TAHa
  8807. cDE8 $X
  8808. )TI    ZN!"C
  8809. B!L`\
  8810. $~)L&!
  8811. 0dnH#NH
  8812. dQDbP
  8813. &TJX`
  8814. 0UUP,
  8815. SYlp&    
  8816. *p<G'
  8817. -V &R{\
  8818. fLi1P
  8819. `aLK@
  8820. CyxI=
  8821. pyTpIx
  8822. p{pDy
  8823. C<ir+
  8824. w@ur9
  8825. ^0dva
  8826. (O0Oo0
  8827. iTd+B
  8828. @JR%R
  8829. ecR)SBf.
  8830.     (C:-
  8831. O=Lotus Notes
  8832. O=Lotus Notes
  8833. PURSAFO
  8834. |.:#U
  8835. O=Lotus Notes
  8836. CN=Lotus Notes Template Development/O=Lotus Notes
  8837. PURSAFO
  8838. >4HAJ
  8839. $ImagesWide
  8840. $ImagesHigh
  8841. $ImagesColorize
  8842. $ImageData
  8843. $ImageNames
  8844. $TITLE
  8845. (GIF89a
  8846. 99Phh
  8847. gw    vW]|<`
  8848. |m3\>
  8849. @vkB\
  8850. EbA"N
  8851. -F$#U
  8852.     YvF<y(
  8853. W|B%0
  8854. .#0Mn
  8855. R%Q    "
  8856. UFXTAyT
  8857. QKQ$D`
  8858. rG#4A
  8859. 8d }q
  8860. WS<(0
  8861. Stc'\
  8862. 61#CD
  8863. rGyTF
  8864. sq>U=Q
  8865. Pt0 7
  8866. 668'v
  8867. 'HI8HQ
  8868. ,,c8B
  8869. ;clPa
  8870. c<XP    
  8871. L4$.FZj6
  8872. .V6.^
  8873. 8$8H<
  8874. (5j\[
  8875. qcJ|    
  8876. rS8AL
  8877.  \}UC0
  8878. +TP1&
  8879. +^A`c
  8880. J #8k1
  8881. SgP4t_Q
  8882. 6=:rK
  8883. 8De2r
  8884. &_X@4
  8885. #8NV`
  8886. TDK.i
  8887. L" Wu}
  8888. )$9rc
  8889. UJ/ 0#
  8890. #EOdB
  8891. Ph`PB
  8892. \ g=Q9V
  8893. JZd@bM<cb1
  8894. |UG)eh
  8895. 2?ntg~
  8896. i {B7
  8897. d'R2q
  8898. $ )pH7
  8899. h&q[ Ss
  8900. 1% 3d
  8901. ,e6HY}
  8902. b<#)N
  8903. f>f;L
  8904. 3b`O^
  8905. 0t^Y@$
  8906. ,.v|e
  8907. |GF-Ps~
  8908. 4Jp '
  8909. Ls8fWB,
  8910. q &`/
  8911. #XPC+dx
  8912. SIu  4yK
  8913. 4K_&KF    
  8914. 2IZP#
  8915. vqAb0
  8916. |wQ5a6c
  8917. y3-Gye
  8918. KbiLKQ0
  8919. B7HpL=K
  8920. 0:!4Y#5
  8921. PZ8x2#
  8922. gErW3
  8923. a    Hxv
  8924. PtiMy
  8925. 9`Q`a6
  8926. :a\U;
  8927. ?A _='z
  8928. `av*G
  8929. b9gZ3
  8930. qDj4?
  8931. koZ$DI
  8932. C]v-R
  8933. ZZCw8
  8934. YG4)$
  8935. TNi7R
  8936. CS<$q
  8937. $uVpZr
  8938. o6TQ6?    |qg
  8939. yf!_&
  8940. tTtV:Y
  8941. "0a9R    tP
  8942. $>"'C
  8943. QBL)4
  8944. e-D S8
  8945. 4 %P)
  8946. \9^D61
  8947. wp_*iI
  8948. LEWxa
  8949. UyT*D
  8950. U@b$Ej
  8951. GhC'-
  8952. "X+a(
  8953. k@n(tW
  8954. @H_0W
  8955. jMA:l    
  8956. C_dLEh
  8957. aE:E=A
  8958. g    Vu}
  8959. 4O$IP
  8960. &0*HdQ@
  8961. wty:}&x$:9
  8962. *|Rt%9"
  8963.  {x$\
  8964. }#o>=
  8965. #BOGH
  8966. a@[o03
  8967. *:    +D
  8968. ~5C]!
  8969. BLt30
  8970. (pD2B@
  8971. 'tLxA
  8972.  >)9@
  8973. dmo*R
  8974. zB5+\DC
  8975. @<Dh0
  8976. 39_K^
  8977. a68TU
  8978. $*>0f
  8979. LS5B    
  8980. 2yrD9D'
  8981. EEHB_B)9I+'2
  8982. T&)U^A
  8983. Up jK
  8984. 2B     "2a
  8985. [9,K&
  8986. .tLyy
  8987. 0G+S$c
  8988. 7qm5q
  8989.  0b6h`
  8990. y2!{EW
  8991. gp=\A
  8992. EE*3'
  8993. dm|J.TPD
  8994. XIWZ<
  8995. H^H0+
  8996. |5maR
  8997. I0R2C
  8998. RCW N
  8999. `)G@"U
  9000. C2BAt
  9001. i(h|w
  9002. `{K#    73,
  9003. <mLE6@
  9004. /~&NF
  9005. Q1Q$H
  9006. H@ <H 
  9007. ^$ LlQ8
  9008. D:$<H
  9009. $H:E $$4
  9010. T&,><:
  9011. PH\T t
  9012. tjV<$
  9013. jQBCX%a
  9014. %B@@.*"p
  9015. c|!Fm
  9016. yub    _
  9017. sD`K}
  9018. @Fc$`
  9019. EImz>
  9020. BYA&(
  9021. 8*PmA
  9022. #rme"#
  9023. TFf4T
  9024. P5E`HM
  9025. h YF-L(R
  9026. Cx-JQ
  9027. tL%|V
  9028. A.qvxUy
  9029. chf/h
  9030. 3>_[w
  9031. _Jfxv
  9032. A*h_W.
  9033. S%'Bp
  9034. !G,ES
  9035. PbqN;T
  9036. 0l"    Z)
  9037. =Jv`j
  9038. fS%Hp
  9039. OYWWX
  9040. 8365x
  9041. wS`}]L
  9042. Be;BzC
  9043. ](IDZo
  9044. H9!-U
  9045. 8f=(f
  9046. \d%H!O;~[
  9047. rDFWS
  9048. U8dW0
  9049. c0|6k
  9050. 6;16d$
  9051. TO0lXp.
  9052. =Ub%@
  9053. qia!JRav
  9054. 2M]6-
  9055. |d    I({U
  9056. |261H
  9057. a!=7t
  9058. ZnH[d!8
  9059. 'v0    ,
  9060. v>E(p
  9061. 6['`hv
  9062. &Dse@A
  9063. LY}|@
  9064. d:fzY1
  9065. &rr1    
  9066. We@Uu
  9067. 1q83$
  9068. Ab:Hb
  9069. O=Lotus Notes
  9070. O=Lotus Notes
  9071. PURSAFO
  9072. |.:#U
  9073. O=Lotus Notes
  9074. CN=Lotus Notes Template Development/O=Lotus Notes
  9075. PURSAFO
  9076. $ImagesWide
  9077. $ImagesHigh
  9078. $ImagesColorize
  9079. $ImageData
  9080. $ImageNames
  9081. $TITLE
  9082. (GIF89a
  9083. 05?A^
  9084. ]@`>a3/
  9085. DWFVU
  9086. Yqe$E_
  9087.     `.C    D
  9088. Xz'mkc
  9089. r    -Yu
  9090. 8*@P 
  9091. -gjb$
  9092. @5Onv
  9093. H5/z(T
  9094. v({~St
  9095. %A@VU
  9096. c=&n#>ak
  9097. F"kYw
  9098. <36f,
  9099. lfJ S@
  9100. Vn:&iZ
  9101. b/FF2
  9102. &8gVj
  9103. Q    ,xb
  9104. P(vAa
  9105. C^HhH
  9106. W;$[X
  9107. 7jRXj7 
  9108. qR&'Gb
  9109. JHB$)
  9110. m0GuA
  9111. x4}Ky
  9112. LlPE(
  9113. z*,R@c
  9114. K[3&8
  9115. h=:6NRJ6
  9116.     `r-vvFne
  9117. +*z2j
  9118. "=zs)/]Nsi
  9119. xu$C5l
  9120. w(sN#
  9121. t!MKn
  9122. M!UrugJ
  9123. YI$ATk
  9124. m]w+i
  9125. #]    IX
  9126. %/I5H
  9127. aIS1!i
  9128. Se^zW(dz
  9129. Ot:I/
  9130. Td6%k}
  9131. vN6&S
  9132. AQH\.
  9133. 9"-x^e
  9134. )#'zY
  9135.  PtOh
  9136. h~ci*f
  9137. +I:G=
  9138. rjsE!"L
  9139. \|9bNVLw
  9140. 9$c&~P
  9141. v6;|4s
  9142.     OI;/#G
  9143. 2h>`,
  9144. z'W#-
  9145. [HM    8L
  9146. Sy@@u
  9147. ly&ub
  9148. _v9otpcz
  9149. `P0p^
  9150. zPEeU
  9151. TaKutXI,,
  9152. mk,Py
  9153. wA%Z|
  9154. S$-;n
  9155. ypd%3
  9156. 8'5)M
  9157. )6)nO
  9158. |BD}NR
  9159. 9F>2S
  9160. %b+A}J
  9161. h!kb^
  9162. )3,Cw
  9163. f~gB?
  9164. X97<;
  9165. BYk$>
  9166. pLVK@
  9167. 4:vDfQ$
  9168. wV?Fd
  9169. XNzA*
  9170. #>"V=VRJ
  9171. 3!Sw8n
  9172. #w'FIH
  9173. qkQc^
  9174. :WBWEW
  9175. W|`    ~_)
  9176. u1Vw~
  9177. QpE7N1
  9178. dg?;C
  9179. F"%Vt
  9180. O."k8J
  9181. w(48u
  9182. n7vH"
  9183. &vA0#
  9184. J&9V~
  9185. )D0/l
  9186. _mWx%
  9187. ;lH#\
  9188. XkK&{
  9189. C6)cN
  9190. YeVfr~
  9191. \MW!8
  9192. R\9o)
  9193. rY^,N
  9194. NNee[
  9195. z?))\
  9196. t%H"e
  9197. de    :(
  9198. JERid
  9199. R&"e$i_{
  9200. 1vE,_
  9201. KS>+V
  9202. <U!a    
  9203. mS|)L
  9204. HIEwwl
  9205. Z*,mD
  9206. "kY!|.Jf
  9207. d#0jq
  9208. Ge)Qm~Z
  9209. |BU"_uZ
  9210. O=Lotus Notes
  9211. O=Lotus Notes
  9212. PURSAFO
  9213. |.:#U
  9214. O=Lotus Notes
  9215. CN=Lotus Notes Template Development/O=Lotus Notes
  9216. PURSAFO
  9217. $ImagesWide
  9218. $ImagesHigh
  9219. $ImagesColorize
  9220. $ImageData
  9221. $ImageNames
  9222. $TITLE
  9223. GIF89a/
  9224. O=Lotus Notes
  9225. O=Lotus Notes
  9226. PURSAFO
  9227. |.:#U
  9228. O=Lotus Notes
  9229. CN=Lotus Notes Template Development/O=Lotus Notes
  9230. PURSAFO
  9231. $ImagesHigh
  9232. $ImagesWide
  9233. $ImagesColorize
  9234. $ImageData
  9235. $ImageNames
  9236. $TITLE
  9237. Contacts
  9238. Contacts|People?
  9239. NotesView
  9240. Contacts
  9241. Contacts by Category
  9242. By Category|By Category?
  9243. NotesView
  9244. ContactsByCategory
  9245. Groups
  9246. Groups
  9247. NotesView
  9248. Groups
  9249. O=Lotus Notes
  9250. O=Lotus Notes
  9251. PURSAFO
  9252. |.:#U
  9253. O=Lotus Notes
  9254. CN=Lotus Notes Template Development/O=Lotus Notes
  9255. PURSAFO
  9256. pG. ()
  9257. $SiteMapList
  9258. contactsout.gif|ContactsOutline
  9259. Untitled
  9260. Contacts&Groups
  9261. ContactOutlineNotesView
  9262. O=Lotus Notes
  9263. O=Lotus Notes
  9264. PURSAFO
  9265. |.:#U
  9266. O=Lotus Notes
  9267. CN=Lotus Notes Template Development/O=Lotus Notes
  9268. PURSAFO
  9269. 6al&i
  9270. $BackgroundRepeat
  9271. $Background
  9272. $INFO
  9273. $$ScriptName
  9274. $BODY
  9275. NotesNavigator
  9276. ContactsTitle?
  9277. NotesNavigatorNotesView?
  9278. ContactsAndPicker?
  9279. ContactSwitcher?
  9280. NotesView?
  9281. Contacts|People?
  9282. O=Lotus Notes
  9283. O=Lotus Notes
  9284. PURSAFO
  9285. |.:#U
  9286. O=Lotus Notes
  9287. CN=Lotus Notes Template Development/O=Lotus Notes
  9288. PURSAFO
  9289. $TITLE
  9290. $Comment
  9291. $FrameSet
  9292. $Flags
  9293. Accounts
  9294. _Advanced\Accounts|Accounts?
  9295. Accounts
  9296. Connections
  9297. _Advanced\Connections|Connections?
  9298. Connections
  9299. Locations
  9300. _Advanced\Locations|Locations?
  9301. Locations
  9302. Certificates
  9303. _Advanced\Certificates|Server\Certificates
  9304. Certificates
  9305. International MIME Settings
  9306. _Advanced\International MIME Settings|InternationalMIMESettings?
  9307. InternationalMIMESettings
  9308. O=Lotus Notes
  9309. O=Lotus Notes
  9310. PURSAFO
  9311. |.:#U
  9312. O=Lotus Notes
  9313. CN=Lotus Notes Template Development/O=Lotus Notes
  9314. PURSAFO
  9315. $SiteMapList
  9316. advancedout.gif|AdvOutline
  9317. Untitled
  9318. Advanced
  9319. AdvancedNotesView
  9320. O=Lotus Notes
  9321. O=Lotus Notes
  9322. PURSAFO
  9323. |.:#U
  9324. O=Lotus Notes
  9325. CN=Lotus Notes Template Development/O=Lotus Notes
  9326. PURSAFO
  9327. $BackgroundRepeat
  9328. $Background
  9329. $INFO
  9330. $$ScriptName
  9331. $BODY
  9332. AdvancedTitle?
  9333. NotesNavigatorNotesView?
  9334. Advanced
  9335. AdvancedSwitcher
  9336. NotesView?
  9337. _Advanced\Accounts|Accounts?
  9338. O=Lotus Notes
  9339. O=Lotus Notes
  9340. PURSAFO
  9341. |.:#U
  9342. O=Lotus Notes
  9343. CN=Lotus Notes Template Development/O=Lotus Notes
  9344. PURSAFO
  9345. $TITLE
  9346. $Comment
  9347. $FrameSet
  9348. $Flags
  9349. "Small Fonts
  9350. Untitled
  9351. contactsw.gif|ContactSwitcher
  9352. HotspotRectangle9_1
  9353.     0S0E
  9354. Advanced
  9355. O=Lotus Notes
  9356. O=Lotus Notes
  9357. PURSAFO
  9358. |.:#U
  9359. O=Lotus Notes
  9360. CN=Lotus Notes Template Development/O=Lotus Notes
  9361. PURSAFO
  9362. U&dwaV
  9363. $INFO
  9364. $$ScriptName
  9365. $BODY
  9366. "Small Fonts
  9367. Untitled
  9368. advancesw.gif|AdvSwitcher
  9369. HotspotRectangle10_1
  9370.     0S0E
  9371. Contacts
  9372. O=Lotus Notes
  9373. O=Lotus Notes
  9374. PURSAFO
  9375. |.:#U
  9376. O=Lotus Notes
  9377. CN=Lotus Notes Template Development/O=Lotus Notes
  9378. PURSAFO
  9379. [1xWU
  9380. $INFO
  9381. $$ScriptName
  9382. $BODY
  9383. "Small Fonts
  9384. Untitled
  9385. Address Book
  9386. O=Lotus Notes
  9387. O=Lotus Notes
  9388. PURSAFO
  9389. |.:#U
  9390. O=Lotus Notes
  9391. CN=Lotus Notes Template Development/O=Lotus Notes
  9392. PURSAFO
  9393. $INFO
  9394. $$ScriptName
  9395. $BODY
  9396. "Small Fonts
  9397. Untitled
  9398. Settings
  9399. O=Lotus Notes
  9400. O=Lotus Notes
  9401. PURSAFO
  9402. |.:#U
  9403. O=Lotus Notes
  9404. CN=Lotus Notes Template Development/O=Lotus Notes
  9405. PURSAFO
  9406. $INFO
  9407. $$ScriptName
  9408. $BODY
  9409. '++LotusScript Development Environment:2:5:(Options):0:74
  9410. Option Public
  9411. Option Declare
  9412. Use "Wizard"
  9413. Use "RLANRoutines"
  9414. '++LotusScript Development Environment:2:5:(Forward):0:1
  9415. Declare Class ConnectionWizard As Wizard
  9416. Declare Function RepeatedConnectionID(Destination As Variant)  As String
  9417. '++LotusScript Development Environment:2:5:(Declarations):0:10
  9418. Dim wiz As Wizard
  9419. Const xxstr1="Please enter the name of the server you want to connect to."
  9420. Const xxstr2="Repeated connection"
  9421. Const xxstr3= "Configuration already exists. Do you want to create another one?"
  9422. Const xxstr4="An error has occurred creating the Local Area Network connection document. Please see your system administrator."
  9423. Const xxstr5="You have successfully created the connection document."
  9424. Class ConnectionWizard As Wizard
  9425.     Sub new( uidoc As NotesUIdocument, tableName As String, firstPanel As String)
  9426.     End Sub
  9427.     Function processNext( note As NotesDocument, currentPanel As String) As String
  9428.         If currentPanel = "a"  Then
  9429.             activateNextButton False
  9430.             processNext = "b"
  9431.         End If
  9432.     End Function
  9433.     Function processComplete( note As Notesdocument, currentPanel As String) As Integer
  9434.         On Error  Goto errhandle
  9435.         Dim w As New NotesUIWorkspace
  9436.         Dim s As New NotesSession
  9437.         Dim db As NotesDatabase
  9438.         Dim uidoc As NotesUIDocument
  9439.         Dim  doc As NotesDocument
  9440.         Dim  newdoc As NotesDocument
  9441.         Dim iServerName As NotesItem
  9442.         Dim inetworkaddress As NotesItem
  9443.         Dim iports As NotesItem        
  9444.         Dim iLocationType As NotesItem
  9445.         Dim ilocationName As NotesItem
  9446.         Dim vlist As Variant
  9447.         Dim success As Integer
  9448.         Set db=s.CurrentDatabase
  9449.         Set uidoc=w.CurrentDocument
  9450.         Set doc=uidoc.Document 
  9451.         Set iLocationType=doc.GetFirstItem("LocationType")
  9452.         Set iLocationName=doc.GetFirstItem("Name") 
  9453.         Set iServerName=doc.GetFirstItem("servername")
  9454.         Set inetworkaddress=doc.GetFirstItem("networkaddress")
  9455.         Set iports=doc.GetFirstItem("ports")
  9456.         If Len(iServerName.text)=0 Then 
  9457.             Msgbox xxstr1
  9458.             Exit Function
  9459.         End If
  9460. ' createLAN connection
  9461.         Set newdoc=New NotesDocument(db) 
  9462.         Call newdoc.ReplaceItemValue("Form","Connection")
  9463.         Call newdoc.ReplaceItemValue("ConnectionType","0")
  9464.         Call iserverName.CopyItemToDocument(newdoc,"Destination")  
  9465.         Call inetworkaddress.CopyItemToDocument(newdoc,"OptionalNetworkAddress")  
  9466.         Call iports.CopyItemToDocument(newdoc,"LanPortName")  
  9467.         Call iLocationName.CopyItemToDocument(newdoc,"ConnectionLocation")
  9468.         'Check for repeated connection
  9469.         Dim answer As Integer
  9470.         Dim docID As String
  9471.         docID=RepeatedConnectionID(iservername.text)
  9472.         If docID<>"not found" Then 
  9473.             answer=w.Prompt(prompt_yesno, xxstr2, xxstr3)
  9474.             If answer =0 Then
  9475.             '    Call uidoc.Close
  9476.                 Exit Function
  9477.             End If                
  9478. 'create new connection
  9479.         End If        
  9480.         success= newdoc.ComputeWithForm(False, False)         
  9481.         If success Then
  9482.             Call newdoc.save(True, True)
  9483.         Else
  9484.             Msgbox xxstr4  
  9485.             Exit Function            
  9486.         End If    
  9487. 'end create LAN connection
  9488.         processComplete = True
  9489.         Msgbox xxstr5
  9490.         Exit Function    
  9491.         Call uidoc.Close
  9492. errhandle:
  9493.         Messagebox "Error: (" & Err & "): " & Error$
  9494.     End Function
  9495. End Class
  9496. '++LotusScript Development Environment:2:1:RepeatedConnectionID:1:8
  9497. Function RepeatedConnectionID(Destination As Variant)  As String
  9498.     Dim s As New NotesSession    
  9499.     Dim w As New NotesUIWorkspace
  9500.     Dim db As NotesDatabase
  9501.     Dim key(0) As String
  9502.     Dim view As NotesView
  9503.     Dim uidoc As NotesUIdocument
  9504.     Dim doc As NotesDocument
  9505.     Dim doc2 As NotesDocument
  9506.     Dim helpdoc As NotesDocument
  9507.     Dim connectiontype As String
  9508.     Dim locationtype As String
  9509.     Dim done As Integer
  9510.     RepeatedConnectionID="not found"
  9511.     Set db=s.CurrentDatabase
  9512.     Set uidoc=w.CurrentDocument
  9513.     Set doc=uidoc.Document
  9514.     Set view=db.GetView("($Connections)")
  9515.     done=False    
  9516.     key(0)=s.Username
  9517.     Set doc2=view.GetDocumentByKey(key,False)
  9518.     If doc2 Is Nothing Then Exit Function
  9519.     While Not done 
  9520.         If destination=doc2.ColumnValues(2) Then
  9521.             If doc2.ColumnValues(0)=key(0) Then 
  9522.                 RepeatedConnectionID=doc2.NoteID
  9523.                 Exit Function
  9524.             End If
  9525.         End If
  9526.         Set helpdoc=doc2
  9527.         Set doc2=view.GetNextDocument(helpdoc)
  9528.         If doc2 Is Nothing Then Exit Function
  9529.         If doc2.ColumnValues(0)<>key(0) Then done=True
  9530.     Wend
  9531. End Function
  9532. Lotus Product
  9533. )V0.0
  9534. }(    #1
  9535. }D    #1
  9536. ($LAN Wizard)'++LotusScript Development Environment:2:5:(Options):0:74
  9537. Option Declare
  9538. '++LotusScript Development Environment:2:5:(Forward):0:1
  9539. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  9540. '++LotusScript Development Environment:2:5:(Declarations):0:2
  9541. '++LotusScript Development Environment:2:2:BindEvents:1:129
  9542. Private Sub BindEvents(Byval Objectname_ As String)
  9543.     Static Source As NOTESUIDOCUMENT
  9544.     Set Source = Bind(Objectname_)
  9545.     On Event Queryopen From Source Call Queryopen
  9546. End Sub
  9547. '++LotusScript Development Environment:2:2:Queryopen:1:12
  9548. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  9549.     Dim firstPanel As String
  9550. 'Make sure to pass to first panel you want displayed
  9551.     firstPanel = "a"
  9552.     On Error  Goto errhandle
  9553.     Set wiz = New ConnectionWizard( source, "Wiz", "a")
  9554.     Exit Sub
  9555. errhandle:
  9556.     Messagebox "Err (" & Err & "): " & Error$    
  9557.     Exit Sub
  9558. End Sub
  9559. Lotus Product
  9560. OriginalService
  9561. OriginalService
  9562. DisplayDriverList
  9563. DisplayDriverList
  9564. Windows
  9565. Macintosh
  9566.     9S11S18S20SServiceType
  9567. DisplayDriverList
  9568. connectionwizard.gif|connectionwizard
  9569.     Using Local Area Network
  9570.     This configures Notes to connect directly to a Domino server over a Local Area Network.  Normally you do not need to create connections to access servers available on your Local Area Network, so if you have any questions, please see your Administrator.
  9571.     If you wish to connect to a specific server, you can do this by using this Wizard to step you though creating the appropriate connection document.
  9572.     If some Domino servers must be accessed by other means, use a location type of 'Custom' and create a connection document for the type of connection needed.
  9573. AccessToServer
  9574.     0S0E
  9575.     Please enter the following information
  9576. AccessToServer
  9577.     0S0E
  9578.     Destination server name:
  9579. servername
  9580.     Port:
  9581. ports
  9582.     0S0E
  9583.     Hostname or TCP/IP address for the destination server:
  9584. networkaddress
  9585.         
  9586. WizButtonHide
  9587. WizButtonHide
  9588. <Previous
  9589. WizButtonHide
  9590. '++LotusScript Development Environment:2:5:(Options):0:66
  9591. '++LotusScript Development Environment:2:5:(Forward):0:1
  9592. Declare Sub Click(Source As Button)
  9593. '++LotusScript Development Environment:2:5:(Declarations):0:2
  9594. '++LotusScript Development Environment:2:2:BindEvents:1:129
  9595. Private Sub BindEvents(Byval Objectname_ As String)
  9596.     Static Source As BUTTON
  9597.     Set Source = Bind(Objectname_)
  9598.     On Event Click From Source Call Click
  9599. End Sub
  9600. '++LotusScript Development Environment:2:2:Click:1:12
  9601. Sub Click(Source As Button)
  9602.     wiz.previous
  9603. End Sub
  9604. Lotus Product1
  9605. KV0.0,
  9606. New Button
  9607. Need a newer version of Notes to execute this button.
  9608.     0S0E
  9609. <Previous
  9610. WizButtonHide
  9611. finishH
  9612. '++LotusScript Development Environment:2:5:(Options):0:66
  9613. '++LotusScript Development Environment:2:5:(Forward):0:1
  9614. Declare Sub Click(Source As Button)    
  9615. '++LotusScript Development Environment:2:5:(Declarations):0:2
  9616. '++LotusScript Development Environment:2:2:BindEvents:1:129
  9617. Private Sub BindEvents(Byval Objectname_ As String)
  9618.     Static Source As BUTTON
  9619.     Set Source = Bind(Objectname_)
  9620.     On Event Click From Source Call Click
  9621. End Sub
  9622. '++LotusScript Development Environment:2:2:Click:1:12
  9623. Sub Click(Source As Button)    
  9624.     wiz.next
  9625. End Sub
  9626. Lotus Product
  9627. New Button
  9628. Need a newer version of Notes to execute this button.
  9629.     0S0E
  9630. Next>
  9631. WizButtonHide
  9632. finishH
  9633. '++LotusScript Development Environment:2:5:(Options):0:66
  9634. '++LotusScript Development Environment:2:5:(Forward):0:1
  9635. Declare Sub Click(Source As Button)
  9636. '++LotusScript Development Environment:2:5:(Declarations):0:2
  9637. '++LotusScript Development Environment:2:2:BindEvents:1:129
  9638. Private Sub BindEvents(Byval Objectname_ As String)
  9639.     Static Source As BUTTON
  9640.     Set Source = Bind(Objectname_)
  9641.     On Event Click From Source Call Click
  9642. End Sub
  9643. '++LotusScript Development Environment:2:2:Click:1:12
  9644. Sub Click(Source As Button)
  9645.     wiz.complete
  9646. End Sub
  9647. Lotus Product
  9648. OBJECT
  9649. New Button
  9650. Need a newer version of Notes to execute this button.
  9651.     0S0E
  9652. Finish
  9653. Cancel?
  9654. The wizard has not completed yet.  Are you sure you want to cancel?
  9655. continue
  9656. SaveOptions
  9657. Cancel
  9658. O=Lotus Notes
  9659. O=Lotus Notes
  9660. PURSAFO
  9661. |.:#U
  9662. O=Lotus Notes
  9663. CN=Lotus Notes Template Development/O=Lotus Notes
  9664. PURSAFO
  9665. "Y47!va
  9666. $INFO
  9667. $Script
  9668. $$Script_O
  9669. $$ScriptName
  9670. $$FormScript
  9671. $$$FormScript_O
  9672. $BODY
  9673. GIF89a
  9674. O=Lotus Notes
  9675. O=Lotus Notes
  9676. PURSAFO
  9677. |.:#U
  9678. O=Lotus Notes
  9679. CN=Lotus Notes Template Development/O=Lotus Notes
  9680. PURSAFO
  9681. Fn2ft
  9682. $ImagesWide
  9683. $ImagesHigh
  9684. $ImageData
  9685. $ImageNames
  9686. $Comment
  9687. $TITLE
  9688. (GIF89a
  9689. =6BMB
  9690. KBQRQ
  9691. C9<:6ECG8=OKM
  9692. T'f(=
  9693. <\b j
  9694. \PBN/
  9695.     }I1`
  9696. d-ko1
  9697. c:-    .W
  9698. |qJNcQ
  9699. "#\[cm
  9700. SU|s6f
  9701. PtIG%D
  9702. |rWqq
  9703. l(Cmq
  9704. PL3pT@
  9705. 3PRHT
  9706. <.    =2
  9707. 3-a6Q
  9708. O<    g0$
  9709. |!45 
  9710. coK'g
  9711. 8:vfH
  9712. Q$}WX}z 
  9713. $Dt`Du
  9714. cfaF/
  9715. ubT7m
  9716. 7a+ia
  9717. Za#&)&
  9718. -Fs0Zs
  9719. )wK$T
  9720. C5USh
  9721. @[FgUk
  9722. [BWE&
  9723. -'Y</j
  9724. yk_!,
  9725. 6 OA^<l"~
  9726. ;GQ=A
  9727. `s{}P
  9728. MwicE
  9729. D,Dx+{'
  9730. S1Q% ,
  9731. =GF4dDF
  9732. d:Wg]
  9733. =U /lk
  9734. #<(19
  9735. xH]"A
  9736. P.e*B
  9737. t%0"V
  9738. mu}1E
  9739. *!7!!
  9740. "}@"    z
  9741. tO,ABA
  9742. yEB?*
  9743. $}tR+
  9744. \ r5G
  9745. AhM"x
  9746. J))#;
  9747. JBItl
  9748. j*H)E8hM
  9749. OhY{>
  9750. &icjP
  9751. e[nQ 
  9752. o.#uj'
  9753. !%=k>#
  9754. 6dH~xB
  9755. 4`sevT
  9756. `-6)A&
  9757. P7S3C
  9758. ()2`oB<y
  9759. M''%+R
  9760. ("JT    Q
  9761. M6GAq
  9762. (Dd7 +
  9763. cSyxF6
  9764. H    MRr
  9765. |yXKH
  9766.     swNc
  9767. v,[{]'Xp
  9768. k\+At
  9769. Cg4U'
  9770. _mgWM
  9771. =.bOh
  9772. V|xC(
  9773. (Th0T
  9774. zwges
  9775. 'G9iL
  9776. }T"5.x`U
  9777. u<)ZQ<
  9778. eZGd!
  9779. C93F$
  9780. =13$'
  9781. g_8R}
  9782. Wq_fVi
  9783. MTZ@hz>
  9784. )q    :Z!
  9785. ;^V,#7B'c2
  9786. 8=,<K
  9787. eGSt;>
  9788. @u67_
  9789. p%V)z
  9790. +CK9;~k
  9791. w5Z9    
  9792. mHlI>P"
  9793. ew/? 
  9794. 7\!?;
  9795. |#N$NNR
  9796. 2"qc\
  9797. fE:Y[
  9798. T[-Sy!
  9799. 1Y('x
  9800. K2<Fwnx-
  9801. J(nZ?bt
  9802. p+3B1:
  9803. 8Uq"a
  9804. pE/3tI
  9805. c5;-=
  9806.  zJ#)
  9807. 6:F\t
  9808. XOn4V&
  9809. t[@<L1
  9810. DSvZ]PF
  9811. dIE0p
  9812. :C9*Fm
  9813. 9~.L,
  9814. Nv%PV
  9815. DV8t2>
  9816. Y&46p
  9817. SIq$S
  9818. NdCqP_
  9819. nWDcP
  9820. ^jdhn
  9821. 5O?Cdv
  9822. 09.H`B
  9823. &~Ix 
  9824. u`lQOe~
  9825. L9j)=
  9826. VP@[M0
  9827. p6L#1
  9828. =VlI=
  9829. ar^Kn$
  9830. '7*XH
  9831. \q:Ab
  9832. +gYXW
  9833. E+niX
  9834. +_iXXxl
  9835. AGa,W
  9836. v^~#q
  9837. %o    &r
  9838. wo D'Psv
  9839. dDviD6,\
  9840. p>hUv
  9841. 88^b8
  9842. %D`8j
  9843. XGyUqWQ~i
  9844. Sg37    
  9845. @8gSX
  9846. HV9-B
  9847. `#w C
  9848. vs0%u
  9849. cBnxBB8AD
  9850. O=Lotus Notes
  9851. O=Lotus Notes
  9852. PURSAFO
  9853. |.:#U
  9854. O=Lotus Notes
  9855. CN=Lotus Notes Template Development/O=Lotus Notes
  9856. PURSAFO
  9857. u%)    k
  9858. $ImagesWide
  9859. $ImagesHigh
  9860. $ImagesColorize
  9861. $ImageData
  9862. $ImageNames
  9863. $TITLE
  9864. (GIF89aw
  9865. +hh4||L
  9866. 8tt*VV
  9867. 5\\,LL
  9868. $$Gyy
  9869. $::,DDf
  9870. /tlHnju
  9871. )TL$LD[|u,LD8TLHZPZk^
  9872. *0'<D8
  9873. {Tv@$
  9874. ]8\9*I%
  9875. .=9P@
  9876. B8DL;
  9877. Pj:J<NB
  9878. F%9X%
  9879. V$.P%|
  9880. {P@xU
  9881. +9Hc]
  9882. w(_2Qu
  9883. fuudWS
  9884. /cChZ
  9885.  > 4x'
  9886. EDOAx
  9887. R%(cJ
  9888. +X,/O
  9889. >hWl-/
  9890. M+/9.
  9891. ((0++0BBJJL
  9892. PPNMTXX[W^^\_
  9893. QQab_\U[V
  9894. RRXTM
  9895. TSSRVOY
  9896. [He"D
  9897. /\Bs1=
  9898. L.EEq
  9899. !gBad
  9900. \9Xby
  9901. n$Mc{z
  9902. LB    %$\y    \R
  9903. {=!nvs_
  9904. ]EhT1N
  9905. FsE#,
  9906. .9B_yO0
  9907. *hR+|
  9908. jZ3    D8
  9909. `!E\M
  9910. O~rV(Z
  9911. -GC\"br&[
  9912. WtiWcV`r
  9913. .@    /0C
  9914. o7uxW
  9915. }K(}d!pcvq
  9916. 8^:vk
  9917. ai8$x
  9918. 7rE    P
  9919. gd&ZM
  9920. >tKCB&
  9921. {Zlw1
  9922. KiB`EY4
  9923. '&$&&
  9924. +$/00EBBJ'FFE
  9925. 0/(/#$
  9926. <{fdc0
  9927. 1!/.:
  9928. AO-tP
  9929. FhuD3G$
  9930. ~$jQ?
  9931. qPe&2M
  9932. =, 8Jp
  9933. b7HU@
  9934. URNVmm
  9935. EZmu`
  9936. |~A    0
  9937. wZHCH
  9938. Gv/t.
  9939. wZ$;P
  9940. zS7u%g
  9941. n1`t:
  9942. W-p[6
  9943. P3-35?eq
  9944. 4Z"9S
  9945. C?4}8
  9946. CFIsrd
  9947. @F9}r$Q
  9948. "[RZ[
  9949. HdjR=
  9950. 43xf3
  9951. p:H%,
  9952. 9*`??
  9953. = wGc
  9954. mzBq$
  9955. Wm{~:
  9956. oT@yH
  9957. qq"^8z
  9958. sp6D}
  9959. 8*?]t
  9960. )kt3h
  9961. pyvH    
  9962. c6.zP
  9963. Fd<01
  9964. e,zk?
  9965. Bg^h!
  9966. vdZ}}
  9967. Eh-d?
  9968. `[v8v
  9969. FAHg!
  9970. Ra{sj\
  9971. PDC$'
  9972. )E!&'
  9973. PtoK3
  9974. O=Lotus Notes
  9975. O=Lotus Notes
  9976. PURSAFO
  9977. |.:#U
  9978. O=Lotus Notes
  9979. CN=Lotus Notes Template Development/O=Lotus Notes
  9980. PURSAFO
  9981. $ImagesWide
  9982. $ImagesHigh
  9983. $ImagesColorize
  9984. $ImageData
  9985. $ImageNames
  9986. $Comment
  9987. $TITLE
  9988. GIF89a
  9989. `7kB!h=?2R\!rYZ
  9990.  /)s69
  9991. eV{=JLgOu5
  9992. O=Lotus Notes
  9993. O=Lotus Notes
  9994. PURSAFO
  9995. |.:#U
  9996. O=Lotus Notes
  9997. CN=Lotus Notes Template Development/O=Lotus Notes
  9998. PURSAFO
  9999. $ImagesWide
  10000. $ImagesHigh
  10001. $ImagesColorize
  10002. $TITLE
  10003. $ImageData
  10004. $ImageNames
  10005. $PublicAccess
  10006. GIF89an
  10007. ?_?__
  10008. `!b`1
  10009. 7`^///?
  10010. ?b___
  10011. `bOOO
  10012. `<b!R
  10013. dTF6Y\IG
  10014. O=Lotus Notes
  10015. O=Lotus Notes
  10016. PURSAFO
  10017. |.:#U
  10018. O=Lotus Notes
  10019. CN=Lotus Notes Template Development/O=Lotus Notes
  10020. PURSAFO
  10021. $ImagesWide
  10022. $ImagesHigh
  10023. $ImagesColorize
  10024. $ImageData
  10025. $ImageNames
  10026. $TITLE
  10027. GIF89an
  10028. ?_?__
  10029. `!b`1
  10030. 7`^///?
  10031. ?b___
  10032. `bOOO
  10033. `<b!R
  10034. 8SM6F
  10035. 4#JPB(
  10036. O=Lotus Notes
  10037. O=Lotus Notes
  10038. PURSAFO
  10039. |.:#U
  10040. O=Lotus Notes
  10041. CN=Lotus Notes Template Development/O=Lotus Notes
  10042. PURSAFO
  10043. $ImagesWide
  10044. $ImagesHigh
  10045. $ImagesColorize
  10046. $ImageData
  10047. $ImageNames
  10048. $TITLE
  10049. (GIF89a
  10050. %-}Mc
  10051. %4gy9V
  10052. tPE!4T
  10053. .#g$sH72
  10054. 9hxBjq
  10055. UMg:|
  10056. &vfD`
  10057. Vhp:X
  10058. p%Go]G
  10059. spH4S
  10060. t(:W9
  10061. 8    sO8
  10062. P(sehpeh
  10063. BSHR:
  10064. UZ8`z4j
  10065. eZHc*
  10066. 0JO<X
  10067. L6!C6
  10068. jJ-gJ
  10069. kWN{d
  10070. -Ot@U
  10071. dWTQ/
  10072. SH=T]
  10073. \;+*=
  10074. p$%@s
  10075. kcqs:o
  10076. bIZq}
  10077. FIJiWa
  10078. C5UZ3X
  10079.     A1>@16
  10080. qfg6dx
  10081. E>cJr
  10082. U^%QM
  10083. W86hW1    e
  10084. GL%CVn
  10085. #bnb3&
  10086. (3H5s
  10087. <Kq}f1{
  10088.     Tht9
  10089. .<#{~
  10090. (M09SiyY
  10091. p0<,,
  10092. .]|,"
  10093. Vpxa<'
  10094. DPP:9$`^
  10095. <x`V@rt
  10096. P    KATSb
  10097. wDa%C`@Z
  10098. .yWBX
  10099. vDWv~Q
  10100. th+gh
  10101. xN~p]"
  10102. r9-`]H
  10103. }b$5tN
  10104. N,wp\'~
  10105. {b636
  10106. NE5{3Wk
  10107. I&_Z"
  10108. x+cT$
  10109. rWMEOk
  10110. r $Ex&
  10111. hKeJZ
  10112. S!LM*i
  10113. 'e-gN$
  10114. kgq6}
  10115. T}TDu[{
  10116. 6    h<(
  10117. )ch'`k
  10118. LV<!qc6
  10119. ,&=rY_
  10120. [m_#vY3
  10121. aB8ES
  10122. M~]"!
  10123. d#,n0
  10124. w/E=R7
  10125. Z%K.|y
  10126. jY.>wF
  10127. $h%59.
  10128. }6gF4
  10129. ZKz0hd
  10130. M7pda
  10131. j}%aA
  10132. *:;O^U
  10133. EVmau
  10134. <0)23S
  10135. OfY6R
  10136. N    _*'
  10137. NT=Jd
  10138. _~)UT
  10139. {j;Ayp%
  10140. DL$6z
  10141. X\CH[jQN+sW
  10142. J    e?n
  10143. T<ZD\
  10144. mg5HT
  10145. VD@k#yd
  10146. ?&dT    X
  10147. U    lWIF
  10148. + 5,!8
  10149. qLJ,C
  10150. FfpJ4
  10151. %-ST1
  10152. _bQz)[
  10153. vgO?j
  10154. ClIEPM
  10155. 0D[gIn
  10156. FP]i<
  10157. EdTJGy0    lt
  10158. A3BD4`
  10159. <U;I'
  10160. w$7lQSJo{c
  10161. 8dY>d3:O
  10162. Ld`JH
  10163. pP"++F$(
  10164. KWjQJ
  10165. ``aWNti|xf
  10166. &(E.8??6
  10167. J<P#@
  10168. r2-L3}
  10169. W^=z!
  10170. K&E[_]
  10171. jy=Hl&
  10172. zj(ysXC
  10173.     +6j(
  10174. '|\I4
  10175. EM8]'
  10176. Qx}(V~
  10177. KN{ZO
  10178. gK9;@"W
  10179. qq;l6
  10180. qXq1}
  10181. \F1kA58
  10182. QB-^*{
  10183. G.CY.e]
  10184. @shE<
  10185. PVnwZ-`I
  10186. Dd}hGv
  10187. 0tVg>
  10188. ^A''Ic
  10189. &YVF4v
  10190. "tbTom
  10191. d'2#AS
  10192. El([TY?WG
  10193. Dn+F8x
  10194. H&cfI%r<o
  10195. jNQCG
  10196. P_Swu
  10197. ^4GA;
  10198. bKqAa{
  10199. V:=u:
  10200. &193    L
  10201. G C#Grw
  10202. '6Dxn
  10203. PB>i/;
  10204. Ezlu_
  10205. uZTW1
  10206. z+Pr)r~
  10207. 5ODQQ
  10208. fn'O><
  10209. ZZ+sGd3+k
  10210. WO Md
  10211. `^T.X
  10212. ."LAZ
  10213. N&TF9/r
  10214. QTL<!R&
  10215. u/T#@D
  10216. 0GU4@
  10217. @\@    Jq=
  10218. uXwq!J
  10219. hO[|d}
  10220. DBRZ[$
  10221. -f[#p
  10222. \XF']
  10223. ,[&.cO$
  10224. &@R-@
  10225. +bL0n
  10226. G-&VDZ
  10227. c0.k3s
  10228. RNgrN\
  10229. :)swU
  10230. t/3p}*
  10231. PB?75g
  10232. Gqx(s9
  10233. El"^3
  10234. :/`(|&
  10235. *y2K'z
  10236. i8Xpl
  10237. $s4k~k
  10238. jSV~P
  10239. Tr=PX"t
  10240. '"wHG
  10241. H@FJr
  10242.     Qn1o
  10243. VxU[G
  10244. 7Gj^t
  10245. ]){;[#ck
  10246. R3\=aN
  10247. +R1F4
  10248. WeME{
  10249. svI1CX
  10250. vO;0o:
  10251. CQ((:i4on68)
  10252. 6*Y\p
  10253. p9{wi
  10254. ,Icn~
  10255. 7Wa+.
  10256. 676?X
  10257. $1sZP
  10258. \K+ tE
  10259. MB>.I
  10260. oVIE0Y
  10261. PRkz*
  10262. 00d([
  10263. $Gs6;
  10264. p]d-#
  10265. e[o\P
  10266. zgOZgq
  10267. bZ*J:
  10268. 1LiXF
  10269. GnI(6
  10270. &DFCL
  10271. C$[Y%
  10272. rGgUf^
  10273. f47Jj
  10274. 2h9,R
  10275. iR/-g<
  10276. K{=%t
  10277. kEmdd
  10278. J,"0 5
  10279. "?nRs
  10280. %W^'wT
  10281. A_Pe 
  10282. %j%MrX(Y!)Z
  10283. &gRg~
  10284. d-B%7
  10285. ~^%,j
  10286. hMFg~Z'M
  10287. &t^gz
  10288. Zi/zb
  10289. 2"|:d8
  10290. *'zFk
  10291. O=Lotus Notes
  10292. O=Lotus Notes
  10293. PURSAFO
  10294. |.:#U
  10295. O=Lotus Notes
  10296. CN=Lotus Notes Template Development/O=Lotus Notes
  10297. PURSAFO
  10298. $ImagesWide
  10299. $ImagesHigh
  10300. $ImagesColorize
  10301. $ImageData
  10302. $ImageNames
  10303. $TITLE
  10304. (GIF89a
  10305. !   @
  10306. VZl    ,p
  10307. I%lF"y
  10308. 686U    0
  10309. QMgF(
  10310. 2U48H
  10311. )K1Cm
  10312. g-^& IgE
  10313. j_)I5
  10314. T\u/Y
  10315. ~    wp6Gl
  10316. 5I#gk
  10317. $g_FC
  10318. qO|rG
  10319. 9x4i0Fv
  10320. _H2{,$&
  10321. R [c@T
  10322. 'rsv}xG
  10323. =rH*9
  10324. OY#Z*<
  10325. MFR7,b
  10326. x]<y*
  10327. T*Qf@
  10328. w9JB0
  10329.  "V-rv
  10330. X<i$78
  10331. _    ke:#
  10332. +i1hv
  10333. b"*$&
  10334. F,2eZ
  10335. :8,00 $
  10336. dp$Jb
  10337. 9I<zQ
  10338. o1Q$c
  10339. ,@5I    P
  10340. B73ML
  10341. +1`pz
  10342. b;#d6
  10343. ZBz+`QR
  10344. t@EB(85J
  10345.  8L{M
  10346. J!@b,
  10347. yT51(
  10348. 6@?4@{
  10349. M)d6,]
  10350. ZQ^%}
  10351. 8iyuU
  10352. n*US=x
  10353. F`x~e>I
  10354. \/J*R
  10355. s?sVJt
  10356. V)TM)
  10357. >m>C)B7
  10358. H.BD.
  10359. DN"OFb
  10360. -sM7_
  10361. U,^j\*o
  10362. 01<S\
  10363. U^Vw=U
  10364. @P@%P
  10365. ]- rM$
  10366. tE?#u
  10367. W)kgx$1, 
  10368. (~Q`E
  10369. X?N@,1
  10370. 'R?}$
  10371. 4Eeze:m
  10372. hE_dy
  10373. eyc)[!
  10374. b05!;#
  10375. 9I(P|
  10376. <PV4t
  10377. tu]gJ
  10378. Z*^5M
  10379. zIXiZ`
  10380. Tl}    P/
  10381. G@ 7s
  10382. A!!    K
  10383. }]8cO
  10384. {@Ie;
  10385. _U`1D
  10386. J)*p;Dq
  10387. sB\tR
  10388. 2Z    $ 
  10389. >j"4sl
  10390. 'b@BM
  10391. "d    rp
  10392. </yYY0
  10393. g6soR
  10394. ^{XL=
  10395. 8=Y3I
  10396. k2qBR<
  10397. /?"VA
  10398. )"$&o
  10399. BE    (:
  10400. G9XT)
  10401. #h_g6
  10402. $MQ7w
  10403. b52BR\h
  10404. J>+_$
  10405. Ea$E%w
  10406. 7qH4pu
  10407.     `a0p
  10408. +S[Vo
  10409. >    bur<"
  10410. (*39    *
  10411. #&"r(
  10412. jTYSnY
  10413. eXVeNm
  10414. @Y"@+
  10415. x/ak"
  10416. J}M6Y
  10417. 1UQ;p
  10418. TOeS(N
  10419. H$ I8&
  10420. 'C%E.9
  10421. v&S4hL
  10422. ZY    $6
  10423. .$zM8
  10424. N"&@8
  10425. c5a}}
  10426. zPWrM]
  10427. jAwB,
  10428. c5kdm
  10429. T33q2
  10430. "s3Gs#u
  10431. 'X1L'
  10432. E ,Jt
  10433. d1bYDY
  10434. AI#<5!
  10435. D4{ uR
  10436. J!L#s'
  10437. eSA*01
  10438. $@Q    ,
  10439. '*Qa?
  10440. [jz,W
  10441. Ws4,c
  10442. &5mHe6
  10443.  zAZG
  10444. @[FY?
  10445. 8A;u(
  10446. .TA(Q
  10447. bR    Jz'LSH -
  10448. A\vkb
  10449. 0z400
  10450. /NS"'Z
  10451. %JDYl
  10452. )_0~Lb4
  10453.     Ljag
  10454. KA)LQ
  10455. w7%uJH/
  10456. 4JrPU
  10457. E"-daE
  10458. gi9}_
  10459. ra:ly
  10460. LHeBo>
  10461. "PXqB
  10462. J&(zO9cbEN
  10463. 1FX!a
  10464. 8c<QijZ
  10465. `a2w}
  10466. T[    oT
  10467.     J<3=)C5
  10468. F"h4-
  10469. 5^H3bE
  10470. MZMWFuT
  10471. Dl|S5d
  10472. 5Y^]e
  10473.  hL zQemR    
  10474. >lP;LV&
  10475. pA?@c
  10476. Irpiqk
  10477. AGzTE
  10478. Jf17eA
  10479. RI     ;s
  10480. "g hl[
  10481. $R#%+
  10482. BIH8|0
  10483. kB0lB
  10484. "Sdv:
  10485. x2Rrh
  10486. I@01-x
  10487. xoW#)+(
  10488. fEd2;
  10489. "qpFa1
  10490. (bO!R
  10491. ac#Yw
  10492. tJ*(C
  10493. ^    J)(
  10494. 8eG(]
  10495. 1X+Wn
  10496. FiD}b9[t
  10497. X,Ite
  10498. \-3|(
  10499. $Gr    O
  10500.  $T*1V
  10501. Cw    IIq
  10502. `ofKc
  10503. nJmCS<
  10504. M^LdJ
  10505. qi33^
  10506. igb`U
  10507. F}r-e
  10508. iV$i,
  10509. =Xlhy
  10510. X@8`5A
  10511. <eD 5
  10512. >v&g!
  10513. _mIF}
  10514. *AR%M
  10515. Aj`*=SBY
  10516. 8q*OPp
  10517. 7P%E0
  10518. arLrA
  10519.     (r%3T
  10520. qv4v>
  10521. @Pc#p
  10522. @]%6Cj
  10523. DipzN
  10524. )V3T@<@
  10525. |7nMN
  10526. sH,#X
  10527. QSB7A
  10528. IMT(|
  10529. *kdN;Q(
  10530. pN$@3e
  10531. }Ihe!
  10532. :[UAU8
  10533. (eGAX\
  10534. 95B<n
  10535. G)uIA
  10536. {MZw*
  10537. 8}Hpd
  10538. rQGd4
  10539.  A]lnf
  10540. jnlPY
  10541. !ohKY
  10542. c( /orNH(
  10543. R    NLi
  10544. \]@G\u
  10545. q]Wr}
  10546. r,Y[\
  10547. q`!2V
  10548. wPJQER=:
  10549. _FX} 
  10550. B@&dx
  10551. xY^14M
  10552. ]+G(A
  10553. ?t/l-K{
  10554. "CI5N
  10555. -!X6N
  10556. +I_>V
  10557. #O*YC
  10558. \\z<=hdw
  10559. P$o"w?G7nn    :.'
  10560. |)?f'U
  10561.     0';|
  10562. 1=V=$;V
  10563. M[s    W
  10564. <s1OL
  10565. D-d*H
  10566. VKl[(
  10567. .]ofT
  10568. BG"    P"!
  10569. E$ Y31>
  10570. X%@YX
  10571. X'`b1
  10572. a2eK5
  10573.  U Sa
  10574. 2>m'b
  10575. *XFmo
  10576. g="%G
  10577. eI[CK
  10578. 88ZIuTm
  10579. D((B6^
  10580. 7wv-v
  10581. T"`x!
  10582. F2f88f
  10583. f;c#(C
  10584. 0UT-]&
  10585. &z{6?
  10586. rmw"D
  10587. qA`F_'Cb
  10588. Q    $<p
  10589.  I2AD
  10590. u-r+n
  10591. j}#    ;R
  10592. z&A8-
  10593. L$SY]
  10594. PmJf_
  10595. g.rKm=
  10596. J`v`j
  10597. <."cT
  10598. O|1M$
  10599. M&JXrV
  10600. ^&WZDH
  10601. e5Q."
  10602. o`K"[
  10603. f]cfH
  10604. ZKSCn
  10605. I9!R!|C
  10606. !\H v
  10607. he,5`
  10608. O=Lotus Notes
  10609. O=Lotus Notes
  10610. PURSAFO
  10611. |.:#U
  10612. O=Lotus Notes
  10613. CN=Lotus Notes Template Development/O=Lotus Notes
  10614. PURSAFO
  10615. z|nw,
  10616. $ImagesWide
  10617. $ImagesHigh
  10618. $ImagesColorize
  10619. $ImageData
  10620. $ImageNames
  10621. $TITLE
  10622. '++LotusScript Development Environment:2:5:(Options):0:66
  10623. Option Public
  10624. '++LotusScript Development Environment:2:5:(Forward):0:1
  10625. Declare Sub Initialize
  10626. Declare Function strToArray(getString As Variant)
  10627. Declare Function FindItemInView(thisRow As Integer)
  10628. '++LotusScript Development Environment:2:5:(Declarations):0:10
  10629. Dim sArray As Variant
  10630. Dim view As notesview
  10631. Dim db As notesdatabase
  10632. 'HOW TO SET UP THE ADDRESS PICKER
  10633. 'instructions can be found in the (Declarations) section
  10634. 'below (beneath AddPick(Form)
  10635. '++LotusScript Development Environment:2:2:Initialize:1:10
  10636. Sub Initialize
  10637. End Sub
  10638. '++LotusScript Development Environment:2:1:strToArray:1:8
  10639. Function strToArray(getString As Variant)
  10640.     Dim i As Variant
  10641. 'using -1 in these cases because the array begins with 0, not 1
  10642.     Redim sArray(Len(getString)-1)
  10643.     For i = 1 To Len(getString)
  10644.         sArray(i-1) = Mid$(getString, i, 1)
  10645.     Next
  10646.     strToArray = sArray
  10647. End Function
  10648. '++LotusScript Development Environment:2:1:FindItemInView:1:8
  10649. Function FindItemInView(thisRow As Integer)
  10650.     Dim ws As New notesuiworkspace
  10651.     Dim uidb As notesuidatabase
  10652.     Dim uiview As notesuiview
  10653.     Dim note As notesdocument
  10654.     Dim db As notesdatabase
  10655.     Dim strKey(0) As String
  10656.     Dim uidoc As notesuidocument
  10657.     Dim AlphForm As notesdocument
  10658.     Dim AlphList As Variant    
  10659.     Dim member As Variant
  10660.     Set uidb = ws.currentdatabase
  10661.     Set uidoc = ws.currentdocument
  10662.     Set AlphForm = uidoc.document
  10663.     AlphList = AlphForm.getitemvalue("AlphList")
  10664.     member = Evaluate(|@GetMembers(AlphList; | & ThisRow & |)|, AlphForm)
  10665.     strKey(0) = member(0)
  10666.     Call strToArray(strKey(0))
  10667.     Forall x In sArray            
  10668.         Set note = view.getdocumentbykey(x)
  10669.         If Not(note Is Nothing) Then
  10670.             Call uidb.openview("People")
  10671.             Set uiview = ws.currentview
  10672.             Call uiview.selectdocument(note)
  10673.             Exit Function
  10674.         End If        
  10675.     End Forall
  10676. End Function
  10677. Lotus Product
  10678. V0.0o
  10679.  AddressPicker'++LotusScript Development Environment:2:5:(Options):0:74
  10680. Option Declare
  10681. '++LotusScript Development Environment:2:5:(Forward):0:1
  10682. Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  10683. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  10684. '++LotusScript Development Environment:2:5:(Declarations):0:10
  10685. %REM 
  10686. HOW TO SET UP THE ADDRESS PICKER
  10687. 1. On a piece of paper, write down each alphabetical character or groups of characters will be used. 
  10688.      An example of a group of characters might be "aeiou".
  10689. 2.  Count the number of elements
  10690.      Each alphabetical charcter (such as "A") or group of characters (such as "AEIOU") would be considered an element
  10691. 3.  Enter the number of elements as the constant alphNumber below
  10692. 4.  Type each element, in order, into each picture property as alternate text and caption text.
  10693.       Write down the grey number to the right of the LAST picture that contains alternate text
  10694. 5.  Type each element, in order, into the AlphList text list
  10695.      ***The constants MUST reflect the exact elements that you typed into the alternate text in step 3.
  10696.      ***The number of elements in the list must not exceed 30 (although it can be any number between 1 and 30).
  10697. %END REM
  10698. Const alphNumber =  26  'This constant represents the number that you wrote down in step #3 above.
  10699.                                         'It MUST be the same as the number of items in the AlphList field
  10700. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10701. Private Sub BindEvents(Byval Objectname_ As String)
  10702.     Static Source As NOTESUIDOCUMENT
  10703.     Set Source = Bind(Objectname_)
  10704.     On Event Queryopen From Source Call Queryopen
  10705.     On Event Querysave From Source Call Querysave
  10706. End Sub
  10707. '++LotusScript Development Environment:2:2:Queryopen:1:12
  10708. Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
  10709.     Dim session As New notessession
  10710.     Set db = session.currentdatabase    
  10711.     Set view = db.getview("People")
  10712. End Sub
  10713. '++LotusScript Development Environment:2:2:Querysave:1:12
  10714. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  10715.     continue = False
  10716. End Sub
  10717. Lotus Product
  10718. V0.0u
  10719.     HOW TO SET UP THE ADDRESS PICKER
  10720.     instructions can be found in the (Declarations) section 'below (beneath AddPick(Form)  
  10721. SaveOptions
  10722. This list can have up to 30 elements
  10723. There are 5 elements on each line in the list below, to make it easier to see how many total elements there are in the list.
  10724.     0R1S
  10725.     0R1S2S3S4S5S6S7S8S9S10R11S12S13S14S15S16S17S18S19S20R21S22S23S24S25S26S27S28S29S30R31S34S35S36S37S38S2E39S40R41S43S44S50RAlphList
  10726. '++LotusScript Development Environment:2:5:(Options):0:66
  10727. '++LotusScript Development Environment:2:5:(Forward):0:1
  10728. Declare Sub Click(Source As Button)
  10729. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10730. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10731. Private Sub BindEvents(Byval Objectname_ As String)
  10732.     Static Source As BUTTON
  10733.     Set Source = Bind(Objectname_)
  10734.     On Event Click From Source Call Click
  10735. End Sub
  10736. '++LotusScript Development Environment:2:2:Click:1:12
  10737. Sub Click(Source As Button)
  10738.     Dim thisRow As Integer
  10739.     'This is the actual row number for the character
  10740.     thisRow = 1
  10741.     Call FindItemInView(thisRow)
  10742. End Sub
  10743. Lotus Product
  10744. OBJECT
  10745. alph.bmp|alph.bmp
  10746.     [these numbers are only intended as a guide]
  10747. AlphListj
  10748.     1S2S
  10749.     0R1S2S
  10750. '++LotusScript Development Environment:2:5:(Options):0:66
  10751. '++LotusScript Development Environment:2:5:(Forward):0:1
  10752. Declare Sub Click(Source As Button)
  10753. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10754. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10755. Private Sub BindEvents(Byval Objectname_ As String)
  10756.     Static Source As BUTTON
  10757.     Set Source = Bind(Objectname_)
  10758.     On Event Click From Source Call Click
  10759. End Sub
  10760. '++LotusScript Development Environment:2:2:Click:1:12
  10761. Sub Click(Source As Button)
  10762.     Dim thisRow As Integer
  10763.     'This is the actual row number for the character
  10764.     thisRow = 2
  10765.     Call FindItemInView(thisRow)
  10766. End Sub
  10767. Lotus Product
  10768. OBJECT
  10769. alph.bmp|alph.bmp
  10770. AlphListj
  10771.     1S2S
  10772.     0R1S2S
  10773. '++LotusScript Development Environment:2:5:(Options):0:66
  10774. '++LotusScript Development Environment:2:5:(Forward):0:1
  10775. Declare Sub Click(Source As Button)
  10776. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10777. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10778. Private Sub BindEvents(Byval Objectname_ As String)
  10779.     Static Source As BUTTON
  10780.     Set Source = Bind(Objectname_)
  10781.     On Event Click From Source Call Click
  10782. End Sub
  10783. '++LotusScript Development Environment:2:2:Click:1:12
  10784. Sub Click(Source As Button)
  10785.     Dim thisRow As Integer
  10786.     'This is the actual row number for the character
  10787.     thisRow = 3
  10788.     Call FindItemInView(thisRow)
  10789. End Sub
  10790. Lotus Product
  10791. OBJECT
  10792. alph.bmp|alph.bmp
  10793. AlphListj
  10794.     1S2S
  10795.     0R1S2S
  10796. '++LotusScript Development Environment:2:5:(Options):0:66
  10797. '++LotusScript Development Environment:2:5:(Forward):0:1
  10798. Declare Sub Click(Source As Button)
  10799. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10800. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10801. Private Sub BindEvents(Byval Objectname_ As String)
  10802.     Static Source As BUTTON
  10803.     Set Source = Bind(Objectname_)
  10804.     On Event Click From Source Call Click
  10805. End Sub
  10806. '++LotusScript Development Environment:2:2:Click:1:12
  10807. Sub Click(Source As Button)
  10808.     Dim thisRow As Integer
  10809.     'This is the actual row number for the character
  10810.     thisRow = 4
  10811.     Call FindItemInView(thisRow)    
  10812. End Sub
  10813. Lotus Product
  10814. OBJECT
  10815. alph.bmp|alph.bmp
  10816. AlphListj
  10817.     1S2S
  10818.     0R1S2S
  10819. '++LotusScript Development Environment:2:5:(Options):0:66
  10820. '++LotusScript Development Environment:2:5:(Forward):0:1
  10821. Declare Sub Click(Source As Button)
  10822. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10823. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10824. Private Sub BindEvents(Byval Objectname_ As String)
  10825.     Static Source As BUTTON
  10826.     Set Source = Bind(Objectname_)
  10827.     On Event Click From Source Call Click
  10828. End Sub
  10829. '++LotusScript Development Environment:2:2:Click:1:12
  10830. Sub Click(Source As Button)
  10831.     Dim thisRow As Integer
  10832.     'This is the actual row number for the character
  10833.     thisRow = 5
  10834.     Call FindItemInView(thisRow)
  10835. End Sub
  10836. Lotus Product
  10837. OBJECT
  10838. alph.bmp|alph.bmp
  10839. AlphListj
  10840.     1S2S
  10841.     0R1S2S
  10842. '++LotusScript Development Environment:2:5:(Options):0:66
  10843. '++LotusScript Development Environment:2:5:(Forward):0:1
  10844. Declare Sub Click(Source As Button)
  10845. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10846. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10847. Private Sub BindEvents(Byval Objectname_ As String)
  10848.     Static Source As BUTTON
  10849.     Set Source = Bind(Objectname_)
  10850.     On Event Click From Source Call Click
  10851. End Sub
  10852. '++LotusScript Development Environment:2:2:Click:1:12
  10853. Sub Click(Source As Button)
  10854.     Dim thisRow As Integer
  10855.     'This is the actual row number for the character
  10856.     thisRow = 6
  10857.     Call FindItemInView(thisRow)
  10858. End Sub
  10859. Lotus Product
  10860. OBJECT
  10861. alph.bmp|alph.bmp
  10862. AlphListj
  10863.     1S2S
  10864.     0R1S2S
  10865. '++LotusScript Development Environment:2:5:(Options):0:66
  10866. '++LotusScript Development Environment:2:5:(Forward):0:1
  10867. Declare Sub Click(Source As Button)
  10868. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10869. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10870. Private Sub BindEvents(Byval Objectname_ As String)
  10871.     Static Source As BUTTON
  10872.     Set Source = Bind(Objectname_)
  10873.     On Event Click From Source Call Click
  10874. End Sub
  10875. '++LotusScript Development Environment:2:2:Click:1:12
  10876. Sub Click(Source As Button)
  10877.     Dim thisRow As Integer
  10878.     'This is the actual row number for the character
  10879.     thisRow = 7
  10880.     Call FindItemInView(thisRow)
  10881. End Sub
  10882. Lotus Product
  10883. OBJECT
  10884. alph.bmp|alph.bmp
  10885. AlphListj
  10886.     1S2S
  10887.     0R1S2S
  10888. '++LotusScript Development Environment:2:5:(Options):0:66
  10889. '++LotusScript Development Environment:2:5:(Forward):0:1
  10890. Declare Sub Click(Source As Button)
  10891. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10892. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10893. Private Sub BindEvents(Byval Objectname_ As String)
  10894.     Static Source As BUTTON
  10895.     Set Source = Bind(Objectname_)
  10896.     On Event Click From Source Call Click
  10897. End Sub
  10898. '++LotusScript Development Environment:2:2:Click:1:12
  10899. Sub Click(Source As Button)
  10900.     Dim thisRow As Integer
  10901.     'This is the actual row number for the character
  10902.     thisRow = 8
  10903.     Call FindItemInView(thisRow)
  10904. End Sub
  10905. Lotus Product
  10906. OBJECT
  10907. alph.bmp|alph.bmp
  10908. AlphListj
  10909.     1S2S
  10910.     0R1S2S
  10911. '++LotusScript Development Environment:2:5:(Options):0:66
  10912. '++LotusScript Development Environment:2:5:(Forward):0:1
  10913. Declare Sub Click(Source As Button)
  10914. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10915. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10916. Private Sub BindEvents(Byval Objectname_ As String)
  10917.     Static Source As BUTTON
  10918.     Set Source = Bind(Objectname_)
  10919.     On Event Click From Source Call Click
  10920. End Sub
  10921. '++LotusScript Development Environment:2:2:Click:1:12
  10922. Sub Click(Source As Button)
  10923.     Dim thisRow As Integer
  10924.     'This is the actual row number for the character
  10925.     thisRow = 9
  10926.     Call FindItemInView(thisRow)
  10927. End Sub
  10928. Lotus Product
  10929. OBJECT
  10930. alph.bmp|alph.bmp
  10931. AlphListj
  10932.     1S2S
  10933.     0R1S2S
  10934. '++LotusScript Development Environment:2:5:(Options):0:66
  10935. '++LotusScript Development Environment:2:5:(Forward):0:1
  10936. Declare Sub Click(Source As Button)
  10937. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10938. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10939. Private Sub BindEvents(Byval Objectname_ As String)
  10940.     Static Source As BUTTON
  10941.     Set Source = Bind(Objectname_)
  10942.     On Event Click From Source Call Click
  10943. End Sub
  10944. '++LotusScript Development Environment:2:2:Click:1:12
  10945. Sub Click(Source As Button)
  10946.     Dim thisRow As Integer
  10947.     'This is the actual row number for the character
  10948.     thisRow = 10
  10949.     Call FindItemInView(thisRow)
  10950. End Sub
  10951. Lotus Product
  10952. OBJECT
  10953. alph.bmp|alph.bmp
  10954. AlphListj
  10955.     1S2S
  10956.     0R1S2S
  10957. '++LotusScript Development Environment:2:5:(Options):0:66
  10958. '++LotusScript Development Environment:2:5:(Forward):0:1
  10959. Declare Sub Click(Source As Button)
  10960. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10961. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10962. Private Sub BindEvents(Byval Objectname_ As String)
  10963.     Static Source As BUTTON
  10964.     Set Source = Bind(Objectname_)
  10965.     On Event Click From Source Call Click
  10966. End Sub
  10967. '++LotusScript Development Environment:2:2:Click:1:12
  10968. Sub Click(Source As Button)
  10969.     Dim thisRow As Integer
  10970.     'This is the actual row number for the character
  10971.     thisRow = 11
  10972.     Call FindItemInView(thisRow)
  10973. End Sub
  10974. Lotus Product
  10975. OBJECT
  10976. alph.bmp|alph.bmp
  10977. AlphListj
  10978.     1S2S
  10979.     0R1S2S
  10980. '++LotusScript Development Environment:2:5:(Options):0:66
  10981. '++LotusScript Development Environment:2:5:(Forward):0:1
  10982. Declare Sub Click(Source As Button)
  10983. '++LotusScript Development Environment:2:5:(Declarations):0:2
  10984. '++LotusScript Development Environment:2:2:BindEvents:1:129
  10985. Private Sub BindEvents(Byval Objectname_ As String)
  10986.     Static Source As BUTTON
  10987.     Set Source = Bind(Objectname_)
  10988.     On Event Click From Source Call Click
  10989. End Sub
  10990. '++LotusScript Development Environment:2:2:Click:1:12
  10991. Sub Click(Source As Button)
  10992.     Dim thisRow As Integer
  10993.     'This is the actual row number for the character
  10994.     thisRow = 12
  10995.     Call FindItemInView(thisRow)
  10996. End Sub
  10997. Lotus Product
  10998. OBJECT
  10999. alph.bmp|alph.bmp
  11000. AlphListj
  11001.     1S2S
  11002.     0R1S2S
  11003. '++LotusScript Development Environment:2:5:(Options):0:66
  11004. '++LotusScript Development Environment:2:5:(Forward):0:1
  11005. Declare Sub Click(Source As Button)
  11006. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11007. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11008. Private Sub BindEvents(Byval Objectname_ As String)
  11009.     Static Source As BUTTON
  11010.     Set Source = Bind(Objectname_)
  11011.     On Event Click From Source Call Click
  11012. End Sub
  11013. '++LotusScript Development Environment:2:2:Click:1:12
  11014. Sub Click(Source As Button)
  11015.     Dim thisRow As Integer
  11016.     'This is the actual row number for the character
  11017.     thisRow = 13
  11018.     Call FindItemInView(thisRow)
  11019. End Sub
  11020. Lotus Product
  11021. OBJECT
  11022. alph.bmp|alph.bmp
  11023. AlphListj
  11024.     1S2S
  11025.     0R1S2S
  11026. '++LotusScript Development Environment:2:5:(Options):0:66
  11027. '++LotusScript Development Environment:2:5:(Forward):0:1
  11028. Declare Sub Click(Source As Button)
  11029. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11030. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11031. Private Sub BindEvents(Byval Objectname_ As String)
  11032.     Static Source As BUTTON
  11033.     Set Source = Bind(Objectname_)
  11034.     On Event Click From Source Call Click
  11035. End Sub
  11036. '++LotusScript Development Environment:2:2:Click:1:12
  11037. Sub Click(Source As Button)
  11038.     Dim thisRow As Integer
  11039.     'This is the actual row number for the character
  11040.     thisRow = 14
  11041.     Call FindItemInView(thisRow)
  11042. End Sub
  11043. Lotus Product
  11044. OBJECT
  11045. alph.bmp|alph.bmp
  11046. AlphListj
  11047.     1S2S
  11048.     0R1S2S
  11049. '++LotusScript Development Environment:2:5:(Options):0:66
  11050. '++LotusScript Development Environment:2:5:(Forward):0:1
  11051. Declare Sub Click(Source As Button)
  11052. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11053. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11054. Private Sub BindEvents(Byval Objectname_ As String)
  11055.     Static Source As BUTTON
  11056.     Set Source = Bind(Objectname_)
  11057.     On Event Click From Source Call Click
  11058. End Sub
  11059. '++LotusScript Development Environment:2:2:Click:1:12
  11060. Sub Click(Source As Button)
  11061.     Dim thisRow As Integer
  11062.     'This is the actual row number for the character
  11063.     thisRow = 15
  11064.     Call FindItemInView(thisRow)
  11065. End Sub
  11066. Lotus Product
  11067. OBJECT
  11068. alph.bmp|alph.bmp
  11069. AlphListj
  11070.     1S2S
  11071.     0R1S2S
  11072. '++LotusScript Development Environment:2:5:(Options):0:74
  11073. Option Declare
  11074. '++LotusScript Development Environment:2:5:(Forward):0:1
  11075. Declare Sub Click(Source As Button)
  11076. Declare Sub Initialize
  11077. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11078. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11079. Private Sub BindEvents(Byval Objectname_ As String)
  11080.     Static Source As BUTTON
  11081.     Set Source = Bind(Objectname_)
  11082.     On Event Click From Source Call Click
  11083. End Sub
  11084. '++LotusScript Development Environment:2:2:Click:1:12
  11085. Sub Click(Source As Button)
  11086.     Dim thisRow As Integer
  11087.     'This is the actual row number for the character
  11088.     thisRow = 16
  11089.     Call FindItemInView(thisRow)
  11090. End Sub
  11091. '++LotusScript Development Environment:2:2:Initialize:1:10
  11092. Sub Initialize
  11093. End Sub
  11094. Lotus Product
  11095. OBJECT
  11096. alph.bmp|alph.bmp
  11097. AlphListj
  11098.     1S2S
  11099.     0R1S2S
  11100. '++LotusScript Development Environment:2:5:(Options):0:66
  11101. '++LotusScript Development Environment:2:5:(Forward):0:1
  11102. Declare Sub Click(Source As Button)
  11103. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11104. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11105. Private Sub BindEvents(Byval Objectname_ As String)
  11106.     Static Source As BUTTON
  11107.     Set Source = Bind(Objectname_)
  11108.     On Event Click From Source Call Click
  11109. End Sub
  11110. '++LotusScript Development Environment:2:2:Click:1:12
  11111. Sub Click(Source As Button)
  11112.     Dim thisRow As Integer
  11113.     'This is the actual row number for the character
  11114.     thisRow = 17
  11115.     Call FindItemInView(thisRow)
  11116. End Sub
  11117. Lotus Product
  11118. OBJECT
  11119. alph.bmp|alph.bmp
  11120. AlphListj
  11121.     1S2S
  11122.     0R1S2S
  11123. '++LotusScript Development Environment:2:5:(Options):0:66
  11124. '++LotusScript Development Environment:2:5:(Forward):0:1
  11125. Declare Sub Click(Source As Button)
  11126. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11127. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11128. Private Sub BindEvents(Byval Objectname_ As String)
  11129.     Static Source As BUTTON
  11130.     Set Source = Bind(Objectname_)
  11131.     On Event Click From Source Call Click
  11132. End Sub
  11133. '++LotusScript Development Environment:2:2:Click:1:12
  11134. Sub Click(Source As Button)
  11135.     Dim thisRow As Integer
  11136.     'This is the actual row number for the character
  11137.     thisRow = 18
  11138.     Call FindItemInView(thisRow)
  11139. End Sub
  11140. Lotus Product
  11141. OBJECT
  11142. alph.bmp|alph.bmp
  11143. AlphListj
  11144.     1S2S
  11145.     0R1S2S
  11146. '++LotusScript Development Environment:2:5:(Options):0:66
  11147. '++LotusScript Development Environment:2:5:(Forward):0:1
  11148. Declare Sub Click(Source As Button)
  11149. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11150. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11151. Private Sub BindEvents(Byval Objectname_ As String)
  11152.     Static Source As BUTTON
  11153.     Set Source = Bind(Objectname_)
  11154.     On Event Click From Source Call Click
  11155. End Sub
  11156. '++LotusScript Development Environment:2:2:Click:1:12
  11157. Sub Click(Source As Button)
  11158.     Dim thisRow As Integer
  11159.     'This is the actual row number for the character
  11160.     thisRow = 19
  11161.     Call FindItemInView(thisRow)
  11162. End Sub
  11163. Lotus Product
  11164. OBJECT
  11165. alph.bmp|alph.bmp
  11166. AlphListj
  11167.     1S2S
  11168.     0R1S2S
  11169. '++LotusScript Development Environment:2:5:(Options):0:66
  11170. '++LotusScript Development Environment:2:5:(Forward):0:1
  11171. Declare Sub Click(Source As Button)
  11172. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11173. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11174. Private Sub BindEvents(Byval Objectname_ As String)
  11175.     Static Source As BUTTON
  11176.     Set Source = Bind(Objectname_)
  11177.     On Event Click From Source Call Click
  11178. End Sub
  11179. '++LotusScript Development Environment:2:2:Click:1:12
  11180. Sub Click(Source As Button)
  11181.     Dim thisRow As Integer
  11182.     'This is the actual row number for the character
  11183.     thisRow = 20
  11184.     Call FindItemInView(thisRow)
  11185. End Sub
  11186. Lotus Product
  11187. OBJECT
  11188. alph.bmp|alph.bmp
  11189. AlphListj
  11190.     1S2S
  11191.     0R1S2S
  11192. '++LotusScript Development Environment:2:5:(Options):0:66
  11193. '++LotusScript Development Environment:2:5:(Forward):0:1
  11194. Declare Sub Click(Source As Button)
  11195. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11196. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11197. Private Sub BindEvents(Byval Objectname_ As String)
  11198.     Static Source As BUTTON
  11199.     Set Source = Bind(Objectname_)
  11200.     On Event Click From Source Call Click
  11201. End Sub
  11202. '++LotusScript Development Environment:2:2:Click:1:12
  11203. Sub Click(Source As Button)
  11204.     Dim thisRow As Integer
  11205.     'This is the actual row number for the character
  11206.     thisRow = 21
  11207.     Call FindItemInView(thisRow)
  11208. End Sub
  11209. Lotus Product
  11210. OBJECT
  11211. alph.bmp|alph.bmp
  11212. AlphListj
  11213.     1S2S
  11214.     0R1S2S
  11215. '++LotusScript Development Environment:2:5:(Options):0:66
  11216. '++LotusScript Development Environment:2:5:(Forward):0:1
  11217. Declare Sub Click(Source As Button)
  11218. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11219. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11220. Private Sub BindEvents(Byval Objectname_ As String)
  11221.     Static Source As BUTTON
  11222.     Set Source = Bind(Objectname_)
  11223.     On Event Click From Source Call Click
  11224. End Sub
  11225. '++LotusScript Development Environment:2:2:Click:1:12
  11226. Sub Click(Source As Button)
  11227.     Dim thisRow As Integer
  11228.     'This is the actual row number for the character
  11229.     thisRow = 22
  11230.     Call FindItemInView(thisRow)
  11231. End Sub
  11232. Lotus Product
  11233. OBJECT
  11234. alph.bmp|alph.bmp
  11235. AlphListj
  11236.     1S2S
  11237.     0R1S2S
  11238. '++LotusScript Development Environment:2:5:(Options):0:66
  11239. '++LotusScript Development Environment:2:5:(Forward):0:1
  11240. Declare Sub Click(Source As Button)
  11241. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11242. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11243. Private Sub BindEvents(Byval Objectname_ As String)
  11244.     Static Source As BUTTON
  11245.     Set Source = Bind(Objectname_)
  11246.     On Event Click From Source Call Click
  11247. End Sub
  11248. '++LotusScript Development Environment:2:2:Click:1:12
  11249. Sub Click(Source As Button)
  11250.     Dim thisRow As Integer
  11251.     'This is the actual row number for the character
  11252.     thisRow = 23
  11253.     Call FindItemInView(thisRow)
  11254. End Sub
  11255. Lotus Product
  11256. OBJECT
  11257. alph.bmp|alph.bmp
  11258. AlphListj
  11259.     1S2S
  11260.     0R1S2S
  11261. '++LotusScript Development Environment:2:5:(Options):0:66
  11262. '++LotusScript Development Environment:2:5:(Forward):0:1
  11263. Declare Sub Click(Source As Button)
  11264. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11265. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11266. Private Sub BindEvents(Byval Objectname_ As String)
  11267.     Static Source As BUTTON
  11268.     Set Source = Bind(Objectname_)
  11269.     On Event Click From Source Call Click
  11270. End Sub
  11271. '++LotusScript Development Environment:2:2:Click:1:12
  11272. Sub Click(Source As Button)
  11273.     Dim thisRow As Integer
  11274.     'This is the actual row number for the character
  11275.     thisRow = 24
  11276.     Call FindItemInView(thisRow)
  11277. End Sub
  11278. Lotus Product
  11279. OBJECT
  11280. alph.bmp|alph.bmp
  11281. AlphListj
  11282.     1S2S
  11283.     0R1S2S
  11284. '++LotusScript Development Environment:2:5:(Options):0:66
  11285. '++LotusScript Development Environment:2:5:(Forward):0:1
  11286. Declare Sub Click(Source As Button)
  11287. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11288. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11289. Private Sub BindEvents(Byval Objectname_ As String)
  11290.     Static Source As BUTTON
  11291.     Set Source = Bind(Objectname_)
  11292.     On Event Click From Source Call Click
  11293. End Sub
  11294. '++LotusScript Development Environment:2:2:Click:1:12
  11295. Sub Click(Source As Button)
  11296.     Dim thisRow As Integer
  11297.     'This is the actual row number for the character
  11298.     thisRow = 25
  11299.     Call FindItemInView(thisRow)
  11300. End Sub
  11301. Lotus Product
  11302. OBJECT
  11303. alph.bmp|alph.bmp
  11304. AlphListj
  11305.     1S2S
  11306.     0R1S2S
  11307. '++LotusScript Development Environment:2:5:(Options):0:66
  11308. '++LotusScript Development Environment:2:5:(Forward):0:1
  11309. Declare Sub Click(Source As Button)
  11310. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11311. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11312. Private Sub BindEvents(Byval Objectname_ As String)
  11313.     Static Source As BUTTON
  11314.     Set Source = Bind(Objectname_)
  11315.     On Event Click From Source Call Click
  11316. End Sub
  11317. '++LotusScript Development Environment:2:2:Click:1:12
  11318. Sub Click(Source As Button)
  11319.     Dim thisRow As Integer
  11320.     'This is the actual row number for the character
  11321.     thisRow = 26
  11322.     Call FindItemInView(thisRow)
  11323. End Sub
  11324. Lotus Product
  11325. OBJECT
  11326. alph.bmp|alph.bmp
  11327. AlphListj
  11328.     1S2S
  11329.     0R1S2S
  11330. '++LotusScript Development Environment:2:5:(Options):0:66
  11331. '++LotusScript Development Environment:2:5:(Forward):0:1
  11332. Declare Sub Click(Source As Button)
  11333. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11334. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11335. Private Sub BindEvents(Byval Objectname_ As String)
  11336.     Static Source As BUTTON
  11337.     Set Source = Bind(Objectname_)
  11338.     On Event Click From Source Call Click
  11339. End Sub
  11340. '++LotusScript Development Environment:2:2:Click:1:12
  11341. Sub Click(Source As Button)
  11342.     Dim thisRow As Integer
  11343.     'This is the actual row number for the character
  11344.     thisRow = 27
  11345.     Call FindItemInView(thisRow)
  11346. End Sub
  11347. Lotus Product
  11348. OBJECT
  11349. alph.bmp|alph.bmp
  11350. AlphListj
  11351.     1S2S
  11352.     0R1S2S
  11353. '++LotusScript Development Environment:2:5:(Options):0:66
  11354. '++LotusScript Development Environment:2:5:(Forward):0:1
  11355. Declare Sub Click(Source As Button)
  11356. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11357. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11358. Private Sub BindEvents(Byval Objectname_ As String)
  11359.     Static Source As BUTTON
  11360.     Set Source = Bind(Objectname_)
  11361.     On Event Click From Source Call Click
  11362. End Sub
  11363. '++LotusScript Development Environment:2:2:Click:1:12
  11364. Sub Click(Source As Button)
  11365.     Dim thisRow As Integer
  11366.     'This is the actual row number for the character
  11367.     thisRow = 28
  11368.     Call FindItemInView(thisRow)
  11369. End Sub
  11370. Lotus Product
  11371. OBJECT
  11372. alph.bmp|alph.bmp
  11373. AlphListj
  11374.     1S2S
  11375.     0R1S2S
  11376. '++LotusScript Development Environment:2:5:(Options):0:66
  11377. '++LotusScript Development Environment:2:5:(Forward):0:1
  11378. Declare Sub Click(Source As Button)
  11379. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11380. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11381. Private Sub BindEvents(Byval Objectname_ As String)
  11382.     Static Source As BUTTON
  11383.     Set Source = Bind(Objectname_)
  11384.     On Event Click From Source Call Click
  11385. End Sub
  11386. '++LotusScript Development Environment:2:2:Click:1:12
  11387. Sub Click(Source As Button)
  11388.     Dim thisRow As Integer
  11389.     'This is the actual row number for the character
  11390.     thisRow = 29
  11391.     Call FindItemInView(thisRow)
  11392. End Sub
  11393. Lotus Product
  11394. OBJECT
  11395. alph.bmp|alph.bmp
  11396. AlphListj
  11397.     1S2S
  11398.     0R1S2S
  11399. '++LotusScript Development Environment:2:5:(Options):0:66
  11400. '++LotusScript Development Environment:2:5:(Forward):0:1
  11401. Declare Sub Click(Source As Button)
  11402. '++LotusScript Development Environment:2:5:(Declarations):0:2
  11403. '++LotusScript Development Environment:2:2:BindEvents:1:129
  11404. Private Sub BindEvents(Byval Objectname_ As String)
  11405.     Static Source As BUTTON
  11406.     Set Source = Bind(Objectname_)
  11407.     On Event Click From Source Call Click
  11408. End Sub
  11409. '++LotusScript Development Environment:2:2:Click:1:12
  11410. Sub Click(Source As Button)
  11411.     Dim thisRow As Integer
  11412.     'This is the actual row number for the character
  11413.     thisRow = 30
  11414.     Call FindItemInView(thisRow)
  11415. End Sub
  11416. Lotus Product
  11417. OBJECT
  11418. alph.bmp|alph.bmp
  11419. O=Lotus Notes
  11420. O=Lotus Notes
  11421. PURSAFO
  11422. |.:#U
  11423. O=Lotus Notes
  11424. CN=Lotus Notes Template Development/O=Lotus Notes
  11425. PURSAFO
  11426. $INFO
  11427. $Script
  11428. $$Script_O
  11429. $$ScriptName
  11430. $$FormScript
  11431. $$$FormScript_O
  11432. $BODY
  11433. (GIF89a
  11434. {ZsJ1
  11435. s9B91
  11436. {11)))!!!
  11437. %OCCqvCNyv
  11438. K{FHGJ
  11439. t24zkuXV^M
  11440. ES`iu
  11441. DeE?k
  11442. (q_:_?
  11443. cGIi%(
  11444. zuN(4
  11445. "@YWI
  11446. C;fzJG
  11447. J(%+&z4
  11448. mSNhml
  11449. 91nl6
  11450. a>EgA}c
  11451. =tXU[/y
  11452. 1J^_w
  11453. !xZ6EO[U^
  11454. 'zH8zWh
  11455. Xzp7z
  11456. FeT+$Yw
  11457. dFtlXy
  11458. I[kE#
  11459. !)g=o
  11460. ~6X|i
  11461. 3RhAo
  11462. Cgwwww
  11463. n[t{L
  11464. cvBUO15    
  11465.  fa,<
  11466. Jb`xr
  11467. 6SdYE
  11468. dF`y9o
  11469. )hQVI
  11470. l7>AZ
  11471. #'+/37
  11472. D5K5DU
  11473. q=+z4
  11474. sOMJ#
  11475. D    W\.
  11476. GLQPF
  11477. 4,;JC
  11478. g15{Y
  11479. S^8Azc(
  11480. htz8e
  11481. g]!q{
  11482. 6$x*M
  11483. =zO.]
  11484. FlH@m
  11485. \nC)V
  11486. y BI%
  11487. FIUGzT
  11488. [9jB=
  11489. ro    TR
  11490. p    cqYj-
  11491. \&o2o_:
  11492. "7r2#
  11493. h17uR
  11494. 2sl3*
  11495. Rp    mr
  11496. RRrrC
  11497. .>N^n~
  11498. D3R5n8+F#c
  11499. `J0/p
  11500. H..';
  11501. :MfA9
  11502. a(=$.>oHD
  11503. .|e77r
  11504. ,;c(B
  11505. j    xw'
  11506. X>gtP
  11507. 4Bi"?
  11508. &|yt7 8
  11509. E=wqw%!
  11510. a,%7bv
  11511. GeHGRJgW#g
  11512.  h:gd
  11513. Rj8TSv
  11514. b@]    y)#
  11515. V    vh    
  11516. b|1SvA
  11517. $D;;1R
  11518. &q;:QLn
  11519. @)b%8!q
  11520. bJJh6
  11521. zY;yI
  11522. {t0QL
  11523. WgsUE
  11524. 1JpZL.
  11525. 57w9&
  11526. &'RanHk
  11527. F{mik
  11528. o]rca;
  11529. U~2FSZx
  11530. d]YSp
  11531. !k*W'
  11532. rUvBr
  11533. ljw' KG::f
  11534. O=Lotus Notes
  11535. O=Lotus Notes
  11536. PURSAFO
  11537. |.:#U
  11538. O=Lotus Notes
  11539. CN=Lotus Notes Template Development/O=Lotus Notes
  11540. PURSAFO
  11541. $ImagesWide
  11542. $ImagesHigh
  11543. $ImagesColorize
  11544. $ImageData
  11545. $ImageNames
  11546. $TITLE
  11547. (GIF89a
  11548. M/03+
  11549. +H?"2,0
  11550. aef QdY
  11551. b6UQ#Q
  11552. )t,B(+
  11553. vpem@
  11554. Sf}Fw
  11555. <i@:1
  11556. $_+b :
  11557. rN!wx
  11558. ?:[.F
  11559. qL(Xp
  11560. C!WE.x
  11561. 89oN~
  11562. U3YPO
  11563. 8.j r
  11564. xx)8N\
  11565. `Y`Td
  11566. u~TQ[a<
  11567. `_C1-Gu
  11568. W7ZBJ
  11569. 3&Z'.Z
  11570. <fhX
  11571. 445&u>
  11572. =wA=;
  11573. .XWuc
  11574. `m    Dt+ui
  11575. UP25Se#
  11576. (}jIm
  11577. J]h6fl
  11578. %[mgT
  11579. 7LQCv
  11580. 9Tw4A=
  11581. Y"0buc@
  11582. 3?wZP
  11583. h+0s?)
  11584. o+Q#GRp,
  11585. Q&NCW
  11586. dA;hO,
  11587. >tl6NG
  11588. {;(^;q)
  11589. A|}=44
  11590. 68   J
  11591. br]cgkosw{
  11592. "4J>"
  11593. LH0HC
  11594. ZlM*!B*
  11595. Q5R)d5
  11596. d==v1
  11597.     {a//_%
  11598.     W;    C
  11599. J!%VK
  11600. zTj7U
  11601. LNKvQ
  11602. +e|d"
  11603. Vi"1k
  11604. Z@_(t
  11605. Y/Ga]
  11606. \%QNfa
  11607. X'kX_
  11608. NCYI8
  11609. (8HXhx
  11610. FCa<;
  11611. s8tK/
  11612.     LtJ*
  11613. S>$:1
  11614. HfXb0
  11615. e$4?Q
  11616. 05VP'
  11617. 5`CT1
  11618. _aP)_ 
  11619. W>&"~$
  11620. e*1u(
  11621. \6    k"4
  11622. &_oA^e
  11623. RFrgHd[zv#w
  11624. LMh~X
  11625. |mrC(
  11626. "1/ap
  11627. mQJO5
  11628. $B5]U
  11629. 2Zf2&
  11630. {QUZa'
  11631. SLG9q
  11632. PhvcT
  11633. 4mo1<j"I7
  11634. @Ys{&t
  11635. w`pJ7
  11636. T<r1_
  11637. {[1@B
  11638. x/a    U
  11639. "\w94H^
  11640. (|o"p
  11641. b&xjA    
  11642. P,lq_Z
  11643. d/5Fr
  11644. G,l.J
  11645. A#    Qj
  11646. T+3 3$
  11647. j,O4F
  11648. 1%sk1K
  11649. XqBtY
  11650. caqA]
  11651. )    %[V
  11652. 7C5%6
  11653. ,VeM`
  11654. \    l<b
  11655. B+~#8
  11656. @aUV$b
  11657. %"&!U>
  11658. &2K~Y
  11659. t&C_W
  11660. ,@iLB
  11661. Q@^6tG
  11662. O=Lotus Notes
  11663. O=Lotus Notes
  11664. PURSAFO
  11665. |.:#U
  11666. O=Lotus Notes
  11667. CN=Lotus Notes Template Development/O=Lotus Notes
  11668. PURSAFO
  11669. $ImagesWide
  11670. $ImagesHigh
  11671. $ImagesColorize
  11672. $ImageData
  11673. $ImageNames
  11674. $TITLE
  11675. (GIF89a
  11676. c{!Rk
  11677. BJs)1Z
  11678. RsB!J
  11679. Zgcka
  11680. DU) Qz
  11681. -5"`|
  11682.     K]xRx
  11683. R1c$X
  11684. .opGZ
  11685. O*Q:%
  11686. so\{f
  11687. Jax,'
  11688. 68!h#7
  11689. 7RDEN
  11690. ^f6{@
  11691. 619=ZSqd
  11692. s^:Id
  11693. .pH"2
  11694. <7xJR
  11695. no    'N
  11696. 9-cbO#~
  11697. {wG)$B
  11698. FsSWR
  11699. fG@TT
  11700. DlL,@\
  11701. #'+/37;
  11702. Ml|[|
  11703. )rd2:
  11704. f%K6+
  11705. WTMG]$)v,
  11706. '^,G!
  11707. Ms~M#
  11708. i%B6+
  11709. r2y<{B%
  11710. @D4.@
  11711.     p`1g 
  11712. @ 2El
  11713. jw<E8
  11714. ;4 Lf0/
  11715. Bua"*
  11716. :)R_`[
  11717. dLReU
  11718. b\b6@
  11719. ~TC7}
  11720. I<5Z7
  11721. sBgkPc
  11722.  .Wre
  11723. $pOxWr,
  11724. Y%]CD
  11725. A&JR6L
  11726. pW<4W
  11727. <pj;!WD
  11728. (8HXhx
  11729. )9IYiy
  11730. oI+w>
  11731. |PNJi
  11732. VZp=$W
  11733. [#9a(
  11734. wCDBr
  11735. Z\lD%
  11736. q~lg"
  11737. 6o*8n
  11738. Nn&:0M
  11739. xp*:?+HtF
  11740. O=Lotus Notes
  11741. O=Lotus Notes
  11742. PURSAFO
  11743. |.:#U
  11744. O=Lotus Notes
  11745. CN=Lotus Notes Template Development/O=Lotus Notes
  11746. PURSAFO
  11747. $ImagesWide
  11748. $ImagesHigh
  11749. $ImagesColorize
  11750. $ImageData
  11751. $ImageNames
  11752. $TITLE
  11753. (GIF89a
  11754. )Bs!9ks
  11755. slwE^
  11756. q    /^(y|
  11757. ]wr.&
  11758. XZrc*
  11759. >&-S5
  11760. t0+xM`
  11761. m)SrV
  11762. gZ82{e
  11763. :hs; [9
  11764. u_50C
  11765. F/`B^T
  11766. x4xkBs
  11767. W(k<3
  11768. yxovVZ
  11769. 7dj;f
  11770. mBj5|
  11771. 08h8|Izc
  11772. *SF}$
  11773. -{!    G
  11774. KXXbU
  11775. \&Mrq@
  11776. u[96+
  11777. "&*.26:>BFJNRVZ^bfjnrvz~nzx
  11778. io_?a
  11779. q,G5XD
  11780. T-dI    Z5
  11781. r/$%]
  11782. Xvj;3
  11783. XV8;R
  11784. %@NDh9':
  11785. i    URD
  11786. Xivow
  11787. @x@J-
  11788. Vhb }
  11789. 4P_NI
  11790. "2c5n
  11791. $1F(Z]
  11792. D'"2F
  11793. Uh\&g-
  11794. "YB)L
  11795. ~2HvJ'
  11796. m.lQ(1e>,
  11797. 4Fg4-
  11798. $;52*
  11799. 7]KN|#x#q
  11800. 8 VzG
  11801. N6?Dz
  11802. ,<L\l|
  11803. /'<Z&x
  11804. HYe3d'^
  11805. hs\@A
  11806. I.M"@
  11807. .u2:JV
  11808. ,-Dd"
  11809. 'adML
  11810. ag:=$]B
  11811. U[wCE
  11812. 7YGWe
  11813. O=Lotus Notes
  11814. O=Lotus Notes
  11815. PURSAFO
  11816. |.:#U
  11817. O=Lotus Notes
  11818. CN=Lotus Notes Template Development/O=Lotus Notes
  11819. PURSAFO
  11820. $ImagesWide
  11821. $ImagesHigh
  11822. $ImagesColorize
  11823. $ImageData
  11824. $ImageNames
  11825. $TITLE
  11826. (GIF89a
  11827. Z9cB)
  11828. {RsR1
  11829. %mEQo-$
  11830. 1(B`l
  11831. Da)Ql
  11832. ;Jd0l
  11833. 0S$p~
  11834. $cxdz
  11835. x!APW#
  11836. 5FLN0
  11837. iB|Es
  11838. 8P880
  11839. "$[C:uS
  11840. _eiAK
  11841. P^4NMkSH
  11842. \nrSu|Z
  11843. h2)iX
  11844. M_"8S
  11845. bW&Y?
  11846. hG'rb
  11847. NfGh{
  11848. >MU8;["
  11849. 7iJ7{
  11850. l,$@@ (
  11851. YE_*/
  11852. pQEF86
  11853. L@Z]z
  11854. jeyZVi
  11855. 4u;CJ
  11856. K2esni
  11857. 2va\$#
  11858. ,q85CF{
  11859. j5QWvD-
  11860. ,mkk[
  11861. c8jJf
  11862. lK5mL
  11863. KV@Z&C
  11864. YZffZ&ZRfLv
  11865. [rA(Y
  11866. z,BN!
  11867. [HtLH
  11868. 9$iP,
  11869. 9*WFTC
  11870. 4w'5O
  11871. *+QBbs
  11872. 3>ks?
  11873. F)4wt
  11874. A.ouL
  11875. T>7(EE
  11876. C)%d?
  11877. 23ZtN
  11878. qku{'
  11879. P@IA{
  11880. 7";7w
  11881. W;7X/s
  11882.  c^h^`
  11883. @aa@q`@```A@0i9
  11884. +6L\l|
  11885. SBZ""
  11886. '9Fr@T`
  11887.  d$.X
  11888. h.S2ZiB
  11889. Jf&iL`]6
  11890. T'2`e`}\
  11891. jWX    &
  11892. Et='e
  11893. U):-@}
  11894. :O4lL
  11895. fBvc5
  11896. 7Ao.[
  11897. $SvI:
  11898. `mi&1QN
  11899. 9jfy|
  11900. \FG\G
  11901. AxS#6B
  11902. pr')`
  11903. 4Ps)?
  11904. >;5@{
  11905. &%r')
  11906. AUTzt1
  11907. $Q@U#O1Q
  11908. b:_xXJ
  11909. wtA8P
  11910. duA)[
  11911. >nR!n
  11912. 4V,+j
  11913. O=Lotus Notes
  11914. O=Lotus Notes
  11915. PURSAFO
  11916. |.:#U
  11917. O=Lotus Notes
  11918. CN=Lotus Notes Template Development/O=Lotus Notes
  11919. PURSAFO
  11920. $ImagesWide
  11921. $ImagesHigh
  11922. $ImagesColorize
  11923. $ImageData
  11924. $ImageNames
  11925. $TITLE
  11926. (GIF89a
  11927. sscJJR99J)){11
  11928. T8<*tfcvoxt
  11929. hm\vBK
  11930. RbcYj
  11931. caJWa
  11932. /$ShA2Ip
  11933. &|i*6@
  11934. /$A!'
  11935. KpH[v
  11936. L+BIV
  11937. _8A&j
  11938. gNeJ]
  11939. 4mhQ7
  11940. $(`,I8
  11941. @K!1Y
  11942. f/HzT
  11943. ~w4^J
  11944. &]TW:
  11945. qQG|s
  11946. weMZ@
  11947. F\w7c
  11948. BZOId
  11949. E v*G
  11950. cyxxBX
  11951. RfuVt2
  11952.     }R*q
  11953. UXgT\    0
  11954. 8g|X:yI`
  11955. nt=/F
  11956. jE^ns
  11957. Os47$M
  11958. nhp00ppd,<.Pd`
  11959. VfPPh,RDFR
  11960. 9?CGKOSW[_cgkoswWG
  11961. I8$(H
  11962. 0rX$$<bRT
  11963. #$    o6o
  11964. ,y26    n
  11965.  JQ^9%
  11966. ZY)qdr
  11967. JPm3:
  11968. qjS%:
  11969. y2~    7
  11970. $%+iI
  11971. );$/}
  11972. o#I"I
  11973. \$K?XY
  11974. )>[ZD
  11975. SR5F.
  11976. 6m"7k
  11977. ?6`)v>%
  11978. gX[ N
  11979. z~L96
  11980. TBF.m
  11981. l-6    I
  11982. tIXf(
  11983. x<@+0X
  11984. e#!RdP
  11985. R`UFF@9
  11986. \T'^d
  11987. t#s&a
  11988. q`k2q
  11989. sCg)S
  11990. -T&k/`
  11991. RJzl9
  11992. MnV[u}
  11993. sQ'XV
  11994. }a+j'o
  11995. /_j-%
  11996. *nNLU
  11997. (8HXhH(
  11998. b@@02
  11999. -=M]m}
  12000. 8sXjP
  12001. rJ,9x
  12002. {%KN`
  12003. i4x    )
  12004. 71sY*
  12005. XgJD L
  12006. '^-)(
  12007. O%&MD    
  12008. D*op:
  12009. <@g2y
  12010. n7ODa
  12011. E$    AF
  12012. U^P7[
  12013. t    ."B2@
  12014. tCFxpf~
  12015. X:uXxAV
  12016. #r    yA
  12017. ~vj$et
  12018. y}5qB}
  12019. #cSU,)
  12020. V-GJ{
  12021. 2lrz6
  12022. qV-(_(
  12023. G3;xQ
  12024. O=Lotus Notes
  12025. O=Lotus Notes
  12026. PURSAFO
  12027. |.:#U
  12028. O=Lotus Notes
  12029. CN=Lotus Notes Template Development/O=Lotus Notes
  12030. PURSAFO
  12031. $ImagesWide
  12032. $ImagesHigh
  12033. $ImagesColorize
  12034. $ImageData
  12035. $ImageNames
  12036. $TITLE
  12037. GIF89a3
  12038. ?_?__
  12039. `!b`1
  12040. 7`^///?
  12041. ?b___
  12042. `bOOO
  12043. `<b!R
  12044. O=Lotus Notes
  12045. O=Lotus Notes
  12046. PURSAFO
  12047. |.:#U
  12048. O=Lotus Notes
  12049. CN=Lotus Notes Template Development/O=Lotus Notes
  12050. PURSAFO
  12051. $ImagesHigh
  12052. $ImagesColorize
  12053. $TITLE
  12054. $ImagesWide
  12055. $ImageData
  12056. $ImageNames
  12057. NotesNavigator
  12058. Contacts&Groups?
  12059. Picker
  12060. AddressPicker?
  12061. O=Lotus Notes
  12062. O=Lotus Notes
  12063. PURSAFO
  12064. |.:#U
  12065. O=Lotus Notes
  12066. CN=Lotus Notes Template Development/O=Lotus Notes
  12067. PURSAFO
  12068. $TITLE
  12069. $Comment
  12070. $FrameSet
  12071. $Flags
  12072. SourceSourceSourceDomainSourceDomainDestinationDestinationDestinationDomainDestinationDomainPortNamePortNameEnabledEnabledPhoneNumberPhoneNumberIntervalIntervalScheduleScheduleWeekDaysWeekDaysMailThresholdMail ThresholdTasksTasksRepPriorityRepPriorityCostCostLinkInfoLink InfoLinkScriptInfoLink Script InfoRLANTagRLANTagRLAN1RLAN1RLAN2RLAN2RLAN3RLAN3RLAN4RLAN4RLAN5RLAN5
  12073. RLAN5
  12074. RLAN5
  12075. RLAN6RLAN6
  12076. RLAN6
  12077. RLAN6
  12078. PassthruServerPassthruServerRepTypeRepTypeFileNamesFileNamesConnectionLocationConnectionLocationConnectionTypeConnectionTypeTimeLimitTimeLimitRemoteLanServiceRemoteLanServiceConnectionRecordFirstConnectionRecordFirstCountryCountryRouterTypeRouterTypeSMTPPullRoutingSMTPPullRouting.
  12079. SMTPPullRouting
  12080. SMTPPullRouting
  12081. PullRoutingTimeoutPullRoutingTimeout2
  12082. PullRoutingTimeout
  12083. PullRoutingTimeout
  12084. PullThisServerPullThisServer*
  12085. PullThisServer
  12086. PullThisServer
  12087. PullAllPrimaryPullAllPrimary*
  12088. PullAllPrimary
  12089. PullAllPrimary
  12090. PullAllAlternatesPullAllAlternates2
  12091. PullAllAlternates
  12092. PullAllAlternates
  12093. PullSpecificListPullSpecificList.
  12094. PullSpecificList
  12095. PullSpecificList
  12096. PullChooseSpecificPullChooseSpecific2
  12097. PullChooseSpecific
  12098. PullChooseSpecific
  12099. Categori_zeK
  12100. _Edit Document
  12101. Send Docu_ment
  12102. _Forward
  12103. _Move to Folder...
  12104. _Remove from Folder...
  12105. Categori_zeK
  12106. _Edit Document
  12107. Send Docu_ment
  12108. _Forward
  12109. _Move to Folder...
  12110. _Remove from Folder...
  12111. O=Lotus Notes
  12112. O=Lotus Notes
  12113. PURSAFO
  12114. |.:#U
  12115. O=Lotus Notes
  12116. CN=Lotus Notes Template Development/O=Lotus Notes
  12117. PURSAFO
  12118. "EH^G
  12119. $TITLE
  12120. $Index
  12121. $Formula
  12122. $FormulaClass
  12123. $VIEWFORMAT
  12124. $Comment
  12125. $V5ACTIONS
  12126. $ACTIONS
  12127. %$SUBVIEWLastName\Last Name:15;FirstName\First Name:15;PhoneNumber\Phone Number:15($People)
  12128. Lastname
  12129. $3FullName$Conflict$REF
  12130. Person
  12131.     1S2S3S4S5S6S
  12132. $3FullName
  12133. Lastname
  12134. FullNameFull Name&
  12135. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################################################
  12136. .($Groups)
  12137. ListName
  12138.     0S0E
  12139. $8ListName$Conflict$REF
  12140. Group
  12141. GroupType
  12142. Group
  12143.     L1S3S4S5S6S8S9S16S17S1
  12144. $8ListName
  12145. $8ListName0
  12146. ListName
  12147.     0S0E
  12148. ListNameListName&
  12149. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########################################
  12150. $$SUBVIEWDomainName\Domain Name:23($CrossCertByRoot)/O
  12151. OrgComboIssuedByIssuedTo$0CertificateType$Conflict$REF
  12152. CrossCertificate
  12153. OrgComboIssuedByIssuedTo
  12154. OrgComboOrg. CombinationIssuedByIssued ByIssuedToIssued To$0NoteID
  12155. CertificateTypeCertificateType&
  12156. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############################################
  12157. %$SUBVIEWDomainName\Domain Name:23($Certifiers)/O*
  12158. IssuedTo
  12159. IssuedTo
  12160. IssuedTo
  12161. Certificate_NoEnc
  12162. $0IssuedToCertificateType$Conflict$REF
  12163. Certifier
  12164. Certifier
  12165.     L1S2S3S4S5S1
  12166. $0IssuedTo
  12167. $0IssuedTo and AlternateSubjectList
  12168. IssuedTo
  12169. IssuedTo
  12170. IssuedTo
  12171. Certificate_NoEnc
  12172.     27SIssuedToIssued ToCertificateTypeCertificateType&
  12173. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################################################
  12174. \($PeopleGroupsHier)1
  12175. $8$11
  12176. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#################
  12177. GroupDistribution ListAccess GroupAccess ListGroup[GroupCreator]$GroupExtensibleSchema
  12178. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########
  12179. CrossCertificateCrossCertificateC
  12180. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  12181. ##########################################################
  12182. ($Locations)/O
  12183. Source
  12184. Server
  12185. ServerName
  12186. Source
  12187. $1Name$Conflict$REF
  12188. Location
  12189. Server
  12190. Location
  12191. Server
  12192.     L1S2S3S4S6S7S9S10S
  12193. $1Name
  12194. $1SourceZ
  12195. Source
  12196. Server
  12197. ServerName
  12198. Source
  12199. NameName&
  12200. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  12201. ##########################################################
  12202. #(Parts)CD
  12203. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes&
  12204. ##########################################################
  12205. Server\CertifierCertifier[NetCreator]$CertifierExtensibleSchema
  12206. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######
  12207. -($Users)/O1
  12208. $38$23
  12209. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################
  12210. Brian Lambert($VIMGroups)
  12211. ListName
  12212. $1ListDescriptionMembers$Conflict$REF
  12213. Group
  12214.     1S2S3S4S5S
  12215.  $1List Name0
  12216. ListName
  12217. ListDescriptionDescriptionMembersMembers&
  12218. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  12219. Brian Lambert($VIMPeopleAndGroups),
  12220. Person
  12221. Person
  12222. Fullname
  12223. ListName
  12224. FirstName
  12225. MiddleInitial
  12226. LastName
  12227. XDomain
  12228. MailDomain
  12229. MailDomain"
  12230.     1S2S5S6S8S9S10S12S
  12231. Person
  12232. MailAddress
  12233. MailAddress
  12234. FullName
  12235. XDomain
  12236. Listname
  12237.     0R9S10S12S14S18S20S21S
  12238. Person
  12239. Comment
  12240. ListDescription
  12241. $6$1$0$2$3$8$5Members$Conflict$REF
  12242. Person
  12243. Group
  12244.     1S3S4S5S6S7S8S10S11S
  12245. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes################################
  12246. Brian Lambert($VIMPeopleByLastName)
  12247. LastName
  12248. Fullname
  12249. FirstName
  12250. MiddleInitial
  12251. XDomain
  12252. MailDomain
  12253. MailDomain"
  12254. MailAddress
  12255. MailAddress
  12256. FullName
  12257. XDomain
  12258. $6$1$0$2$4Comment$Conflict$REF
  12259. Person
  12260.     1S2S3S4S5S
  12261. $6LastName.
  12262. LastName
  12263. $1FullName0
  12264. Fullname
  12265. $0FirstName&
  12266. FirstName
  12267. $2Middle Initial*
  12268. MiddleInitial
  12269. $4MailAddress
  12270. XDomain
  12271. MailDomain
  12272. MailDomain"
  12273. MailAddress
  12274. MailAddress
  12275. FullName
  12276. XDomain
  12277. CommentComment&
  12278. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################################################
  12279. ($ServerAccess)/O
  12280. Remove all members that contain domain names (e.g. @ Domain)
  12281. CanonicalMembers
  12282. Members
  12283. CanonicalMembers
  12284. CanonicalMembers
  12285. CanonicalMembers
  12286. $1ListName$Conflict$REF
  12287. Group
  12288. GroupType
  12289. GroupType
  12290. Group
  12291.     L1S3S4S5S6S8S9S15S16S23S24S1
  12292. $1Name$
  12293. Remove all members that contain domain names (e.g. @ Domain)
  12294. CanonicalMembers
  12295. Members
  12296. CanonicalMembers
  12297. CanonicalMembers
  12298. CanonicalMembers
  12299. ListNameListName&
  12300. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######################################################
  12301. Brian Lambert($VIMPeople)
  12302. Fullname
  12303. FirstName
  12304. MiddleInitial
  12305. LastName
  12306. XDomain
  12307. MailDomain
  12308. MailDomain"
  12309. MailAddress
  12310. MailAddress
  12311. FullName
  12312. XDomain
  12313. $1$0$2$3$4Comment$Conflict$REF
  12314. Person
  12315.     1S2S3S4S5S
  12316. $1FullName0
  12317. Fullname
  12318. $0FirstName&
  12319. FirstName
  12320. $2Middle Initial*
  12321. MiddleInitial
  12322. $3LastName$
  12323. LastName
  12324. $4MailAddress
  12325. XDomain
  12326. MailDomain
  12327. MailDomain"
  12328. MailAddress
  12329. MailAddress
  12330. FullName
  12331. XDomain
  12332. CommentComment&
  12333. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#################
  12334. :($PeopleGroupsFlat)/O1
  12335. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  12336. ($Adminp)/O
  12337. LocalAdmin
  12338. Owner
  12339. Source
  12340. ServerName
  12341. ListName
  12342. Destination
  12343. AllowAccess
  12344. CreateAccess
  12345. ReplicaAccess
  12346. Administrator
  12347. PTAccess
  12348. PTClients
  12349. PTCallers
  12350. PTTargets
  12351. PrivateList
  12352. RestrictedList
  12353. UnrestrictedList
  12354. ListOwner
  12355. MailServer
  12356. PassthruServer
  12357. FullName
  12358. SMTPAdministrator
  12359. DefaultPassthruServer
  12360. InterNotes
  12361. MailAddress
  12362. GroupType
  12363. Members
  12364.     10S22S28S30S32S
  12365. $17$Conflict$REF
  12366. Person
  12367. GroupType
  12368. Group
  12369.     L1S2E4S5S9S10S
  12370. $17Names
  12371. LocalAdmin
  12372. Owner
  12373. Source
  12374. ServerName
  12375. ListName
  12376. Destination
  12377. AllowAccess
  12378. CreateAccess
  12379. ReplicaAccess
  12380. Administrator
  12381. PTAccess
  12382. PTClients
  12383. PTCallers
  12384. PTTargets
  12385. PrivateList
  12386. RestrictedList
  12387. UnrestrictedList
  12388. ListOwner
  12389. MailServer
  12390. PassthruServer
  12391. FullName
  12392. SMTPAdministrator
  12393. DefaultPassthruServer
  12394. InterNotes
  12395. MailAddress
  12396. GroupType
  12397. Members
  12398.     10S22S28S30S32S&
  12399. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  12400. ##########################################################
  12401. ##########################################################
  12402. Categori_zeK
  12403. _Edit Document
  12404. Send Docu_ment
  12405. _Forward
  12406. _Move To Folder...
  12407. _Remove From FolderK
  12408. O=Lotus Notes
  12409. O=Lotus Notes
  12410. PURSAFO
  12411. |.:#U
  12412. O=Lotus Notes
  12413. CN=Lotus Notes Template Development/O=Lotus Notes
  12414. PURSAFO
  12415. $TABLEFORMAT
  12416. $TITLE
  12417. $Index
  12418. $Formula
  12419. $FormulaClass
  12420. $VIEWFORMAT
  12421. $Comment
  12422. $ACTIONS
  12423. Categori_zeK
  12424. _Edit Document
  12425. Send Docu_ment
  12426. _Forward
  12427. _Move To Folder...
  12428. _Remove From FolderK
  12429. Categori_zeK
  12430. _Edit Document
  12431. Send Docu_ment
  12432. _Forward
  12433. _Move To Folder...
  12434. _Remove From FolderK
  12435. O=Lotus Notes
  12436. O=Lotus Notes
  12437. PURSAFO
  12438. |.:#U
  12439. O=Lotus Notes
  12440. CN=Lotus Notes Template Development/O=Lotus Notes
  12441. PURSAFO
  12442. S|?",
  12443. $TITLE
  12444. $Index
  12445. $Formula
  12446. $FormulaClass
  12447. $VIEWFORMAT
  12448. $Comment
  12449. $V5ACTIONS
  12450. $ACTIONS
  12451. O=Lotus Notes
  12452. O=Lotus Notes
  12453. PURSAFO
  12454. |.:#U
  12455. O=Lotus Notes
  12456. CN=Lotus Notes Template Development/O=Lotus Notes
  12457. PURSAFO
  12458. $TABLEFORMAT
  12459. $TITLE
  12460. $Index
  12461. $Formula
  12462. $FormulaClass
  12463. $VIEWFORMAT
  12464. $Comment
  12465. O=Lotus Notes
  12466. O=Lotus Notes
  12467. PURSAFO
  12468. |.:#U
  12469. O=Lotus Notes
  12470. CN=Lotus Notes Template Development/O=Lotus Notes
  12471. PURSAFO
  12472. $TABLEFORMAT
  12473. $TITLE
  12474. $Index
  12475. $Formula
  12476. $FormulaClass
  12477. $VIEWFORMAT
  12478. $Comment
  12479. O=Lotus Notes
  12480. O=Lotus Notes
  12481. PURSAFO
  12482. |.:#U
  12483. O=Lotus Notes
  12484. CN=Lotus Notes Template Development/O=Lotus Notes
  12485. PURSAFO
  12486. $TABLEFORMAT
  12487. $TITLE
  12488. $Index
  12489. $Formula
  12490. $FormulaClass
  12491. $VIEWFORMAT
  12492. $Comment
  12493. NameTo
  12494. Person
  12495. Database
  12496. FullName
  12497. AltFullName
  12498. ListName
  12499.     1S2S5S6S7S8S10S22S
  12500. NameTo
  12501. NameTo
  12502. (Not Hierarchical)
  12503.     0R8S11S14S18S21S
  12504. Person
  12505. Database
  12506. ResourceFlagh
  12507. ResourceType
  12508. ResourceFlag
  12509. ResourceFlagh
  12510. ResourceType
  12511. ResourceFlag
  12512. Server
  12513. Group
  12514. GroupType
  12515. GroupType
  12516. GroupType
  12517. GroupType
  12518. GroupType
  12519. GroupType
  12520.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S
  12521. DisplayPersonName
  12522. Person
  12523. LastName
  12524. FirstName
  12525. MiddleInitial
  12526. AltFullName
  12527.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  12528. DisplayName
  12529. Group
  12530. ListName
  12531. Server
  12532. ServerName
  12533. DisplayPersonName
  12534. FullName
  12535. DisplayPersonName
  12536.     0R1S2S5S6S8S12S15S24S25S27S31S34S
  12537. DisplayName
  12538.     0R4S
  12539. MAMailAddress
  12540. Person
  12541. MailSystem
  12542. MailAddress
  12543. MailAddress
  12544. MailDomain
  12545. MailDomain"
  12546. FullName
  12547. FullName
  12548. MailDomain
  12549. MailDomain"
  12550. FirstName
  12551. FirstName
  12552. LastName"
  12553. MailDomain
  12554. MailDomain"
  12555. LastName
  12556. MailDomain
  12557. MailDomain"
  12558. Database
  12559. FullName
  12560. MailDomain
  12561. MailDomain"
  12562. Group
  12563. GroupType
  12564. GroupType
  12565. ListName
  12566.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  12567. Group
  12568. ListName
  12569. FullName
  12570.     3S4S6S13S17S
  12571. MAPublicKey
  12572. Certificate
  12573. PublicKey
  12574. Certificate
  12575. PublicKey
  12576. Server
  12577. Certificate
  12578.     7S8S34S35S
  12579. AltFullName
  12580. AltFullName
  12581. $8$18$11MAMailAddress$24TypeMAPublicKeyAltFullName$Conflict$REF
  12582. Person
  12583. Group
  12584. Database
  12585. Server
  12586.     L1S2S4S5S6S7S8S9S10S11S12S13S14S17S
  12587. NameTo
  12588. Person
  12589. Database
  12590. FullName
  12591. AltFullName
  12592. ListName
  12593.     1S2S5S6S7S8S10S22S
  12594. NameTo
  12595. NameTo
  12596. (Not Hierarchical)
  12597.     0R8S11S14S18S21S
  12598. Person
  12599. Database
  12600. ResourceFlagh
  12601. ResourceType
  12602. ResourceFlag
  12603. ResourceFlagh
  12604. ResourceType
  12605. ResourceFlag
  12606. Server
  12607. Group
  12608. GroupType
  12609. GroupType
  12610. GroupType
  12611. GroupType
  12612. GroupType
  12613. GroupType
  12614.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S$11F
  12615. DisplayPersonName
  12616. Person
  12617. LastName
  12618. FirstName
  12619. MiddleInitial
  12620. AltFullName
  12621.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  12622. DisplayName
  12623. Group
  12624. ListName
  12625. Server
  12626. ServerName
  12627. DisplayPersonName
  12628. FullName
  12629. DisplayPersonName
  12630.     0R1S2S5S6S8S12S15S24S25S27S31S34S
  12631. DisplayName
  12632.     0R4S
  12633. MAMailAddressAddress
  12634. MAMailAddress
  12635. Person
  12636. MailSystem
  12637. MailAddress
  12638. MailAddress
  12639. MailDomain
  12640. MailDomain"
  12641. FullName
  12642. FullName
  12643. MailDomain
  12644. MailDomain"
  12645. FirstName
  12646. FirstName
  12647. LastName"
  12648. MailDomain
  12649. MailDomain"
  12650. LastName
  12651. MailDomain
  12652. MailDomain"
  12653. Database
  12654. FullName
  12655. MailDomain
  12656. MailDomain"
  12657. Group
  12658. GroupType
  12659. GroupType
  12660. ListName
  12661.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  12662. $24Namev
  12663. Group
  12664. ListName
  12665. FullName
  12666.     3S4S6S13S17S
  12667. TypeTypeMAPublicKeyPublic Key
  12668. MAPublicKey
  12669. Certificate
  12670. PublicKey
  12671. Certificate
  12672. PublicKey
  12673. Server
  12674. Certificate
  12675.     7S8S34S35S
  12676. AltFullNameAltFullName&
  12677. AltFullName
  12678. AltFullName
  12679. Categori_zeK
  12680. _Edit Document
  12681. Send Docu_ment
  12682. _Forward
  12683. _Move To Folder...
  12684. _Remove From FolderK
  12685. Categori_zeK
  12686. _Edit Document
  12687. Send Docu_ment
  12688. _Forward
  12689. _Move To Folder...
  12690. _Remove From FolderK
  12691. O=Lotus Notes
  12692. O=Lotus Notes
  12693. PURSAFO
  12694. |.:#U
  12695. O=Lotus Notes
  12696. CN=Lotus Notes Template Development/O=Lotus Notes
  12697. PURSAFO
  12698. $TITLE
  12699. $Index
  12700. $Formula
  12701. $FormulaClass
  12702. $VIEWFORMAT
  12703. $Comment
  12704. $V5ACTIONS
  12705. $ACTIONS
  12706. &Arial
  12707. people
  12708. New Group
  12709. ListNameJ
  12710. '++LotusScript Development Environment:2:5:(Options):0:74
  12711. Option Public
  12712. '++LotusScript Development Environment:2:5:(Forward):0:1
  12713. Declare Public Function QuickSort(sArray As Variant)
  12714. Declare Sub DoQS( sA() As String, bottom As Long, top As Long )
  12715. Declare Sub DoInsertSort ( sA() As String, Byval bottom As Long, Byval top As Long )    
  12716. '++LotusScript Development Environment:2:5:(Declarations):0:10
  12717. Dim SortedArray As Variant
  12718. '++LotusScript Development Environment:2:1:QuickSort:1:8
  12719. Public Function QuickSort(sArray As Variant)
  12720.     Dim sA() As String    
  12721.     Dim j As Long
  12722.     Dim bottom As Long
  12723.     Dim top As Long
  12724.     bottom = Lbound ( sArray )
  12725.     top = Ubound ( sArray )
  12726.     Redim sA( bottom To top ) As String     
  12727.     For j = bottom To top
  12728.         sA ( j ) = sArray ( j )
  12729.     Next
  12730.      ' DoQS does a QuickSort if the Sublist is longer than 10 elements
  12731.      ' Thus, when DoQS finishes, all elements are within 10 spots of their correct location.
  12732.      ' For lists that are close to being in order, an Insertion Sort is much faster than a QuickSort, so we
  12733.      ' run through the whole thing once doing an Insertion Sort to finish tidying up the order.
  12734.     Call DoQS( sA, bottom, top )
  12735.     Call DoInsertSort ( sA, bottom, top )
  12736.     SortedArray = sA
  12737. End Function
  12738. '++LotusScript Development Environment:2:2:DoQS:1:8
  12739. Sub DoQS( sA() As String, bottom As Long, top As Long )
  12740.      ' Called by QuickSort
  12741.      ' Uses Public variable sA  (array of string)
  12742.     Dim length As Long
  12743.     Dim i As Long
  12744.     Dim j As Long
  12745.     Dim Pivot As Long
  12746.     Dim PivotValue As String
  12747.     Dim t As String
  12748.     Dim LastSmall As Long
  12749.     length = top - bottom + 1
  12750.      ' Only do the QuickSort if the sublist is at least 10 items long
  12751.     If length > 10 Then
  12752.           ' Pivot is chosen approx. halfway through sublist.
  12753.           ' This gives us best speed if list is almost sorted already, and is no worse than any
  12754.           ' other choice if the list is in random order.
  12755.         Pivot = bottom + (length \ 2)   
  12756.           ' Move PivotValue out of the way
  12757.         PivotValue = sA( Pivot )
  12758.         sA ( Pivot ) = sA ( bottom )
  12759.         sA ( bottom ) = PivotValue
  12760.           ' LastSmall is the location of the last value smaller than PivotValue
  12761.         LastSmall = bottom
  12762.         For i = bottom + 1 To top 
  12763.             If sA ( i ) < PivotValue Then 
  12764.                 LastSmall = LastSmall + 1
  12765.                 t = sA ( i )
  12766.                 sA ( i ) = sA ( LastSmall )
  12767.                 sA ( LastSmall ) = t
  12768.             End If
  12769.         Next
  12770.           ' Move the PivotValue back
  12771.         t = sA ( LastSmall )
  12772.         sA ( LastSmall ) = sA ( bottom )
  12773.         sA ( bottom ) = t
  12774.         Pivot = LastSmall
  12775.           ' Now sort each side
  12776.         Call DoQS ( sA, bottom, Pivot - 1 )
  12777.         Call DoQS ( sA, Pivot + 1, top )
  12778.     End If
  12779. End Sub
  12780. '++LotusScript Development Environment:2:2:DoInsertSort:1:8
  12781. Sub DoInsertSort ( sA() As String, Byval bottom As Long, Byval top As Long )    
  12782.     Dim i As Long
  12783.     Dim x As Long
  12784.     Dim v As String
  12785.     Dim Found As Integer
  12786.     For i = bottom+1 To top
  12787.         x = i
  12788.         v = sA (i )
  12789.         Do While (sA(x-1) > v)
  12790.             sA ( x ) = sA ( x-1 )
  12791.             x = x - 1
  12792.             If x=0 Then
  12793.                 Exit Do
  12794.             End If
  12795.         Loop
  12796.         sA (x) = v
  12797.     Next
  12798. End Sub
  12799. Lotus Product
  12800. OBJECT
  12801.  Group'++LotusScript Development Environment:2:5:(Options):0:66
  12802. '++LotusScript Development Environment:2:5:(Forward):0:1
  12803. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  12804. '++LotusScript Development Environment:2:5:(Declarations):0:2
  12805. '++LotusScript Development Environment:2:2:BindEvents:1:129
  12806. Private Sub BindEvents(Byval Objectname_ As String)
  12807.     Static Source As NOTESUIDOCUMENT
  12808.     Set Source = Bind(Objectname_)
  12809.     On Event Querysave From Source Call Querysave
  12810. End Sub
  12811. '++LotusScript Development Environment:2:2:Querysave:1:12
  12812. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  12813.     Dim db As NotesDatabase
  12814.     Dim doc As NotesDocument
  12815.     Dim profile As NotesDocument
  12816.     Dim uidoc As notesuidocument
  12817.     Dim flag As String
  12818.     Dim w As New NotesUIWorkspace 
  12819.     Dim s As New NotesSession
  12820.     Set db = s.CurrentDatabase
  12821.     Set uidoc=w.currentdocument
  12822.     Set doc = uidoc.document
  12823.     Set profile=db.GetProfileDocument("DirectoryProfile")
  12824.     If profile.GetItemValue("GroupSortDefault")(0)="1" Then
  12825.         On Error Resume Next
  12826.         'Because canonical names are used in combination with flat names
  12827.         'we need to abbreviate the list coming in to do the sort correctly.
  12828.         'otherwise, the sort would be off because canonical names internally all start with CN=
  12829.         'which causes a flat name to sort before a canonical one even if the first letter of the common name
  12830.         'comes before the first letter of the flat name.  To insure correct return values, we canonicalize before
  12831.         'we save the note.  We use Evaluate because it is faster to run the @Name on the list then looping 
  12832.         'through all possible members and abbreviating them in script.
  12833.         FieldList=Evaluate(|@Name([Abbreviate];Members)|,doc)
  12834.         Call QuickSort(FieldList)
  12835.         Call doc.ReplaceItemValue("Members",SortedArray)
  12836.         Call doc.ReplaceItemValue("Members", Evaluate(|@Name([Canonicalize];Members)|,doc))
  12837.         Call uidoc.refresh
  12838.     End If
  12839. End Sub
  12840. Lotus Product
  12841. OBJECT
  12842. Members
  12843.     0S0E
  12844. Members
  12845.     0S0E
  12846. Rob Slapikoff-Rob
  12847. Field Label
  12848.     0S0E
  12849. GroupTitle
  12850. GroupType
  12851. GroupType
  12852. GroupType
  12853. GroupType
  12854. GroupTitle
  12855. GROUP|0MAILING LIST|1ACCESS LIST|2DENY ACCESS LIST|3
  12856. ListName
  12857. ListName
  12858.     0S0E
  12859. DisplayName
  12860. Group
  12861.     0S0E
  12862. /    Basics:
  12863. Group name (multiple names can be separated by commas).
  12864.     Group name:
  12865. ListName^
  12866.     0S0E
  12867. ListName
  12868. You must specify a group name
  12869. ListName
  12870. Invalid characters in Group name.  Names cannot contain '@' or '\'{
  12871.     3S4S6S11SListNameGroup name (multiple names can be separated by commas).
  12872. If this group will be used only for Mail, choose Mailing List, if it is going to be used for either database or server access, choose Database or Server Access Control, if it is going to be used as a Deny List or a member of a Deny List, choose Deny List.
  12873.     Group type:
  12874. GroupTypeChoose the appropriate type for this group.  
  12875. Multi-purpose|0Access Control List only|2Mail only|1Servers only|4Deny List only|3
  12876. Description or purpose of the group.
  12877.     Description:
  12878. ListDescriptionDescription or purpose of the group.
  12879. Distinquished names of people and groups who are members of the group.
  12880.     Members:
  12881. size=50
  12882. Members
  12883.     0S0E
  12884. MembersDistinquished names of people and groups who are members of the group.
  12885. Basics
  12886. /    Administration
  12887. Distinguished names of people allowed to modify the group.
  12888.     Owners:
  12889. ListOwnerDistinguished names of people allowed to modify the group.
  12890. Enter the names or group names which you want to give edit capabilities to for this group record.
  12891.     Administrators:
  12892. LocalAdminEnter the names or group names which should have edit capabilities for this record.
  12893. Group entry is allowed to be sent to foreign directories, e.g. via directory synchronization gateways.
  12894.     Foreign directory sync allowed:
  12895. AvailableForDirSyncGroup entry is allowed to be sent to foreign directories, e.g. via directory synchronization gateways.
  12896. Yes|1No|0
  12897. Administration
  12898. $GroupExtensibleSchema
  12899. Group
  12900. Person
  12901. AltLanguagePersonalInfo
  12902. [UserModifier]
  12903. Group
  12904. [GroupModifier]
  12905. Server
  12906. [ServerModifier]
  12907. [NetModifier]
  12908.     3S4S8S10S11S12S14S16S17S18S20S22SDocumentAccess
  12909. GroupType
  12910. /DenyLists?OpenView
  12911. /Groups?OpenView]
  12912.     0S0E
  12913. $$Return
  12914. Categori_zeK
  12915. Close
  12916.     0S0E
  12917. Save and CloseB
  12918.     0S0E
  12919. Edit Group 
  12920.     0S0E
  12921. _Edit GroupK
  12922. Delete Group
  12923. AdminFileName
  12924. admin4.nsf
  12925.     0S0E
  12926. CurrentServer
  12927. CurrentServer
  12928. AdminFileName
  12929.     0RR6
  12930. Refresh (F9) 
  12931.     0S0E
  12932. Send Docu_ment
  12933. _Forward    
  12934. _Move to Folder...
  12935. _Remove from Folder...
  12936. Sort Member List'++LotusScript Development Environment:2:5:(Options):0:66
  12937. '++LotusScript Development Environment:2:5:(Forward):0:1
  12938. Declare Sub Click(Source As Button)
  12939. '++LotusScript Development Environment:2:5:(Declarations):0:2
  12940. '++LotusScript Development Environment:2:2:BindEvents:1:129
  12941. Private Sub BindEvents(Byval Objectname_ As String)
  12942.     Static Source As BUTTON
  12943.     Set Source = Bind(Objectname_)
  12944.     On Event Click From Source Call Click
  12945. End Sub
  12946. '++LotusScript Development Environment:2:2:Click:1:12
  12947. Sub Click(Source As Button)
  12948.     Dim db As NotesDatabase
  12949.     Dim doc As NotesDocument
  12950.     Dim uidoc As notesuidocument
  12951.     Dim flag As String
  12952.     Dim w As New NotesUIWorkspace 
  12953.     Dim s As New NotesSession
  12954.     Set db = s.CurrentDatabase
  12955.     Set uidoc=w.currentdocument
  12956.     Set doc = uidoc.document
  12957.     On Error Resume Next
  12958.     'Because canonical names are used in combination with flat names
  12959.     'we need to abbreviate the list coming in to do the sort correctly.
  12960.     'otherwise, the sort would be off because canonical names internally all start with CN=
  12961.     'which causes a flat name to sort before a canonical one even if the first letter of the common name
  12962.     'comes before the first letter of the flat name.  To insure correct return values, we canonicalize before
  12963.     'we save the note.  We use Evaluate because it is faster to run the @Name on the list then looping 
  12964.     'through all possible members and abbreviating them in script.
  12965.     FieldList=Evaluate(|@Name([Abbreviate];Members)|,doc)
  12966.     Call QuickSort(FieldList)
  12967.     Call doc.ReplaceItemValue("Members",SortedArray)
  12968.     Call doc.ReplaceItemValue("Members", Evaluate(|@Name([Canonicalize];Members)|,doc))
  12969.     Call uidoc.refresh
  12970. End Sub
  12971. Categori_zeK
  12972. Close
  12973.     0S0E
  12974. Save and CloseB
  12975.     0S0E
  12976. Edit Group 
  12977.     0S0E
  12978. _Edit GroupK
  12979. Delete Group
  12980. AdminFileName
  12981. admin4.nsf
  12982.     0S0E
  12983. CurrentServer
  12984. CurrentServer
  12985. AdminFileName
  12986.     0RR6
  12987. Refresh (F9) 
  12988.     0S0E
  12989. Send Docu_ment
  12990. _Forward    
  12991. _Move to Folder...
  12992. _Remove from Folder...
  12993. Sort Member List'++LotusScript Development Environment:2:5:(Options):0:66
  12994. '++LotusScript Development Environment:2:5:(Forward):0:1
  12995. Declare Sub Click(Source As Button)
  12996. '++LotusScript Development Environment:2:5:(Declarations):0:2
  12997. '++LotusScript Development Environment:2:2:BindEvents:1:129
  12998. Private Sub BindEvents(Byval Objectname_ As String)
  12999.     Static Source As BUTTON
  13000.     Set Source = Bind(Objectname_)
  13001.     On Event Click From Source Call Click
  13002. End Sub
  13003. '++LotusScript Development Environment:2:2:Click:1:12
  13004. Sub Click(Source As Button)
  13005.     Dim db As NotesDatabase
  13006.     Dim doc As NotesDocument
  13007.     Dim uidoc As notesuidocument
  13008.     Dim flag As String
  13009.     Dim w As New NotesUIWorkspace 
  13010.     Dim s As New NotesSession
  13011.     Set db = s.CurrentDatabase
  13012.     Set uidoc=w.currentdocument
  13013.     Set doc = uidoc.document
  13014.     On Error Resume Next
  13015.     'Because canonical names are used in combination with flat names
  13016.     'we need to abbreviate the list coming in to do the sort correctly.
  13017.     'otherwise, the sort would be off because canonical names internally all start with CN=
  13018.     'which causes a flat name to sort before a canonical one even if the first letter of the common name
  13019.     'comes before the first letter of the flat name.  To insure correct return values, we canonicalize before
  13020.     'we save the note.  We use Evaluate because it is faster to run the @Name on the list then looping 
  13021.     'through all possible members and abbreviating them in script.
  13022.     FieldList=Evaluate(|@Name([Abbreviate];Members)|,doc)
  13023.     Call QuickSort(FieldList)
  13024.     Call doc.ReplaceItemValue("Members",SortedArray)
  13025.     Call doc.ReplaceItemValue("Members", Evaluate(|@Name([Canonicalize];Members)|,doc))
  13026.     Call uidoc.refresh
  13027. End Sub
  13028. Lotus Product
  13029. OBJECT
  13030. Members
  13031.     0S0E
  13032. Members
  13033.     0S0E
  13034. O=Lotus Notes
  13035. O=Lotus Notes
  13036. PURSAFO
  13037. |.:#U
  13038. O=Lotus Notes
  13039. CN=Lotus Notes Template Development/O=Lotus Notes
  13040. PURSAFO
  13041. $BackgroundRepeat
  13042. $Background
  13043. $FormUsers
  13044. $INFO
  13045. $SubForms
  13046. $WINDOWTITLE
  13047. $Script
  13048. $$Script_O
  13049. $$ScriptName
  13050. $$FormScript
  13051. $$$FormScript_O
  13052. $BODY
  13053. $V5ACTIONS
  13054. $ACTIONS
  13055. $SCRIPTOBJ_11
  13056. &Arial
  13057. certifier
  13058. New Certificate
  13059. Cross Certificate for: 
  13060. IssuedTo
  13061.  by "
  13062. IssuedBy
  13063.     4S15S
  13064. Lotus Product
  13065. OBJECT
  13066.  CrossCertificate
  13067. Field Label
  13068.     0S0E
  13069. CROSS CERTIFICATE
  13070. IssuedBy
  13071. IssuedBy
  13072. IssuedTo
  13073.     16S17S18S19S
  13074. DisplayName
  13075. /    Basics
  13076.     Certificate type:
  13077. CertificateType
  13078. CertificateType
  13079. CertificateType
  13080. Notes Cross-Certificate|0Internet Cross-Certificate|1
  13081.     Issued By:
  13082. IssuedBy
  13083. DisplayIssuedByCertifier issuing the certificate
  13084.     Issued To:
  13085. IssuedTo
  13086. DisplayIssuedToCertifier being certified
  13087. CertificateType
  13088.     0S0E
  13089.     Combined Name:
  13090. NameCombo
  13091. NameComboTop level organization of issuer
  13092.     Comment:
  13093. CommentShort comment about this person (optional)
  13094.     Organizations:
  13095. OrgCombo
  13096. OrgComboTop level organization of issuer
  13097.     X.509 certificate
  13098. UserCertificate
  13099. UserCertificate
  13100.     6S7S
  13101. UserCertificateDisplay
  13102. Present|1Not Available|0
  13103.     Certified Public Key:
  13104. Certificate_NoEnc
  13105. Certificate_NoEncCertifier's certified public key (not for encrypted mail)
  13106. Basics
  13107. /    Administration
  13108.     Owners:
  13109. OwnerFull name of person allowed to modify this document.
  13110.     Administrators:
  13111. LocalAdminEnter the names or group names which should have edit capabilities for this record.
  13112. Administration
  13113. CrossCertificate
  13114. Person
  13115. AltLanguagePersonalInfo
  13116. [UserModifier]
  13117. Group
  13118. [GroupModifier]
  13119. Server
  13120. [ServerModifier]
  13121. [NetModifier]
  13122.     3S4S8S10S11S12S14S16S17S18S20S22SDocumentAccess
  13123. Categori_zeK
  13124. Close
  13125.     0S0E
  13126. Save and CloseB
  13127.     0S0E
  13128. _Edit Certificate
  13129. Remove X.509 Certificate(s)K
  13130. UserCertificate
  13131.     0S0E
  13132. leftsubs
  13133. rightsubs
  13134. Delete Cert
  13135. What certificate(s) do you want to delete?
  13136. leftsubs
  13137.     0R1S2S6S8S10S12S
  13138.     0R5S6S
  13139. leftsubsv
  13140. leftsubsj
  13141. rightsubs
  13142. rightsubs
  13143. rightsubs
  13144. UserCertificate
  13145.     0R4S6S
  13146. Send Docu_ment
  13147. _Forward
  13148. _Move to Folder...
  13149. _Remove from Folder...    
  13150. Categori_zeK
  13151. Close
  13152.     0S0E
  13153. Save and CloseB
  13154.     0S0E
  13155. _Edit Certificate
  13156. Remove X.509 Certificate(s)K
  13157. UserCertificate
  13158.     0S0E
  13159. leftsubs
  13160. rightsubs
  13161. Delete Cert
  13162. What certificate(s) do you want to delete?
  13163. leftsubs
  13164.     0R1S2S6S8S10S12S
  13165.     0R5S6S
  13166. leftsubsv
  13167. leftsubsj
  13168. rightsubs
  13169. rightsubs
  13170. rightsubs
  13171. UserCertificate
  13172.     0R4S6S
  13173. Send Docu_ment
  13174. _Forward
  13175. _Move to Folder...
  13176. _Remove from Folder...    
  13177. O=Lotus Notes
  13178. O=Lotus Notes
  13179. PURSAFO
  13180. |.:#U
  13181. O=Lotus Notes
  13182. CN=Lotus Notes Template Development/O=Lotus Notes
  13183. PURSAFO
  13184. 4VY:b
  13185. SF,(n
  13186. $BackgroundRepeat
  13187. $Background
  13188. $INFO
  13189. $WINDOWTITLE
  13190. $$Script_O
  13191. $$ScriptName
  13192. $BODY
  13193. $V5ACTIONS
  13194. $ACTIONS
  13195. Categori_zeK
  13196. _Edit Document
  13197. Send Docu_ment
  13198. _Forward
  13199. _Move to Folder...
  13200. _Remove from FolderK
  13201. O=Lotus Notes
  13202. O=Lotus Notes
  13203. PURSAFO
  13204. |.:#U
  13205. O=Lotus Notes
  13206. CN=Lotus Notes Template Development/O=Lotus Notes
  13207. PURSAFO
  13208. $TITLE
  13209. $Index
  13210. $Formula
  13211. $FormulaClass
  13212. $VIEWFORMAT
  13213. $Comment
  13214. $ACTIONS
  13215. (Parts)
  13216. Administration
  13217.     Owners:
  13218. OwnerDistinguished names of people allowed to modify the group.
  13219.     Administrators:
  13220. LocalAdmin
  13221. Categori_zeK
  13222. _Edit Document
  13223. Send Docu_ment
  13224. _Forward
  13225. _Move to Folder...
  13226. _Remove from Folder...
  13227. Categori_zeK
  13228. _Edit Document
  13229. Send Docu_ment
  13230. _Forward
  13231. _Move to Folder...
  13232. _Remove from Folder...
  13233. O=Lotus Notes
  13234. O=Lotus Notes
  13235. PURSAFO
  13236. |.:#U
  13237. O=Lotus Notes
  13238. CN=Lotus Notes Template Development/O=Lotus Notes
  13239. PURSAFO
  13240. $INFO
  13241. $$ScriptName
  13242. $BODY
  13243. $V5ACTIONS
  13244. $ACTIONS
  13245. certifier
  13246. New Certifier
  13247. FullName
  13248.     4S6S
  13249. 5Courier New
  13250. Lotus Product
  13251. V0.0^,
  13252.  Certifier
  13253.     0S0E
  13254. CERTIFIER
  13255. FullName
  13256. FullName
  13257.     0S0E
  13258. DisplayName1
  13259. /    Basics
  13260.     Certifier type:
  13261. CertificateType
  13262. CertificateType
  13263. CertificateType
  13264. Notes Certifier|0Internet Certifier|1
  13265. Distinguished name of certifier.
  13266.     Certifier name:
  13267. FullNameDistinguished name of certifier.
  13268. Certifier issuing the certificate
  13269.     Issued by:
  13270. IssuedByCertifier issuing the certificate
  13271.     Issued to:
  13272. CertificateType
  13273. IssuedTo
  13274. FullName
  13275.     0S0E
  13276. IssuedTo
  13277.     Alternate names:
  13278. Certificate_NoEnc
  13279.     6S7S
  13280. AlternateNameList
  13281.     X.509 certificate
  13282. UserCertificate
  13283. UserCertificate
  13284.     6S7S
  13285. UserCertificateDisplay
  13286. Present|1Not Available|0
  13287. Certifier's certified public key (not for encrypted mail)
  13288.     Certified public key:
  13289. Certificate_NoEncCertifier's certified public key (not for encrypted mail)
  13290. Basics
  13291. CertificateType
  13292.     0S0E
  13293. /    Contact
  13294. /    E-Mail
  13295. Company name.
  13296.     Company:
  13297. CompanyNameCompany name.
  13298. Mail server name - e.g. Marketing/Acme.
  13299.     Notes mail server:
  13300. MailServer^
  13301. MailServerMail server name - e.g. Marketing/Acme.
  13302. Department name(s).
  13303.     Department:
  13304. DepartmentDepartment name(s).
  13305. Mail file name - e.g. MAIL\JSMITH.
  13306.     Notes mail filename:
  13307. MailFile^
  13308. MailFileMail file name - e.g. MAIL\JSMITH.
  13309. Office location or mailstop
  13310.     Location:
  13311. LocationOffice location or mailstop
  13312. Optional mail address to forward to - e.g. John Smith @ XYZ.
  13313.     Other mail address:
  13314. MailAddress
  13315. MailAddressOptional mail address to forward to - e.g. John Smith @ XYZ.
  13316. Office phone number
  13317.     Office phone:
  13318. OfficePhoneNumberOffice phone number
  13319. Short comment about this person (optional)
  13320.     Comment:
  13321. CommentShort comment about this person (optional)
  13322. Contact Information
  13323. $CertifierExtensibleSchema
  13324. Other
  13325. /    Administration
  13326.     Owners:
  13327. OwnerFull name of person allowed to modify this document.
  13328.     Administrators:
  13329. LocalAdminEnter the names or group names which should have edit capabilities for this record.
  13330.     Change request:
  13331. ChangeRequestPerson's public key.
  13332. Administration
  13333. Certifier
  13334. Person
  13335. AltLanguagePersonalInfo
  13336. [UserModifier]
  13337. Group
  13338. [GroupModifier]
  13339. Server
  13340. [ServerModifier]
  13341. [NetModifier]
  13342.     3S4S8S10S11S12S14S16S17S18S20S22SDocumentAccess
  13343. Categori_zeK
  13344. Close
  13345.     0S0E
  13346. Save and CloseB
  13347.     0S0E
  13348. _Edit CertifierK
  13349. Examine X.509 Certificate(s)`
  13350. (DeleteCertDialog)
  13351. Delete X.509 Certificates
  13352.     0S0E
  13353. Send Docu_ment
  13354. Create Cross Certificatep
  13355. UserCertificate
  13356. Certificate_NoEnc
  13357.     0S0E
  13358. leftsubs
  13359. rightsubs
  13360. Create Cross Certificate
  13361. What certificate do you want to cross certify?
  13362. leftsubs
  13363.     0R1S2S6S8S10S12S
  13364.     0R5S6S
  13365. leftsubsv
  13366. leftsubsj
  13367. rightsubs
  13368. UserCertificate
  13369. Certificate_NoEnc
  13370. _Forward
  13371. _Move to Folder...    
  13372. _Remove from Folder...
  13373. Categori_zeK
  13374. Close
  13375.     0S0E
  13376. Save and CloseB
  13377.     0S0E
  13378. _Edit CertifierK
  13379. Examine X.509 Certificate(s)`
  13380. (DeleteCertDialog)
  13381. Delete X.509 Certificates
  13382.     0S0E
  13383. Send Docu_ment
  13384. Create Cross Certificatep
  13385. UserCertificate
  13386. Certificate_NoEnc
  13387.     0S0E
  13388. leftsubs
  13389. rightsubs
  13390. Create Cross Certificate
  13391. What certificate do you want to cross certify?
  13392. leftsubs
  13393.     0R1S2S6S8S10S12S
  13394.     0R5S6S
  13395. leftsubsv
  13396. leftsubsj
  13397. rightsubs
  13398. UserCertificate
  13399. Certificate_NoEnc
  13400. _Forward
  13401. _Move to Folder...    
  13402. _Remove from Folder...
  13403. O=Lotus Notes
  13404. O=Lotus Notes
  13405. PURSAFO
  13406. |.:#U
  13407. O=Lotus Notes
  13408. CN=Lotus Notes Template Development/O=Lotus Notes
  13409. PURSAFO
  13410. $BackgroundRepeat
  13411. $Background
  13412. $FormUsers
  13413. $INFO
  13414. $SubForms
  13415. $WINDOWTITLE
  13416. $$Script_O
  13417. $$ScriptName
  13418. $BODY
  13419. $V5ACTIONS
  13420. $ACTIONS
  13421. FullName
  13422.     1S2S6S
  13423. CommonName
  13424.     0R1S2S6S
  13425. ListNameh
  13426. ListName
  13427. ListNamex
  13428. ListName
  13429. ListName
  13430. Database
  13431. FullNamex
  13432. FullName
  13433. FullName
  13434. FirstName
  13435. LastName
  13436. FullName
  13437. CommonName
  13438. ShortName
  13439. LastNamex
  13440. Lastname
  13441. FirstName
  13442. MiddleInitial
  13443. FullName
  13444. AltFullName
  13445. AltFullName
  13446. AltFullName
  13447. InternetAddress
  13448.     0R4R11S14S15S19S20S26S29S33S36S40RS7E41S42S44S48S49S50S51S55S58RS7E59S60S61S62S63S64S65S66S67S68S72S73S75S76S77S78S79S80S81S82S84S85S89S91S92S93S94S98S100S101S107S108S
  13449. ListNameh
  13450. ListName
  13451. FullName
  13452.     7S9S
  13453. Person
  13454. Certificate
  13455. Certificate
  13456. UserCertificate
  13457.     14S15S
  13458. AltFullName
  13459. AltFullName
  13460. ServerName
  13461. ServerName
  13462. AltFullNameLanguage
  13463. AltFullNameLanguage
  13464. $38$23FullNameListNameMembersMailServerMailFileMailDomainMailAddressShortNameLocationEncryptIncomingMailCalendarDomainNetUserNameHTTPPasswordCertificateThumbprintInternetAddressNewMailServerNewMailFileAltFullNameMessageStorageServerNameAltFullNameLanguage$Conflict$REF
  13465. Person
  13466. LoginUser
  13467. Certifier
  13468. Database
  13469. Group
  13470. GroupType
  13471. GroupType
  13472.     L1S3S4S5S6S7S8S9S10S11S12S13S17S18S20S21S22S24S26S27S
  13473. $38Name<
  13474. FullName
  13475.     1S2S6S
  13476. CommonName
  13477.     0R1S2S6S
  13478. ListNameh
  13479. ListName
  13480. ListNamex
  13481. ListName
  13482. ListName
  13483. Database
  13484. FullNamex
  13485. FullName
  13486. FullName
  13487. FirstName
  13488. LastName
  13489. FullName
  13490. CommonName
  13491. ShortName
  13492. LastNamex
  13493. Lastname
  13494. FirstName
  13495. MiddleInitial
  13496. FullName
  13497. AltFullName
  13498. AltFullName
  13499. AltFullName
  13500. InternetAddress
  13501.     0R4R11S14S15S19S20S26S29S33S36S40RS7E41S42S44S48S49S50S51S55S58RS7E59S60S61S62S63S64S65S66S67S68S72S73S75S76S77S78S79S80S81S82S84S85S89S91S92S93S94S98S100S101S107S108S$23ListName & FullNameP
  13502. ListNameh
  13503. ListName
  13504. FullName
  13505.     7S9S
  13506. FullNameFullNameListNameListNameMembersMembersMailServerMailServerMailFileMailFileMailDomainMailDomainMailAddressMailAddressShortNameShortNameLocationLocationEncryptIncomingMailEncryptIncomingMailCalendarDomainCalendarDomainNetUserNameNetUserNameHTTPPasswordHTTPPasswordCertificateThumbprintCertThumbprint
  13507. Person
  13508. Certificate
  13509. Certificate
  13510. UserCertificate
  13511.     14S15S
  13512. InternetAddressInternetAddressNewMailServerNewMailServerNewMailFileNewMailFileAltFullNameAltFullName&
  13513. AltFullName
  13514. AltFullName
  13515. MessageStorageMessageStorageServerNameServerName"
  13516. ServerName
  13517. ServerName
  13518. AltFullNameLanguageAltFullNameLanguage6
  13519. AltFullNameLanguage
  13520. AltFullNameLanguage
  13521. Categori_zeK
  13522. _Edit Document
  13523. Send Docu_ment
  13524. _Forward
  13525. _Move to Folder...
  13526. _Remove from Folder...
  13527. Categori_zeK
  13528. _Edit Document
  13529. Send Docu_ment
  13530. _Forward
  13531. _Move to Folder...
  13532. _Remove from Folder...
  13533. O=Lotus Notes
  13534. O=Lotus Notes
  13535. PURSAFO
  13536. |.:#U
  13537. O=Lotus Notes
  13538. CN=Lotus Notes Template Development/O=Lotus Notes
  13539. PURSAFO
  13540. \8q%b
  13541. $TITLE
  13542. $Index
  13543. $Formula
  13544. $FormulaClass
  13545. $VIEWFORMAT
  13546. $Comment
  13547. $V5ACTIONS
  13548. $ACTIONS
  13549. _Edit Document
  13550. _Save Document
  13551. Save as New _Version
  13552. Send Docu_ment
  13553. Categori_ze
  13554. _Rename Document
  13555. O=Lotus Notes
  13556. O=Lotus Notes
  13557. PURSAFO
  13558. |.:#U
  13559. O=Lotus Notes
  13560. CN=Lotus Notes Template Development/O=Lotus Notes
  13561. PURSAFO
  13562. M5]uP
  13563. $Author
  13564. $ACTIONS
  13565. $TITLE
  13566. $Index
  13567. $Formula
  13568. $FormulaClass
  13569. $VIEWFORMAT
  13570. $Comment
  13571.  $6Type<
  13572. Person
  13573. $1FullName/ListNamel
  13574. Person
  13575. Fullname
  13576. ListName
  13577. $0FirstName&
  13578. FirstName
  13579. $2Middle Initial*
  13580. MiddleInitial
  13581. $3LastName$
  13582. LastName
  13583. $8MailAddress<
  13584. XDomain
  13585. MailDomain
  13586. MailDomain"
  13587.     1S2S5S6S8S9S10S12S
  13588. Person
  13589. MailAddress
  13590. MailAddress
  13591. FullName
  13592. XDomain
  13593. Listname
  13594.     0R9S10S12S14S18S20S21S
  13595. $5Comment/List DescriptionP
  13596. Person
  13597. Comment
  13598. ListDescription
  13599. MembersMembers&
  13600. Categori_zeK
  13601. _Edit Document
  13602. Send Docu_ment
  13603. _Forward
  13604. _Move To Folder...
  13605. _Remove From FolderK
  13606. O=Lotus Notes
  13607. O=Lotus Notes
  13608. PURSAFO
  13609. |.:#U
  13610. O=Lotus Notes
  13611. CN=Lotus Notes Template Development/O=Lotus Notes
  13612. PURSAFO
  13613. $Author
  13614. $TITLE
  13615. $Index
  13616. $Formula
  13617. $FormulaClass
  13618. $VIEWFORMAT
  13619. $Comment
  13620. $ACTIONS
  13621. Categori_zeK
  13622. _Edit Document
  13623. Send Docu_ment
  13624. _Forward
  13625. _Move To Folder...
  13626. _Remove From FolderK
  13627. O=Lotus Notes
  13628. O=Lotus Notes
  13629. PURSAFO
  13630. |.:#U
  13631. O=Lotus Notes
  13632. CN=Lotus Notes Template Development/O=Lotus Notes
  13633. PURSAFO
  13634. |LrC^~
  13635. $Author
  13636. $TITLE
  13637. $Index
  13638. $Formula
  13639. $FormulaClass
  13640. $VIEWFORMAT
  13641. $Comment
  13642. $ACTIONS
  13643. Categori_zeK
  13644. _Edit Document
  13645. Send Docu_ment
  13646. _Forward
  13647. _Move to Folder...
  13648. _Remove from FolderK
  13649. O=Lotus Notes
  13650. O=Lotus Notes
  13651. PURSAFO
  13652. |.:#U
  13653. O=Lotus Notes
  13654. CN=Lotus Notes Template Development/O=Lotus Notes
  13655. PURSAFO
  13656. $TITLE
  13657. $Index
  13658. $Formula
  13659. $FormulaClass
  13660. $VIEWFORMAT
  13661. $Comment
  13662. $ACTIONS
  13663. _Edit Document
  13664. _Save Document
  13665. Save as New _Version
  13666. Send Docu_ment
  13667. Categori_ze
  13668. _Rename Document
  13669. O=Lotus Notes
  13670. O=Lotus Notes
  13671. PURSAFO
  13672. |.:#U
  13673. O=Lotus Notes
  13674. CN=Lotus Notes Template Development/O=Lotus Notes
  13675. PURSAFO
  13676. $Author
  13677. $ACTIONS
  13678. $TITLE
  13679. $Index
  13680. $Formula
  13681. $FormulaClass
  13682. $VIEWFORMAT
  13683. $Comment
  13684. Person
  13685. Database
  13686. ResourceFlagh
  13687. ResourceType
  13688. ResourceFlag
  13689. ResourceFlagh
  13690. ResourceType
  13691. ResourceFlag
  13692. Server
  13693. Group
  13694. GroupType
  13695. GroupType
  13696. GroupType
  13697. GroupType
  13698. GroupType
  13699. GroupType
  13700.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S
  13701. DisplayPersonName
  13702. Person
  13703. LastName
  13704. FirstName
  13705. MiddleInitial
  13706. AltFullName
  13707.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  13708. DisplayName
  13709. Group
  13710. ListName
  13711. Server
  13712. ServerName
  13713. DisplayPersonName
  13714. FullName
  13715. DisplayPersonName
  13716.     0R1S2S5S6S8S12S15S24S25S27S31S34S
  13717. DisplayName
  13718.     0R4S
  13719. MAMailAddress
  13720. Person
  13721. MailSystem
  13722. MailAddress
  13723. MailAddress
  13724. FullName
  13725. FullName
  13726. FirstName
  13727. FirstName
  13728. LastName"
  13729. LastName
  13730. Database
  13731. FullName
  13732. Group
  13733. GroupType
  13734. GroupType
  13735. ListName
  13736.     3S4S5S6RS14E14RS20E20RS20E26S27S29S33S36RS20E48RS21E50RS8E51S52S54RS21E58S61RS8E62S63S64S65S72S78RS8E85RS8E
  13737. NPName
  13738. Group
  13739. ListName
  13740. Server
  13741. ServerName
  13742. Person
  13743. Database
  13744. FullName
  13745.     3S4S6S25S29S
  13746. MAPublicKey
  13747. Certificate
  13748. PublicKey
  13749. Certificate
  13750. PublicKey
  13751. Server
  13752. Certificate
  13753.     7S8S34S35S
  13754. AltFullName
  13755. AltFullName
  13756. GroupType
  13757. GroupType
  13758. $28$39MAMailAddressNPNameTypeMAPublicKeyAltFullNameGroupType$Conflict$REF
  13759. Person
  13760. Group
  13761. Database
  13762. Server
  13763.     L1S2S4S5S6S7S8S9S10S11S12S13S14S15S16S
  13764. Person
  13765. Database
  13766. ResourceFlagh
  13767. ResourceType
  13768. ResourceFlag
  13769. ResourceFlagh
  13770. ResourceType
  13771. ResourceFlag
  13772. Server
  13773. Group
  13774. GroupType
  13775. GroupType
  13776. GroupType
  13777. GroupType
  13778. GroupType
  13779. GroupType
  13780.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S$39:
  13781. DisplayPersonName
  13782. Person
  13783. LastName
  13784. FirstName
  13785. MiddleInitial
  13786. AltFullName
  13787.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  13788. DisplayName
  13789. Group
  13790. ListName
  13791. Server
  13792. ServerName
  13793. DisplayPersonName
  13794. FullName
  13795. DisplayPersonName
  13796.     0R1S2S5S6S8S12S15S24S25S27S31S34S
  13797. DisplayName
  13798.     0R4S
  13799. MAMailAddressAddress<
  13800. MAMailAddress
  13801. Person
  13802. MailSystem
  13803. MailAddress
  13804. MailAddress
  13805. FullName
  13806. FullName
  13807. FirstName
  13808. FirstName
  13809. LastName"
  13810. LastName
  13811. Database
  13812. FullName
  13813. Group
  13814. GroupType
  13815. GroupType
  13816. ListName
  13817.     3S4S5S6RS14E14RS20E20RS20E26S27S29S33S36RS20E48RS21E50RS8E51S52S54RS21E58S61RS8E62S63S64S65S72S78RS8E85RS8ENPNameName
  13818. NPName
  13819. Group
  13820. ListName
  13821. Server
  13822. ServerName
  13823. Person
  13824. Database
  13825. FullName
  13826.     3S4S6S25S29S
  13827. TypeTypeMAPublicKeyPublic Key
  13828. MAPublicKey
  13829. Certificate
  13830. PublicKey
  13831. Certificate
  13832. PublicKey
  13833. Server
  13834. Certificate
  13835.     7S8S34S35S
  13836. AltFullNameAltFullName&
  13837. AltFullName
  13838. AltFullName
  13839. GroupTypeGroupType"
  13840. GroupType
  13841. GroupType
  13842. Categori_zeK
  13843. _Edit Document
  13844. Send Docu_ment
  13845. _Forward
  13846. _Move to Folder...
  13847. _Remove from Folder...
  13848. Categori_zeK
  13849. _Edit Document
  13850. Send Docu_ment
  13851. _Forward
  13852. _Move to Folder...
  13853. _Remove from Folder...
  13854. O=Lotus Notes
  13855. O=Lotus Notes
  13856. PURSAFO
  13857. |.:#U
  13858. O=Lotus Notes
  13859. CN=Lotus Notes Template Development/O=Lotus Notes
  13860. PURSAFO
  13861. $TITLE
  13862. $Index
  13863. $Formula
  13864. $FormulaClass
  13865. $VIEWFORMAT
  13866. $Comment
  13867. $V5ACTIONS
  13868. $ACTIONS
  13869. Categori_zeK
  13870. _Edit Document
  13871. Send Docu_ment
  13872. _Forward
  13873. _Move to Folder...
  13874. _Remove from Folder...
  13875. O=Lotus Notes
  13876. O=Lotus Notes
  13877. PURSAFO
  13878. |.:#U
  13879. O=Lotus Notes
  13880. CN=Lotus Notes Template Development/O=Lotus Notes
  13881. PURSAFO
  13882. +(|<=
  13883. $TITLE
  13884. $Index
  13885. $Formula
  13886. $FormulaClass
  13887. $VIEWFORMAT
  13888. $Comment
  13889. $ACTIONS
  13890. O=Lotus Notes
  13891. O=Lotus Notes
  13892. PURSAFO
  13893. |.:#U
  13894. O=Lotus Notes
  13895. CN=Lotus Notes Template Development/O=Lotus Notes
  13896. PURSAFO
  13897. Fde!f^^
  13898. sZ%!ZM}
  13899. $Flags
  13900. (Copy to Personal Address Book)
  13901. EH4f3L
  13902. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################
  13903. (RLANList)RLANListCD
  13904. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##################################################
  13905. $RLANARAAppleTalk Remote AccessARACU3
  13906. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes
  13907. ##########################################################
  13908. $RLANRASMicrosoft Dial-Up NetworkingRASCU3
  13909. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##################################
  13910. e$ConFormRLANSubformCUA3x
  13911. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######
  13912. LocationLocation[NetCreator]$LotusFaxLocationSubform | 1.0 | $LotusFaxLocationSubform
  13913. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes########################################################
  13914. W(ProxyDialog)CD
  13915. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#######
  13916.     $GroupExtensibleSchemaCUA3Pr
  13917. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes##########
  13918. ($PeopleGroupsCorpHier)1+
  13919. $55PersonalID$60
  13920. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###################################
  13921. ($PeopleGroupsByLang)1
  13922. $8$11
  13923. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes###############
  13924. $RLANOTPPPMacintosh PPPOTPPPCU3
  13925. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#####################################################
  13926. $LotusFaxLocationSubform1.0$LotusFaxLocationSubformCUA3
  13927. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############################
  13928. $CertifierExtensibleSchemaCUA3Pr
  13929. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes######
  13930. ($MailGroups)/O
  13931. Remove all members that contain domain names (e.g. @ Domain)
  13932. CanonicalMembers
  13933. Members
  13934. CanonicalMembers
  13935. CanonicalMembers
  13936. CanonicalMembers
  13937. $1ListName$Conflict$REF
  13938. Group
  13939. GroupType
  13940. Group
  13941.     L1S3S4S5S6S10S11S1
  13942. $1Name$
  13943. Remove all members that contain domain names (e.g. @ Domain)
  13944. CanonicalMembers
  13945. Members
  13946. CanonicalMembers
  13947. CanonicalMembers
  13948. CanonicalMembers
  13949. ListNameListName&
  13950. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#############################################
  13951. $CharacterSetSettingsCUA3x
  13952. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes####
  13953. 1(DeleteCertDialog)CDF
  13954. CN=Rob Slapikoff/O=IrisCN=Lotus Notes Template Development/O=Lotus Notes#########################################################
  13955. ##########################################################
  13956. ##########################################################
  13957. ##########################################################
  13958. ##########################################################
  13959. ##########################################################
  13960. ##########################################################
  13961. ##########################################################
  13962. ##########################################################
  13963. ##########################################################
  13964. ##########################################################
  13965. ##########################################################
  13966. ##########################################################
  13967. ##########################################################
  13968. ##########################################################
  13969. ##########################################################
  13970. ##########################################################
  13971. ##########################################################
  13972. ##########################################################
  13973. ##########################################################
  13974. ##########################################################
  13975. ##########################################################
  13976. ##########################################################
  13977. ##########################################################
  13978. ##########################################################
  13979. ##########################################################
  13980. ##########################################################
  13981. ##########################################################
  13982. ##########################################################
  13983. ##########################################################
  13984. ##########################################################
  13985. ##########################################################
  13986. ##########################################################
  13987. ##########################################################
  13988. ##########################################################
  13989. ##########################################################
  13990. ##########################################################
  13991. ##########################################################
  13992. ##########################################################
  13993. ##########################################################
  13994. ##########################################################
  13995. ##########################################################
  13996. ##########################################################
  13997. ##########################################################
  13998. ##########################################################
  13999. ##########################################################
  14000. ##########################################################
  14001. ##########################################################
  14002. ##########################################################
  14003. ##########################################################
  14004. ##########################################################
  14005. ##########################################################
  14006. ##########################################################
  14007. ##########################################################
  14008. ##########################################################
  14009. ##########################################################
  14010. ##########################################################
  14011. ##########################################################
  14012. ##########################################################
  14013. ##########################################################
  14014. ##########################################################
  14015. ##########################################################
  14016. ##########################################################
  14017. ##########################################################
  14018. ##########################################################
  14019. ##########################################################
  14020. ##########################################################
  14021. ##########################################################
  14022. ##########################################################
  14023. ##########################################################
  14024. ##########################################################
  14025. ##########################################################
  14026. ##########################################################
  14027. ##########################################################
  14028. ##########################################################
  14029. ##########################################################
  14030. ##########################################################
  14031. ##########################################################
  14032. ##########################################################
  14033. ##########################################################
  14034. ##########################################################
  14035. ##########################################################
  14036. ##########################################################
  14037. ##########################################################
  14038. ##########################################################
  14039. ##########################################################
  14040. ##########################################################
  14041. ##########################################################
  14042. ##########################################################
  14043. ##########################################################
  14044. ##########################################################
  14045. ##########################################################
  14046. ##########################################################
  14047. ##########################################################
  14048. ##########################################################
  14049. ##########################################################
  14050. ##########################################################
  14051. ##########################################################
  14052. ##########################################################
  14053. ##########################################################
  14054. ##########################################################
  14055. ##########################################################
  14056. ##########################################################
  14057. ##########################################################
  14058. ##########################################################
  14059. ##########################################################
  14060. ##########################################################
  14061. ##########################################################
  14062. ##########################################################
  14063. ##########################################################
  14064. ##########################################################
  14065. ##########################################################
  14066. ##########################################################
  14067. ##########################################################
  14068. ##########################################################
  14069. ##########################################################
  14070. ##########################################################
  14071. ##########################################################
  14072. ##########################################################
  14073. '++LotusScript Development Environment:2:5:(Options):0:66
  14074. Option Public
  14075. '++LotusScript Development Environment:2:5:(Forward):0:1
  14076. Declare Sub Initialize
  14077. Declare Sub ProcessDocument
  14078. Declare Sub ProcessGroup
  14079. Declare Sub EvaluateDocument
  14080. '++LotusScript Development Environment:2:5:(Declarations):0:10
  14081. Dim s As NotesSession
  14082. Dim sourcedb As NotesDatabase
  14083. Dim destdb As NotesDatabase
  14084. Dim sourcenote As NotesDocument
  14085. Dim sourceview As NotesView
  14086. Dim destnote As NotesDocument
  14087. Dim destview As NotesView
  14088. Dim documents As NotesDocumentCollection
  14089. Dim KeyValue As Variant
  14090. Dim DisplayKey As Variant
  14091. Dim DocsCopied As Integer
  14092. Dim Answer As Integer
  14093. Dim HowMany As Variant
  14094. Dim FormType As Variant
  14095. Dim PendingGroups() As Variant
  14096. Dim ProcessingGroup As Variant
  14097. Dim Refreshed As Integer
  14098. Dim StopProcessing As Variant
  14099. '++LotusScript Development Environment:2:2:Initialize:1:10
  14100. Sub Initialize
  14101.     Set s = New NotesSession
  14102.     Set sourcedb = s.CurrentDatabase
  14103.     Set destdb = New NotesDatabase("", "names.nsf")
  14104.     Set destview = destdb.GetView("($Users)")
  14105.     Set sourceview = sourcedb.GetView("($Users)")
  14106.     Redim PendingGroups(0)
  14107.     Set documents = sourcedb.UnprocessedDocuments
  14108.     If documents.Count = 0 Then Exit Sub
  14109.     DocsCopied = 0
  14110.     For n = 1 To documents.Count
  14111.         Set sourcenote = documents.GetNthDocument(n)
  14112.         EvaluateDocument
  14113.         If StopProcessing Then Exit For
  14114.     Next
  14115.     If Ubound(PendingGroups) > 0 Then
  14116.         If Messagebox("Do you also want to copy all members of groups?", _
  14117.         3 + 32, "Copy Group") = 6 Then ProcessGroup
  14118.     End If
  14119.     If DocsCopied = 1 Then
  14120.         HowMany = "1 document was "
  14121.     Else
  14122.         HowMany = DocsCopied & " documents were "
  14123.     End If
  14124.     Messagebox HowMany & "copied to your personal Name and Address Book.", 0, "Copy"
  14125. End Sub
  14126. '++LotusScript Development Environment:2:2:ProcessDocument:1:8
  14127. Sub ProcessDocument
  14128.     Set destnote = destview.GetDocumentByKey(Cstr(KeyValue(0)))
  14129.     If destnote Is Nothing Then
  14130.         Call sourcenote.CopyToDatabase(destdb)
  14131.         DocsCopied = DocsCopied + 1
  14132.     Else
  14133.         Select Case Messagebox(DisplayKey(0) & " already exists, do you want to replace it?", _
  14134.         4 + 32, "Copy")
  14135.         Case 6
  14136.             destnote.Remove(True)
  14137.             Call sourcenote.CopyToDatabase(destdb)
  14138.             DocsCopied = DocsCopied + 1
  14139.         Case 2
  14140.             StopProcessing = True
  14141.             Exit Sub
  14142.         Case Else
  14143.             If Not ProcessingGroup Then
  14144.                 Exit Sub
  14145.             End If
  14146.         End Select
  14147.     End If
  14148.     If FormType(0) = "Group" Then
  14149.         g = Ubound(PendingGroups) + 1
  14150.         Redim Preserve PendingGroups(g)
  14151.         ListName = sourcenote.ListName
  14152.         PendingGroups(g) = ListName(0)
  14153.     End If
  14154.     If ProcessingGroup Then destview.Refresh
  14155. End Sub
  14156. '++LotusScript Development Environment:2:2:ProcessGroup:1:8
  14157. Sub ProcessGroup
  14158. 'We don't care if a group member is not found.  It could be because of obsolete lists.
  14159.     ProcessingGroup = True
  14160.     Forall p In PendingGroups
  14161.         Set sourcenote = sourceview.GetDocumentByKey(Cstr(p))
  14162.         If Not(sourcenote Is Nothing) Then
  14163.             Members = sourcenote.Members
  14164.             Forall m In Members
  14165.                 Set sourcenote = sourceview.GetDocumentByKey(Cstr(m))
  14166.                 If Not(sourcenote Is Nothing) Then
  14167.                     EvaluateDocument
  14168.                     If StopProcessing Then Exit Sub
  14169.                 End If
  14170.             End Forall
  14171.         End If
  14172.     End Forall
  14173. End Sub
  14174. '++LotusScript Development Environment:2:2:EvaluateDocument:1:8
  14175. Sub EvaluateDocument
  14176.     FormType = sourcenote.Type
  14177.     Select Case FormType(0)
  14178.     Case "Person"
  14179.         KeyValue = sourcenote.FullName
  14180.         DisplayKey = Evaluate("@Name([Abbreviate]; FullName)", sourcenote)
  14181.         ProcessDocument      
  14182.     Case "Group"
  14183.         KeyValue = sourcenote.ListName
  14184.         DisplayKey = Evaluate("@Name([Abbreviate]; ListName)", sourcenote)
  14185.         ProcessDocument      
  14186.     Case Else
  14187.         Messagebox "Only Person and Group documents can be copied.", 0 + 48, "Copy Documents"
  14188.     End Select
  14189. End Sub
  14190. Lotus Product
  14191. OBJECT
  14192. FullName
  14193. ListName
  14194. O=Lotus Notes
  14195. O=Lotus Notes
  14196. PURSAFO
  14197. |.:#U
  14198. O=Lotus Notes
  14199. CN=Lotus Notes Template Development/O=Lotus Notes
  14200. PURSAFO
  14201. $TITLE
  14202. $AssistType
  14203. $AssistLastRun
  14204. $AssistDocCount
  14205. $AssistFlags
  14206. $AssistTrigger
  14207. $AssistInfo
  14208. $AssistQuery
  14209. $AssistAction
  14210. $AssistAction_Ex
  14211.  RLANList
  14212. DisplayDriverList
  14213. RemoteLanService
  14214.     0S0E
  14215. DisplayDriverList
  14216.     Choose Remote Lan Service:
  14217. RemoteLanService
  14218. RemoteLanService
  14219. DisplayDriverList
  14220. O=Lotus Notes
  14221. O=Lotus Notes
  14222. PURSAFO
  14223. |.:#U
  14224. O=Lotus Notes
  14225. CN=Lotus Notes Template Development/O=Lotus Notes
  14226. PURSAFO
  14227. Fde!f^^
  14228. $TITLE
  14229. $INFO
  14230. $$Script_O
  14231. $$ScriptName
  14232. $BODY
  14233.  OTPPP
  14234. ConnectionType
  14235.     1S2S
  14236. OTPPP$%^Remote connection name:
  14237. StaticTag
  14238. RLANItems
  14239. RLAN6
  14240.     Remote connection name:
  14241. RLANTag
  14242.     Login name:
  14243. RLAN1
  14244.     Password:
  14245. RLAN2
  14246.     Phone number:
  14247. RLAN3
  14248.     Area code:
  14249. RLAN4
  14250.     Country code:
  14251. RLAN5
  14252. O=Lotus Notes
  14253. O=Lotus Notes
  14254. PURSAFO
  14255. |.:#U
  14256. O=Lotus Notes
  14257. CN=Lotus Notes Template Development/O=Lotus Notes
  14258. PURSAFO
  14259. IHzt+LR
  14260. $INFO
  14261. $$ScriptName
  14262. RLANItems
  14263. $BODY
  14264. "Small Fonts
  14265.  $LotusFaxLocationSubform
  14266. O=Lotus Notes
  14267. O=Lotus Notes
  14268. PURSAFO
  14269. |.:#U
  14270. O=Lotus Notes
  14271. CN=Lotus Notes Template Development/O=Lotus Notes
  14272. PURSAFO
  14273. $TITLE
  14274. $INFO
  14275. $$ScriptName
  14276. $BODY
  14277. $CertifierExtensibleSchema
  14278. O=Lotus Notes
  14279. O=Lotus Notes
  14280. PURSAFO
  14281. |.:#U
  14282. O=Lotus Notes
  14283. CN=Lotus Notes Template Development/O=Lotus Notes
  14284. PURSAFO
  14285. GvBH:
  14286. @eh]0^
  14287. $INFO
  14288. $$ScriptName
  14289. $BODY
  14290. &Arial
  14291. Lotus Product
  14292. ConnectionType
  14293.     1S2S
  14294. ARAEntryVersion
  14295. ARA$%^Connection document location:
  14296. ARA$%^Remote connection name:
  14297.     0S0E
  14298. StaticTag
  14299. ARAEntryVersion
  14300.     1S3S4S6S8S
  14301. RLANItems
  14302. ARAEntryVersion
  14303. RLAN6
  14304. ARAEntryVersion
  14305. RLANTagV30
  14306. RLANTagV21
  14307. RLANTag
  14308. RLANTotalParams
  14309.     Specify connection information using:
  14310. ARAEntryVersion
  14311. Manual entry (ARA 3.0)|0Connection document (ARA 2.1)|1
  14312. ConnectionType
  14313. ARAEntryVersion
  14314.     1S2S3S4S5S6S
  14315.     Connection document location:
  14316. RLANTagV21
  14317. v &"&
  14318. RLANTagV21
  14319. Choose Apple Remote Access Document
  14320.  @  @@ @` @
  14321. @@ @@@@@`@@
  14322. `@ `@@`@``@
  14323. ConnectionType
  14324. ARAEntryVersion
  14325.     1S2S3S4S5S6S
  14326.     Remote connection name:
  14327. RLANTagV30
  14328.     Login name:
  14329. RLAN1
  14330.     Password:
  14331. RLAN2
  14332.     Phone number:
  14333. RLAN3
  14334.     Area code:
  14335. RLAN4
  14336.     Country code:
  14337. ARAEntryVersion
  14338. RLAN5
  14339. O=Lotus Notes
  14340. O=Lotus Notes
  14341. PURSAFO
  14342. |.:#U
  14343. O=Lotus Notes
  14344. CN=Lotus Notes Template Development/O=Lotus Notes
  14345. PURSAFO
  14346. $INFO
  14347. $$Script_O
  14348. $$ScriptName
  14349. RLANItems
  14350. RLANTotalParams
  14351. $BODY
  14352. "Small Fonts
  14353. '++LotusScript Development Environment:2:5:(Options):0:66
  14354. Option Public
  14355. '++LotusScript Development Environment:2:5:(Forward):0:1
  14356. '++LotusScript Development Environment:2:5:(Declarations):0:10
  14357. Dim x As Long
  14358. Dim Drivers() As String
  14359. Dim DriverList() As String
  14360. Dim DisplayList() As String
  14361. $ConFormRLANSubform'++LotusScript Development Environment:2:5:(Options):0:66
  14362. '++LotusScript Development Environment:2:5:(Forward):0:1
  14363. Declare Sub Postopen(Source As Notesuidocument)
  14364. '++LotusScript Development Environment:2:5:(Declarations):0:2
  14365. '++LotusScript Development Environment:2:2:BindEvents:1:129
  14366. Private Sub BindEvents(Byval Objectname_ As String)
  14367.     Static Source As NOTESUIDOCUMENT
  14368.     Set Source = Bind(Objectname_)
  14369.     On Event Postopen From Source Call Postopen
  14370. End Sub
  14371. '++LotusScript Development Environment:2:2:Postopen:1:12
  14372. Sub Postopen(Source As Notesuidocument)
  14373.     Dim w As New NotesUIWorkspace
  14374.     Dim s As New NotesSession
  14375.     Dim db As NotesDatabase
  14376.     Dim doc As NotesDocument
  14377.     Set db = s.CurrentDatabase
  14378.     Dim uidoc As notesuidocument
  14379.     Set uidoc=w.currentdocument
  14380.     Set doc = uidoc.document
  14381.     y = 0
  14382.     x = 0
  14383.     Dim flag As String
  14384.     On Error Resume Next
  14385.     Forall Forms In db.Forms
  14386.         If Forms.IsSubForm Then
  14387.             If Left(Forms.Name, 5) = "$RLAN" Then
  14388.                 Redim Preserve DriverList(x)
  14389.                 Redim Preserve Drivers(x)
  14390.                 Redim Preserve DisplayList(x)
  14391.                 Aliases = Forms.Aliases
  14392.                 DriverList(x) = Aliases(0) & "|" & Aliases(1)
  14393.                 DisplayList(x) = Aliases(0)
  14394.                 Drivers(x)= Aliases(1)                    
  14395.                 x = x + 1
  14396.             End If     
  14397.         End If
  14398.     End Forall
  14399.     doc.DisplayDriverList =  DriverList
  14400.     doc.OriginalService = doc.RemoteLanService
  14401. End Sub
  14402. Lotus Product
  14403. OBJECT
  14404. OriginalService
  14405. OriginalService
  14406. DisplayDriverList
  14407. DisplayDriverList
  14408. RLANTagThe name of the connection description managed by the external remote LAN service.  
  14409. RLAN1Enter the login name for the remote LAN service.
  14410. RLAN2Enter the password to be used to login to the remote LAN service.
  14411. RLAN3Enter the phone number to dial to access the remote LAN service.
  14412. RLAN4If the remote LAN service driver you are using requires extra parameters, enter them here.
  14413. RLAN5If the remote LAN service driver you are using requires extra parameters, enter them here.
  14414. RLAN6If the remote LAN service driver you are using requires extra parameters, enter them here.
  14415. StaticTag
  14416. StaticTag
  14417. RLANItems
  14418. ConnectionType
  14419.     0S0E
  14420. /    Network Dialup Information
  14421. /    Configuration
  14422.     Choose a service type:
  14423. RemoteLanService
  14424. DisplayDriverList
  14425. RemoteLANService
  14426. StaticTag
  14427. StaticTag
  14428.     3S4S
  14429. StaticTagD
  14430. RemoteLANService
  14431. StaticTag
  14432. RLANTag
  14433.     3S4S
  14434. ValueD1
  14435.     Configure service: 
  14436. '++LotusScript Development Environment:2:5:(Options):0:66
  14437. '++LotusScript Development Environment:2:5:(Forward):0:1
  14438. Declare Sub Click(Source As Button)
  14439. '++LotusScript Development Environment:2:5:(Declarations):0:2
  14440. '++LotusScript Development Environment:2:2:BindEvents:1:129
  14441. Private Sub BindEvents(Byval Objectname_ As String)
  14442.     Static Source As BUTTON
  14443.     Set Source = Bind(Objectname_)
  14444.     On Event Click From Source Call Click
  14445. End Sub
  14446. '++LotusScript Development Environment:2:2:Click:1:12
  14447. Sub Click(Source As Button)
  14448.     Dim w As New NotesUIWorkspace
  14449.     Dim s As New NotesSession
  14450.     Dim db As NotesDatabase
  14451.     Dim doc As NotesDocument
  14452.     Set db = s.CurrentDatabase
  14453.     Dim uidoc As notesuidocument
  14454.     Set uidoc=w.currentdocument
  14455.     Set doc = uidoc.document
  14456.     y = 0
  14457.     uidoc.EditMode= True
  14458.     Dim flag As String
  14459.     On Error Resume Next
  14460.     Dim curval As Variant
  14461.     curval = doc.RemoteLanService
  14462.     For y = y To (x-1) Step 1
  14463.         If curval(0) = Drivers(y) Then
  14464.             doc.LanServiceDisplay = DisplayList(y)
  14465.         End If
  14466.     Next
  14467.      If (doc.OriginalService(0) <> "") And (doc.OriginalService(0) <> doc.RemoteLanService(0)) Then
  14468.           doc.RLANTag = ""
  14469.           doc.RLAN1 = ""
  14470.           doc.RLAN2 = ""
  14471.           doc.RLAN3 = ""
  14472.           doc.RLAN4 = ""
  14473.           Call uidoc.refresh
  14474.      End If
  14475. %END REM
  14476.     doc.OriginalService = doc.RemoteLanService
  14477.     flag = w.dialogbox( "$RLAN"&doc.RemoteLanService(0), True, True, False, False, False, False, doc.LanServiceDisplay(0),,True)
  14478.     If flag = "False" Then Exit Sub
  14479.     w.CurrentDocument.Refresh
  14480.     w.CurrentDocument.RefreshHideFormulas
  14481. End Sub
  14482. Lotus Product
  14483. New Button
  14484. Need a newer version of Notes to execute this button.
  14485.     0S0E
  14486.     Edit Configuration
  14487. ConnectionType
  14488. RLANItems
  14489. RemoteLanService
  14490.     6S7S10S11S
  14491.     Remote network 
  14492.     login name:
  14493. RemoteLANService
  14494. StaticTag
  14495. RLAN1
  14496.     3S4S
  14497. ValueD2
  14498. ConnectionType
  14499. RLANItems
  14500. RemoteLanService
  14501.     6S7S10S11S
  14502.     Password:
  14503. RemoteLANService
  14504. StaticTag
  14505. RLAN2
  14506.     3S4S
  14507. ValueD3
  14508. ConnectionType
  14509. RLANItems
  14510. RemoteLanService
  14511.     6S7S10S2E11S
  14512.     Phone number:
  14513. RemoteLANService
  14514. StaticTag
  14515. RLAN3
  14516.     3S4S
  14517. ValueD4
  14518. ConnectionType
  14519. RLANItems
  14520. RemoteLanService
  14521.     6S7S10S2E11S
  14522.     Area code:
  14523. RemoteLANService
  14524. StaticTag
  14525. RLAN4
  14526.     3S4S
  14527. ValueD5
  14528. ConnectionType
  14529. RLANItems
  14530. RemoteLanService
  14531.     6S7S8S10S2E11S
  14532.     Country code:
  14533. RemoteLANService
  14534. StaticTag
  14535. RLAN5
  14536.     3S4S
  14537. ValueD6
  14538. ConnectionType
  14539. RLANItems
  14540. RemoteLanService
  14541.     6S7S10S11S
  14542.     Dial-back phone number:
  14543. ConnectionType
  14544. RLANItems
  14545. RemoteLanService
  14546. RemoteLanService
  14547. RemoteLanService
  14548. OTPPP
  14549.     7S10S11S14S2E15S18S19S
  14550.     Optional information:
  14551. ConnectionType
  14552. RemoteLanService
  14553. RemoteLanService
  14554. OTPPP
  14555.     6S2E7S10S11S
  14556. RemoteLANService
  14557. StaticTag
  14558. RLAN6
  14559.     3S4S
  14560. ValueD7
  14561. O=Lotus Notes
  14562. O=Lotus Notes
  14563. PURSAFO
  14564. |.:#U
  14565. O=Lotus Notes
  14566. CN=Lotus Notes Template Development/O=Lotus Notes
  14567. PURSAFO
  14568. $INFO
  14569. $Script
  14570. $$Script_O
  14571. $$ScriptName
  14572. $$FormScript
  14573. $$$FormScript_O
  14574. RLANItems
  14575. $BODY
  14576. Lotus Product
  14577. (DeleteCertDialog)
  14578. CertificateList
  14579. UserCertificate
  14580.     0S0E
  14581.     Certificates issued by:
  14582. UserCertificate
  14583. CertificateList
  14584.     4S6S
  14585.     Delete
  14586.     Issued to:
  14587. CertificateList
  14588. UserCertificate
  14589. CertificateList
  14590.     0S0E
  14591. Subject
  14592.     Valid after:
  14593.     Expires:
  14594.     Serial number:
  14595.     Fingerprint:
  14596. CertificateList
  14597. UserCertificate
  14598. CertificateList
  14599.     0S0E
  14600. Valid
  14601. CertificateList
  14602. UserCertificate
  14603. CertificateList
  14604.     0S0E
  14605. Expires
  14606. CertificateList
  14607. UserCertificate
  14608. CertificateList
  14609.     0S0E
  14610. SerialNumber
  14611. CertificateList
  14612. UserCertificate
  14613. CertificateList
  14614.     0S0E
  14615. X509PublicKey
  14616. O=Lotus Notes
  14617. O=Lotus Notes
  14618. PURSAFO
  14619. |.:#U
  14620. O=Lotus Notes
  14621. CN=Lotus Notes Template Development/O=Lotus Notes
  14622. PURSAFO
  14623. $INFO
  14624. $WebFlags
  14625. $$Script_O
  14626. $$ScriptName
  14627. $BODY
  14628. 11/25/95 02:46:18 PM Lotus Notes updated -Default-
  14629. 11/21/95 03:38:11 PM Rob Slapikoff/Iris updated [-Default-]
  14630. 11/21/95 02:07:00 PM Lotus Notes updated [-Default-]
  14631. UserCreator
  14632. UserModifier
  14633. GroupCreator
  14634. GroupModifier
  14635. NetCreator
  14636. NetModifier
  14637. ServerCreator
  14638. ServerModifier
  14639. 06/29/95 09:43:31 PM Rob Slapikoff/Iris updated [OtherDomainServers]
  14640. 06/29/95 09:43:29 PM Rob Slapikoff/Iris updated [LocalDomainServers]
  14641. 05/20/95 05:13:04 PM Rob Slapikoff/Iris updated [LocalDomainServers]
  14642. 05/20/95 05:12:56 PM Rob Slapikoff/Iris updated [-Default-]
  14643. 05/20/95 05:12:40 PM Rob Slapikoff/Iris updated LocalDomainServers
  14644. 05/20/95 05:12:27 PM Rob Slapikoff/Iris updated -Default-
  14645. 05/20/95 05:11:35 PM Rob Slapikoff/Iris updated role ServerModifer
  14646. 05/20/95 05:11:31 PM Rob Slapikoff/Iris updated role ServerCreator
  14647. 05/20/95 05:11:25 PM Rob Slapikoff/Iris updated role NetModifer
  14648. 05/20/95 05:11:21 PM Rob Slapikoff/Iris updated role NetCreator
  14649. 05/20/95 05:11:15 PM Rob Slapikoff/Iris updated role GroupModifer
  14650. 05/20/95 05:11:11 PM Rob Slapikoff/Iris updated role GroupCreator
  14651. 05/20/95 05:11:07 PM Rob Slapikoff/Iris updated role UserModifer
  14652. 05/20/95 05:11:03 PM Rob Slapikoff/Iris updated role UserCreator
  14653. -Default-
  14654. [-Default-]
  14655. [LocalDomainServers]
  14656. [OtherDomainServers]
  14657. LocalDomainServers
  14658.     0S0E
  14659. location
  14660. New Location
  14661. Settings for location: 
  14662. Name"
  14663.     4S6S7S8S
  14664. "Small Fonts
  14665. Lotus Product
  14666. OBJECT
  14667.  Location'++LotusScript Development Environment:2:5:(Options):0:66
  14668. '++LotusScript Development Environment:2:5:(Forward):0:1
  14669. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  14670. '++LotusScript Development Environment:2:5:(Declarations):0:2
  14671. '++LotusScript Development Environment:2:2:BindEvents:1:129
  14672. Private Sub BindEvents(Byval Objectname_ As String)
  14673.      Static Source As NOTESUIDOCUMENT
  14674.      Set Source = Bind(Objectname_)
  14675.      On Event Querysave From Source Call Querysave
  14676. End Sub
  14677. '++LotusScript Development Environment:2:2:Querysave:1:12
  14678. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  14679.      Dim w As New NotesUIWorkspace 
  14680.      Dim s As New NotesSession
  14681.      Dim db As NotesDatabase
  14682.      Dim doc As NotesDocument
  14683.      Set db = s.CurrentDatabase
  14684.      Dim uidoc As notesuidocument
  14685.      Set uidoc=w.currentdocument
  14686.      Set doc = uidoc.document
  14687.      
  14688.      If doc.ProxyFlag(0) = "1" Then
  14689.           doc.Proxy_FTP=doc.Proxy_HTTP(0)
  14690.           doc.Proxy_Gopher=doc.Proxy_HTTP(0)
  14691.           doc.Proxy_SSL=doc.Proxy_HTTP(0)
  14692.      End If
  14693. End Sub
  14694. Lotus Product[
  14695.     V0.0
  14696.     0S0E
  14697. '++LotusScript Development Environment:2:5:(Options):0:66
  14698. '++LotusScript Development Environment:2:5:(Forward):0:1
  14699. Declare Sub Exiting(Source As Field)
  14700. '++LotusScript Development Environment:2:5:(Declarations):0:2
  14701. '++LotusScript Development Environment:2:2:BindEvents:1:129
  14702. Private Sub BindEvents(Byval Objectname_ As String)
  14703.      Static Source As FIELD
  14704.      Set Source = Bind(Objectname_)
  14705.      On Event Exiting From Source Call Exiting
  14706. End Sub
  14707. '++LotusScript Development Environment:2:2:Exiting:1:12
  14708. Sub Exiting(Source As Field)
  14709.      Dim w As New NotesUIWorkspace 
  14710.      Dim s As New NotesSession
  14711.      Dim db As NotesDatabase
  14712.      Dim doc As NotesDocument
  14713.      Set db = s.CurrentDatabase
  14714.      Dim uidoc As notesuidocument
  14715.      Set uidoc=w.currentdocument
  14716.      Set doc = uidoc.document
  14717.      
  14718.      If doc.ProxyFlag(0) = "1" Then
  14719.           doc.Proxy_FTP=doc.Proxy_HTTP(0)
  14720.           doc.Proxy_Gopher=doc.Proxy_HTTP(0)
  14721.           doc.Proxy_SSL=doc.Proxy_HTTP(0)
  14722.      End If
  14723. End Sub
  14724. Lotus Product
  14725. OBJECT
  14726. Field Label
  14727. Rob Slapikoff-Rob
  14728.     0S0E
  14729. LOCATION
  14730. Server
  14731. ServerName
  14732.     13S14S16S18S
  14733. DisplayName
  14734. DisplayName
  14735. Location
  14736. Hide for all platforms except W32 (not alpha) and Solaris)
  14737. /    Basics
  14738. LocationType
  14739.     0S0E
  14740. Choose the type of connectivity you have at this Location.
  14741.     Location type:
  14742. .,$///:
  14743. LocationTypeChoose the type of connectivity you have at this Location.
  14744. Local Area Network|0Notes Direct Dialup|1Network Dialup|4Custom|2No connection|3z
  14745. LocationType
  14746. Choose Yes if you want to be prompted for phone prefix, current time information when you switch to this location.  This is most often used when travelling between time zones and to different phone systems.
  14747.     Prompt for time/date/phone:
  14748. TravelPromptChoose Yes if you want to be prompted for Location information at startup.
  14749. Yes|1No|0
  14750. TravelPrompt
  14751. The name of this Location.
  14752.     Location name:
  14753. You must enter a name in the Location name field before saving this document.
  14754. You may not use a '/' in a location name.
  14755.     0S0E
  14756. NameEnter a name for this location.
  14757. LocationType
  14758.     0S0E
  14759. Enter the name or IP address of the proxy used to connect to the Internet.
  14760.     Proxy:
  14761.                
  14762. Proxy_HTTPEnter the name or IP address of the proxy used to connect to the Internet.z
  14763. Proxy_HTTP
  14764.     0S0E
  14765. (ProxyDialog)
  14766. Proxy Server Configuration
  14767. ?_?__
  14768. `!b`1
  14769. 7`^///?
  14770. ?b___
  14771. `bOOO
  14772. `<b!R
  14773. Internet address used in all mail you send. This address appears in the from field when mail gets sent over the Internet and is used when Internet recipients reply to you. This address must be a valid Internet address and may appear with or without a display name (phrase). For example, "Joe Brown" <jbrown@acme.com> or jbrown@acme.com.
  14774.     Internet mail address:
  14775. IMailAddress^
  14776.     0S0E
  14777. ImailAddress
  14778.     0S0E
  14779. ImailAddress
  14780. You received the following error because the 'Internet mail address' is invalid.  Error:
  14781. ImailAddressPlease enter your valid Internet address in the form of  jdoe@acme.comz
  14782. ImailAddress
  14783.     Default display name:
  14784. UserNameFlagChoose which types of names you would prefer to see in cases where Alternate names are a choice.
  14785. Display primary names|0Display alternate names|1z
  14786. UserNameFlag
  14787. Basics
  14788. /    Servers
  14789. Enter the name of your mail/home server to be used at this Location.
  14790.     Home/mail server:
  14791. MailServerEnter the name of your mail/home server to be used at this Location.z
  14792. MailServer
  14793. Enter the name of the server to be used as your default Passthru server.  
  14794.     Passthru server:
  14795. DefaultPassthruServerThis is generally the same as your home server.z
  14796. DefaultPassthruServer
  14797. '++LotusScript Development Environment:2:5:(Options):0:66
  14798. '++LotusScript Development Environment:2:5:(Forward):0:1
  14799. Declare Sub Click(Source As Button)
  14800. '++LotusScript Development Environment:2:5:(Declarations):0:2
  14801. '++LotusScript Development Environment:2:2:BindEvents:1:129
  14802. Private Sub BindEvents(Byval Objectname_ As String)
  14803. Static Source As BUTTON
  14804. Set Source = Bind(Objectname_)
  14805. On Event Click From Source Call Click
  14806. End Sub
  14807. '++LotusScript Development Environment:2:2:Click:1:12
  14808. Sub Click(Source As Button)
  14809.     Dim w As New NotesUIWorkspace
  14810.     Dim s As New NotesSession
  14811.     Dim db As NotesDatabase
  14812.     Dim uidoc As NotesUIDocument
  14813.     Dim  doc As NotesDocument
  14814.     Dim  newdoc As NotesDocument
  14815.     Dim ItemDefaultPassthruServerName As NotesItem
  14816.     Dim ItemLocationName As NotesItem
  14817.     Dim phonenumber As Variant
  14818.     Set db=s.CurrentDatabase
  14819.     Set uidoc=w.CurrentDocument
  14820.     Set doc=uidoc.Document    
  14821.     Set ItemDefaultPassthruServerName=doc.GetFirstItem("DefaultPassthruServer")    
  14822.     If Len(ItemDefaultPassthruServerName.Text) = 0 Then
  14823.         Msgbox "Please enter name for Passthru server"
  14824.     Else    
  14825.     Set ItemLocationName=doc.GetFirstItem("Name")    
  14826.     If Len(ItemLocationName.Text) = 0 Then
  14827.             Msgbox "Please enter a Location name"
  14828.     Else
  14829.         Set newdoc=New NotesDocument(db)    
  14830.         Call newdoc.ReplaceItemValue("Form","Connection")
  14831.         Call newdoc.ReplaceItemValue("ConnectionType","1")
  14832.         Call ItemDefaultPassthruServerName.CopyItemToDocument(newdoc,"Destination")        
  14833.         Call ItemLocationName.CopyItemToDocument(newdoc,"ConnectionLocation")
  14834.         phonenumber=w.Prompt(Prompt_edit, "Phone Number", "Please enter a phone number","" )
  14835.         Call newdoc.ReplaceItemValue("LocalPhoneNumber", phonenumber)
  14836.         success= newdoc.ComputeWithForm(False, False)    
  14837.         If success Then
  14838.             Call newdoc.save(True, True)
  14839.         Else
  14840.             Msgbox("There are Input translation/validation issues")     
  14841.         End If
  14842.     End If
  14843. End If
  14844. End Sub
  14845. Lotus Product
  14846. V0.0U
  14847. Enter the name of the server where Domain searches are performed. 
  14848.     Catalog/domain search server:
  14849. CatalogServerEnter the name of the server where Domain searches are performed. 
  14850. Enter the name of the directory server used when performing Mail Addressing and name resolution.  In R5.0 this typically will be the same as the Home/mail server.
  14851.     Domino directory server:
  14852. DirectoryServerEnter the name of the directory server used when performing Mail Addressing and name resolution.  In R5.0 this typically will be the same as the Home/mail server.
  14853. DirectoryServer
  14854. LocationType
  14855. WebLocation
  14856. WebRetriever
  14857.     3S4S7S8S
  14858. Enter the name of the Notes server used as your Internet Web server.
  14859.     InterNotes server:
  14860. InterNotesEnter the name of the Notes server used as your Internet server. (InterNotes)
  14861. InterNotes
  14862. Servers
  14863. /    Ports
  14864. Choose which ports you want to use at this Location. NOTE: To install a new port, use File Tools User Preferences, and select Ports.  Make sure to select the Enabled checkbox to make the port available in your Location records.
  14865.     Ports to use:
  14866.     Disabled ports:
  14867. Ports
  14868.     1S2S
  14869. Ports
  14870. DisabledPorts
  14871.     0R6S8S
  14872. EnabledPortsChoose which ports are enabled at this Location.
  14873.     0S0E
  14874. EnabledPorts
  14875. SaveEnabledPorts
  14876. EnabledPorts
  14877.     1S2S
  14878. EnabledPorts(
  14879.     0R1S2S3S
  14880. Ports
  14881.     0R1S2S
  14882. Ports
  14883. SaveEnabledPorts
  14884.     0R6S8S
  14885. DisabledPorts
  14886. DisabledPorts
  14887. Ports
  14888. /    Mail
  14889. Choose whether your mail file is on a server or local at this location. If you choose 'Internet' or 'Notes and Internet' as your mail system, you can only choose 'Local' for your mail file location.
  14890.     Mail file location:
  14891. MailServerProtocol
  14892. MailType
  14893. MailServerProtocol
  14894. MailServerProtocol
  14895.     1S8S9S10S11S
  14896. MailType
  14897. MailType
  14898. MailServerProtocol
  14899. You must choose Local if you are using Internet mail.
  14900.     5S6S7S8S
  14901. MailTypeChoose the way you want mail to be queued at this Location.
  14902. on Server|0Local|1
  14903. MailType
  14904. Enter the path and file name of the mail file being used at this location.  e.g. mail\mymail.nsf
  14905.     Mail file
  14906.     0S0E
  14907. MailServerProtocol
  14908. MailFile
  14909. You must enter a mail file when your mail system is set to Internet.{
  14910. MailServerProtocol
  14911. MailFile
  14912. MailFile
  14913. The mail file specified does not exist.  Please enter a valid mail file name.
  14914.     5S6S18S19S22S23S
  14915. MailFileMail file pathname (e.g., mail\jsmith.nsf).
  14916. MailFile
  14917. Enter the Notes mail Domain name to be used at this Location.
  14918.     Notes mail domain
  14919. Server
  14920. Domain
  14921.     0S0E
  14922. Domain
  14923. The maximum length of a Domain name is 32 bytes.{
  14924.     6S7S
  14925. DomainEnter Mail Domain name to be used at this Location.
  14926. Domain
  14927. If you switch among multiple locations you may reply to messages which contain only Notes addresses from an Internet location. To ensure that the Notes addresses are properly formed into Internet addresses specify here the Internet domain name in which your Notes addresses are valid. For example, if you work for acme.com, but you are using your home ISP Internet location at isp.com specify acme.com in this field.
  14928.     Internet domain for Notes addresses when connecting directly to the Internet:
  14929. InternetDomainTo ensure that the Notes addresses are properly formed into Internet addresses specify here the Internet domain name in which your Notes addresses are valid.
  14930. InternetDomain
  14931. Choose whether you want names to be looked up in the address book(s) and filled in for you as you type each character.
  14932.     Recipient name type-ahead
  14933. MailType
  14934.     0S0E
  14935. NameLookupPrefWhich Address Books should Notes look in when you are typing in a Names field at this Location.
  14936. Disabled|0Local Only|1Local then Server|2z
  14937. NameLookupPref
  14938. Choose whether name look-up will stop when it first finds a match in any address book or whether all address books will be checked.  Stopping at the first match is faster but checking all address books ensures that there are no duplicate matches.
  14939.     Recipient name lookup:
  14940. ExhaustiveNameLookupChoose how many Address Books will be searched  when resolving a name.
  14941. Stop after first match|0Exhaustively check all address books|1z
  14942. ExhaustiveNameLookup
  14943. MailType
  14944. LocationType
  14945.     3S4S
  14946. If this field is set to Local and Server, then the following will occur:
  14947. - in the Mail Address dialog, server Address Books will be available
  14948. - when an E-mail is sent, the names will be checked and must resolve.
  14949.     Mail addressing:
  14950. MailAddressingSelect whether you want mail address/name resolution to look in the local address book or both the the local and server address books.
  14951. Local Only|1Local and Server|2z
  14952. MailAddressing
  14953. Choose whether outgoing mail is sent through a Domino server or directly to the Internet via SMTP
  14954.     Send outgoing mail:
  14955. MessageFormat
  14956. SMTPRoute
  14957. MessageFormat
  14958. SMTPRoute
  14959. SMTPRoute
  14960. InternetDomain
  14961. IMailAddress
  14962. If you send outgoing mail directly to the Internet, you must enter both an Internet mail address on the Basics tab and an Internet domain for Notes addresses on the Mail tab.{
  14963.     5S6S10S11S
  14964. SMTPRouteChoose whether outgoing mail is sent through a Domino server or directly to the Internet via SMTP.
  14965. through Domino Server|0directly to Internet|1z
  14966. SMTPRoute
  14967. SMTPRoute
  14968.     0S0E
  14969. Select the message format to use for messages sent to internet recipients when they could not be found in a directory. Note that the selection of MIME as the message format requires the use of Internet certificates when signing and encrypting.
  14970.     Format for messages addressed to internet addresses:
  14971. MessageFormatSelect the message format to use for messages sent to internet recipients when they could not be found in a directory.
  14972. Notes Rich Text Format|0MIME Format|1
  14973. Number of waiting messages that will force a connection - e.g. 3.
  14974.     Transfer outgoing 
  14975.     mail if:
  14976. MailThreshold
  14977. MailThresholdNumber of waiting messages that will force a connection - e.g. 3.z
  14978. MailThreshold
  14979.     messages pending
  14980. /    Internet Browser
  14981. Choose the browser you want to use to view Web pages.
  14982.     Internet browser:
  14983. WebRetrieverChoose the browser you want to use to view Web pages.
  14984. Windows/NT
  14985. Windows/95
  14986. Macintosh
  14987. Notes |0
  14988. Notes with Internet Explorer|3
  14989. Netscape Navigator|1
  14990. Microsoft Internet Explorer|2
  14991. Other|99
  14992. Notes Web Navigator|0
  14993. Other|99
  14994.     15S16S
  14995. WebRetriever
  14996. WebRetriever
  14997.     0S0E
  14998. Specify whether pages are retrieved and opened: 
  14999.    1.  from the InterNotes server to a server database
  15000.    2.  from the Notes workstation to a local database
  15001.    3.  no new retrieval from the Internet, but open previously retrieved documents from your local database only
  15002.     Retrieve/open pages:
  15003. WebRetriever
  15004. Windows/95
  15005. Windows/NT
  15006. WebRetriever
  15007. Macintosh
  15008. WebRetriever
  15009.     3S4S16S17S18S19S21S22S29S30S
  15010.     Internet browser path:
  15011. WebRetrieverPath
  15012. Choose path for  Internet Browser
  15013. WebRetrieverPath
  15014. Choose path for  Internet Browser
  15015. ?_?__
  15016. `!b`1
  15017. 7`^///?
  15018. ?b___
  15019. `bOOO
  15020. `<b!R
  15021. LocationType
  15022. WebRetriever
  15023. WebRetriever
  15024.     0S0E
  15025. WebRetriever
  15026. WebLocation
  15027. WebLocation
  15028.     5S6S
  15029. WebLocationSpecify where pages are retrieved/opened from.
  15030. WebRetriever
  15031. from InterNotes server|0
  15032. from Notes workstation|1
  15033. no retrievals|2
  15034. WebRetriever
  15035. from Notes workstation|1
  15036. no retrievals|2
  15037.     8R16R
  15038. WebLocation
  15039. WebRetrieverPath
  15040. WebRetrieverPathEnter the path to the browser you want to use.z
  15041. WebRetrieverPath
  15042. Internet Browser
  15043. /    Replication
  15044. Choose Enable if you want the Replicator to be enabled and use the specified schedule at this location.
  15045.     Schedule:
  15046. EnabledChoose Enable if you want the Replicator to be enabled and use the specified schedule at this location.
  15047. Enabled|1Disabled|0
  15048. Enabled
  15049. Enabled
  15050. LocationType
  15051.     3S4S
  15052. Times to call the server - e.g. 8:00 AM,10:00 AM-6:00 PM
  15053.     Replicate daily  between:
  15054. ScheduleL
  15055. Enabled
  15056. Interval
  15057. Schedule
  15058. You must enter an Interval and/or a Schedule, or else specify DISABLED.
  15059. ScheduleTimes to call the server - e.g. 8:00 AM,10:00 AM-6:00 PMz
  15060. Schedule
  15061. Enabled
  15062. LocationType
  15063. Interval to repeat calls - 0 means call once.
  15064.     Repeat every:
  15065. Interval
  15066. You entered an interval less than 0.  You must enter an interval of 0 or above.
  15067.     0S0E
  15068. IntervalInterval to repeat calls - 0 means call once.
  15069. Interval
  15070.     minutes
  15071. Days of week - e.g. Mon, Tue, Wed
  15072.     Days of week:
  15073. WeekDaysDays of week - e.g. Mon, Tue, Wed
  15074. Sun | 1Mon | 2Tue | 3Wed | 4Thu | 5Fri | 6Sat | 7z
  15075. WeekDays
  15076. Replication
  15077. Location
  15078. LocationType
  15079.     0S0E
  15080. /    Phone Dialing
  15081. Input the prefix necessary to acquire an outside line. (ie. 9 if at a hotel or office)
  15082.     Prefix for outside line:
  15083. OutsideLineInput the prefix necessary to acquire an outside line. (ie. 9 if at a hotel or office)
  15084. OutsideLine
  15085. Enter the calling card access phone number you want to use at this Location.
  15086.     Calling card access number:
  15087. CallPreEnter the calling card access phone number you want to use at this Location.
  15088. CallPre
  15089. Enter the prefix for dialing to another country from this location. e.g. From the United States using AT&T, the prefix is 011.
  15090.     International prefix:
  15091. InternationalPrefixEnter the prefix for dialing to another country from this location. e.g. From the United States using AT&T, the prefix is 011.
  15092. InternationalPrefix
  15093. Enter the calling card number you want to use at this Location. This is usually the number that is embossed on the front of your calling card.
  15094.     Calling card number or extension suffix:
  15095. SuffixEnter the calling card number you want to use at this Location.
  15096. Suffix
  15097. Enter the numeric country code for this location.  e.g. For the United States enter 1
  15098.     Country code at this location:
  15099. CountryEnter Country Code.
  15100. Location
  15101. LocationType
  15102.     9S10S
  15103. Not yet implemented
  15104. This feature is not implemented in the version you are running.
  15105.     0S0E
  15106.     Dialing Rules...
  15107. Enter the prefix for dialing long distance from this location. e.g. In the United States, the prefix is 1.
  15108.     Long distance prefix:
  15109. LongDistancePrefixEnter the prefix for dialing long distance from this location. e.g. In the United States, the prefix is 1.z
  15110. LongDistancePrefix
  15111. Enter the area code at this Location.
  15112.     Area code at this location
  15113. AreaCode
  15114. AreaCode
  15115. +{!A-Z!a-z}
  15116. You must enter a valid number for the area code.  You can only use the characters 0-9.{
  15117.     0S0E
  15118. AreaCodeInputEnter the area code for this Location.
  15119. AreaCodeInput
  15120. Phone Settings
  15121. AdvancedLocation
  15122. /    Advanced Basics
  15123.     Use operating system's timezone settings:
  15124.     0S0E
  15125. UseOSTzChoose whether to use the Operating Systems timezone settings. 
  15126. Yes|1No|0
  15127. UseOSTZ
  15128.     0S0E
  15129. Choose the correct time zone to be used at this Location.
  15130.     Local time zone:
  15131. TimeZone
  15132. R5TimeZone
  15133. R5TimeZone
  15134. R5TimeZoneEnter the local timezone.
  15135.     0S0E
  15136. R5TimeZone
  15137. Choose Observed here if at this location Daylight Savings time is observed.
  15138.     Daylight savings time:
  15139. R5TimeZone
  15140. UseOSTZ
  15141.     0S0E
  15142.     9S10S13S15SDSTChoose Observed here if at this location Daylight Savings time is observed.
  15143. Observed here|1Not observed here|0z
  15144. R5TimeZone
  15145. UseOSTZ
  15146.     0S0E
  15147.     Unobserved for this time zone
  15148. Use * if this Location can be used by all users, or fill in a user name if only for a specific user.
  15149.     Only for user:
  15150.     0S0E
  15151. Source^
  15152.     0S0E
  15153. SourceUse * if this Location can be used by all users, or fill in a user name if only for a specific user.z
  15154. Source
  15155. Path and file name of the user ID to be used when switching to this Location.
  15156.     User ID to switch to:
  15157. Choose path for  ID file:
  15158.     0S0E
  15159. UserID
  15160. UserID
  15161.     0R1S
  15162. ?_?__
  15163. `!b`1
  15164. 7`^///?
  15165. ?b___
  15166. `bOOO
  15167. `<b!R
  15168. UserIDPath and file name of the user ID to be used when switching to this Location.
  15169. UserID
  15170. Specify whether to autoload images when a document is first loaded.
  15171.     Load images:
  15172. ImagesSpecify whether to autoload images when a document is first loaded.
  15173. Always|0On request|1
  15174. Images
  15175.     Bookmarks filename:
  15176. bookmark.nsf
  15177. BookmarkDbEnter the name of your bookmarks file.
  15178.     Subscriptions filename:
  15179. headline.nsf
  15180. HeadlineDBEnter the name of your headlines subscription file.
  15181. Enter the number of minutes to wait if idle before hanging up when using Network dialup connections.
  15182.     Network dialup idle timeout:
  15183. RLANIdleTimeoutEnter the number of minutes to wait if idle before hanging up when using Network dialup connections.
  15184. RLANIdleTimeout
  15185.     minutes
  15186. Basics
  15187. /    SSL Settings
  15188. Choose Yes to accept certificates from an unknown certifying authority.
  15189. Choose No not to accept certificates from unknown certifying authorities.
  15190.     Accept SSL site certificates:
  15191. SSLSiteCertsChoose Yes to accept certificates from an unknown certifying authority. Choose No not to accept certificates from unknown certifying authorities.
  15192. Yes|1No|0z
  15193. SSLSiteCerts
  15194. Choose Yes to force SSL to accept remote certificates which have expired.
  15195. Choose No to enforce certificate expiration dates.
  15196.     Accept expired SSL certificates:
  15197. SSLExpiredCertsChoose Yes to force SSL to accept remote certificates which have expired. Choose No to enforce certificate expiration dates.
  15198. Yes|1No|0z
  15199. SSLExpiredCerts
  15200. SSLStatus
  15201.     0S0E
  15202. Choose Yes to send certificates to the server is the server requests them.
  15203. Choose No not to send certificates on request.
  15204.     Send SSL certificates when asked (outbound connections only):
  15205. SSLSendCertificatesChoose Yes to send certificates to the server is the server requests them. Choose No not to send certificates on request.
  15206. Yes|1No|0
  15207. Choose the SSL protocol version that you want to connect with.  
  15208. V2.0 only - Uses SSL V2.0 handshake and protocol only
  15209. V3.0 handshake - Uses SSL V3.0 handshake and negotiated protocol
  15210. V3.0 only - Uses SSL V3.0 handshake and protocol only
  15211. V3.0 with V2.0 handshake - Uses SSL V2.0 handshake with negotiated protocol
  15212. Negotiated - allow SSL to determine handshake and protocol
  15213.     SSL protocol version:
  15214. SSLProtocolVersionChoose the SSL protocol version that you want to connect with.  
  15215. V2.0 only|1V3.0 handshake|2V3.0 only|3V3.0 with V2.0 handshake|4Negotiated|0z
  15216. SSLProtocolVersion
  15217. /    Web Retriever Configuration
  15218. Enter the name of the web navigator database you want to use.
  15219.     Web Navigator database:
  15220. perweb.nsf
  15221. WebDbNameEnter the name of the web navigator database you want to use.z
  15222. WebDbName
  15223. The maximum number of concurrent Web retriever processes permitted at one time.
  15224.     Concurrent retrievers:
  15225. WebRetrieversThe maximum number of concurrent Web retriever threads/processes permitted at one time.
  15226. 234510152025z
  15227. WebRetrievers
  15228. Specify the log level of messages logged to LOG.NSF by the Web Retriever.
  15229.     Retriever log level:
  15230. WebLogLevelSpecify the log level of messages logged to LOG.NSF by the Web Retriever.
  15231. None|0Terse|1Verbose|2z
  15232. WebLogLevel
  15233. Choose how often you want to update the web retriever's cache.
  15234.     Update cache:
  15235. WebUpdateCacheChoose how often you want to update the web retriever's cache.
  15236. Never|0Once per session|1Every time|2
  15237. WebUpdateCache
  15238. Web Retriever
  15239. /    Java Applet Security
  15240. List of host domains where Java applets are assumed to be safe -- e.g., 205.159.212.*, www.trustedhost.com
  15241.     Trusted hosts:
  15242. JavaSecureDomainList of host domains where Java applets are assumed to be safe -- e.g., 205.159.212.*, www.trustedhost.comz
  15243. JavaSecureDomain
  15244. Network access granted to Java applets originating from hosts listed by 'Trusted Hosts' above.
  15245.     Network access for trusted hosts:
  15246. JavaAllowInSecureDomainNetwork access granted to Java applets originating from hosts listed by "Trusted Hosts" above.
  15247. Disable Java|0No access allowed|1Allow access only to originating host|2Allow access to any trusted host|3Allow access to any host|4
  15248. JavaAllowInSecureDomain
  15249. Network access granted to Java applets originating from hosts other than those listed by 'Trusted Hosts' above.
  15250.     Network access for untrusted hosts:
  15251. JavaAllowInOtherDomainsNetwork access granted to Java applets originating from hosts other than those listed by 'Trusted Hosts' above.
  15252. Disable Java|0No access allowed|1Allow access only to originating host|2z
  15253. JavaAllowInOtherDomains
  15254. Trust HTTP proxy to consistently resolve host names to IP addresses.
  15255.     Trust HTTP proxy:
  15256. JavaTrustHTTPProxyTrust HTTP proxy to consistently resolve host names to IP addresses.
  15257. Yes|1No|0
  15258. JavaTrustHTTPProxy
  15259. Java Applet Security
  15260. /    Secondary Servers
  15261. Enter the Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the TCP network.
  15262.     Secondary TCP/IP Notes name server:
  15263. TCPNameServerThe Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the TCP network.
  15264. TCPNameServer
  15265. Enter the Notes server's fully qualified host name or IP address to be contacted for Address Book information in the event that your home server is unavailable on the TCP network. e.g. server.acme.com OR 129.54.98.3
  15266.     Secondary TCP/IP host name or address:
  15267. TCPNameServerHostThe Notes server's fully qualified host name or IP address to be contacted for Address Book information in the event that your home server is unavailable on the TCP network.z
  15268. TCPNameServerHost
  15269. Enter the Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the IPX/SPX network. This information is only used if NDS Services have been enabled within Notes. The Secondary NDS name server address field must also be specified.
  15270.     Secondary NDS Notes name server:
  15271. NDSNameServer
  15272. NDSNameServerAddress
  15273. You must enter a Secondary NDS name server address if you are specifying a Secondary NDS Notes name server.
  15274.     5S6S
  15275. NDSNameServerThe Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the IPX/SPX network.
  15276. NDSNameServer
  15277. Enter the of the Notes server's fully qualified NDS distinguished name to be contacted for Address Book information in the event that your home server is unavailable on the IPX/SPX network. This information is only used if NDS Services have been enabled within Notes. e.g. CN=HubServer.OU=Sales.O=Acme
  15278.     Secondary NDS name server address:
  15279. NDSNameServer
  15280. NDSNameServerAddress
  15281. You must enter a Secondary NDS Notes name server if you are specifying a Secondary NDS name server address.
  15282.     5S6S
  15283. NDSNameServerAddressThe of the Notes server's fully qualified NDS distinguished name to be contacted for Address Book information in the event that your home server is unavailable on the IPX/SPX network.
  15284. NDSNameServerAddress
  15285. The Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the NetBIOS network.
  15286.     Secondary NetBIOS Notes name server:
  15287. NetBIOSNameServerThe Notes server name to be contacted for Address Book information in the event that your home server is unavailable on the NetBIOS network.
  15288. Secondary Servers
  15289. /    MIME Settings
  15290. Select the method by which attached files are made safe for transport over SMTP.
  15291.     Attachment encoding method:
  15292. SMTPEncodingScheme
  15293. SMTPMessageContent
  15294. You cannot set your attachment encoding method to UUencode or None if you choose 'Only Lotus Notes Users' or 'Users with and without Lotus Notes' for your message content type.{
  15295. SMTPEncodingScheme
  15296. SMTPTransferMode
  15297. In order to use None as your transfer encoding method, you must select 8 bit  for the Transfer mode
  15298. SMTPEncodingScheme
  15299. You must specify the method for attachment encoding.{
  15300.     10S11S28S29S
  15301. SMTPEncodingSchemeSpecify the encoding scheme to be used by the MTA.
  15302. Base64|1Quoted-Printable|2UUencode|3z
  15303. SMTPEncodingScheme
  15304. Select the format for encoding Macintosh attachments.
  15305.     Outbound Macintosh attachment conversion:
  15306. SMTPMacAttachConvertOptionSpecify the MIME representation for the outbound Macintosh file attachment.
  15307. AppleDouble (Base64 only)|1BinHex 4.0|2z
  15308. SMTPMacAttachConvertOption
  15309. MIME Settings
  15310. $LotusFaxLocationSubform | 1.0 | $LotusFaxLocationSubform
  15311. Other
  15312. Advanced
  15313. /    Administration
  15314. Full name of person allowed to modify this document.
  15315.     Owner:
  15316. OwnerFull name of person allowed to modify this document.
  15317. Enter the names or group names which should have edit capabilities for this record.
  15318.     Administrators
  15319. LocalAdminEnter the names or group names which should have edit capabilities for this record.
  15320. Administration
  15321. AreaCodeInput
  15322.     0S0E
  15323. AreaCodeInput
  15324.     0R1S
  15325. AreaCode
  15326. Location
  15327.     0S0E
  15328. Typez
  15329. Person
  15330. AltLanguagePersonalInfo
  15331. [UserModifier]
  15332. Group
  15333. [GroupModifier]
  15334. Server
  15335. [ServerModifier]
  15336. [NetModifier]
  15337.     3S4S8S10S11S12S14S16S17S18S20S22SDocumentAccess
  15338. $LocationVersionz
  15339. $LocationVersion
  15340. ProxyFlag
  15341. Use same proxy for all Internet protocols.|1
  15342. ProxyFlag
  15343. ProxyFlag
  15344. Proxy_FTP
  15345. Proxy_FTP
  15346. Proxy_HTTP
  15347. ProxyFlag
  15348. Proxy_HTTP
  15349. Proxy_FTP
  15350.     11S15S16SProxy_FTP
  15351. Proxy_FTP
  15352. ProxyFlag
  15353. Proxy_Gopher
  15354. Proxy_Gopher
  15355. Proxy_HTTP
  15356. ProxyFlag
  15357. Proxy_HTTP
  15358. Proxy_Gopher
  15359.     8S15S16S
  15360. Proxy_Gopherz
  15361. Proxy_Gopher
  15362. ProxyFlag
  15363. Proxy_SSL
  15364. Proxy_SSL
  15365. Proxy_HTTP
  15366. Proxy_Flag
  15367. Proxy_HTTP
  15368. Proxy_SSL
  15369.     8S13S14S
  15370. Proxy_SSL
  15371. Proxy_SSL
  15372. ProxyFlag
  15373. UseProxyforNotes
  15374. Proxy_HTTP
  15375. ProxyFlag
  15376. UseProxyforNotes
  15377. Proxy_NotesHTTP
  15378.     5S6S15S16S
  15379. Proxy_NotesHTTP
  15380. Proxy_NotesHTTP
  15381. Proxy_SOCKS
  15382. Proxy_SOCKS
  15383. No_Proxyz
  15384. No_Proxy
  15385. AcceptUpdates
  15386. AcceptUpdates
  15387. AcceptUpdates
  15388. Yes|1No|0z
  15389. AcceptUpdates
  15390. Close
  15391.     0S0E
  15392. Save and CloseB
  15393.     0S0E
  15394. _Edit Location
  15395. Categori_zeK
  15396. Send Docu_ment
  15397. _Forward
  15398. _Move to Folder...
  15399. _Remove from Folder...
  15400. Advanced\Set Update Flag
  15401. AcceptUpdates
  15402. Location Update Settings
  15403. Allow administrators to keep this location's settings up to date with those settings on your mail server.
  15404. Connection Configuration WizardK'++LotusScript Development Environment:2:5:(Options):0:74
  15405. '++LotusScript Development Environment:2:5:(Forward):0:1
  15406. Declare Sub Click(Source As Button)
  15407. '++LotusScript Development Environment:2:5:(Declarations):0:10
  15408. Const xxWizardTitle="Configuring server connection"
  15409. Dim db As NotesDatabase
  15410. Dim uidoc As NotesUIDocument
  15411. Dim  doc As NotesDocument
  15412. Dim  newdoc As NotesDocument
  15413. Dim ItemDefaultPassthruServerName As NotesItem
  15414. Dim ItemLocationName As NotesItem
  15415. Dim phonenumber As Variant
  15416. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15417. Private Sub BindEvents(Byval Objectname_ As String)
  15418.     Static Source As BUTTON
  15419.     Set Source = Bind(Objectname_)
  15420.     On Event Click From Source Call Click
  15421. End Sub
  15422. '++LotusScript Development Environment:2:2:Click:1:12
  15423. Sub Click(Source As Button)
  15424.     Dim w As New NotesUIWorkspace
  15425.     Dim uidoc As NotesUIDocument
  15426.     Dim  doc As NotesDocument
  15427.     Dim ItemDefaultPassthruServerName As NotesItem
  15428.     Dim ItemLocationName As NotesItem
  15429.     Dim ItemLocationType As NotesItem
  15430.     On Error Goto errhandle
  15431.     Set uidoc=w.CurrentDocument
  15432.     Set doc=uidoc.Document 
  15433.     If uidoc.editmode Then Call uidoc.Refresh
  15434.     Set ItemLocationType=doc.GetFirstItem("LocationType")
  15435.     Set ItemLocationName=doc.GetFirstItem("Name") 
  15436.     Set ItemDefaultPassthruServerName=doc.GetFirstItem("DefaultPassthruServer") 
  15437.     If Len(ItemLocationName.Text) = 0 Then
  15438.         Msgbox "Please enter a Location name"
  15439.         Exit Sub
  15440.     End If
  15441. %REM    
  15442.     If Len(ItemDefaultPassthruServerName.Text) = 0 Then 
  15443.         Msgbox "Please enter name for Passthru server"
  15444.         Exit Sub            
  15445.     End If
  15446. %END REM
  15447.                         'bring location doc into edit mode
  15448.     If Not(uidoc.editmode) Then uidoc.editmode = True    
  15449.     If ItemLocationType.Text="1" Then    
  15450.         Call w.DialogBox("($NotesDirectDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)
  15451.     Elseif ItemLocationType.Text="0" Then    
  15452.         Call w.DialogBox("($LAN Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15453.     Elseif ItemLocationType.Text="2" Then        
  15454.         options=Evaluate("'LAN':'Notes Direct Dialup':'Network Dialup'")
  15455.         choice=w.Prompt(prompt_okcancellist, "Connection confuration", "In a Custom location, you can use any type of connection document. Please select the type of connection to create.", "LAN", options)        
  15456.         If choice="LAN" Then
  15457.             Call w.DialogBox("($LAN Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15458.         Elseif choice="Notes Direct Dialup" Then
  15459.             Call w.DialogBox("($NotesDirectDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15460.         Elseif     choice="Network Dialup" Then
  15461.                  'check if DUN installed, if not -exit sub
  15462.             vList = w.Get_DialEntry_List("RAS")
  15463.             Call w.DialogBox("($NetworkDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15464.         End If
  15465.     Elseif  ItemLocationType.Text="4" Then
  15466.                         'check if DUN installed, if not -exit sub
  15467.         vList = w.Get_DialEntry_List("RAS")
  15468.                           'bring wizard and create RAS and/or Passthru connections based on Location Type
  15469.         Call w.DialogBox("($NetworkDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)
  15470.     End If
  15471. '    End If
  15472.     If uidoc.editmode Then
  15473.         uidoc.Save 
  15474. '        uidoc.editmode = False        
  15475.     End If
  15476.     Exit Sub
  15477. errhandle:
  15478.     If Str(Err)="-3878" Then Msgbox "You don't have Dialup Networking installed."
  15479.     Exit Sub
  15480. End Sub
  15481. LocationType
  15482. Macintosh
  15483.     12S13S
  15484. Close
  15485.     0S0E
  15486. Save and CloseB
  15487.     0S0E
  15488. _Edit Location
  15489. Categori_zeK
  15490. Send Docu_ment
  15491. _Forward
  15492. _Move to Folder...
  15493. _Remove from Folder...
  15494. Advanced\Set Update Flag
  15495. AcceptUpdates
  15496. Location Update Settings
  15497. Allow administrators to keep this location's settings up to date with those settings on your mail server.
  15498. Connection Configuration WizardK'++LotusScript Development Environment:2:5:(Options):0:74
  15499. '++LotusScript Development Environment:2:5:(Forward):0:1
  15500. Declare Sub Click(Source As Button)
  15501. '++LotusScript Development Environment:2:5:(Declarations):0:10
  15502. Const xxWizardTitle="Configuring server connection"
  15503. Dim db As NotesDatabase
  15504. Dim uidoc As NotesUIDocument
  15505. Dim  doc As NotesDocument
  15506. Dim  newdoc As NotesDocument
  15507. Dim ItemDefaultPassthruServerName As NotesItem
  15508. Dim ItemLocationName As NotesItem
  15509. Dim phonenumber As Variant
  15510. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15511. Private Sub BindEvents(Byval Objectname_ As String)
  15512.     Static Source As BUTTON
  15513.     Set Source = Bind(Objectname_)
  15514.     On Event Click From Source Call Click
  15515. End Sub
  15516. '++LotusScript Development Environment:2:2:Click:1:12
  15517. Sub Click(Source As Button)
  15518.     Dim w As New NotesUIWorkspace
  15519.     Dim uidoc As NotesUIDocument
  15520.     Dim  doc As NotesDocument
  15521.     Dim ItemDefaultPassthruServerName As NotesItem
  15522.     Dim ItemLocationName As NotesItem
  15523.     Dim ItemLocationType As NotesItem
  15524.     On Error Goto errhandle
  15525.     Set uidoc=w.CurrentDocument
  15526.     Set doc=uidoc.Document 
  15527.     If uidoc.editmode Then Call uidoc.Refresh
  15528.     Set ItemLocationType=doc.GetFirstItem("LocationType")
  15529.     Set ItemLocationName=doc.GetFirstItem("Name") 
  15530.     Set ItemDefaultPassthruServerName=doc.GetFirstItem("DefaultPassthruServer") 
  15531.     If Len(ItemLocationName.Text) = 0 Then
  15532.         Msgbox "Please enter a Location name"
  15533.         Exit Sub
  15534.     End If
  15535. %REM    
  15536.     If Len(ItemDefaultPassthruServerName.Text) = 0 Then 
  15537.         Msgbox "Please enter name for Passthru server"
  15538.         Exit Sub            
  15539.     End If
  15540. %END REM
  15541.                         'bring location doc into edit mode
  15542.     If Not(uidoc.editmode) Then uidoc.editmode = True    
  15543.     If ItemLocationType.Text="1" Then    
  15544.         Call w.DialogBox("($NotesDirectDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)
  15545.     Elseif ItemLocationType.Text="0" Then    
  15546.         Call w.DialogBox("($LAN Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15547.     Elseif ItemLocationType.Text="2" Then        
  15548.         options=Evaluate("'LAN':'Notes Direct Dialup':'Network Dialup'")
  15549.         choice=w.Prompt(prompt_okcancellist, "Connection confuration", "In a Custom location, you can use any type of connection document. Please select the type of connection to create.", "LAN", options)        
  15550.         If choice="LAN" Then
  15551.             Call w.DialogBox("($LAN Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15552.         Elseif choice="Notes Direct Dialup" Then
  15553.             Call w.DialogBox("($NotesDirectDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15554.         Elseif     choice="Network Dialup" Then
  15555.                  'check if DUN installed, if not -exit sub
  15556.             vList = w.Get_DialEntry_List("RAS")
  15557.             Call w.DialogBox("($NetworkDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)        
  15558.         End If
  15559.     Elseif  ItemLocationType.Text="4" Then
  15560.                         'check if DUN installed, if not -exit sub
  15561.         vList = w.Get_DialEntry_List("RAS")
  15562.                           'bring wizard and create RAS and/or Passthru connections based on Location Type
  15563.         Call w.DialogBox("($NetworkDialup Wizard)",True,True,True,True,,,xxWizardTitle,,True,True)
  15564.     End If
  15565. '    End If
  15566.     If uidoc.editmode Then
  15567.         uidoc.Save 
  15568. '        uidoc.editmode = False        
  15569.     End If
  15570.     Exit Sub
  15571. errhandle:
  15572.     If Str(Err)="-3878" Then Msgbox "You don't have Dialup Networking installed."
  15573.     Exit Sub
  15574. End Sub
  15575. LocationType
  15576. Macintosh
  15577.     12S13S
  15578. Lotus Product
  15579. OBJECT
  15580. Notes Direct Dialup
  15581. Network Dialup
  15582.     0S0E
  15583. O=Lotus Notes
  15584. O=Lotus Notes
  15585. PURSAFO
  15586. |.:#U
  15587. O=Lotus Notes
  15588. CN=Lotus Notes Template Development/O=Lotus Notes
  15589. PURSAFO
  15590. nI$=5
  15591. Interval_1
  15592. Interval_2
  15593. IntervalHigh
  15594. IntervalLow
  15595. FreqHigh
  15596. FreqLow
  15597. Card_No
  15598. Card_No_1
  15599. IntervalMed
  15600. $$FormQuerySaveAction
  15601. $BackgroundRepeat
  15602. $Background
  15603. $FormUsers
  15604. $INFO
  15605. $SubForms
  15606. $WINDOWTITLE
  15607. $$Script_O
  15608. $$ScriptName
  15609. $$FormScript
  15610. $$$FormScript_O
  15611. $$FormAction2
  15612. $$Proxy_HTTP
  15613. $Proxy_HTTP_O
  15614. MailThreshold
  15615. Schedule
  15616. Interval
  15617. country
  15618. RLANIdleTimeout
  15619. $BODY
  15620. $V5ACTIONS
  15621. $ACTIONS
  15622. $SCRIPTOBJ_9
  15623. &Arial
  15624. (ProxyDialog)'++LotusScript Development Environment:2:5:(Options):0:66
  15625. '++LotusScript Development Environment:2:5:(Forward):0:1
  15626. Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
  15627. Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  15628. '++LotusScript Development Environment:2:5:(Declarations):0:2
  15629. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15630. Private Sub BindEvents(Byval Objectname_ As String)
  15631.      Static Source As NOTESUIDOCUMENT
  15632.      Set Source = Bind(Objectname_)
  15633.      On Event Querysave From Source Call Querysave
  15634.      On Event Queryclose From Source Call Queryclose
  15635. End Sub
  15636. '++LotusScript Development Environment:2:2:Querysave:1:12
  15637. Sub Querysave(Source As Notesuidocument, Continue As Variant)
  15638.      
  15639. End Sub
  15640. '++LotusScript Development Environment:2:2:Queryclose:1:12
  15641. Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  15642.      Dim w As New NotesUIWorkspace 
  15643.      Dim s As New NotesSession
  15644.      Dim db As NotesDatabase
  15645.      Dim doc As NotesDocument
  15646.      Set db = s.CurrentDatabase
  15647.      Dim uidoc As notesuidocument
  15648.      Set uidoc=w.currentdocument
  15649.      Set doc = uidoc.document
  15650.      
  15651.      If doc.ProxyFlag(0) = "1" Then
  15652.           doc.Proxy_FTPI = doc.Proxy_HTTPI(0)
  15653.           doc.Proxy_GopherI = doc.Proxy_HTTPI(0)
  15654.           doc.Proxy_SSLI = doc.Proxy_HTTPI(0)
  15655.           doc.Proxy_HTTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15656.           doc.Proxy_FTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15657.           doc.Proxy_Gopher=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15658.           doc.Proxy_SSL=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15659.           doc.Proxy_SOCKs=doc.Proxy_SOCKsI(0)&":"&doc.Port5(0)
  15660.           If doc.Proxy_NotesHTTPI(0) <>"" Then
  15661.                doc.Proxy_NotesHTTP=doc.Proxy_NotesHTTPI(0)&":"&doc.Port6(0)
  15662.           End If
  15663.           Call uidoc.refresh
  15664.      End If
  15665. End Sub
  15666. '++LotusScript Development Environment:2:5:(Options):0:66
  15667. '++LotusScript Development Environment:2:5:(Forward):0:1
  15668. Declare Sub Exiting(Source As Field)
  15669. '++LotusScript Development Environment:2:5:(Declarations):0:2
  15670. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15671. Private Sub BindEvents(Byval Objectname_ As String)
  15672.      Static Source As FIELD
  15673.      Set Source = Bind(Objectname_)
  15674.      On Event Exiting From Source Call Exiting
  15675. End Sub
  15676. '++LotusScript Development Environment:2:2:Exiting:1:12
  15677. Sub Exiting(Source As Field)
  15678.      Dim w As New NotesUIWorkspace 
  15679.      Dim s As New NotesSession
  15680.      Dim db As NotesDatabase
  15681.      Dim doc As NotesDocument
  15682.      Set db = s.CurrentDatabase
  15683.      Dim uidoc As notesuidocument
  15684.      Set uidoc=w.currentdocument
  15685.      Set doc = uidoc.document
  15686.      
  15687.      If doc.ProxyFlag(0) = "1" Then
  15688.           doc.Proxy_FTPI = doc.Proxy_HTTPI(0)
  15689.           doc.Proxy_GopherI = doc.Proxy_HTTPI(0)
  15690.           doc.Proxy_SSLI = doc.Proxy_HTTPI(0)
  15691.           doc.Proxy_HTTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15692.           doc.Proxy_FTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15693.           doc.Proxy_Gopher=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15694.           doc.Proxy_SSL=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15695.           Call uidoc.refresh
  15696.      End If
  15697. End Sub
  15698. '++LotusScript Development Environment:2:5:(Options):0:66
  15699. '++LotusScript Development Environment:2:5:(Forward):0:1
  15700. Declare Sub Exiting(Source As Field)
  15701. '++LotusScript Development Environment:2:5:(Declarations):0:2
  15702. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15703. Private Sub BindEvents(Byval Objectname_ As String)
  15704.      Static Source As FIELD
  15705.      Set Source = Bind(Objectname_)
  15706.      On Event Exiting From Source Call Exiting
  15707. End Sub
  15708. '++LotusScript Development Environment:2:2:Exiting:1:12
  15709. Sub Exiting(Source As Field)
  15710.      Dim w As New NotesUIWorkspace 
  15711.      Dim s As New NotesSession
  15712.      Dim db As NotesDatabase
  15713.      Dim doc As NotesDocument
  15714.      Set db = s.CurrentDatabase
  15715.      Dim uidoc As notesuidocument
  15716.      Set uidoc=w.currentdocument
  15717.      Set doc = uidoc.document
  15718.      
  15719.      If doc.ProxyFlag(0) = "1" Then
  15720.           doc.Port2 = doc.Port1(0)
  15721.           doc.Port3 = doc.Port1(0)
  15722.           doc.Port4 = doc.Port1(0)
  15723.           doc.Proxy_HTTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15724.           doc.Proxy_FTP=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15725.           doc.Proxy_Gopher=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15726.           doc.Proxy_SSL=doc.Proxy_HTTPI(0)&":"&doc.Port1(0)
  15727.           Call uidoc.refresh
  15728.      End If
  15729. End Sub
  15730. Proxy_HTTP
  15731. Proxy_HTTPI
  15732. Proxy_HTTPI
  15733. Port1
  15734. Port1
  15735.     10S11S12SProxy_HTTP
  15736. Proxy_FTP
  15737. Proxy_FTPI^
  15738. Proxy_FTPI
  15739. Port2
  15740. Port2
  15741.     10S11S12SProxy_FTP
  15742. Proxy_Gopher
  15743. Proxy_GopherI
  15744. Proxy_GopherI
  15745. Port3
  15746. Port3
  15747.     10S11S12SProxy_Gopher
  15748. Proxy_SSL
  15749. Proxy_SSLI^
  15750. Proxy_SSLI
  15751. Port4
  15752. Port4
  15753.     10S11S12SProxy_SSL
  15754. Proxy_SOCKS
  15755. Proxy_SOCKsI
  15756. Proxy_SOCKsI^
  15757. Port5
  15758. Port5
  15759.     0S0E
  15760. Proxy_SOCKS
  15761. Proxy_NotesHTTP
  15762. Proxy_NotesHTTPI
  15763. Proxy_NotesHTTPI^
  15764. Port6
  15765. Port6
  15766.     0S0E
  15767. Proxy_NotesHTTP
  15768.  @  @@ @` @
  15769. @@ @@@@@`@@
  15770. `@ `@@`@``@
  15771. Proxy_HTTP
  15772. Proxy_HTTP
  15773. Proxy_HTTP
  15774. Proxy_HTTP
  15775.     0S0E
  15776. Proxy_HTTPI
  15777. http://
  15778. Proxy_HTTPI
  15779. http://
  15780. Proxy_HTTPI
  15781.     0S0E
  15782. Proxy_HTTPIEnter the domain name or IP address of your HTTP proxy server.
  15783. Proxy_HTTP
  15784. Proxy_HTTP
  15785.     0S0E
  15786. Port1Enter the port address of the HTTP proxy server.
  15787. ProxyFlag
  15788. Use same proxy for Internet protocols|1
  15789. ProxyFlag
  15790.     0S0E
  15791. Proxy_FTP
  15792.     0S0E
  15793. ProxyFlag
  15794. Proxy_HTTPI
  15795. Proxy_FTPIa
  15796. http://
  15797. Proxy_FTPIa
  15798. http://
  15799. Proxy_FTPI
  15800.     30SProxy_FTPIEnter the domain name or IP address of your FTP proxy server.
  15801. Proxy_FTP
  15802. Proxy_FTP
  15803.     0S0E
  15804. Port2Enter the port address of the FTP proxy server.
  15805. Proxy_Gopher
  15806.     0S0E
  15807. ProxyFlag
  15808. Proxy_HTTPI
  15809. Proxy_GopherI
  15810. http://
  15811. Proxy_GopherI
  15812. http://
  15813. Proxy_GopherI
  15814.     30SProxy_GopherIEnter the domain name or IP address of your Gopher proxy server.
  15815. Proxy_Gopher
  15816. Proxy_Gopher
  15817.     0S0E
  15818. Port3Enter the port address of the Gopher proxy server.
  15819. Proxy_SSL
  15820.     0S0E
  15821. ProxyFlag
  15822. Proxy_HTTPI
  15823. Proxy_SSLIa
  15824. http://
  15825. Proxy_SSLIa
  15826. http://
  15827. Proxy_SSLI
  15828.     0S0E
  15829. Proxy_SSLI
  15830. Port4
  15831. The length of the SSL Security proxy cannot be greater than 250 characters.  Consider entering the IP address instead.{
  15832.     7S8S12S15S
  15833. Proxy_SSLIEnter the domain name or IP address of your SSL security proxy server.
  15834. Proxy_SSL
  15835. Proxy_SSL
  15836.     0S0E
  15837. Port4Enter the port address of the SSL security proxy server.
  15838. Proxy_SOCKS
  15839. Proxy_SOCKS
  15840.     0S0E
  15841. Proxy_SOCKSI
  15842. Port5
  15843. The length of the SOCKS proxy cannot be greater than 250 characters.  Consider entering the IP address instead.
  15844.     7S8S12S15S
  15845. Proxy_SOCKSIEnter the domain name or IP address of your SOCKS proxy server.
  15846. Proxy_SOCKs
  15847. Proxy_SOCKs
  15848.     0S0E
  15849. Port5Enter the port address of the SOCKS proxy server.
  15850. Proxy_NotesHTTP
  15851. Proxy_NotesHTTP
  15852.     0S0E
  15853. Proxy_NotesHTTPIa
  15854. http://
  15855. Proxy_NotesHTTPIa
  15856. http://
  15857. Proxy_NotesHTTPI
  15858.     0S0E
  15859. Proxy_NotesHTTPI
  15860. Port6
  15861. The length of the Notes RPC proxy cannot be greater than 250 characters.  Consider entering the IP address instead.
  15862.     7S8S12S15S
  15863. Proxy_NotesHTTPITo use Notes protocols on the Internet (e.g. Replication), enter the domain name or IP address of your HTTP proxy server.
  15864. Proxy_NotesHTTP
  15865. Proxy_NotesHTTP
  15866.     0S0E
  15867. Port6Enter the port address of the HTTP proxy server.
  15868. No_Proxy^
  15869.     0S0E
  15870. No_ProxyEnter the domain name, host name or IP address of those servers on your LAN that you DO NOT want to connect to via the proxy server.
  15871.     HTTP:
  15872.     SSL Security:
  15873.     Gopher:
  15874.     FTP:
  15875.     SOCKS:
  15876.     Port:
  15877.     HTTP Tunnel:
  15878.     No proxy for these hosts or domains:
  15879.     Proxy type:
  15880. ProxyFlag
  15881.     0S0E
  15882. ProxyFlag
  15883. Proxy_HTTPI
  15884. Proxy_FTP
  15885.     0S0E
  15886. Proxy_FTPD
  15887. ProxyFlag
  15888. Port1
  15889. Proxy_FTP
  15890.     0S0E
  15891. Port2D
  15892. ProxyFlag
  15893. Proxy_HTTPI
  15894. Proxy_Gopher
  15895.     0S0E
  15896. Proxy_GopherD
  15897. ProxyFlag
  15898. Port1
  15899. Proxy_Gopher
  15900.     0S0E
  15901. Port3D
  15902. ProxyFlag
  15903. Proxy_HTTPI
  15904. Proxy_SSL
  15905.     0S0E
  15906. Proxy_SSLD
  15907. ProxyFlag
  15908. Port1
  15909. Proxy_SSL
  15910.     0S0E
  15911. Port4D
  15912. '++LotusScript Development Environment:2:5:(Options):0:66
  15913. '++LotusScript Development Environment:2:5:(Forward):0:1
  15914. Declare Sub Click(Source As Button)
  15915. '++LotusScript Development Environment:2:5:(Declarations):0:2
  15916. '++LotusScript Development Environment:2:2:BindEvents:1:129
  15917. Private Sub BindEvents(Byval Objectname_ As String)
  15918.      Static Source As BUTTON
  15919.      Set Source = Bind(Objectname_)
  15920.      On Event Click From Source Call Click
  15921. End Sub
  15922. '++LotusScript Development Environment:2:2:Click:1:12
  15923. Sub Click(Source As Button)
  15924.      Dim session As New NotesSession
  15925.      Dim platform As String
  15926.      Dim x As Integer
  15927.      Dim boxtype As Long
  15928.      boxtype = 4 + 64
  15929.      platform=session.Platform
  15930.      
  15931.      If platform <> "Macintosh" Then
  15932.           x=Messagebox ("If you are using a proxy server for internet access from your machine, enter the domain name or IP address of your HTTP, FTP, Gopher, SSL Security or SOCKS proxy server in the appropriate field.  Usually this field is required only for connecting to the Internet from your organization's local area network.  Please consult your Internet system administrator if you need help setting these fields. " & Chr(10) & Chr(10) &"To see help on 'Notes RPC' and 'No proxy for these hosts or domains' , press Yes", boxtype, "HTTP, FTP, Gopher, SSL Security and SOCKS fields" )
  15933.           If x = 7 Then
  15934.                Exit Sub
  15935.           End If
  15936.           x=Messagebox ("If you are using a HTTP proxy server for internet access from your machine, and wish to use Notes protocols on the Internet (e.g. Replication), enter the domain name or IP address of your HTTP proxy server.  This field is required only for computers on your organization's local area network who wish to communicate with other Notes servers on the Internet.  This feature requires that your HTTP proxy server support the HTTP Connect method. Please consult your Internet system administrator if you need help setting this field. " & Chr(10) & Chr(10) &"To see help for 'No proxy for these hosts or domains', press Yes", boxtype, "Notes RPC" )
  15937.           If x = 7 Then
  15938.                Exit Sub
  15939.           End If
  15940.           x=Messagebox ("If you are using a proxy server for internet access and you DO NOT wish to also use the proxy to connect to servers on your organization's local area network, enter the domain name, host name or IP address of those servers on your local area network. A '*' may be uses as a wild-card. The following are valid entries (e.g. acme.com, server.acme.com, 139.42.94.219, *.acme.com). All proxies share the NoProxy field. Usually this field is required only for servers on your organization's local area network connecting to the Internet via a proxy as well as server on your organization's local area network. Please consult your Internet system administrator if you need help setting this field." , 0+64, "No Proxy" )
  15941.           Exit Sub
  15942.      End If
  15943.      If platform = "Macintosh" Then
  15944.           x=Messagebox ("If you are using a proxy server for internet access from your machine, enter the domain name or IP address of your HTTP, FTP, Gopher, SSL Security or SOCKS proxy server in the appropriate field." & Chr(13) & Chr(13) &"To continue , press Yes", boxtype, "HTTP, FTP, Gopher, SSL Security and SOCKS fields" )
  15945.           If x = 7 Then
  15946.                Exit Sub
  15947.           End If
  15948.           x=Messagebox("Usually this field is required only for connecting to the Internet from your organization's local area network.  Please consult your Internet system administrator for help. " & Chr(13) & Chr(13) &"To continue, press Yes", boxtype, "HTTP, FTP, Gopher, SSL Security and SOCKS fields" )
  15949.           If x = 7 Then
  15950.                Exit Sub
  15951.           End If 
  15952.           x=Messagebox ("If you are using a HTTP proxy server for internet access from your machine, and wish to use Notes protocols on the Internet (e.g. Replication), enter the domain name or IP address of your HTTP proxy server." & Chr(13) & Chr(13) &"To continue, press Yes", boxtype, "Notes RPC" )
  15953.           If x = 7 Then
  15954.                Exit Sub
  15955.           End If
  15956.           x=Messagebox("This field is required only for systems on your organization's local area network who wish to communicate with other Notes servers on the Internet.  This feature requires that your HTTP proxy server support the HTTP Connect method." & Chr(13) & Chr(13) &"To continue, press Yes", boxtype, "Notes RPC" )
  15957.           If x = 7 Then
  15958.                Exit Sub
  15959.           End If          
  15960.           x=Messagebox ("If using a proxy server for internet access and you DO NOT wish to also use the proxy to connect to servers on your local area network, enter the domain name, host name or IP address of those servers on your local area network." & Chr(13) & Chr(13) &"To continue, press Yes", boxtype, "No Proxy" )
  15961.           If x = 7 Then
  15962.                Exit Sub
  15963.           End If     
  15964.           x=Messagebox("A '*' may be uses as a wild-card. The following are valid entries (e.g. acme.com, server.acme.com, 139.42.94.219, *.acme.com). All proxies share the NoProxy field." & Chr(13) & Chr(13) &"To continue, press Yes", boxtype, "No Proxy" )
  15965.           If x = 7 Then
  15966.                Exit Sub
  15967.           End If               
  15968.           x=Messagebox("Usually this field is required only for servers on your organization's local area network connecting to the Internet via a proxy as well as servers on your organization's local area network. Please consult your Internet system administrator for help." , 0+64, "No Proxy" )
  15969.           Exit Sub
  15970.      End If
  15971. End Sub
  15972.  @  @@ @` @
  15973. @@ @@@@@`@@
  15974. `@ `@@`@``@
  15975. O=Lotus Notes
  15976. O=Lotus Notes
  15977. PURSAFO
  15978. |.:#U
  15979. O=Lotus Notes
  15980. CN=Lotus Notes Template Development/O=Lotus Notes
  15981. PURSAFO
  15982. $INFO
  15983. $$Script_O
  15984. $$ScriptName
  15985. $$FormScript
  15986. $$$FormScript_O
  15987. $$Proxy_HTTPI
  15988. $Proxy_HTTPI_O
  15989. $$Port1
  15990. $Port1_O
  15991. $BODY
  15992. First Hierarchy
  15993. Level0
  15994. Level0
  15995. Level1
  15996.     0R5S6S8S11S12S15S16S18S20S23S
  15997. Level1
  15998. Level1
  15999. Level2
  16000.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16001. Level2
  16002. Level2
  16003. Level3
  16004.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16005. Level3
  16006. Level3
  16007. Level4
  16008.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16009. Level4
  16010. Level4
  16011. Level5
  16012.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16013. Level5
  16014. Level5
  16015. Level6
  16016.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16017. Level6
  16018. Level6
  16019.     0R1S2S5S6S8S10S
  16020. Second Hiearchy
  16021.     0R1S
  16022. Level0_1
  16023. Level0_1
  16024. Level1_1
  16025.     0R5S6S8S11S12S15S16S18S20S23S
  16026. Level1_1
  16027. Level1_1
  16028. Level2_1
  16029.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16030. Level2_1
  16031. Level2_1
  16032. Level3_1
  16033.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16034. Level3_1
  16035. Level3_1
  16036. Level4_1
  16037.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16038. Level4_1
  16039. Level4_1
  16040. Level5_1
  16041.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16042. Level5_1
  16043. Level5_1
  16044. Level6_1
  16045.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16046. Level6_1
  16047. Level6_1
  16048.     0R1S2S5S6S8S10S
  16049. Third Hiearchy
  16050.     0R1S
  16051. Level0_2
  16052. Level0_2
  16053. Level1_2
  16054.     0R5S6S8S11S12S15S16S18S20S23S
  16055. Level1_2
  16056. Level1_2
  16057. Level2_2
  16058.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16059. Level2_2
  16060. Level2_2
  16061. Level3_2
  16062.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16063. Level3_2
  16064. Level3_2
  16065. Level4_2
  16066.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16067. Level4_2
  16068. Level4_2
  16069. Level5_2
  16070.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16071. Level5_2
  16072. Level5_2
  16073. Level6_2
  16074.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16075. Level6_2
  16076. Level6_2
  16077.     0R1S2S5S6S8S10S
  16078. Fourth Hiearchy
  16079.     0R1S
  16080. Level0_3
  16081. Level0_3
  16082. Level1_3
  16083.     0R5S6S8S11S12S15S16S18S20S23S
  16084. Level1_3
  16085. Level1_3
  16086. Level2_3
  16087.     0R2S5S6S8S11S12S15S16S18S20S23S
  16088. Level2_3
  16089. Level2_3
  16090. Level3_3
  16091.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16092. Level3_3
  16093. Level3_3
  16094. Level4_3
  16095.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16096. Level4_3
  16097. Level4_3
  16098. Level5_3
  16099.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16100. Level5_3
  16101. Level5_3
  16102. Level6_3
  16103.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16104. Level6_3
  16105. Level6_3
  16106.     0R1S2S5S6S8S10S
  16107. Aggregation
  16108.     0R1S
  16109.     0R4RS11E9S10S11S12S13S14S15S16S17S18S20S21RS11E26S27S28S29S30S31S32S33S34S35S38RS11E41S42S43S45S51S55RS11E71RS11E
  16110. *No Corporate Hierachy Specified*
  16111. Person
  16112. Database
  16113. ResourceFlagh
  16114. ResourceType
  16115. ResourceFlag
  16116. ResourceFlagh
  16117. ResourceType
  16118. ResourceFlag
  16119. Server
  16120. Group
  16121. GroupType
  16122. GroupType
  16123. GroupType
  16124. GroupType
  16125. GroupType
  16126.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S89S
  16127. PersonalID
  16128. PersonalID
  16129. DisplayPersonName
  16130. Person
  16131. LastName
  16132. FirstName
  16133. MiddleInitial
  16134.     1S2S5S6S8S16S18S19S23S27S30S31S32S34S
  16135. DisplayName
  16136. Group
  16137. ListName
  16138. Server
  16139. Servername
  16140. DisplayPersonName
  16141. FullName
  16142. DisplayPersonName
  16143.     0R1S2S5S6S8S12S21S24S25S27S31S34S
  16144. AltName
  16145. AltFullName
  16146. JobTitle
  16147. JobTitle
  16148. DisplayName
  16149. AltName
  16150. AltFullName
  16151.     0R9S10S15S20S23S24S
  16152. MAMailAddress
  16153. Person
  16154. MailSystem
  16155. MailAddress
  16156. MailAddress
  16157. MailDomain
  16158. MailDomain"
  16159. FullName
  16160. FullName
  16161. MailDomain
  16162. MailDomain"
  16163. FirstName
  16164. FirstName
  16165. LastName"
  16166. MailDomain
  16167. MailDomain"
  16168. LastName
  16169. MailDomain
  16170. MailDomain"
  16171. Database
  16172. FullName
  16173. MailDomain
  16174. MailDomain"
  16175. Group
  16176. GroupType
  16177. GroupType
  16178. ListName
  16179.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  16180. NPName
  16181. Group
  16182. ListName
  16183. Server
  16184. ServerName
  16185. Person
  16186. Database
  16187. FullName
  16188.     3S4S6S25S29S
  16189. MAPublicKey
  16190. Certificate
  16191. PublicKey
  16192. Certificate
  16193. PublicKey
  16194. Server
  16195. Certificate
  16196.     7S8S34S35S
  16197. AltFullName
  16198. AltFullName
  16199. $55$45PersonalID$60MAMailAddressNPNameTypeMAPublicKeyAltFullName$Conflict$REF
  16200. Person
  16201. Group
  16202. Database
  16203. Server
  16204.     L1S2S4S5S6S7S8S9S10S11S12S13S14S15S16S
  16205. First Hierarchy
  16206. Level0
  16207. Level0
  16208. Level1
  16209.     0R5S6S8S11S12S15S16S18S20S23S
  16210. Level1
  16211. Level1
  16212. Level2
  16213.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16214. Level2
  16215. Level2
  16216. Level3
  16217.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16218. Level3
  16219. Level3
  16220. Level4
  16221.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16222. Level4
  16223. Level4
  16224. Level5
  16225.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16226. Level5
  16227. Level5
  16228. Level6
  16229.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16230. Level6
  16231. Level6
  16232.     0R1S2S5S6S8S10S
  16233. Second Hiearchy
  16234.     0R1S
  16235. Level0_1
  16236. Level0_1
  16237. Level1_1
  16238.     0R5S6S8S11S12S15S16S18S20S23S
  16239. Level1_1
  16240. Level1_1
  16241. Level2_1
  16242.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16243. Level2_1
  16244. Level2_1
  16245. Level3_1
  16246.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16247. Level3_1
  16248. Level3_1
  16249. Level4_1
  16250.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16251. Level4_1
  16252. Level4_1
  16253. Level5_1
  16254.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16255. Level5_1
  16256. Level5_1
  16257. Level6_1
  16258.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16259. Level6_1
  16260. Level6_1
  16261.     0R1S2S5S6S8S10S
  16262. Third Hiearchy
  16263.     0R1S
  16264. Level0_2
  16265. Level0_2
  16266. Level1_2
  16267.     0R5S6S8S11S12S15S16S18S20S23S
  16268. Level1_2
  16269. Level1_2
  16270. Level2_2
  16271.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16272. Level2_2
  16273. Level2_2
  16274. Level3_2
  16275.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16276. Level3_2
  16277. Level3_2
  16278. Level4_2
  16279.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16280. Level4_2
  16281. Level4_2
  16282. Level5_2
  16283.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16284. Level5_2
  16285. Level5_2
  16286. Level6_2
  16287.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16288. Level6_2
  16289. Level6_2
  16290.     0R1S2S5S6S8S10S
  16291. Fourth Hiearchy
  16292.     0R1S
  16293. Level0_3
  16294. Level0_3
  16295. Level1_3
  16296.     0R5S6S8S11S12S15S16S18S20S23S
  16297. Level1_3
  16298. Level1_3
  16299. Level2_3
  16300.     0R2S5S6S8S11S12S15S16S18S20S23S
  16301. Level2_3
  16302. Level2_3
  16303. Level3_3
  16304.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16305. Level3_3
  16306. Level3_3
  16307. Level4_3
  16308.     0R1S2S5S6S8S11S12S15S16S18S20S23S
  16309. Level4_3
  16310. Level4_3
  16311. Level5_3
  16312.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16313. Level5_3
  16314. Level5_3
  16315. Level6_3
  16316.     0R1S2S5S6S8S9S10S13S14S16S18S21S
  16317. Level6_3
  16318. Level6_3
  16319.     0R1S2S5S6S8S10S
  16320. Aggregation
  16321.     0R1S
  16322.     0R4RS11E9S10S11S12S13S14S15S16S17S18S20S21RS11E26S27S28S29S30S31S32S33S34S35S38RS11E41S42S43S45S51S55RS11E71RS11E
  16323. *No Corporate Hierachy Specified*
  16324. Person
  16325. Database
  16326. ResourceFlagh
  16327. ResourceType
  16328. ResourceFlag
  16329. ResourceFlagh
  16330. ResourceType
  16331. ResourceFlag
  16332. Server
  16333. Group
  16334. GroupType
  16335. GroupType
  16336. GroupType
  16337. GroupType
  16338. GroupType
  16339.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S89SPersonalID"
  16340. PersonalID
  16341. PersonalID
  16342. $60Name
  16343. DisplayPersonName
  16344. Person
  16345. LastName
  16346. FirstName
  16347. MiddleInitial
  16348.     1S2S5S6S8S16S18S19S23S27S30S31S32S34S
  16349. DisplayName
  16350. Group
  16351. ListName
  16352. Server
  16353. Servername
  16354. DisplayPersonName
  16355. FullName
  16356. DisplayPersonName
  16357.     0R1S2S5S6S8S12S21S24S25S27S31S34S
  16358. AltName
  16359. AltFullName
  16360. JobTitle
  16361. JobTitle
  16362. DisplayName
  16363. AltName
  16364. AltFullName
  16365.     0R9S10S15S20S23S24SMAMailAddressAddress
  16366. MAMailAddress
  16367. Person
  16368. MailSystem
  16369. MailAddress
  16370. MailAddress
  16371. MailDomain
  16372. MailDomain"
  16373. FullName
  16374. FullName
  16375. MailDomain
  16376. MailDomain"
  16377. FirstName
  16378. FirstName
  16379. LastName"
  16380. MailDomain
  16381. MailDomain"
  16382. LastName
  16383. MailDomain
  16384. MailDomain"
  16385. Database
  16386. FullName
  16387. MailDomain
  16388. MailDomain"
  16389. Group
  16390. GroupType
  16391. GroupType
  16392. ListName
  16393.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  16394. NPNameName
  16395. NPName
  16396. Group
  16397. ListName
  16398. Server
  16399. ServerName
  16400. Person
  16401. Database
  16402. FullName
  16403.     3S4S6S25S29S
  16404. TypeTypeMAPublicKeyPublic Key
  16405. MAPublicKey
  16406. Certificate
  16407. PublicKey
  16408. Certificate
  16409. PublicKey
  16410. Server
  16411. Certificate
  16412.     7S8S34S35S
  16413. AltFullNameAltFullName&
  16414. AltFullName
  16415. AltFullName
  16416. Categori_zeK
  16417. _Edit Document
  16418. Send Docu_ment
  16419. _Forward
  16420. _Move to Folder...
  16421. _Remove from Folder...
  16422. Categori_zeK
  16423. _Edit Document
  16424. Send Docu_ment
  16425. _Forward
  16426. _Move to Folder...
  16427. _Remove from Folder...
  16428. O=Lotus Notes
  16429. O=Lotus Notes
  16430. PURSAFO
  16431. |.:#U
  16432. O=Lotus Notes
  16433. CN=Lotus Notes Template Development/O=Lotus Notes
  16434. PURSAFO
  16435. %IBQO
  16436. $Ys L
  16437. $TITLE
  16438. $Index
  16439. $Formula
  16440. $FormulaClass
  16441. $VIEWFORMAT
  16442. $Comment
  16443. $V5ACTIONS
  16444. $ACTIONS
  16445. AltFullNameLanguage
  16446. - Primary Language -
  16447. Person
  16448. LastName
  16449. ListName
  16450. - Primary Language -
  16451. LastName
  16452. AltFullNameLanguage
  16453. AltFullNameLanguage
  16454. AltFullNameSort
  16455. AltFullnameSort
  16456.     31R44R51S52S
  16457. Person
  16458. Database
  16459. ResourceFlagh
  16460. ResourceType
  16461. ResourceFlag
  16462. ResourceFlagh
  16463. ResourceType
  16464. ResourceFlag
  16465. Server
  16466. Group
  16467. GroupType
  16468. GroupType
  16469. GroupType
  16470. GroupType
  16471. GroupType
  16472. GroupType
  16473.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S
  16474. DisplayPersonName
  16475. Person
  16476. LastName
  16477. FirstName
  16478. MiddleInitial
  16479. AltFullName
  16480.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  16481. DisplayName
  16482. Group
  16483. ListName
  16484. DisplayPersonName
  16485. FullName
  16486. DisplayPersonName
  16487.     0R1S2S5S6S8S12S15S18S19S21S25S28S
  16488. DisplayName
  16489.     0R4S
  16490. MAMailAddress
  16491. Person
  16492. MailSystem
  16493. MailAddress
  16494. MailAddress
  16495. MailDomain
  16496. MailDomain"
  16497. FullName
  16498. FullName
  16499. MailDomain
  16500. MailDomain"
  16501. FirstName
  16502. FirstName
  16503. LastName"
  16504. MailDomain
  16505. MailDomain"
  16506. LastName
  16507. MailDomain
  16508. MailDomain"
  16509. Database
  16510. FullName
  16511. MailDomain
  16512. MailDomain"
  16513. Group
  16514. GroupType
  16515. GroupType
  16516. ListName
  16517.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  16518. NPName
  16519. Group
  16520. ListName
  16521. FullName
  16522.     3S4S6S13S17S
  16523. MAPublicKey
  16524. Certificate
  16525. PublicKey
  16526. Certificate
  16527. PublicKey
  16528. Server
  16529. Certificate
  16530.     7S8S34S35S
  16531. AltFullName
  16532. AltFullName
  16533. $8$18$11MAMailAddressNPNameTypeMAPublicKeyAltFullName$Conflict$REF
  16534. Person
  16535. Group
  16536. Database
  16537.     1S3S4S5S6S7S8S9S10S11S12S14S15S
  16538. AltFullNameLanguage
  16539. - Primary Language -
  16540. Person
  16541. LastName
  16542. ListName
  16543. - Primary Language -
  16544. LastName
  16545. AltFullNameLanguage
  16546. AltFullNameLanguage
  16547. AltFullNameSort
  16548. AltFullnameSort
  16549.     31R44R51S52S
  16550. Person
  16551. Database
  16552. ResourceFlagh
  16553. ResourceType
  16554. ResourceFlag
  16555. ResourceFlagh
  16556. ResourceType
  16557. ResourceFlag
  16558. Server
  16559. Group
  16560. GroupType
  16561. GroupType
  16562. GroupType
  16563. GroupType
  16564. GroupType
  16565. GroupType
  16566.     3S4S6S12S20S33S34S38S47S60S61S67S68S70S74S76S80S82S86S95S$11*
  16567. DisplayPersonName
  16568. Person
  16569. LastName
  16570. FirstName
  16571. MiddleInitial
  16572. AltFullName
  16573.     1S2S7S8S10S18S20S21S25S29S32S33S34S36S
  16574. DisplayName
  16575. Group
  16576. ListName
  16577. DisplayPersonName
  16578. FullName
  16579. DisplayPersonName
  16580.     0R1S2S5S6S8S12S15S18S19S21S25S28S
  16581. DisplayName
  16582.     0R4S
  16583. MAMailAddressAddress
  16584. MAMailAddress
  16585. Person
  16586. MailSystem
  16587. MailAddress
  16588. MailAddress
  16589. MailDomain
  16590. MailDomain"
  16591. FullName
  16592. FullName
  16593. MailDomain
  16594. MailDomain"
  16595. FirstName
  16596. FirstName
  16597. LastName"
  16598. MailDomain
  16599. MailDomain"
  16600. LastName
  16601. MailDomain
  16602. MailDomain"
  16603. Database
  16604. FullName
  16605. MailDomain
  16606. MailDomain"
  16607. Group
  16608. GroupType
  16609. GroupType
  16610. ListName
  16611.     3S4S5S6S19S20S27S28S39S40S42S46S48S49S52S53S55S56S57S59S71S72S79S80S86S87S94S95S102S103S104S106S110S112S113S117S118S120S121S122S124S128S129S130S131S132S139S145S
  16612. NPNameNamex
  16613. NPName
  16614. Group
  16615. ListName
  16616. FullName
  16617.     3S4S6S13S17S
  16618. TypeTypeMAPublicKeyPublic Key
  16619. MAPublicKey
  16620. Certificate
  16621. PublicKey
  16622. Certificate
  16623. PublicKey
  16624. Server
  16625. Certificate
  16626.     7S8S34S35S
  16627. AltFullNameAltFullName&
  16628. AltFullName
  16629. AltFullName
  16630. Categori_zeK
  16631. _Edit Document
  16632. Send Docu_ment
  16633. _Forward
  16634. _Move To Folder...
  16635. _Remove From FolderK
  16636. Categori_zeK
  16637. _Edit Document
  16638. Send Docu_ment
  16639. _Forward
  16640. _Move To Folder...
  16641. _Remove From FolderK
  16642. O=Lotus Notes
  16643. O=Lotus Notes
  16644. PURSAFO
  16645. |.:#U
  16646. O=Lotus Notes
  16647. CN=Lotus Notes Template Development/O=Lotus Notes
  16648. PURSAFO
  16649. ~gU*T{
  16650. HFz.!
  16651. $TITLE
  16652. $Index
  16653. $Formula
  16654. $FormulaClass
  16655. $VIEWFORMAT
  16656. $Comment
  16657. $V5ACTIONS
  16658. $ACTIONS
  16659. Categori_zeK
  16660. _Edit Document
  16661. Send Docu_ment
  16662. _Forward
  16663. _Move to Folder...
  16664. _Remove from FolderK
  16665. O=Lotus Notes
  16666. O=Lotus Notes
  16667. PURSAFO
  16668. |.:#U
  16669. O=Lotus Notes
  16670. CN=Lotus Notes Template Development/O=Lotus Notes
  16671. PURSAFO
  16672. $TITLE
  16673. $Index
  16674. $Formula
  16675. $FormulaClass
  16676. $VIEWFORMAT
  16677. $Comment
  16678. $ACTIONS
  16679. $DesignVersion$Version$Formula$FormulaClass$Collation$UpdatedBy$Name$INFO$Flags$Fonts$BODY$Signature$ACLDigest$TITLEIconBitmap$DefaultNavigator$FlagsNoRefresh$DefaultFrameset$Author$Index$Collation1$Collation2$VIEWFORMAT$Comment$V5ACTIONS$ACTIONS$BackgroundRepeat$Background$FormUsers$AUTOLAUNCH$WINDOWTITLE$$Script_OConnectionTypeDestinationLanPortNamePassthruServerDialAreaCodecountryAreaCodeInputLocalPhoneNumberCommentsConnectionLocationOptionalNetworkAddressScriptNameSourceScriptArg1ScriptArg2ScriptArg3ScriptArg4LinkScriptInfoConnectionRecordFirstDestinationDomainRemotePortNameEnabledScheduleIntervalWeekDaysTasksMailThresholdCostRepPriorityAreaCodeTypeOwnerDocumentAccessPortNamePhoneNumberForm$FIELDS$$ScriptNameUserNameDomainMailAddressMailSystemMailDomainInternetAddressInternetDomain$$Name$Name_O$Script$$FormScript$$$FormScript_O$$OfficePhoneNumber$OfficePhoneNumber_O$$OfficeFAXPhoneNumber$OfficeFAXPhoneNumber_O$$CellPhoneNumber$CellPhoneNumber_O$$PhoneNumber$PhoneNumber_O$$HomeFAXPhoneNumber$HomeFAXPhoneNumber_O$$PhoneNumber_6$PhoneNumber_6_O$$CompanyName$CompanyName_O$$BusinessAddress$BusinessAddress_O$$HomeAddress$HomeAddress_OPhoneLabel_1PhoneLabel_3PhoneLabel_5PhoneLabel_2PhoneLabel_4PhoneLabel_6OfficeStreetAddressOfficeCityOfficeStateStreetAddressCityStateAreaCodeFromLocParseFlagFirstNameOfficePhoneNumberMiddleInitialOfficeFAXPhoneNumberLastNameCellPhoneNumberTitleSuffixHomeFAXPhoneNumberPhoneNumber_6CompanyNameJobTitleWebSiteBusinessAddressHomeAddressOfficeZIPZipOfficeCountryLocationSpouseDepartmentChildrenManagerAssistantBirthdayCommentFullNameCategoriesLogoShortNameCertificatePublicKey$HeaderLocalAdminFaxNumberFaxDomainDDAsGSOCOU1OU2OU3OU4IQPRMDADMDCNX400DomainDDA1DDA2DDA3DDA4ccMailUserNameccMailPOccMailDomainName$ScriptLib$ScriptLib_O$PublicAccess$AssistType$AssistLastRun$AssistDocCount$AssistFlags$AssistTrigger$AssistInfo$AssistQuery$AssistAction$AssistAction_Ex$AssistRunInfo$AssistVersion$TYPE$TABLEFORMAT$SCRIPTOBJ_1$ViewGlobalScript_O$DBScript$DBScript_Onumnum1GroupSortDefaultLDAPFTI$BusinessCardBkg$LeftToDo$HTMLDocumentStyles$$FormAction7AccountNameAccountServerAccountLoginNameAccountPasswordAccountProtocolSSLStatusAccountLocationAccountFilenameLDAPTimeoutLDAPMaxEntriesLDAPSearchBaseLDAPCheckNamesPopDeleteMailIMAPSentIMAPDraftsAccountPortNumberSSLSiteCertsSSLExpiredCertsSSLSendCertificatesSSLServerAuthenticateSSLProtocolVersionAccountReplicationHistoryAccountAuthorCVSI_EN_F_SizeCVSI_WE_F_SizeCVSI_CE_F_SizeCVSI_TR_F_SizeCVSI_BR_F_SizeCVSI_GR_F_SizeCVSI_CY_F_SizeCVSI_AR_F_SizeCVSI_HB_F_SizeCVSI_JA_F_SizeCVSI_KO_F_SizeCVSI_SC_F_SizeCVSI_TC_F_SizeCVSI_TH_F_SizeCVSI_VT_F_SizeCVSI_UN_F_SizeLanguageListCharacterSetGroupsLanguageToCharSetCharacterSetsEncodingTypesFontListCVS_PrimaryGroupCVS_SecondaryGroupsCVSI_NonMIMECharSetCVSI_CharsetAlias1CVSI_CharsetActual1CVSI_CharsetAlias2CVSI_CharsetActual2CVSI_CharsetAlias3CVSI_CharsetActual3CVSI_CharsetAlias4CVSI_CharsetActual4CVSI_CharsetAlias5CVSI_CharsetActual5CVS_MLMessageHandlingCVSO_CharsetActual1CVSO_CharsetAlias1CVSO_CharsetActual2CVSO_CharsetAlias2CVSO_CharsetActual3CVSO_CharsetAlias3CVSO_CharsetActual4CVSO_CharsetAlias4CVSO_CharsetActual5CVSO_CharsetAlias5CVSO_CharsetActual6CVSO_CharsetAlias6CVSO_CharsetActual7CVSO_CharsetAlias7CVSO_CharsetActual8CVSO_CharsetAlias8CVSO_CharsetActual9CVSO_CharsetAlias9CVSO_CharsetActual10CVSO_CharsetAlias10OriginalServiceDisplayDriverListServiceTypetmpServerNameConnectChoiceApplyToServerServerGroupSpecificNameAccessLANservernameDominoOrganizationNamePassthruServerHostnameDUNEntriesPortsRASPortInternetOptNetworkAddresstmpCountryCodetmpAreaCodetmpPhoneNumbertmpLoginNametmpPasswordAccessToServerSpecificServerPriorityFlagRLANTagRemoteLanServiceRLAN1RLAN2RLAN3RLAN4$RevisionsAccountPFlagAccountSFlagOriginalAccountProtocolOriginalAccountServerGroupTypeListDescriptionListOwnerAvailableForDirSyncGroupTitleListNameMembersUserCertificateOrgComboIssuedByCertificate_NoEncChangeRequestCertificateTypeIssuedToMailServerMailFile$ImagesWide$ImagesHigh$ImagesColorize$ImageData$ImageNames$SiteMapList$FrameSetPortsnetworkaddressSaveOptionsAlphList$SubForms$SCRIPTOBJ_11NameComboStaticTagRLANItemsRLAN6RLANTotalParamsARAEntryVersionRLANTagV21RLANTagV30RLAN5Interval_1Interval_2IntervalHighIntervalLowFreqHighFreqLowCard_NoCard_No_1IntervalMed$$FormQuerySaveAction$$FormAction2$$Proxy_HTTP$Proxy_HTTP_OLocationTypeTravelPromptProxy_HTTPImailAddressUserNameFlagDefaultPassthruServerCatalogServerDirectoryServerInterNotesEnabledPortsDisabledPortsMailTypeNameLookupPrefExhaustiveNameLookupMailAddressingSMTPRouteMessageFormatWebRetrieverWebLocationWebRetrieverPathOutsideLineCallPreInternationalPrefixLongDistancePrefixUseOSTzR5TimeZoneDSTUserIDImagesBookmarkDbHeadlineDBRLANIdleTimeoutWebDbNameWebRetrieversWebLogLevelWebUpdateCacheJavaSecureDomainJavaAllowInSecureDomainJavaAllowInOtherDomainsJavaTrustHTTPProxyTCPNameServerTCPNameServerHostNDSNameServerNDSNameServerAddressNetBIOSNameServerSMTPEncodingSchemeSMTPMacAttachConvertOption$LocationVersionProxyFlagProxy_FTPProxy_GopherProxy_SSLProxy_NotesHTTPProxy_SOCKsNo_ProxyAcceptUpdates$SCRIPTOBJ_9Proxy_INET$$Proxy_HTTPI$Proxy_HTTPI_O$$Port1$Port1_OProxy_HTTPIPort1Proxy_FTPIPort2Proxy_GopherIPort3Proxy_SSLIPort4Proxy_SOCKsIPort5Proxy_NotesHTTPIPort6OutChoicesCVSO_INPUTTRANS$OutboundSettingsCVSI_EN_F_PCVSI_EN_F_MCVSI_EN_F_HSizeCVSI_EN_F_TCVSO_EN_CS_HCVSO_EN_ENC_HCVSO_EN_CS_BCVSO_EN_ENC_BCVSI_WE_F_PCVSI_WE_F_MCVSI_WE_F_HSizeCVSI_WE_F_TCVSO_WE_CS_HCVSO_WE_ENC_HCVSO_WE_CS_BCVSO_WE_ENC_BCVSI_CE_F_PCVSI_CE_F_MCVSI_CE_F_HSizeCVSI_CE_F_TCVSO_CE_CS_HCVSO_CE_ENC_HCVSO_CE_CS_BCVSO_CE_ENC_BCVSI_TR_F_PCVSI_TR_F_MCVSI_TR_F_HSizeCVSI_TR_F_TCVSO_TR_CS_HCVSO_TR_ENC_HCVSO_TR_CS_BCVSO_TR_ENC_BCVSI_BR_F_PCVSI_BR_F_MCVSI_BR_F_HSizeCVSI_BR_F_TCVSO_BR_CS_HCVSO_BR_ENC_HCVSO_BR_CS_BCVSO_BR_ENC_BCVSI_GR_F_PCVSI_GR_F_MCVSI_GR_F_HSizeCVSI_GR_F_TCVSO_GR_CS_HCVSO_GR_ENC_HCVSO_GR_CS_BCVSO_GR_ENC_BCVSI_CY_F_PCVSI_CY_F_MCVSI_CY_F_HSizeCVSI_CY_F_TCVSO_CY_CS_HCVSO_CY_ENC_HCVSO_CY_CS_BCVSO_CY_ENC_BCVSI_AR_F_PCVSI_AR_F_MCVSI_AR_F_HSizeCVSI_AR_F_TCVSO_AR_CS_HCVSO_AR_ENC_HCVSO_AR_CS_BCVSO_AR_ENC_BCVSI_HB_F_PCVSI_HB_F_MCVSI_HB_F_HSizeCVSI_HB_F_TCVSO_HB_CS_HCVSO_HB_ENC_HCVSO_HB_CS_BCVSO_HB_ENC_BCVSI_JA_F_PCVSI_JA_F_MCVSI_JA_F_HSizeCVSI_JA_F_TCVSO_JA_CS_HCVSO_JA_ENC_HCVSO_JA_CS_BCVSO_JA_ENC_BCVSI_KO_F_PCVSI_KO_F_MCVSI_KO_F_HSizeCVSI_KO_F_TCVSO_KO_CS_HCVSO_KO_ENC_HCVSO_KO_CS_BCVSO_KO_ENC_BCVSI_SC_F_PCVSI_SC_F_MCVSI_SC_F_HSizeCVSI_SC_F_TCVSO_SC_CS_HCVSO_SC_ENC_HCVSO_SC_CS_BCVSO_SC_ENC_BCVSI_TC_F_PCVSI_TC_F_MCVSI_TC_F_HSizeCVSI_TC_F_TCVSO_TC_CS_HCVSO_TC_ENC_HCVSO_TC_CS_BCVSO_TC_ENC_BCVSI_TH_F_PCVSI_TH_F_MCVSI_TH_F_HSizeCVSI_TH_F_TCVSO_TH_CS_HCVSO_TH_ENC_HCVSO_TH_CS_BCVSO_TH_ENC_BCVSI_VT_F_PCVSI_VT_F_MCVSI_VT_F_HSizeCVSI_VT_F_TCVSO_VT_CS_HCVSO_VT_ENC_HCVSO_VT_CS_BCVSO_VT_ENC_BCVSI_UN_F_PCVSI_UN_F_MCVSI_UN_F_HSizeCVSI_UN_F_TCVSO_UN_CS_HCVSO_UN_ENC_HCVSO_UN_CS_BCVSO_UN_ENC_BCVSO_HB$WebFlagsCertificateList
  16680. "Small Fonts
  16681. Lotus Product
  16682. $CharacterSetSettings
  16683. .,$,  , :
  16684. OutChoices
  16685. For outbound message options below use all possible choices (Advanced users)|1z
  16686. OutChoices
  16687. CVSO_EN_ENC_H
  16688. CVSO_EN_ENC_H
  16689.     0RR1S
  16690. CVSO_EN_ENC_B
  16691. CVSO_EN_ENC_B
  16692.     0R1S
  16693. CVSO_WE_ENC_H
  16694. CVSO_WE_ENC_H
  16695.     0R1S
  16696. CVSO_WE_ENC_B
  16697. CVSO_WE_ENC_B
  16698.     0R1S
  16699. CVSO_CE_ENC_H
  16700. CVSO_CE_ENC_H
  16701.     0R1S
  16702. CVSO_CE_ENC_B
  16703. CVSO_CE_ENC_B
  16704.     0R1S
  16705. CVSO_TR_ENC_H
  16706. CVSO_TR_ENC_H
  16707.     0R1S
  16708. CVSO_TR_ENC_B
  16709. CVSO_TR_ENC_B
  16710.     0R1S
  16711. CVSO_BR_ENC_H
  16712. CVSO_BR_ENC_H
  16713.     0R1S
  16714. CVSO_BR_ENC_B
  16715. CVSO_BR_ENC_B
  16716.     0R1S
  16717. CVSO_GR_ENC_H
  16718. CVSO_GR_ENC_H
  16719.     0R1S
  16720. CVSO_GR_ENC_B
  16721. CVSO_GR_ENC_B
  16722.     0R1S
  16723. CVSO_CY_ENC_H
  16724. CVSO_CY_ENC_H
  16725.     0R1S
  16726. CVSO_CY_ENC_B
  16727. CVSO_CY_ENC_B
  16728.     0R1S
  16729. CVSO_AR_ENC_H
  16730. CVSO_AR_ENC_H
  16731.     0R1S
  16732. CVSO_AR_ENC_B
  16733. CVSO_AR_ENC_B
  16734.     0R1S
  16735. CVSO_HB_ENC_H
  16736. CVSO_HB_ENC_H
  16737.     0R1S
  16738. CVSO_HB_ENC_B
  16739. CVSO_HB_ENC_B
  16740.     0R1S
  16741. CVSO_JA_ENC_H
  16742. CVSO_JA_ENC_H
  16743.     0R1S
  16744. CVSO_JA_ENC_B
  16745. CVSO_JA_ENC_B
  16746.     0R1S
  16747. CVSO_KO_ENC_H
  16748. CVSO_KO_ENC_H
  16749.     0R1S
  16750. CVSO_KO_ENC_B
  16751. CVSO_KO_ENC_B
  16752.     0R1S
  16753. CVSO_SC_ENC_H
  16754. CVSO_SC_ENC_H
  16755.     0R1S
  16756. CVSO_SC_ENC_B
  16757. CVSO_SC_ENC_B
  16758.     0R1S
  16759. CVSO_TC_ENC_H
  16760. CVSO_TC_ENC_H
  16761.     0R1S
  16762. CVSO_TC_ENC_B
  16763. CVSO_TC_ENC_B
  16764.     0R1S
  16765. CVSO_TH_ENC_H
  16766. CVSO_TH_ENC_H
  16767.     0R1S
  16768. CVSO_TH_ENC_B
  16769. CVSO_TH_ENC_B
  16770.     0R1S
  16771. CVSO_VT_ENC_H
  16772. CVSO_VT_ENC_H
  16773.     0R1S
  16774. CVSO_VT_ENC_B
  16775. CVSO_VT_ENC_B
  16776.     0R1S
  16777. CVSO_UN_ENC_H
  16778. CVSO_UN_ENC_H
  16779.     0R1S
  16780. CVSO_UN_ENC_B
  16781. CVSO_UN_ENC_B
  16782.     0R1S
  16783. CVSO_EN_CS_H
  16784. CVSO_HB
  16785. CVSO_EN_ENC_H
  16786. CVSO_EN_CS_H
  16787. CVSO_EN_ENC_H
  16788.     0RR3S4S11RS10E23S
  16789. CVSO_EN_CS_B
  16790. CVSO_HB
  16791. CVSO_EN_ENC_B
  16792. CVSO_EN_CS_B
  16793. CVSO_EN_ENC_B
  16794.     0R3S4S17RS10E29S
  16795. CVSO_WE_CS_H
  16796. CVSO_HB
  16797. CVSO_WE_ENC_H
  16798. CVSO_WE_CS_H
  16799. CVSO_WE_ENC_H
  16800.     0RR3S4S17RS10E29S
  16801. CVSO_WE_CS_B
  16802. CVSO_HB
  16803. CVSO_WE_ENC_B
  16804. CVSO_WE_CS_B
  16805. CVSO_WE_ENC_B
  16806.     0R3S4S17RS10E29S
  16807. CVSO_CE_CS_H
  16808. CVSO_HB
  16809. CVSO_CE_ENC_H
  16810. CVSO_CE_CS_H
  16811. CVSO_CE_ENC_H
  16812.     0RR3S4S17RS10E29S
  16813. CVSO_CE_CS_B
  16814. CVSO_HB
  16815. CVSO_CE_ENC_B
  16816. CVSO_CE_CS_B
  16817. CVSO_CE_ENC_B
  16818.     0R3S4S17RS10E29S
  16819. CVSO_TR_CS_H
  16820. CVSO_HB
  16821. CVSO_TR_ENC_H
  16822. CVSO_TR_CS_H
  16823. CVSO_TR_ENC_H
  16824.     0RR3S4S17RS10E29S
  16825. CVSO_TR_CS_B
  16826. CVSO_HB
  16827. CVSO_TR_ENC_B
  16828. CVSO_TR_CS_B
  16829. CVSO_TR_ENC_B
  16830.     0R3S4S17RS10E29S
  16831. CVSO_BR_CS_H
  16832. CVSO_HB
  16833. CVSO_BR_ENC_H
  16834. CVSO_BR_CS_H
  16835. CVSO_BR_ENC_H
  16836.     0RR3S4S17RS10E29S
  16837. CVSO_BR_CS_B
  16838. CVSO_HB
  16839. CVSO_BR_ENC_B
  16840. CVSO_BR_CS_B
  16841. CVSO_BR_ENC_B
  16842.     0R3S4S17RS10E29S
  16843. CVSO_GR_CS_H
  16844. CVSO_HB
  16845. CVSO_GR_ENC_H
  16846. CVSO_GR_CS_H
  16847. CVSO_GR_ENC_H
  16848.     0RR3S4S17RS10E29S
  16849. CVSO_GR_CS_B
  16850. CVSO_HB
  16851. CVSO_GR_ENC_B
  16852. CVSO_GR_CS_B
  16853. CVSO_GR_ENC_B
  16854.     0R3S4S17RS10E29S
  16855. CVSO_CY_CS_H
  16856. CVSO_HB
  16857. CVSO_CY_ENC_H
  16858. CVSO_CY_CS_H
  16859. CVSO_CY_ENC_H
  16860.     0RR3S4S17RS10E29S
  16861. CVSO_CY_CS_B
  16862. CVSO_HB
  16863. CVSO_CY_ENC_B
  16864. CVSO_CY_CS_B
  16865. CVSO_CY_ENC_B
  16866.     0R3S4S17RS10E29S
  16867. CVSO_AR_CS_H
  16868. CVSO_HB
  16869. CVSO_AR_ENC_H
  16870. CVSO_AR_CS_H
  16871. CVSO_AR_ENC_H
  16872.     0RR3S4S17RS10E29S
  16873. CVSO_AR_CS_B
  16874. CVSO_HB
  16875. CVSO_AR_ENC_B
  16876. CVSO_AR_CS_B
  16877. CVSO_AR_ENC_B
  16878.     0R3S4S17RS10E29S
  16879. CVSO_HB_CS_H
  16880. CVSO_HB
  16881. CVSO_HB_ENC_H
  16882. CVSO_HB_CS_H
  16883. CVSO_HB_ENC_H
  16884.     0RR3S4S17RS10E29S
  16885. CVSO_HB_CS_B
  16886. CVSO_HB
  16887. CVSO_HB_ENC_B
  16888. CVSO_HB_CS_B
  16889. CVSO_HB_ENC_B
  16890.     0R3S4S17RS10E29S
  16891. CVSO_JA_CS_H
  16892. CVSO_HB
  16893. CVSO_JA_ENC_H
  16894. CVSO_JA_CS_H
  16895. CVSO_JA_ENC_H
  16896.     0RR3S4S17RS10E29S
  16897. CVSO_JA_CS_B
  16898. CVSO_HB
  16899. CVSO_JA_ENC_B
  16900. CVSO_JA_CS_B
  16901. CVSO_JA_ENC_B
  16902.     0R3S4S17RS10E29S
  16903. CVSO_KO_CS_H
  16904. CVSO_HB
  16905. CVSO_KO_ENC_H
  16906. CVSO_KO_CS_H
  16907. CVSO_KO_ENC_H
  16908.     0RR3S4S17RS10E29S
  16909. CVSO_KO_CS_B
  16910. CVSO_HB
  16911. CVSO_KO_ENC_B
  16912. CVSO_KO_CS_B
  16913. CVSO_KO_ENC_B
  16914.     0R3S4S17RS10E29S
  16915. CVSO_SC_CS_H
  16916. CVSO_HB
  16917. CVSO_SC_ENC_H
  16918. CVSO_SC_CS_H
  16919. CVSO_SC_ENC_H
  16920.     0RR3S4S17RS10E29S
  16921. CVSO_SC_CS_B
  16922. CVSO_HB
  16923. CVSO_SC_ENC_B
  16924. CVSO_SC_CS_B
  16925. CVSO_SC_ENC_B
  16926.     0R3S4S17RS10E29S
  16927. CVSO_TC_CS_H
  16928. CVSO_HB
  16929. CVSO_TC_ENC_H
  16930. CVSO_TC_CS_H
  16931. CVSO_TC_ENC_H
  16932.     0RR3S4S17RS10E29S
  16933. CVSO_TC_CS_B
  16934. CVSO_HB
  16935. CVSO_TC_ENC_B
  16936. CVSO_TC_CS_B
  16937. CVSO_TC_ENC_B
  16938.     0R3S4S17RS10E29S
  16939. CVSO_TH_CS_H
  16940. CVSO_HB
  16941. CVSO_TH_ENC_H
  16942. CVSO_TH_CS_H
  16943. CVSO_TH_ENC_H
  16944.     0RR3S4S17RS10E29S
  16945. CVSO_TH_CS_B
  16946. CVSO_HB
  16947. CVSO_TH_ENC_B
  16948. CVSO_TH_CS_B
  16949. CVSO_TH_ENC_B
  16950.     0R3S4S17RS10E29S
  16951. CVSO_VT_CS_H
  16952. CVSO_HB
  16953. CVSO_VT_ENC_H
  16954. CVSO_VT_CS_H
  16955. CVSO_VT_ENC_H
  16956.     0RR3S4S17RS10E29S
  16957. CVSO_VT_CS_B
  16958. CVSO_HB
  16959. CVSO_VT_ENC_B
  16960. CVSO_VT_CS_B
  16961. CVSO_VT_ENC_B
  16962.     0R3S4S17RS10E29S
  16963. CVSO_UN_CS_H
  16964. CVSO_HB
  16965. CVSO_UN_ENC_H
  16966. CVSO_UN_CS_H
  16967. CVSO_UN_ENC_H
  16968.     0RR3S4S17RS10E29S
  16969. CVSO_UN_CS_B
  16970. CVSO_HB
  16971. CVSO_UN_ENC_B
  16972. CVSO_UN_CS_B
  16973. CVSO_UN_ENC_B
  16974.     0R3S4S17RS10E29S
  16975. CVSO_INPUTTRANS
  16976. /    MIME settings by character set group:
  16977. /       
  16978. .,$,  , :
  16979. $OutboundSettings
  16980. CharacterSetGroups
  16981. OutboundSettings
  16982. /    Settings for English
  16983. /    Inbound Message Options
  16984. /    Font Options
  16985.     HTML Proportional:
  16986. .,$,  , :
  16987.     6S7S15S17S
  16988. CVSI_EN_F_P
  16989. FontList
  16990. CVSI_EN_F_P
  16991.     HTML Mono-spaced:
  16992. .,$,  , :
  16993.     6S7S15S17S
  16994. CVSI_EN_F_M
  16995. FontList
  16996. CVSI_EN_F_M
  16997.     HTML Size:
  16998.     6S7S15S17S
  16999. CVSI_EN_F_HSize
  17000.     Plain Text:
  17001. .,$,  , :
  17002.     6S7S15S17S
  17003. CVSI_EN_F_T
  17004. FontList
  17005. CVSI_EN_F_T
  17006.     Plain Text Size:
  17007. .,$,  , :
  17008.     6S7S15S17S
  17009. CVSI_EN_F_Size
  17010. /    Outbound Message Options
  17011. /    Character Set
  17012. /    Encoding
  17013.     Header:
  17014. .,$,  , :
  17015.     18S20S
  17016. CVSO_EN_CS_H
  17017. OutChoices
  17018. CharacterSets
  17019.     0S0E
  17020. CVSO_EN_CS_H
  17021. .,$,  , :
  17022. CVSO_EN_CS_H
  17023.     20SCVSO_EN_ENC_H
  17024. EncodingTypes
  17025. CVSO_EN_ENC_H
  17026.     Body:
  17027. .,$,  , :
  17028.     18S20S
  17029. CVSO_EN_CS_B
  17030. OutChoices
  17031. CharacterSets
  17032.     0S0E
  17033. CVSO_EN_CS_B
  17034. .,$,  , :
  17035. CVSO_EN_CS_B
  17036.     20SCVSO_EN_ENC_B
  17037. EncodingTypes
  17038. CVSO_EN_ENC_B
  17039. /    Settings for Western Europe
  17040. /    Inbound Message Options
  17041. /    Font Options
  17042.     HTML Proportional:
  17043.     6S7S15S17S
  17044. CVSI_WE_F_P
  17045. FontList
  17046. CVSI_WE_F_P
  17047.     HTML Mono-spaced:
  17048.     6S7S15S17S
  17049. CVSI_WE_F_M
  17050. FontList
  17051. CVSI_WE_F_M
  17052.     HTML Size:
  17053.     6S7S15S17S
  17054. CVSI_WE_F_HSize
  17055.     Plain Text:
  17056.     6S7S15S17S
  17057. CVSI_WE_F_T
  17058. FontList
  17059. CVSI_WE_F_T
  17060.     Plain Text Size:
  17061.     6S7S15S17S
  17062. CVSI_WE_F_Size
  17063. /    Outbound Message Options
  17064. /    Character Set
  17065. /    Encoding
  17066.     Header:
  17067. .,$,  , :
  17068.     18S20S
  17069. CVSO_WE_CS_H
  17070. OutChoices
  17071. CharacterSets
  17072.     0S0E
  17073. CVSO_WE_CS_H
  17074. CVSO_WE_CS_H
  17075.     20SCVSO_WE_ENC_H
  17076. EncodingTypes
  17077. CVSO_WE_ENC_H
  17078.     Body:
  17079. .,$,  , :
  17080.     18S20S
  17081. CVSO_WE_CS_B
  17082. OutChoices
  17083. CharacterSets
  17084.     0S0E
  17085. CVSO_WE_CS_B
  17086. CVSO_WE_CS_B
  17087.     20SCVSO_WE_ENC_B
  17088. EncodingTypes
  17089. CVSO_WE_ENC_B
  17090. /    Settings for Central Europe
  17091. /    Inbound Message Options
  17092. /    Font Options
  17093.     HTML Proportional:
  17094.     6S7S15S17S
  17095. CVSI_CE_F_P
  17096. FontList
  17097. CVSI_CE_F_P
  17098.     HTML Mono-spaced:
  17099.     6S7S15S17S
  17100. CVSI_CE_F_M
  17101. FontList
  17102. CVSI_CE_F_M
  17103.     HTML Size:
  17104.     6S7S15S17S
  17105. CVSI_CE_F_HSize
  17106.     Plain Text:
  17107.     4S6S
  17108. CVSI_CE_F_T
  17109. FontList
  17110. CVSI_CE_F_T
  17111.     Plain Text Size:
  17112.     4S6S
  17113. CVSI_CE_F_Size
  17114. /    Outbound Message Options
  17115. /    Character Set
  17116. /    Encoding
  17117.     Header:
  17118. .,$,  , :
  17119.     18S20S
  17120. CVSO_CE_CS_H
  17121. OutChoices
  17122. CharacterSets
  17123.     0S0E
  17124. CVSO_CE_CS_H
  17125. CVSO_CE_CS_H
  17126.     20SCVSO_CE_ENC_H
  17127. EncodingTypes
  17128. CVSO_CE_ENC_H
  17129.     Body:
  17130. .,$,  , :
  17131.     18S20S
  17132. CVSO_CE_CS_B
  17133. OutChoices
  17134. CharacterSets
  17135.     0S0E
  17136. CVSO_CE_CS_B
  17137. CVSO_CE_CS_B
  17138.     20SCVSO_CE_ENC_B
  17139. EncodingTypes
  17140. CVSO_CE_ENC_B
  17141. /    Settings for Turkish
  17142. /    Inbound Message Options
  17143. /    Font Options
  17144.     HTML Proportional:
  17145.     6S7S15S17S
  17146. CVSI_TR_F_P
  17147. FontList
  17148. CVSI_TR_F_P
  17149.     HTML Mono-spaced:
  17150.     6S7S15S17S
  17151. CVSI_TR_F_M
  17152. FontList
  17153. CVSI_TR_F_M
  17154.     HTML Size:
  17155.     6S7S15S17S
  17156. CVSI_TR_F_HSize
  17157.     Plain Text:
  17158.     6S7S15S17S
  17159. CVSI_TR_F_T
  17160. FontList
  17161. CVSI_TR_F_T
  17162.     Plain Text Size:
  17163.     6S7S15S17S
  17164. CVSI_TR_F_Size
  17165. /    Outbound Message Options
  17166. /    Character Set
  17167. /    Encoding
  17168.     Header:
  17169. .,$,  , :
  17170.     18S20S
  17171. CVSO_TR_CS_H
  17172. OutChoices
  17173. CharacterSets
  17174.     0S0E
  17175. CVSO_TR_CS_H
  17176. CVSO_TR_CS_H
  17177.     20SCVSO_TR_ENC_H
  17178. EncodingTypes
  17179. CVSO_TR_ENC_H
  17180.     Body:
  17181. .,$,  , :
  17182.     18S20S
  17183. CVSO_TR_CS_B
  17184. OutChoices
  17185. CharacterSets
  17186.     0S0E
  17187. CVSO_TR_CS_B
  17188. CVSO_TR_CS_B
  17189.     20SCVSO_TR_ENC_B
  17190. EncodingTypes
  17191. CVSO_TR_ENC_B
  17192. /    Settings for Baltic Rim
  17193. /    Inbound Message Options
  17194. /    Font Options
  17195.     HTML Proportional:
  17196.     6S7S15S17S
  17197. CVSI_BR_F_P
  17198. FontList
  17199. CVSI_BR_F_P
  17200.     HTML Mono-spaced:
  17201.     6S7S15S17S
  17202. CVSI_BR_F_M
  17203. FontList
  17204. CVSI_BR_F_M
  17205.     HTML Size:
  17206.     6S7S15S17S
  17207. CVSI_BR_F_HSize
  17208.     Plain Text:
  17209.     6S7S15S17S
  17210. CVSI_BR_F_T
  17211. FontList
  17212. CVSI_BR_F_T
  17213.     Plain Text Size:
  17214.     6S7S15S17S
  17215. CVSI_BR_F_Size
  17216. /    Outbound Message Options
  17217. /    Character Set
  17218. /    Encoding
  17219.     Header:
  17220. .,$,  , :
  17221.     18S20S
  17222. CVSO_BR_CS_H
  17223. OutChoices
  17224. CharacterSets
  17225.     0S0E
  17226. CVSO_BR_CS_H
  17227. CVSO_BR_CS_H
  17228.     20SCVSO_BR_ENC_H
  17229. EncodingTypes
  17230. CVSO_BR_ENC_H
  17231.     Body:
  17232. .,$,  , :
  17233.     18S20S
  17234. CVSO_BR_CS_B
  17235. OutChoices
  17236. CharacterSets
  17237.     0S0E
  17238. CVSO_BR_CS_B
  17239. CVSO_BR_CS_B
  17240.     20SCVSO_BR_ENC_B
  17241. EncodingTypes
  17242. CVSO_BR_ENC_B
  17243. /    Settings for Greek
  17244. /    Inbound Message Options
  17245. /    Font Options
  17246.     HTML Proportional:
  17247.     6S7S15S17S
  17248. CVSI_GR_F_P
  17249. FontList
  17250. CVSI_GR_F_P
  17251.     HTML Mono-spaced:
  17252.     6S7S15S17S
  17253. CVSI_GR_F_M
  17254. FontList
  17255. CVSI_GR_F_M
  17256.     HTML Size:
  17257.     6S7S15S17S
  17258. CVSI_GR_F_HSize
  17259.     Plain Text:
  17260.     6S7S15S17S
  17261. CVSI_GR_F_T
  17262. FontList
  17263. CVSI_GR_F_T
  17264.     Plain Text Size:
  17265.     6S7S15S17S
  17266. CVSI_GR_F_Size
  17267. /    Outbound Message Options
  17268. /    Character Set
  17269. /    Encoding
  17270.     Header:
  17271. .,$,  , :
  17272.     18S20S
  17273. CVSO_GR_CS_H
  17274. OutChoices
  17275. CharacterSets
  17276.     0S0E
  17277. CVSO_GR_CS_H
  17278. CVSO_GR_CS_H
  17279.     20SCVSO_GR_ENC_H
  17280. EncodingTypes
  17281. CVSO_GR_ENC_H
  17282.     Body:
  17283. .,$,  , :
  17284.     18S20S
  17285. CVSO_GR_CS_B
  17286. OutChoices
  17287. CharacterSets
  17288.     0S0E
  17289. CVSO_GR_CS_B
  17290. CVSO_GR_CS_B
  17291.     20SCVSO_GR_ENC_B
  17292. EncodingTypes
  17293. CVSO_GR_ENC_B
  17294. /    Settings for Settings for Cyrillic
  17295. /    Inbound Message Options
  17296. /    Font Options
  17297.     HTML Proportional:
  17298.     6S7S15S17S
  17299. CVSI_CY_F_P
  17300. FontList
  17301. CVSI_CY_F_P
  17302.     HTML Mono-spaced:
  17303.     6S7S15S17S
  17304. CVSI_CY_F_M
  17305. FontList
  17306. CVSI_CY_F_M
  17307.     HTML Size:
  17308.     6S7S15S17S
  17309. CVSI_CY_F_HSize
  17310.     Plain Text:
  17311.     6S7S15S17S
  17312. CVSI_CY_F_T
  17313. FontList
  17314. CVSI_CY_F_T
  17315.     Plain Text Size:
  17316.     6S7S15S17S
  17317. CVSI_CY_F_Size
  17318. /    Outbound Message Options
  17319. /    Character Set
  17320. /    Encoding
  17321.     Header:
  17322. .,$,  , :
  17323.     18S20S
  17324. CVSO_CY_CS_H
  17325. OutChoices
  17326. CharacterSets
  17327.     0S0E
  17328. CVSO_CY_CS_H
  17329. CVSO_CY_CS_H
  17330.     20SCVSO_CY_ENC_H
  17331. EncodingTypes
  17332. CVSO_CY_ENC_H
  17333.     Body:
  17334. .,$,  , :
  17335.     18S20S
  17336. CVSO_CY_CS_B
  17337. OutChoices
  17338. CharacterSets
  17339.     0S0E
  17340. CVSO_CY_CS_B
  17341. CVSO_CY_CS_B
  17342.     20SCVSO_CY_ENC_B
  17343. EncodingTypes
  17344. CVSO_CY_ENC_B
  17345. /    Settings for Arabic
  17346. /    Inbound Message Options
  17347. /    Font Options
  17348.     HTML Proportional:
  17349.     6S7S15S17S
  17350. CVSI_AR_F_P
  17351. FontList
  17352. CVSI_AR_F_P
  17353.     HTML Mono-spaced:
  17354.     6S7S15S17S
  17355. CVSI_AR_F_M
  17356. FontList
  17357. CVSI_AR_F_M
  17358.     HTML Size:
  17359.     6S7S15S17S
  17360. CVSI_AR_F_HSize
  17361.     Plain Text:
  17362.     6S7S15S17S
  17363. CVSI_AR_F_T
  17364. FontList
  17365. CVSI_AR_F_T
  17366.     Plain Text Size:
  17367.     6S7S15S17S
  17368. CVSI_AR_F_Size
  17369. /    Outbound Message Options
  17370. /    Character Set
  17371. /    Encoding
  17372.     Header:
  17373. .,$,  , :
  17374.     18S20S
  17375. CVSO_AR_CS_H
  17376. OutChoices
  17377. CharacterSets
  17378.     0S0E
  17379. CVSO_AR_CS_H
  17380. CVSO_AR_CS_H
  17381.     20SCVSO_AR_ENC_H
  17382. EncodingTypes
  17383. CVSO_AR_ENC_H
  17384.     Body:
  17385. .,$,  , :
  17386.     18S20S
  17387. CVSO_AR_CS_B
  17388. OutChoices
  17389. CharacterSets
  17390.     0S0E
  17391. CVSO_AR_CS_B
  17392. CVSO_AR_CS_B
  17393.     20SCVSO_AR_ENC_B
  17394. EncodingTypes
  17395. CVSO_AR_ENC_B
  17396. /    Settings for Hebrew
  17397. /    Inbound Message Options
  17398. /    Font Options
  17399.     HTML Proportional:
  17400.     6S7S15S17S
  17401. CVSI_HB_F_P
  17402. FontList
  17403. CVSI_HB_F_P
  17404.     HTML Mono-spaced:
  17405.     6S7S15S17S
  17406. CVSI_HB_F_M
  17407. FontList
  17408. CVSI_HB_F_M
  17409.     HTML Size:
  17410.     6S7S15S17S
  17411. CVSI_HB_F_HSize
  17412.     Plain Text:
  17413.     6S7S15S17S
  17414. CVSI_HB_F_T
  17415. FontList
  17416. CVSI_HB_F_T
  17417.     Plain Text Size:
  17418.     6S7S15S17S
  17419. CVSI_HB_F_Size
  17420. /    Outbound Message Options
  17421. /    Character Set
  17422. /    Encoding
  17423.     Header:
  17424. .,$,  , :
  17425.     18S20S
  17426. CVSO_HB_CS_H
  17427. OutChoices
  17428. CharacterSets
  17429.     0S0E
  17430. CVSO_HB_CS_H
  17431. CVSO_HB_CS_H
  17432.     20SCVSO_HB_ENC_H
  17433. EncodingTypes
  17434. CVSO_HB_ENC_H
  17435.     Body:
  17436. .,$,  , :
  17437.     18S20S
  17438. CVSO_HB_CS_B
  17439. OutChoices
  17440. CharacterSets
  17441.     0S0E
  17442. CVSO_HB_CS_B
  17443. CVSO_HB_CS_B
  17444.     20SCVSO_HB_ENC_B
  17445. EncodingTypes
  17446. CVSO_HB_ENC_B
  17447. /    Settings for Japanese
  17448. /    Inbound Message Options
  17449. /    Font Options
  17450.     HTML Proportional:
  17451.     6S7S15S17S
  17452. CVSI_JA_F_P
  17453. FontList
  17454. CVSI_JA_F_P
  17455.     HTML Mono-spaced:
  17456.     6S7S15S17S
  17457. CVSI_JA_F_M
  17458. FontList
  17459. CVSI_JA_F_M
  17460.     HTML Size:
  17461.     6S7S15S17S
  17462. CVSI_JA_F_HSize
  17463.     Plain Text:
  17464.     6S7S15S17S
  17465. CVSI_JA_F_T
  17466. FontList
  17467. CVSI_JA_F_T
  17468.     Plain Text Size:
  17469.     6S7S15S17S
  17470. CVSI_JA_F_Size
  17471. /    Outbound Message Options
  17472. /    Character Set
  17473. /    Encoding
  17474.     Header:
  17475. .,$,  , :
  17476.     18S20S
  17477. CVSO_JA_CS_H
  17478. OutChoices
  17479. CharacterSets
  17480.     0S0E
  17481. CVSO_JA_CS_H
  17482. CVSO_JA_CS_H
  17483.     20SCVSO_JA_ENC_H
  17484. EncodingTypes
  17485. CVSO_JA_ENC_H
  17486.     Body:
  17487. .,$,  , :
  17488.     18S20S
  17489. CVSO_JA_CS_B
  17490. OutChoices
  17491. CharacterSets
  17492.     0S0E
  17493. CVSO_JA_CS_B
  17494. CVSO_JA_CS_B
  17495.     20SCVSO_JA_ENC_B
  17496. EncodingTypes
  17497. CVSO_JA_ENC_B
  17498. /    Settings for Korean
  17499. /    Inbound Message Options
  17500. /    Font Options
  17501.     HTML Proportional:
  17502.     6S7S15S17S
  17503. CVSI_KO_F_P
  17504. FontList
  17505. CVSI_KO_F_P
  17506.     HTML Mono-spaced:
  17507.     6S7S15S17S
  17508. CVSI_KO_F_M
  17509. FontList
  17510. CVSI_KO_F_M
  17511.     HTML Size:
  17512.     6S7S15S17S
  17513. CVSI_KO_F_HSize
  17514.     Plain Text:
  17515.     6S7S15S17S
  17516. CVSI_KO_F_T
  17517. FontList
  17518. CVSI_KO_F_T
  17519.     Plain Text Size:
  17520.     6S7S15S17S
  17521. CVSI_KO_F_Size
  17522. /    Outbound Message Options
  17523. /    Character Set
  17524. /    Encoding
  17525.     Header:
  17526. .,$,  , :
  17527.     18S20S
  17528. CVSO_KO_CS_H
  17529. OutChoices
  17530. CharacterSets
  17531.     0S0E
  17532. CVSO_KO_CS_H
  17533. CVSO_KO_CS_H
  17534.     20SCVSO_KO_ENC_H
  17535. EncodingTypes
  17536. CVSO_KO_ENC_H
  17537.     Body:
  17538. .,$,  , :
  17539.     18S20S
  17540. CVSO_KO_CS_B
  17541. OutChoices
  17542. CharacterSets
  17543.     0S0E
  17544. CVSO_KO_CS_B
  17545. CVSO_KO_CS_B
  17546.     20SCVSO_KO_ENC_B
  17547. EncodingTypes
  17548. CVSO_KO_ENC_B
  17549. /    Settings for Simplified Chinese
  17550. /    Inbound Message Options
  17551. /    Font Options
  17552.     HTML Proportional:
  17553.     6S7S15S17S
  17554. CVSI_SC_F_P
  17555. FontList
  17556. CVSI_SC_F_P
  17557.     HTML Mono-spaced:
  17558.     6S7S15S17S
  17559. CVSI_SC_F_M
  17560. FontList
  17561. CVSI_SC_F_M
  17562.     HTML Size:
  17563.     6S7S15S17S
  17564. CVSI_SC_F_HSize
  17565.     Plain Text:
  17566.     6S7S15S17S
  17567. CVSI_SC_F_T
  17568. FontList
  17569. CVSI_SC_F_T
  17570.     Plain Text Size:
  17571.     6S7S15S17S
  17572. CVSI_SC_F_Size
  17573. /    Outbound Message Options
  17574. /    Character Set
  17575. /    Encoding
  17576.     Header:
  17577. .,$,  , :
  17578.     18S20S
  17579. CVSO_SC_CS_H
  17580. OutChoices
  17581. CharacterSets
  17582.     0S0E
  17583. CVSO_SC_CS_H
  17584. CVSO_SC_CS_H
  17585.     20SCVSO_SC_ENC_H
  17586. EncodingTypes
  17587. CVSO_SC_ENC_H
  17588.     Body:
  17589. .,$,  , :
  17590.     18S20S
  17591. CVSO_SC_CS_B
  17592. OutChoices
  17593. CharacterSets
  17594.     0S0E
  17595. CVSO_SC_CS_B
  17596. CVSO_SC_CS_B
  17597.     20SCVSO_SC_ENC_B
  17598. EncodingTypes
  17599. CVSO_SC_ENC_B
  17600. /    Settings for Traditional Chinese
  17601. /    Inbound Message Options
  17602. /    Font Options
  17603.     HTML Proportional:
  17604.     6S7S15S17S
  17605. CVSI_TC_F_P
  17606. FontList
  17607. CVSI_TC_F_P
  17608.     HTML Mono-spaced:
  17609.     6S7S15S17S
  17610. CVSI_TC_F_M
  17611. FontList
  17612. CVSI_TC_F_M
  17613.     HTML Size:
  17614.     6S7S15S17S
  17615. CVSI_TC_F_HSize
  17616.     Plain Text:
  17617.     6S7S15S17S
  17618. CVSI_TC_F_T
  17619. FontList
  17620. CVSI_TC_F_T
  17621.     Plain Text Size:
  17622.     6S7S15S17S
  17623. CVSI_TC_F_Size
  17624. /    Outbound Message Options
  17625. /    Character Set
  17626. /    Encoding
  17627.     Header:
  17628. .,$,  , :
  17629.     18S20S
  17630. CVSO_TC_CS_H
  17631. OutChoices
  17632. CharacterSets
  17633.     0S0E
  17634. CVSO_TC_CS_H
  17635. CVSO_TC_CS_H
  17636.     20SCVSO_TC_ENC_H
  17637. EncodingTypes
  17638. CVSO_TC_ENC_H
  17639.     Body:
  17640. .,$,  , :
  17641.     18S20S
  17642. CVSO_TC_CS_B
  17643. OutChoices
  17644. CharacterSets
  17645.     0S0E
  17646. CVSO_TC_CS_B
  17647. CVSO_TC_CS_B
  17648.     20SCVSO_TC_ENC_B
  17649. EncodingTypes
  17650. CVSO_TC_ENC_B
  17651. /    Settings for Thai
  17652. /    Inbound Message Options
  17653. /    Font Options
  17654.     HTML Proportional:
  17655.     6S7S15S17S
  17656. CVSI_TH_F_P
  17657. FontList
  17658. CVSI_TH_F_P
  17659.     HTML Mono-spaced:
  17660.     6S7S15S17S
  17661. CVSI_TH_F_M
  17662. FontList
  17663. CVSI_TH_F_M
  17664.     HTML Size:
  17665.     6S7S15S17S
  17666. CVSI_TH_F_HSize
  17667.     Plain Text:
  17668.     6S7S15S17S
  17669. CVSI_TH_F_T
  17670. FontList
  17671. CVSI_TH_F_T
  17672.     Plain Text Size:
  17673.     6S7S15S17S
  17674. CVSI_TH_F_Size
  17675. /    Outbound Message Options
  17676. /    Character Set
  17677. /    Encoding
  17678.     Header:
  17679. .,$,  , :
  17680.     18S20S
  17681. CVSO_TH_CS_H
  17682. OutChoices
  17683. CharacterSets
  17684.     0S0E
  17685. CVSO_TH_CS_H
  17686. CVSO_TH_CS_H
  17687.     20SCVSO_TH_ENC_H
  17688. EncodingTypes
  17689. CVSO_TH_ENC_H
  17690.     Body:
  17691. .,$,  , :
  17692.     18S20S
  17693. CVSO_TH_CS_B
  17694. OutChoices
  17695. CharacterSets
  17696.     0S0E
  17697. CVSO_TH_CS_B
  17698. CVSO_TH_CS_B
  17699.     20SCVSO_TH_ENC_B
  17700. EncodingTypes
  17701. CVSO_TH_ENC_B
  17702. /    Settings for Vietnamese
  17703. /    Inbound Message Options
  17704. /    Font Options
  17705.     HTML Proportional:
  17706.     6S7S15S17S
  17707. CVSI_VT_F_P
  17708. FontList
  17709. CVSI_VT_F_P
  17710.     HTML Mono-spaced:
  17711.     6S7S15S17S
  17712. CVSI_VT_F_M
  17713. FontList
  17714. CVSI_VT_F_M
  17715.     HTML Size:
  17716.     6S7S15S17S
  17717. CVSI_VT_F_HSize
  17718.     Plain Text:
  17719.     6S7S15S17S
  17720. CVSI_VT_F_T
  17721. FontList
  17722. CVSI_VT_F_T
  17723.     Plain Text Size:
  17724.     6S7S15S17S
  17725. CVSI_VT_F_Size
  17726. /    Outbound Message Options
  17727. /    Character Set
  17728. /    Encoding
  17729.     Header:
  17730. .,$,  , :
  17731.     18S20S
  17732. CVSO_VT_CS_H
  17733. OutChoices
  17734. CharacterSets
  17735.     0S0E
  17736. CVSO_VT_CS_H
  17737. CVSO_VT_CS_H
  17738.     20SCVSO_VT_ENC_H
  17739. EncodingTypes
  17740. CVSO_VT_ENC_H
  17741.     Body:
  17742. .,$,  , :
  17743.     18S20S
  17744. CVSO_VT_CS_B
  17745. OutChoices
  17746. CharacterSets
  17747.     0S0E
  17748. CVSO_VT_CS_B
  17749. CVSO_VT_CS_B
  17750.     20SCVSO_VT_ENC_B
  17751. EncodingTypes
  17752. CVSO_VT_ENC_B
  17753. /    Settings for Unicode
  17754. /    Inbound Message Options
  17755. /    Font Options
  17756.     HTML Proportional:
  17757.     6S7S15S17S
  17758. CVSI_UN_F_P
  17759. FontList
  17760. CVSI_UN_F_P
  17761.     HTML Mono-spaced:
  17762.     6S7S15S17S
  17763. CVSI_UN_F_M
  17764. FontList
  17765. CVSI_UN_F_M
  17766.     HTML Size:
  17767.     6S7S15S17S
  17768. CVSI_UN_F_HSize
  17769.     Plain Text:
  17770.     6S7S15S17S
  17771. CVSI_UN_F_T
  17772. FontList
  17773. CVSI_UN_F_T
  17774.     Plain Text Size:
  17775.     6S7S15S17S
  17776. CVSI_UN_F_Size
  17777. /    Outbound Message Options
  17778. /    Character Set
  17779. /    Encoding
  17780.     Header:
  17781. .,$,  , :
  17782.     18S20S
  17783. CVSO_UN_CS_H
  17784. OutChoices
  17785. CharacterSets
  17786.     0S0E
  17787. CVSO_UN_CS_H
  17788. CVSO_UN_CS_H
  17789.     20SCVSO_UN_ENC_H
  17790. EncodingTypes
  17791. CVSO_UN_ENC_H
  17792.     Body:
  17793. .,$,  , :
  17794.     18S20S
  17795. CVSO_UN_CS_B
  17796. OutChoices
  17797. CharacterSets
  17798.     0S0E
  17799. CVSO_UN_CS_B
  17800. CVSO_UN_CS_B
  17801.     0S0E
  17802. CVSO_UN_ENC_B
  17803. EncodingTypes
  17804. CVSO_UN_ENC_B
  17805. CVSO_EN_CS_H
  17806. CVSO_EN_CS_B
  17807. CVSO_WE_CS_H
  17808. CVSO_WE_CS_B
  17809. CVSO_CE_CS_H
  17810. CVSO_CE_CS_B
  17811. CVSO_TR_CS_H
  17812. CVSO_TR_CS_B
  17813. CVSO_BR_CS_H
  17814. CVSO_BR_CS_B
  17815. CVSO_GR_CS_H
  17816. CVSO_GR_CS_B
  17817. CVSO_CY_CS_H
  17818. CVSO_CY_CS_B
  17819. CVSO_AR_CS_H
  17820. CVSO_AR_CS_B
  17821. CVSO_HB_CS_H
  17822. CVSO_HB_CS_B
  17823. CVSO_JA_CS_H
  17824. CVSO_JA_CS_B
  17825. CVSO_KO_CS_H
  17826. CVSO_KO_CS_B
  17827. CVSO_SC_CS_H
  17828. CVSO_SC_CS_B
  17829. CVSO_TC_CS_H
  17830. CVSO_TC_CS_B
  17831. CVSO_TH_CS_H
  17832. CVSO_TH_CS_B
  17833. CVSO_VT_CS_H
  17834. CVSO_VT_CS_B
  17835. CVSO_UN_CS_H
  17836. CVSO_UN_CS_B
  17837.     2R4R6R8R10R12R14R16R18R20R22R24R26R28R30R32R34R36R38R40R42R44R46R48R50R52R54R56R58R60R62RCVSO_HB
  17838. O=Lotus Notes
  17839. O=Lotus Notes
  17840. PURSAFO
  17841. |.:#U
  17842. O=Lotus Notes
  17843. CN=Lotus Notes Template Development/O=Lotus Notes
  17844. PURSAFO
  17845. $INFO
  17846. $$Script_O
  17847. $$ScriptName
  17848. CVSI_EN_F_HSize
  17849. CVSI_EN_F_Size
  17850. CVSI_WE_F_HSize
  17851. CVSI_WE_F_Size
  17852. CVSI_CE_F_HSize
  17853. CVSI_CE_F_Size
  17854. CVSI_TR_F_HSize
  17855. CVSI_TR_F_Size
  17856. CVSI_BR_F_HSize
  17857. CVSI_BR_F_Size
  17858. CVSI_GR_F_HSize
  17859. CVSI_GR_F_Size
  17860. CVSI_CY_F_HSize
  17861. CVSI_CY_F_Size
  17862. CVSI_AR_F_HSize
  17863. CVSI_AR_F_Size
  17864. CVSI_HB_F_HSize
  17865. CVSI_HB_F_Size
  17866. CVSI_JA_F_HSize
  17867. CVSI_JA_F_Size
  17868. CVSI_KO_F_HSize
  17869. CVSI_KO_F_Size
  17870. CVSI_SC_F_HSize
  17871. CVSI_SC_F_Size
  17872. CVSI_TC_F_HSize
  17873. CVSI_TC_F_Size
  17874. CVSI_TH_F_HSize
  17875. CVSI_TH_F_Size
  17876. CVSI_VT_F_HSize
  17877. CVSI_VT_F_Size
  17878. CVSI_UN_F_HSize
  17879. CVSI_UN_F_Size
  17880. $BODY
  17881.