MailProjectMailCustomize Method

Customizes workgroup messages and published fields.

Syntax

expression**.MailProjectMailCustomize(Action, Position, FieldID, Title, IncludeInTeamStatus, Editable, UseAssignmentField)**

*expression   *     Optional. An expression that returns an Application object.

PjCustomizeMailAction

Position    Optional Long. If Action is pjMailStartFields, the number of fields. The value of Position must be greater than 6 to allow for other fields that are required. If Action is pjMailDefineField, the position of the field specified by FieldID. Required if Action is pjMailStartFields or pjMailDefineField.

PjMailField

Title    Due to changes in the Project object model, this argument no longer has an effect. It has been retained for backwards compatibility.

IncludeInTeamStatus    Optional Boolean. True if the fields specified with FieldID are included in TeamAssign and TeamStatus messages. False if the fields specified with FieldID are only included in TeamAssign messages. Required if Action is pjMailDefineField. The default value is True.

Editable    Optional Boolean. True if the field is editable by a resource. Required if Action is pjMailDefineField.

UseAssignmentField    Optional Boolean. True if Project sets the custom field type to Assignment. False if Project sets the custom field type to Task. The default value is False.

Remarks

The MailProjectMailCustomize method is available even when no projects are open.

Using the MailProjectMailCustomize method without specifying any arguments displays the Customize Published Fields dialog box.

Example

The following example first sets up how many fields will be defined (

Action:=pjMailStartFields

). The next set of lines define each field (

Action:=pjMailDefineField

). You must include the definitions of the default fields with the same values for the IncludeInTeamStatus and Editable arguments. The last line indicates that the definitions are complete (

Action:=pjMailEndFields

). It will check for the existence of the default fields and give a run-time error if they are not given.

Note  The default fields (Name, Work, Start, Finished, Completed and Remaining Work, and Comments) must be included in every workgroup message. The order of these fields can change, but their basic definition (Editable, IncludeInTeamStatus) must remain the same as the default.

Sub MailProjectMailCustomize()
    MailProjectMailCustomize Action:=pjMailStartFields, Position:=number of fields

                
 
MailProjectMailCustomize Action:=pjMailDefineField, Position:=1, FieldID:=constant, Title:="My Title"
    ...
    MailProjectMailCustomize Action:=pjMailDefineField, Position:=n, FieldID:=constant, Title:="another title"
    
    MailProjectMailCustomize Action:=pjMailEndFields
End Sub

Where

number of fields

is the number of fields in the message,

constant

is one of the PjMailField constants,

n

is the position of the field within the message, and

another title

is the title of a newly defined field.

Applies to | Application Object

See Also | MailPostDocument Method | ResourceAddressBook Method | ResourceDetails Method