;** MODULE $MAILDEF **
;
; Definitions needed for callable mail.
;
;
; NOTE: New item codes must be appended to the end of
;       each category so users will not have to relink.
;       We allow 1024 entries in eatch category.
;
;	Adapted from MAILDEF.FOR to MAILDEF.DIB for VAX Dibol
;		13-June-1989 MFD
;
;
; Send input codes
;
LITERAL
MAIL$_SEND_SPARE_0		,I4,1
MAIL$_SEND_FOREIGN		,I4,2    ; Send foreign format message
MAIL$_SEND_CC_LINE		,I4,3    ; CC text specification
MAIL$_SEND_DEFAULT_NAME		,I4,4    ; Default file name for send
MAIL$_SEND_DEFAULT_TRANSPORT	,I4,5    ; Default transport used for addressees
MAIL$_SEND_ERROR_ENTRY		,I4,6    ; Entry point for send error routine
MAIL$_SEND_FILENAME		,I4,7    ; Specification of file name to send
MAIL$_SEND_FROM_LINE		,I4,8    ; From text specification
MAIL$_SEND_NO_DEFAULT_TRANSPORT	,I4,9    ; Don't use any default transport on send
MAIL$_SEND_PERS_NAME		,I4,10   ; Personal name text for message
MAIL$_SEND_RECORD		,I4,11   ; Record to be sent
MAIL$_SEND_RESULTSPEC		,I4,12   ; Resultant filespec bodypart
MAIL$_SEND_SERVER		,I4,13   ; Operate in server mode (signal success)
MAIL$_SEND_SUBJECT		,I4,14   ; Subject text specification
MAIL$_SEND_SUCCESS_ENTRY	,I4,15   ; Entry point for send success routine 
MAIL$_SEND_TO_LINE		,I4,16   ; To line text specification
MAIL$_SEND_UFLAGS		,I4,17   ; User flags (for header) to send
MAIL$_SEND_USER_DATA		,I4,18   ; User specified context for action routines
MAIL$_SEND_USERNAME		,I4,19   ; Username to add to the "To" list
MAIL$_SEND_USERNAME_TYPE	,I4,20   ; Username type - TO or CC
MAIL$_SEND_FID			,I4,21   ; FID of file to send
MAIL$_SEND_NO_PERS_NAME		,I4,22   ; Send message without personal name
MAIL$_SEND_IN_SPARE3		,I4,23
MAIL$_SEND_IN_SPARE4		,I4,24
MAIL$_SEND_IN_SPARE5		,I4,25
;
; Send output codes
;
MAIL$_SEND_COPY_REPLY		,I4,26   ; Copy self reply set in profile
MAIL$_SEND_COPY_SEND		,I4,27   ; Copy self send  set in profile
MAIL$_SEND_USER			,I4,28   ; Username of caller
MAIL$_SEND_COPY_FORWARD		,I4,29   ; Copy self forward set in profile
MAIL$_SEND_OUT_SPARE2		,I4,30
MAIL$_SEND_OUT_SPARE3		,I4,31
MAIL$_SEND_OUT_SPARE4		,I4,32
MAIL$_SEND_OUT_SPARE5		,I4,33
MAIL$K_SEND_MIN_ITEM		,I4,1
MAIL$K_SEND_MAX_ITEM		,I4,33
MAIL$K_SEND_ITEMS		,I4,33
;
; file input codes
;
MAIL$_MAILFILE_SPARE_0		,I4,1025
MAIL$_MAILFILE_DEFAULT_NAME	,I4,1026  ; Default filespec to open
MAIL$_MAILFILE_FOLDER_ROUTINE	,I4,1027  ; Entry point of routine to process foldernames
MAIL$_MAILFILE_FULL_CLOSE	,I4,1028  ; Do a PURGE, CONVERT/RECLAIM if necessary on close
MAIL$_MAILFILE_NAME		,I4,1029  ; File spec to open
MAIL$_MAILFILE_RECLAIM		,I4,1030  ; Do RECLAIM on PURGE command
MAIL$_MAILFILE_USER_DATA	,I4,1031  ; User specified context for action routines
MAIL$_MAILFILE_WASTEBASKET_NAME	,I4,1032  ; New wastebasket name for file
MAIL$_MAILFILE_IN_SPARE1	,I4,1033
MAIL$_MAILFILE_IN_SPARE2	,I4,1034
MAIL$_MAILFILE_IN_SPARE3	,I4,1035
MAIL$_MAILFILE_IN_SPARE4	,I4,1036
MAIL$_MAILFILE_IN_SPARE5	,I4,1037
MAIL$_MAILFILE_IN_SPARE6	,I4,1038
MAIL$_MAILFILE_IN_SPARE7	,I4,1039
MAIL$_MAILFILE_IN_SPARE8	,I4,1040
MAIL$_MAILFILE_IN_SPARE9	,I4,1041
MAIL$_MAILFILE_IN_SPARE10	,I4,1042
MAIL$_MAILFILE_IN_SPARE11	,I4,1043
MAIL$_MAILFILE_IN_SPARE12	,I4,1044
MAIL$_MAILFILE_IN_SPARE13	,I4,1045
MAIL$_MAILFILE_IN_SPARE14	,I4,1046
MAIL$_MAILFILE_IN_SPARE15	,I4,1047
MAIL$_MAILFILE_IN_SPARE16	,I4,1048
MAIL$_MAILFILE_IN_SPARE17	,I4,1049
MAIL$_MAILFILE_IN_SPARE18	,I4,1050
MAIL$_MAILFILE_IN_SPARE19	,I4,1051
MAIL$_MAILFILE_IN_SPARE20	,I4,1052
;
; file output codes
;
MAIL$_MAILFILE_DATA_RECLAIM	,I4,1053  ; Number of data buckets reclaimed
MAIL$_MAILFILE_DATA_SCAN	,I4,1054  ; Number of data buckets scanned
MAIL$_MAILFILE_DELETED_BYTES	,I4,1055  ; Number of free bytes in mail file
MAIL$_MAILFILE_INDEX_RECLAIM	,I4,1056  ; Number of index buckets reclaimed
MAIL$_MAILFILE_MAIL_DIRECTORY	,I4,1057  ; Mail sub-directory specification
MAIL$_MAILFILE_MESSAGES_DELETED	,I4,1058  ; Number of messages deleted
MAIL$_MAILFILE_RESULTSPEC	,I4,1059  ; Resultant file spec
MAIL$_MAILFILE_TOTAL_RECLAIM	,I4,1060  ; Total buckets reclaimed
MAIL$_MAILFILE_WASTEBASKET	,I4,1061  ; Wastebasket name
MAIL$_MAILFILE_INDEXED		,I4,1062  ; ISAM file
MAIL$_MAILFILE_OUT_SPARE2	,I4,1063
MAIL$_MAILFILE_OUT_SPARE3	,I4,1064
MAIL$_MAILFILE_OUT_SPARE4	,I4,1065
MAIL$_MAILFILE_OUT_SPARE5	,I4,1066
MAIL$_MAILFILE_OUT_SPARE6	,I4,1067
MAIL$_MAILFILE_OUT_SPARE7	,I4,1068
MAIL$_MAILFILE_OUT_SPARE8	,I4,1069
MAIL$_MAILFILE_OUT_SPARE9	,I4,1070
MAIL$_MAILFILE_OUT_SPARE10	,I4,1071
MAIL$_MAILFILE_OUT_SPARE11	,I4,1072
MAIL$_MAILFILE_OUT_SPARE12	,I4,1073
MAIL$_MAILFILE_OUT_SPARE13	,I4,1074
MAIL$_MAILFILE_OUT_SPARE14	,I4,1075
MAIL$_MAILFILE_OUT_SPARE15	,I4,1076
MAIL$_MAILFILE_OUT_SPARE16	,I4,1077
MAIL$_MAILFILE_OUT_SPARE17	,I4,1078
MAIL$_MAILFILE_OUT_SPARE18	,I4,1079
MAIL$_MAILFILE_OUT_SPARE19	,I4,1080
MAIL$_MAILFILE_OUT_SPARE20	,I4,1081
MAIL$K_MAILFILE_MIN_ITEM	,I4,1025
MAIL$K_MAILFILE_MAX_ITEM	,I4,1081
MAIL$K_MAILFILE_ITEMS		,I4,57
;
; message input codes
;
MAIL$_MESSAGE_SPARE_0		,I4,2048
MAIL$_MESSAGE_BACK		,I4,2049  ; Get previous message
MAIL$_MESSAGE_BEFORE		,I4,2050  ; Select messages BEFORE date
MAIL$_MESSAGE_CC_SUBSTRING	,I4,2051  ; Select messages containing CC substring
MAIL$_MESSAGE_CONTINUE		,I4,2052  ; Read next record
MAIL$_MESSAGE_FILE_ACTION	,I4,2053  ; File create action routine
MAIL$_MESSAGE_FOLDER_ACTION	,I4,2054  ; Folder create action routine
MAIL$_MESSAGE_DEFAULT_NAME	,I4,2055  ; Default file name
MAIL$_MESSAGE_DELETE		,I4,2056  ; Delete message
MAIL$_MESSAGE_ERASE		,I4,2057  ; Erase message
MAIL$_MESSAGE_FILE_CTX		,I4,2058  ; File level context
MAIL$_MESSAGE_FILENAME		,I4,2059  ; File name specification
MAIL$_MESSAGE_FLAGS		,I4,2060  ; Header flags specification
MAIL$_MESSAGE_FOLDER		,I4,2061  ; Folder name specification
MAIL$_MESSAGE_FROM_SUBSTRING	,I4,2062  ; Select messages containing FROM substring
MAIL$_MESSAGE_ID		,I4,2063  ; ID of message
MAIL$_MESSAGE_NEXT		,I4,2064  ; Retrive NEXT message
MAIL$_MESSAGE_SINCE		,I4,2065  ; Select messages SINCE date
MAIL$_MESSAGE_SUBJ_SUBSTRING	,I4,2066  ; Select messages containing SUBJ substring
MAIL$_MESSAGE_TO_SUBSTRING	,I4,2067  ; Select messages containing TO substring
MAIL$_MESSAGE_UFLAGS		,I4,2068  ; User flags specification
MAIL$_MESSAGE_AUTO_NEWMAIL	,I4,2069  ; Move newmail to MAIL auto
MAIL$_MESSAGE_USER_DATA		,I4,2070  ; User context for action routines
MAIL$_MESSAGE_FLAGS_MBZ		,I4,2071  ; Select messages with these flags set at zero
MAIL$_MESSAGE_MIN_CLASS		,I4,2072  ; Min access class for message
MAIL$_MESSAGE_MAX_CLASS		,I4,2073  ; Max access class for message
MAIL$_MESSAGE_IN_SPARE1		,I4,2074
MAIL$_MESSAGE_IN_SPARE2		,I4,2075
MAIL$_MESSAGE_IN_SPARE3		,I4,2076
MAIL$_MESSAGE_IN_SPARE4		,I4,2077
MAIL$_MESSAGE_IN_SPARE5		,I4,2078
MAIL$_MESSAGE_IN_SPARE6		,I4,2079
MAIL$_MESSAGE_IN_SPARE7		,I4,2080
MAIL$_MESSAGE_IN_SPARE8		,I4,2081
MAIL$_MESSAGE_IN_SPARE9		,I4,2082
MAIL$_MESSAGE_IN_SPARE10	,I4,2083
MAIL$_MESSAGE_IN_SPARE11	,I4,2084
MAIL$_MESSAGE_IN_SPARE12	,I4,2085
MAIL$_MESSAGE_IN_SPARE13	,I4,2086
MAIL$_MESSAGE_IN_SPARE14	,I4,2087
MAIL$_MESSAGE_IN_SPARE15	,I4,2088
MAIL$_MESSAGE_IN_SPARE16	,I4,2089
MAIL$_MESSAGE_IN_SPARE17	,I4,2090
MAIL$_MESSAGE_IN_SPARE18	,I4,2091
MAIL$_MESSAGE_IN_SPARE19	,I4,2092
MAIL$_MESSAGE_IN_SPARE20	,I4,2093
;
; message output codes
;
MAIL$_MESSAGE_CC		,I4,2094  ; CC text of message
MAIL$_MESSAGE_CURRENT_ID	,I4,2095  ; ID of current message
MAIL$_MESSAGE_DATE		,I4,2096  ; Date of current message
MAIL$_MESSAGE_EXTID		,I4,2097  ; Filespec of external message
MAIL$_MESSAGE_FILE_CREATED	,I4,2098  ; Mailfile created...
MAIL$_MESSAGE_FOLDER_CREATED	,I4,2099  ; Folder created...
MAIL$_MESSAGE_FROM		,I4,2100  ; From text of message
MAIL$_MESSAGE_RECORD		,I4,2101  ; Record from message
MAIL$_MESSAGE_RECORD_TYPE	,I4,2102  ; Type of record, header or text
MAIL$_MESSAGE_REPLY_PATH	,I4,2103  ; Reply path of sender
MAIL$_MESSAGE_RESULTSPEC	,I4,2104  ; Resultant file spec
MAIL$_MESSAGE_RETURN_FLAGS	,I4,2105  ; Message header system flags
MAIL$_MESSAGE_RETURN_UFLAGS	,I4,2106  ; Message header user flags
MAIL$_MESSAGE_SELECTED		,I4,2107  ; Number of messages selected
MAIL$_MESSAGE_SENDER		,I4,2108  ; Sender name
MAIL$_MESSAGE_SIZE		,I4,2109  ; Size of the current message
MAIL$_MESSAGE_SUBJECT		,I4,2110  ; Subject text of the message
MAIL$_MESSAGE_TO		,I4,2111  ; To text of the message
MAIL$_MESSAGE_BUFFER		,I4,2112  ; Buffer address
MAIL$_MESSAGE_RETURN_CLASS	,I4,2113  ; Class of current message
MAIL$_MESSAGE_BINARY_DATE	,I4,2114  ; Binary date/time quadword
MAIL$_MESSAGE_SPARE4		,I4,2115
MAIL$_MESSAGE_SPARE5		,I4,2116
MAIL$_MESSAGE_SPARE6		,I4,2117
MAIL$_MESSAGE_SPARE7		,I4,2118
MAIL$_MESSAGE_SPARE8		,I4,2119
MAIL$_MESSAGE_SPARE9		,I4,2120
MAIL$_MESSAGE_SPARE10		,I4,2121
MAIL$_MESSAGE_SPARE11		,I4,2122
MAIL$_MESSAGE_SPARE12		,I4,2123
MAIL$_MESSAGE_SPARE13		,I4,2124
MAIL$_MESSAGE_SPARE14		,I4,2125
MAIL$_MESSAGE_SPARE15		,I4,2126
MAIL$_MESSAGE_SPARE16		,I4,2127
MAIL$_MESSAGE_SPARE17		,I4,2128
MAIL$_MESSAGE_SPARE18		,I4,2129
MAIL$_MESSAGE_SPARE19		,I4,2130
;
; Constants returned
;
MAIL$_MESSAGE_NULL		,I4,2131  ; Null bodypart
MAIL$_MESSAGE_HEADER		,I4,2132  ; Header record returned
MAIL$_MESSAGE_TEXT		,I4,2133  ; Text record returned
MAIL$_MESSAGE_SPARE20		,I4,2134
MAIL$K_MESSAGE_MIN_ITEM		,I4,2048
MAIL$K_MESSAGE_MAX_ITEM		,I4,2134
MAIL$K_MESSAGE_ITEMS		,I4,87
;
; user input codes
;
MAIL$_USER_SPARE_0		,I4,3072
MAIL$_USER_FIRST		,I4,3073  ; Retrive first user record
MAIL$_USER_NEXT			,I4,3074  ; Retrive next user record
MAIL$_USER_USERNAME		,I4,3075  ; Retrive record for username
MAIL$_USER_SET_AUTO_PURGE	,I4,3076  ; Set auto-purge
MAIL$_USER_SET_NO_AUTO_PURGE	,I4,3077  ; Clear auto-purge
MAIL$_USER_SET_SUB_DIRECTORY	,I4,3078  ; Set sub-dir field
MAIL$_USER_SET_NO_SUB_DIRECTORY	,I4,3079  ; Clear sub-dir field
MAIL$_USER_SET_FORWARDING	,I4,3080  ; Set forwarding address
MAIL$_USER_SET_NO_FORWARDING	,I4,3081  ; Clear forwarding address
MAIL$_USER_SET_PERSONAL_NAME	,I4,3082  ; Set personal name
MAIL$_USER_SET_NO_PERSONAL_NAME	,I4,3083  ; Clear personal name
MAIL$_USER_SET_COPY_SEND	,I4,3084  ; Set copy-send
MAIL$_USER_SET_NO_COPY_SEND	,I4,3085  ; Clear copy send
MAIL$_USER_SET_COPY_REPLY	,I4,3086  ; Set copy reply
MAIL$_USER_SET_NO_COPY_REPLY	,I4,3087  ; Clear copy reply
MAIL$_USER_SET_NEW_MESSAGES	,I4,3088  ; Set new message count
MAIL$_USER_CREATE_IF		,I4,3089  ; Create record if does not exist
MAIL$_USER_SET_MAILPLUS		,I4,3090  ; Set M+
MAIL$_USER_SET_NO_MAILPLUS	,I4,3091  ; Clear M+
MAIL$_USER_SET_TRANSPORT	,I4,3092  ; Set transport field
MAIL$_USER_SET_NO_TRANSPORT	,I4,3093  ; Clear transport field
MAIL$_USER_SET_EDITOR		,I4,3094  ; Set editor field
MAIL$_USER_SET_NO_EDITOR	,I4,3095  ; Clear editor field
MAIL$_USER_SET_QUEUE		,I4,3096  ; Set queue field
MAIL$_USER_SET_NO_QUEUE		,I4,3097  ; Clear queue field
MAIL$_USER_SET_USER1		,I4,3098  ; Set user1 field
MAIL$_USER_SET_NO_USER1		,I4,3099  ; Clear user1 field
MAIL$_USER_SET_USER2		,I4,3100  ; Set user2 field
MAIL$_USER_SET_NO_USER2		,I4,3101  ; Clear user2 field
MAIL$_USER_SET_USER3		,I4,3102  ; Set user3 field
MAIL$_USER_SET_NO_USER3		,I4,3103  ; Clear user3 field
MAIL$_USER_SET_FORM		,I4,3104  ; Set form field
MAIL$_USER_SET_NO_FORM		,I4,3105  ; Clear form field
MAIL$_USER_SET_COPY_FORWARD	,I4,3106  ; Set copy self forward
MAIL$_USER_SET_NO_COPY_FORWARD	,I4,3107  ; Clear copy self forward
MAIL$_USER_SET_CC_PROMPT	,I4,3108  ; Set CC prompting
MAIL$_USER_SET_NO_CC_PROMPT	,I4,3109  ; Clear CC prompting
MAIL$_USER_SET_SPARE3		,I4,3110
MAIL$_USER_SET_NO_SPARE3	,I4,3111
MAIL$_USER_IN_SPARE1		,I4,3112
MAIL$_USER_IN_SPARE2		,I4,3113
MAIL$_USER_IN_SPARE3		,I4,3114
MAIL$_USER_IN_SPARE4		,I4,3115
MAIL$_USER_IN_SPARE5		,I4,3116
MAIL$_USER_IN_SPARE6		,I4,3117
MAIL$_USER_IN_SPARE7		,I4,3118
MAIL$_USER_IN_SPARE8		,I4,3119
MAIL$_USER_IN_SPARE9		,I4,3120
MAIL$_USER_IN_SPARE10		,I4,3121
MAIL$_USER_IN_SPARE11		,I4,3122
MAIL$_USER_IN_SPARE12		,I4,3123
MAIL$_USER_IN_SPARE13		,I4,3124
MAIL$_USER_IN_SPARE14		,I4,3125
MAIL$_USER_IN_SPARE15		,I4,3126
MAIL$_USER_IN_SPARE16		,I4,3127
MAIL$_USER_IN_SPARE17		,I4,3128
MAIL$_USER_IN_SPARE18		,I4,3129
MAIL$_USER_IN_SPARE19		,I4,3130
MAIL$_USER_IN_SPARE20		,I4,3131
;
; Output item parameters
;
MAIL$_USER_MAILPLUS		,I4,3132  ; M+ field
MAIL$_USER_TRANSPORT		,I4,3133  ; Transport field
MAIL$_USER_EDITOR		,I4,3134  ; Editor field
MAIL$_USER_QUEUE		,I4,3135  ; Queue field
MAIL$_USER_USER1		,I4,3136  ; User1 field
MAIL$_USER_USER2		,I4,3137  ; User2 field
MAIL$_USER_USER3		,I4,3138  ; User3 field
MAIL$_USER_FORM			,I4,3139  ; Form field
MAIL$_USER_COPY_FORWARD		,I4,3140  ; Copy forward flag
MAIL$_USER_SPARE3		,I4,3141
MAIL$_USER_RETURN_USERNAME	,I4,3142  ; Username of current record
MAIL$_USER_AUTO_PURGE		,I4,3143  ; Auto purge flag
MAIL$_USER_SUB_DIRECTORY	,I4,3144  ; Sub-dir spec
MAIL$_USER_FULL_DIRECTORY	,I4,3145  ; Full directory spec
MAIL$_USER_NEW_MESSAGES		,I4,3146  ; New message count
MAIL$_USER_FORWARDING		,I4,3147  ; Forwarding field
MAIL$_USER_PERSONAL_NAME	,I4,3148  ; Personal name field
MAIL$_USER_COPY_SEND		,I4,3149  ; Copy send flag
MAIL$_USER_COPY_REPLY		,I4,3150  ; Copy reply flag
MAIL$_USER_CAPTIVE		,I4,3151  ; User is captive
MAIL$_USER_CC_PROMPT		,I4,3152  ; CC prompting flag
MAIL$_USER_OUT_SPARE2		,I4,3153
MAIL$_USER_OUT_SPARE3		,I4,3154
MAIL$_USER_OUT_SPARE4		,I4,3155
MAIL$_USER_OUT_SPARE5		,I4,3156
MAIL$_USER_OUT_SPARE6		,I4,3157
MAIL$_USER_OUT_SPARE7		,I4,3158
MAIL$_USER_OUT_SPARE8		,I4,3159
MAIL$_USER_OUT_SPARE9		,I4,3160
MAIL$_USER_OUT_SPARE10		,I4,3161
MAIL$_USER_OUT_SPARE11		,I4,3162
MAIL$_USER_OUT_SPARE12		,I4,3163
MAIL$_USER_OUT_SPARE13		,I4,3164
MAIL$_USER_OUT_SPARE14		,I4,3165
MAIL$_USER_OUT_SPARE15		,I4,3166
MAIL$_USER_OUT_SPARE16		,I4,3167
MAIL$_USER_OUT_SPARE17		,I4,3168
MAIL$_USER_OUT_SPARE18		,I4,3169
MAIL$_USER_OUT_SPARE19		,I4,3170
MAIL$_USER_OUT_SPARE20		,I4,3171
MAIL$K_USER_MIN_ITEM		,I4,3072
MAIL$K_USER_MAX_ITEM		,I4,3171
MAIL$K_USER_ITEMS		,I4,100
;
; Special items
;
MAIL$_NOOP		,I4,4097  ; Do nothing - used for testing
MAIL$_NOSIGNAL		,I4,4098  ; Don't signal errors
MAIL$_NOPROB		,I4,4099  ; Don't probe the item list buffers          
MAIL$_TLD_INPUT		,I4,4100  ; This item is a tld to be used as input
MAIL$_TLD_OUTPUT	,I4,4101  ; This item describes a buffer to fill
;
; Username types for MAIL$send_add_address
;
MAIL$_TO	,I4,1      ; Address part of the TO line
MAIL$_CC	,I4,2      ; Address part of the CC line
MAIL$_SPARE1	,I4,3
MAIL$_SPARE2	,I4,4
;
; Define the flag values for mail system flags
;
MAIL$M_NEWMSG	,I4,%X(00000001)
MAIL$M_REPLIED	,I4,%X(00000002)
MAIL$M_DEL	,I4,%X(00000004)
MAIL$M_EXTMSG	,I4,%X(00000008)
MAIL$M_EXTFNF	,I4,%X(00000010)
MAIL$M_SYSMSG	,I4,%X(00000020)
MAIL$M_EXTNSTD	,I4,%X(00000040)
MAIL$M_MARKED	,I4,%X(00000080)
MAIL$M_RECMODE	,I4,%X(00000100)