Class MeetingOwnerStringTable As BaseEventOwnerStringTable
Function GetString(nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case ENTRY_TYPE
GetString = "Changing the entry type will cancel this meeting. Change anyways?"
Case INV_DUPL
GetString = "That person is already invited to this meeting."
Case ENTRY_DTMOD
GetString = "Are you sure you want to change the date/time of this entry?"
Case ENTRY_PAST
GetString = "This event is being created in the past. Create anyway?"
Case ENTRY_CONF
GetString = "This event conflicts with an existing event. Create anyway?"
Case DTMOD_TITLE
GetString = "Change date/time"
Case SEND_ROOM
GetString = "Sending reservation requests to room(s)..."
Case SEND_RES
GetString = "Sending reservation requests to resource(s)..."
Case CTRACPT_TITLE
GetString = "Accept Counter"
Case CTRDECL_TITLE
GetString = "Decline Counter"
Case RESC_UPD_MSG
GetString = "An update notice will be sent to the participants and any rooms/resources you may have requested informing them of this change. "& BaseEventOwnerStringTable..GetString(INC_COMMENTS, Null)
Case CONF_MSG
GetString = "A notice will be sent to the participants confirming this meeting and informing them of the participants' status. "& BaseEventOwnerStringTable..GetString(INC_COMMENTS, Null)
Class MeetingParticipantStringTable As BaseEventParticipantStringTable
Function GetString(nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case RESC_MSG ' Reschedule notice
GetString = "This meeting has been rescheduled. Would you like to open the reschedule notice?"
Case CANCEL_MSG
GetString = "This meeting has been cancelled." ' Message that appears for all cancellation notices
Case CANCEL_UPD
GetString = Me.GetString(CANCEL_MSG, Nothing) & " The calendar entry will be updated to reflect this change." ' User accepted main invitation that is now cancelled
Case CANCEL_NOACTN
GetString = Me.GetString(CANCEL_MSG, Nothing) & " You do not need to take any action." ' The main invitation has not been accepted
Case ACPT_MSG
GetString = "Accepting this meeting request will automatically add this event to your calendar. A reply notice will be sent to " & Cstr(vData) & ". " & BaseEventParticipantStringTable..GetString(INC_COMMENTS, Null)
Case DELE_MSG
GetString = "This request will be forwarded to a person you specify. Any updates regarding this meeting will be sent to the delegee. A reply notice will be sent to " & Cstr(vData) & ". " & BaseEventParticipantStringTable..GetString(INC_COMMENTS, Null)
Case CNTR_MSG
GetString = "You can specify a new date/time for this meeting. A reply notice will be sent to " & Cstr(vData) & ". " & BaseEventParticipantStringTable..GetString(INC_COMMENTS, Null)
Case ADD_MSG
GetString = "This meeting request will be added to your calendar. No reply notice will be sent"
Class TaskParticipantStringTable As BaseEventParticipantStringTable
Function GetString(nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case RESC_MSG ' Reschedule notice
GetString = "The due date for this task has been changeded. Would you like to open the update notice?"
Case CANCEL_MSG
GetString = "This task has been cancelled." ' Message that appears for all cancellation notices
Case CANCEL_UPD
GetString = Me.GetString(CS_STRING+2, Nothing) & " The task entry will be updated to reflect this change." ' User accepted main invitation that is now cancelled
Case CANCEL_NOACTN
GetString = Me.GetString(CS_STRING+2, Nothing) & " You do not need to take any action." ' The main invitation has not been accepted
Function GetString(nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case TRACKING_STRING+1
GetString = "UNKNOWN "
Case TRACKING_STRING+2
GetString = "In Que "
Case TRACKING_STRING+4
GetString = "DELIVERED "
Case TRACKING_STRING+8
GetString = "DELIVERY FAILED "
Case TRACKING_STRING+16
GetString = "TRANSFERED "
Case TRACKING_STRING+32
GetString = "TRANSER FAILED "
Case TRACKING_STRING+64
GetString = "GROUP EXPANDED "
Case TRACKING_STRING+65
GetString = "Message Tracking"
Case TRACKING_STRING+66
GetString = "Please select recipient(s) to track."
End Select
End Function
End Class
Class MailToolsStringTable
Function GetString (nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case TOOL_STRING
GetString = "Unable to locate your Name & Address Book. Names not added."
Case TOOL_STRING+1
GetString = Str(vData) + " name(s) processed."
Case TOOL_STRING+2
GetString = Str(vData) + " name(s) added to your personal address book."
Case TOOL_STRING+3
GetString = Str(vData) + " name(s) not added; already in your personal address book."
Case TOOL_STRING+4
GetString = "Error adding name(s) to personal address book: " + Str(vData)
Case TOOL_STRING+10
GetString = "Unable to create a calendar entry for your time off."
Case TOOL_STRING+11
GetString = "An Out of office document has been added to your Calendar."
Case TOOL_STRING+12
GetString = "Would you like to create an Out of Office Calender entry?"
Case TOOL_STRING+13
GetString = "Welcome Back! Your 'Out Of Office' agent has been disabled for you. " & Chr(13) & Chr(13) & _
"While you were out, the 'Out of Office' agent notified the following people of your absence." & Chr(13) & Chr(13)
Case TOOL_STRING+14
GetString = "Welcome Back! Your 'Out Of Office' agent has been disabled for you. " & Chr(13) &_
"While you were out, your Out of Office Agent did not notify anyone of your absence."
Case TOOL_STRING+15
GetString = "Welcome Back!"
Case TOOL_STRING+16
GetString = "This is a repeat reminder! Please disable your Out of Office Agent. To disable the agent, " & _
"Open your Out of Office profile and select the 'Disable Out of Office' action button."
Case TOOL_STRING+17
GetString = "Out of Office Profile ERROR"
Case TOOL_STRING+18
GetString = "ERROR: You must create an Out of Office profile BEFORE running your Out of Office Agent."
Case TOOL_STRING+19
GetString = "ERROR: You must enable your Out of Office profile BEFORE running your Out of Office Agent."
Case TOOL_STRING+31
GetString = " can already read mail."
Case TOOL_STRING+32
GetString = " can already send mail."
Case TOOL_STRING+33
GetString = " can already edit documents."
Case TOOL_STRING+34
GetString = " can already manage the calendar."
Case TOOL_STRING+37
GetString = "Managers and Designers cannot be modified using the Delegation Profile."
Case TOOL_STRING+38
GetString = "You must add " & Str(vData) & " to either the ""Read and send"" or the ""Read, send, and edit"" list before adding them to the ""Delete"" list."
Case TOOL_STRING+39
GetString = "You must add " & Str(vData) & " to either the ""Read and send"" or the ""Read, send, and edit"" list before adding them to the ""Delete"" list."
Case TOOL_STRING+40
GetString = Str(vData) & " is currently a Manager of this database."
Case TOOL_STRING+41
GetString = Str(vData) & " is currently a Designer of this database. "
Case TOOL_STRING+42
GetString = "You do not have the priviledge to change the ACL settings in this database."
Case TOOL_STRING+43
GetString = "Reminder Please Turn Off your Out Of Office Agent"
Case TOOL_STRING+44
GetString = "Your Out of Office agent is still enabled."
Case TOOL_STRING+45
GetString = "Please ask a Manager or Designer of this database to disable the agent for you."
Case TOOL_STRING+46
GetString = "Lotus Notes Out of Office"
Case TOOL_STRING+47
GetString = "Your 'Out of Office' agent is currently enabled."
Case TOOL_STRING+48
GetString = "Do you want to disable it ?"
Case TOOL_STRING+49
GetString = "Your Out of Office has been disabled."
Case TOOL_STRING+50
GetString = "Please ask a Manager or Designer of this database to enable the agent for you."
Case TOOL_STRING+51
GetString = "Your current location doesn't have a 'Mail Server' specified."'
Case TOOL_STRING+52
GetString = "Please edit your current record and specify your Mail Server."
Case TOOL_STRING+53
GetString = "The Out of Office agent is now enabled to run on the following server: "
Case TOOL_STRING+54
GetString = "When people send you mail between "
Case TOOL_STRING+55
GetString = " and " & vData & " it will inform them of your absence."
Case TOOL_STRING+56
GetString = "The Out of Office agent was not enabled."
Case TOOL_STRING+57
GetString = "You must indicate when you are leaving and when you will be back."
Case TOOL_STRING+58
GetString = "Your return date must be after today's date."
Case TOOL_STRING+59
GetString = "Your return date cannot be earlier than the leave date."
Case TOOL_STRING+60
GetString = "Your return date must be after your leave date."
Case TOOL_STRING+61
GetString = "Preferences"
Case TOOL_STRING+62
GetString = "Add sender to address book"
Case TOOL_STRING+63
GetString = "A business card with your name should not be added to your address book."
End Select
End Function
End Class
Class MemoStringTable
Function GetString(nIndex As Integer, vData As Variant) As String
Select Case nIndex
Case MEMO_STRING ' task notification mail message
GetString = "Notfication has been sent to "
Case MEMO_STRING+1 ' name a stationery document
GetString = "What would you like to call this stationery?"
Case MEMO_STRING+2
GetString = "This action cannot be performed on a new document."
Case MEMO_STRING+3
GetString = "Please select one document before executing this command."
Case MEMO_STRING+4 ' user trying to copy a document that has the prevent copy bit set
GetString = "This document is prevented from being copied. The body will not be copied into the new document."
Case MEMO_STRING+5
GetString = "Mail Schedule Profile not found. You must define your Mail schedule profile before you can schedule a document."
Case MEMO_STRING+6
GetString = "Your Mail Scheduler agent is currently disabled. The agent must be enabled before you can schedule a document."
Case MEMO_STRING+7
GetString = "Unable to locate your mail schedule profile. A mail schedule profile must exist in your database before you can schedule a document."
Case MEMO_STRING+8
GetString = "Your Mail scheduling profile is not configured to run the Notes mail scheduler. You must set the current status to enabled in order to schedule a document."
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Function GetString ( StringType As Integer) As String
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:1:GetString:1:8
Function GetString ( StringType As Integer) As String
'
Select Case StringType
Case 1 ' WebAddtopic, WebExpire
GetString = "Back to Previous Document"
Case 2 ' WebAddtopic, WebExpire, WebRemoveThread
GetString = "All Documents"
Case 3 ' WebAddtopic, WebExpire, WebRemoveThread
GetString = "by Category"
Case 4 ' WebAddtopic, WebExpire, WebRemoveThread
GetString = "by Author"
Case 5 ' WebAddtopic, WebExpire, WebRemoveThread
GetString = "by Alternate Name"
Case 6 ' WebAddtopic
GetString = "This document is not identified as a thread. Contact the database manager if you want all threads initialized."
Case 7 ' WebAddtopic
GetString = "This topic is already in your Interest Profile."
Case 8 ' WebAddtopic
GetString = "has been added to your Interest Profile. You will be notified by mail when new responses appear in this topic."
Case 9 ' WebArchiveSaveSettings
GetString = "You have successfully updated the Archive settings for this database. "
Case 10 'WebArchiveSaveSettings
getString = "Done"
' Case 11 ' WebDelete
' GetString = "The document has been deleted."
Case 12 ' WebExpire
GetString = " cannot be marked for expiration." ' leave the leading space..
Case 13 ' WebExpire
GetString = "The document's expiration date has been removed."
Case 14 ' WebExpire
GetString = "The current document has been marked for expiration."
Case 15 ' WebRemoveThread
GetString = "Back to Interest Profile"
Case 16 ' WebRemoveThread
GetString = "Profile document could not be found."
Case 17 ' WebRemoveThread
GetString = "The requested thread(s) have been removed from your Interest Profile."
Case 18 ' WebArchiveSubmit
GetString = "A problem was encountered while creating the archive database. Specified database may already exist or your database creation rights are limited."
Case 19 'WebArchiveSubmit
GetString = "You can only create an archive database on the Domino server that you are currently running on via a web browser. To create a database on a different server, use the Domino Designer client."
Case 20 'WebArchiveSubmit
GetString = "Archive Profile has been updated."
Case 21 'WebArchiveSave
GetString = "You will need to specify a location of the archive database before you can archive documents."
Case 22 'An error that we are not specifically handling
GetString = Err & " - " & Error
Case 23 'WebEditArchiveProfile
GetString = "Manager or Designer access is required to perform Archiving tasks."
Case 24 'Error message in WebRemoveThread agent for empty selection
GetString = "No threads were selected to remove from the Interest Profile."
Case 25 'Used in WebAddTopic agent
GetString = "Untitled - "
Case 26 'Used in WebAddTopic agent
GetString = "Untitled topic "
' Case 27 'used in WebDelete agent
' GetString = "You are not authorized to delete the document."
Case 28 'used for Web navigation
GetString = "By Date"
Case 29 'used for Web navigation
getString = "Mission/Team Members"
Case 30 'used for Web navigation
getString = "Go Back"
' Case 31 'used in WebDelete agent
' getstring = "You are not authorized to delete the document because you are not the document's original author."
' Case 32 'used in WebDelete agent
' getstring = "You have successfully deleted the document entitled: "
Case 33 'used in Send Newsletters agent
getstring = "Documents you requested from: "
End Select
End Function
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$TITLE
$Flags
$PublicAccess
$ScriptLib
$ScriptLib_O
(GIF89a
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
o_U~X
_D"Dab
:s:S4
e;5\j
(&bp%
Lhb%$
ll eA
^b5NR)W
)(!JI
&];>1(
K*Re}U
TQ4BJ
G~v#*Q
~K1y&
DbLB`
v2wWCC
GhRx),
'N3?*
U3%kK
xDQUl
30F:_(
%2~&b
4gBiB
XxT649
$@dSJZh`
&F! w
>(OYT
`Y")0
R#:tOFk
fggwg]
h-Zl>
}I4&;^
"{ C(
Kp9%s
KUpmd
&qnM1
eswe=
`^40Y
/U>4m
"OQ@,2!
6(y1
AHf;$
hRBQRF
2Y31>
`CR4-:
cD;iR;
r[VI&-
*>>?SE
n8CnZ
*h|~
2`SN?
ft)FZ
n\L/<
'tL8A
EVI7,
U]`>o5U(G
A[4qm
joR4?
^rH$q
uXWo[y
]+WnD
Zy%)`p
eEgVb
KmOa&
] iYK
:LR)n
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageData
$ImageNames
$TITLE
Lotus Product
OBJECT
(ChangeRepeat)
You are modifying a recurring entry.
How would you like these changes to be applied to the related entries?
tmpChangeWhich
Just this instance|0All instances|1This instance and all previous instances|2This instance and all future instances|3
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
zo|)Qi@
$Info
$$Script_O
$$ScriptName
$Body
$PublicAccess
($Trash)
Discard ChangesK'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Sub Click(Source As Button)
Call cMemoObject.SetActionInProgress(MEMO_CANCEL)
Call cMemoObject.noteUIMemo.save()
Call cMemoObject.noteUIMemo.close()
End Sub
IsMailStationery
1S2S3S
Close
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Sub Click(Source As Button)
Call cMemoObject.SetActionInProgress(MEMO_CANCEL)'must alter constant meaning
Call cMemoObject.noteUIMemo.save()
Call cMemoObject.noteUIMemo.close()
End Sub
IsMailStationery
0S1S2S
Save And Close'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Sub Click(Source As Button)
Call cMemoObject.SetActionInProgress(MEMO_DRAFT)
Call cMemoObject.noteUIMemo.save()
Call cMemoObject.noteUIMemo.close()
End Sub
PostedDateh
IsMailStationery
7S8S9S10S13S14S15S16S
ForwardK
0S0E
ISMAILSTATIONERYh
0S0E
act_FORWARD.GIF|act_FORWARD?
Delete
0S0E
act_DELETE.GIF|act_DELETE?
Send'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Sub Click(Source As Button)
Call cMemoObject.SetActionInProgress(MEMO_SEND)
Call cMemoObject.noteUIMemo.save()
Call cMemoObject.noteUIMemo.close()
End Sub
PostedDateh
IsMailStationery
5S6S7S8S10S11S12S13S
act_SEND.GIF|act_SEND?
Send and File
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
tmpDisplayDate_PreviewTime/date memo was created or mailed.
tmpDisplayDate_Preview
tmpAlarmSounds
Path_Info
Path_Info
Query_String
Query_String
DialogMode
Calendar
0S0E
DialogMode
DialogMode
SignatureOption
Preference
SignatureOption
User configuration
SignatureOption
Owner of this mail file:
SignatureOption
SignatureOption
Owner
Owner
Default Mail:
DefaultMailOpt
Send Only|1Send and Save|2Save as Draft|3
SignatureOption
Exclude attachments on:
$AttachmentOption
Reply with History|1Forwarded documents|2
SpellCheck
Automatic Spell Checking|1z
SpellCheck
FormatReplies
Formatted Replies with an offset character|1
FormatReplies
OffSetChar
>|1<|2<<|3>>|4z
OffSetChar
Preferences
Default Security
SignMail
Sign|1z
SignMail
EncryptSentMail
Encrypt Sent Mail|1z
EncryptSentMail
EncryptSavedMail
Encrypt Saved Mail|1z
EncryptSavedMail
SignatureOption
Internet message format
SignatureOption
SignatureOption
Message format for email sent to internet recipients not listed in the Domino directory.
MIMEFormat
HTML Only|0Plain Text Only|1HTML and Plain Text|2
MIMEFormat
The settings in this panel specify delivery defaults. You can over-ride these defaults when you create a new memo by choosing 'Delivery options' in the new memo.
Security
DefaultLogo%
Bouncy Earth|StdNotesLtr1Buck Rogers Mail|StdNotesLtr2Centered and Bold|StdNotesLtr3Decco|StdNotesLtr4Falling Spheres|StdNotesLtr5First Initial|StdNotesLtr6Frank Lloyd|StdNotesLtr7From The Desk|StdNotesLtr8Gateway|StdNotesLtrGatewayGeometry |StdNotesLtr9Gray Gradient with Lines|StdNotesLtr13Green and Yellow Diamond|StdNotesLtr14Leaves|StdNotesLtr37Lightning Storm | StdNotesLtr36Marquee|StdNotesLtr34Metal Plate|StdNotesLtr15PC Board|StdNotesLtr40Pencil and Grid|StdNotesLtr16Plain Text|StdNotesLtr0Pony Express|StdNotesLtr17Primitive | StdNotesLtr38Purple Geometry|StdNotesLtr18Reversed Teal|StdNotesLtr20Slashed Lines with Globe|StdNotesLtr21Squiggle with Backdrop|StdNotesLtr22Squiggly Line|StdNotesLtr23Tacks|StdNotesLtr24Tape|StdNotesLtr25Teal and Yellow Lines|StdNotesLtr26Three Dimensional Relief|StdNotesLtr27Torn Paper|StdNotesLtr28Triangle with Dots 1|StdNotesLtr29Triangle with Dots 2|StdNotesLtr30Triangles | StdNotesLtr35Waves | StdNotesLtr39Wild Confetti|StdNotesLtr32Yellow Gradient|StdNotesLtr33z
LetterHeadChoices
SignatureOption
tmpDisplayFrom_Preview
DisplayFrom_Preview
DisplayFrom_Preview
PostedDateh
PostedDate
7S9S
tmpDisplayDate_Preview_1Time/date memo was created or mailed.
tmpDisplayDate_Preview_1
DefaultLogo
Letterhead
EnableSignature
Automatically append signature to my outgoing e-mail messages|1z
EnableSignature
SignatureOption
Text|1File|2
SignatureOption
2S3S
File:
Signature_2
SignatureOption
2S3S
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
Static Source As BUTTON
Set Source = Bind(Objectname_)
On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Do not automatically process meeting requests|DAutoprocess meeting requests from all users|0Autoprocess meeting requests from the following users|2Forward meeting requests to the following person|1
AutoprocessLevel
1S2S
AutoprocessUserList
AutoprocessLevel
1S2S
Size=40
AutoprocessForward
AutoRemoveFromInbox
Remove event requests from my Inbox after I respond to them|1
PreventRepliesFromInbox
Prevent event replies from appearing in my Inbox|1
Autoprocess
Only the following users can request my free time information:
AllowBusyAccess
TaskFollow
Tasks display on my calendar from day-to-day|1
Calendar
Calendar
The following people/groups can:
Read my mail and read my calendar:
ReadMailz
ReadMail
Read and send mail on my behalf and read my calendar:
WriteMail
WriteMail
Read, send, and edit any document in my mail file:
EditMailz
EditMail
Delete mail and calendar entries (allowed for those who can send or edit mail)
DeleteMailz
DeleteMail
*Other (Designer or Manager)
.,$, , :
OtherUsers
0S0E
OtherUsers
*These entries cannot be modified from this dialog
Mail Delegation
Calendar Read Accesss
PublicRead
3S4S
PublicRead
Everyone can read my calendar|1Only the following people/groups can read my calendar|0
PublicRead
1S2S
ReadCalendar
Calendar Create/Edit Access
PublicWrite
3S4S
PublicWrite
Everyone can manage my calendar|1Only the following people/groups can manage my calendar|0
PublicWrite
1S2S
WriteCalendar
Calendar Delegation
Delegation
Owner
$BusyName
$NoPurge
$NoPurge
Sunday
Monday
Tuesday
Wednesday
Thursday
Friday
Saturday
0S0E
$AvailableDays
$PublicAccess
$CSVersion
Categori_zeK
_Edit Document
Send Docu_ment
_Forward
_Move To Folder...
_Remove From FolderK
Save & Close<
0S0E
Discard ChangesKF
SaveOptions
1S2S3S
Categori_zeK
_Edit Document
Send Docu_ment
_Forward
_Move To Folder...
_Remove From FolderK
Save & Close<
0S0E
Discard ChangesKF
SaveOptions
1S2S3S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$Info
$WEBQuerySave
$WEBQueryOpen
$AppHelpFormula
$WebFlags
$Script
$$Script_O
$$ScriptName
$$SignatureOption
$SignatureOption_O
$$Signature_2
$Signature_2_O
$$Signature_1
$Signature_1_O
$$Signature
$Signature_O
$Times1
$Times2
$Times3
$Times4
$Times5
$Times6
$Times7
AppointmentLead
ReminderLead
EventLead
AnniversaryLead
TaskLead
DefaultDuration
AutoAnniversaryRepeat
CalendarTimeSlotStart
CalendarTimeSlotEnd
$NoPurge
$Body
$V5ACTIONS
$ACTIONS
$PublicAccess
Lotus Product
OBJECT
(C&S DeliveryOptions)
Broadcast
I do not want to receive replies from participants|1
Sign|1
PreventCounter
Prevent counter-proposing|1
Encrypt
Encrypt|1
PreventDelegate
Prevent delegating|1
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$TITLE
$Info
$$Script_O
$$ScriptName
$Body
$PublicAccess
synch
0S0E
AdminFileName
admin4.nsf
CurrentServer
AdminPExist
CurrentServer
AdminFileName
AdminPAccess
CurrentServer
AdminFileName
AdminPAccessLevel
AdminPAccess
AdminPCreateAccess
AdminPAccess
CurrentServer
AdminFileName
CalendarProfile
PublicRead
CalendarProfile
ReadCalendar
CalendarProfile
PublicWrite
CalendarProfile
WriteCalendar
CalendarProfile
ReadMail
CalendarProfile
WriteMail
CalendarProfile
EditMail
CalendarProfile
DeleteMail
CalendarProfile
Owner
0R16R23R30R37R44R51R58R65S68R72S80S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$TITLE
$AssistType
$AssistLastRun
$AssistDocCount
$AssistFlags
$AssistTrigger
$AssistInfo
$AssistQuery
$AssistAction
$AssistAction_Ex
Lotus Product
(DeleteSentDlg)
0S0E
Cancel
Action
You are about to delete the selected document(s) from the Sent view. This action will delete the selected document(s) from
folders they belong to.
Would you like to continue deleting these documents or remove them from the Sent view instead?
'the next two fields (Enabled and JustDelete) are a special case, as the field names mean the exact opposite from the field labels on the archive dialog box.
'The item names in the note better reflect the functionality
Subject used for displaying the form name in the views
Archive Profile
Subject
Subject
Name of profile form
DNT -- This is the name of the profile document, needed by the Notes code.
Archive Profile
ProfileFormName
ProfileFormName
server or "" for local. Set via the profile doc. Defaults to server for web.
ProfileFormName
ArchiveLocation
ArchiveLocation
ArchiveLocation
Archive docs. from the replica on this server. On the web, this value is always the name of the server where the db resides (set via profile note; defaults to the name of the server, for web users)
ProfileFormName
ArchivingServer
ArchivingServer
ArchivingServer
server-location of the archival database. (set via profile note; defaults to the name of the server, for web users)
size = 35
ProfileFormName
ArchiveServer
1S2S6S
ArchiveServer
ArchiveServer
form never gets saved. used only to set values in the profile note.
SaveOptions
These two field names have the opposite meaning to their functionality. The fields EnableArchiving and OnlyDeleteDocuments correspond to each of these fields, respectively.
ProfileFormName
JustDelete
JustDeletez
JustDelete
ProfileFormName
IgnoreChildren
IgnoreChildrenz
IgnoreChildren
ProfileFormName
Enabled
Enabled
Archive documents from the database on | Yes
Enabled
LocalTxt
Local
1S2S
ArchivingServer
0RR1S2S6S
LocalTxt
0R3S4S6S8S
dspArchivingServer
Enabled
1S2S
......
ProfileFormName
ArchiveInactive
ArchiveInactive
Archive documents which have no activity after | Yes
ArchiveInactive
Enabled
1S2S
.....
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Archive documents which have no activity after
size = 5
ProfileFormName
DocumentLife
DocumentLifez
DocumentLife
days
......
ProfileFormName
ArchiveModified
ArchiveModified
Archive documents that have not been modified after | Yesz
ArchiveModified
......
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Archive documents that have not been modified after
size = 5
ProfileFormName
ModifiedLife
ModifiedLifez
ModifiedLife
days
......
ProfileFormName
ArchiveExpired
ArchiveExpired
Archive documents that have expired after | Yes
ArchiveExpired
......
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Archive documents that have expired after
size = 5
ProfileFormName
ExpiredLife
ExpiredLife
ExpiredLife
days
......
OnlyDeleteDocuments
Do not archive a document until all of its responses have been archived | Yes
......
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Do not archive a document until all of its responses have been archived
......
EnableArchiving
Archive documents to | Yes
......
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Archive documents to
Enabled
1S2S
.............
Archve Location
Enabled
1S2S
.............
Archive Location
LocalTxt
Local
1S2S
ArchiveServer
0RR1S2S6S
LocalTxt
0R3S4S6S8S
dspArchiveServer
.............
Archive Database
.............
Archive Database
size = 35
ProfileFormName
ArchivePath
ArchivePath
ArchivePath
size = 35
ArchivePath
dspArchivePathz
dspArchivePath
.............
ProfileFormName
ArchiveLog
3S4S
ArchiveLog
Log Activity to | Yes
ArchiveLog
.............
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
Log Activity to
size=35
ProfileFormName
ArchiveLogDBPath
3S4S
ArchiveLogDBPathz
ArchiveLogDBPath
size=35
ArchiveLogDBPath
dspArchiveLogDBPath
dspArchiveLogDBPath
0S0E
Save Settings
New Button
Need a newer version of Notes to execute this button.
0S0E
window.close(self)
Cancel
Categori_zeK
_Edit Document
Send Docu_ment
_Forward
_Move To Folder...
_Remove From FolderK
Categori_zeK
_Edit Document
Send Docu_ment
_Forward
_Move To Folder...
_Remove From FolderK
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$Info
$WINDOWTITLE
$WEBQuerySave
$WEBQueryOpen
$WebFlags
$$ScriptName
DocumentLife
ModifiedLife
ExpiredLife
$Body
$V5ACTIONS
$ACTIONS
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
Use "WebLib"
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Initialize
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:Initialize:1:10
Sub Initialize
IsWebClient = True
Call wInstantiateObjectVariables
Call wGetCalendarProfile
On Error Goto ErrorRoutine
note.removeitem("Path_Info")
'Just need to move the existing subject field value into this forwarded memo form
'Get existing memo which we just came from -- memo to be forwarded