/********************************************************************************************************************************/ /* Created: 9-Mar-2021 22:28:03 by OpenVMS SDL EV3-3 */ /* Source: 09-MAR-2021 22:28:01 $1$DGA8085:[STARLET_H.SRC]MAIL$ROUTINES.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE MAIL$ROUTINES IDENT X-1 ***/ #ifndef __MAIL_ROUTINES_LOADED #define __MAIL_ROUTINES_LOADED 1 #pragma __nostandard /* This file uses non-ANSI-Standard features */ #pragma __member_alignment __save #pragma __nomember_alignment #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __save /* Save the previously-defined required ptr size */ #pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */ #endif #ifdef __cplusplus extern "C" { #define __unknown_params ... #define __optional_params ... #else #define __unknown_params #define __optional_params ... #endif #ifndef __struct #if !defined(__VAXC) #define __struct struct #else #define __struct variant_struct #endif #endif #ifndef __union #if !defined(__VAXC) #define __union union #else #define __union variant_union #endif #endif /* */ /* */ /* This package defines the interfaces to the callable OpenVMS MAIL */ /* routines as documented in the OpenVMS Utility Routines Reference */ /* Manual. */ /* */ /* */ /* Mail File routines */ /* */ /* */ /* MAILFILE_BEGIN - Initiates mail file processing */ /* */ /* status = MAIL$MAILFILE_BEGIN (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_begin MAIL$MAILFILE_BEGIN #ifdef __NEW_STARLET unsigned int mail$mailfile_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_begin(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_CLOSE - Closes the currently open mail file */ /* */ /* status = MAIL$MAILFILE_CLOSE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_close MAIL$MAILFILE_CLOSE #ifdef __NEW_STARLET unsigned int mail$mailfile_close( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_close(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_COMPRESS - Compresses a mail file */ /* */ /* status = MAIL$MAILFILE_COMPRESS (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_compress MAIL$MAILFILE_COMPRESS #ifdef __NEW_STARLET unsigned int mail$mailfile_compress( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_compress(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_END - Terminates mail file processing */ /* */ /* status = MAIL$MAILFILE_END (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_end MAIL$MAILFILE_END #ifdef __NEW_STARLET unsigned int mail$mailfile_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_end(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_INFO_FILE - Obtains information about a specified mail file */ /* */ /* status = MAIL$MAILFILE_INFO_FILE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_info_file MAIL$MAILFILE_INFO_FILE #ifdef __NEW_STARLET unsigned int mail$mailfile_info_file( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_info_file(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_MODIFY - Modifies the information in an indexed mail file */ /* */ /* status = MAIL$MAILFILE_MODIFY (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_modify MAIL$MAILFILE_MODIFY #ifdef __NEW_STARLET unsigned int mail$mailfile_modify( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_modify(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_OPEN - Opens a specified mail file for processing */ /* */ /* status = MAIL$MAILFILE_OPEN (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_open MAIL$MAILFILE_OPEN #ifdef __NEW_STARLET unsigned int mail$mailfile_open( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_open(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MAILFILE_PURGE_WASTE - Purges the wastebasket of a mail file */ /* */ /* status = MAIL$MAILFILE_PURGE_WASTE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$mailfile_purge_waste MAIL$MAILFILE_PURGE_WASTE #ifdef __NEW_STARLET unsigned int mail$mailfile_purge_waste( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$mailfile_purge_waste(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* Message routines */ /* */ /* */ /* MESSAGE_BEGIN - Begin message processing */ /* */ /* status = MAIL$MESSAGE_BEGIN (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_begin MAIL$MESSAGE_BEGIN #ifdef __NEW_STARLET unsigned int mail$message_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_begin(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_COPY - Copies messages between files or folders */ /* */ /* status = MAIL$MESSAGE_COPY (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_copy MAIL$MESSAGE_COPY #ifdef __NEW_STARLET unsigned int mail$message_copy( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_copy(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_DELETE - Deletes a message */ /* */ /* status = MAIL$MESSAGE_DELETE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_delete MAIL$MESSAGE_DELETE #ifdef __NEW_STARLET unsigned int mail$message_delete( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_delete(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_END - Ends message processing */ /* */ /* status = MAIL$MESSAGE_END (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_end MAIL$MESSAGE_END #ifdef __NEW_STARLET unsigned int mail$message_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_end(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_GET - Retrieves a message from the set of selected messages */ /* */ /* status = MAIL$MESSAGE_GET (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_get MAIL$MESSAGE_GET #ifdef __NEW_STARLET unsigned int mail$message_get( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_get(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_INFO - Obtains information about a specified message */ /* */ /* status = MAIL$MESSAGE_INFO (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_info MAIL$MESSAGE_INFO #ifdef __NEW_STARLET unsigned int mail$message_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_info(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_MODIFY = Modifies message information */ /* */ /* status = MAIL$MESSAGE_MODIFY (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_modify MAIL$MESSAGE_MODIFY #ifdef __NEW_STARLET unsigned int mail$message_modify( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_modify(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* MESSAGE_SELECT - Selects messages from the current mail file */ /* */ /* status = MAIL$MESSAGE_SELECT (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$message_select MAIL$MESSAGE_SELECT #ifdef __NEW_STARLET unsigned int mail$message_select( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$message_select(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* Send routines */ /* */ /* */ /* SEND_ABORT - Cancels a current send operation */ /* */ /* status = MAIL$SEND_ABORT (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_abort MAIL$SEND_ABORT #ifdef __NEW_STARLET unsigned int mail$send_abort( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_abort(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_ADD_ADDRESS - Adds an address to the address list */ /* */ /* status = MAIL$SEND_ADD_ADDRESS (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_add_address MAIL$SEND_ADD_ADDRESS #ifdef __NEW_STARLET unsigned int mail$send_add_address( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_add_address(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_ADD_ATTRIBUTE - Adds an attribute to the current message */ /* */ /* status = MAIL$SEND_ADD_ATTRIBUTE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_add_attribute MAIL$SEND_ADD_ATTRIBUTE #ifdef __NEW_STARLET unsigned int mail$send_add_attribute( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_add_attribute(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_BEGIN - Initiates processing to send a message */ /* */ /* status = MAIL$SEND_BEGIN (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_begin MAIL$SEND_BEGIN #ifdef __NEW_STARLET unsigned int mail$send_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_begin(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_ADD_BODYPART - Builds the body of a message */ /* */ /* status = MAIL$SEND_ADD_BODYPART (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_add_bodypart MAIL$SEND_ADD_BODYPART #ifdef __NEW_STARLET unsigned int mail$send_add_bodypart( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_add_bodypart(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_END - Terminates send processing */ /* */ /* status = MAIL$SEND_END (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_end MAIL$SEND_END #ifdef __NEW_STARLET unsigned int mail$send_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_end(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* SEND_MESSAGE - Begins actual sending of a message */ /* */ /* status = MAIL$SEND_MESSAGE (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$send_message MAIL$SEND_MESSAGE #ifdef __NEW_STARLET unsigned int mail$send_message( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$send_message(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* User data base routines */ /* */ /* */ /* USER_BEGIN - Initiates access to the common user data base */ /* */ /* status = MAIL$USER_BEGIN (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$user_begin MAIL$USER_BEGIN #ifdef __NEW_STARLET unsigned int mail$user_begin( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$user_begin(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* USER_DELETE_INFO - Remove a user record from the common data base */ /* */ /* status = MAIL$USER_DELETE_INFO (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$user_delete_info MAIL$USER_DELETE_INFO #ifdef __NEW_STARLET unsigned int mail$user_delete_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$user_delete_info(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* USER_END - terminates access to the common user data base */ /* */ /* status = MAIL$USER_END (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$user_end MAIL$USER_END #ifdef __NEW_STARLET unsigned int mail$user_end( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$user_end(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* USER_GET_INFO - Obtains information about a user */ /* */ /* status = MAIL$USER_GET_INFO (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$user_get_info MAIL$USER_GET_INFO #ifdef __NEW_STARLET unsigned int mail$user_get_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$user_get_info(__unknown_params); #endif /* #ifdef __NEW_STARLET */ /* */ /* USER_SET_INFO - Adds or modifies information about a user */ /* */ /* status = MAIL$USER_SET_INFO (context, in_item_list, out_item_list) */ /* */ /* context - Context value */ /* in_item_list - Input item list */ /* out_item_list - Output item list */ /* */ #define mail$user_set_info MAIL$USER_SET_INFO #ifdef __NEW_STARLET unsigned int mail$user_set_info( unsigned int *context, unsigned int *in_item_list, unsigned int *out_item_list); #else /* __OLD_STARLET */ unsigned int mail$user_set_info(__unknown_params); #endif /* #ifdef __NEW_STARLET */ #pragma __member_alignment __restore #ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */ #pragma __required_pointer_size __restore /* Restore the previously-defined required ptr size */ #endif #ifdef __cplusplus } #endif #pragma __standard #endif /* __MAIL_ROUTINES_LOADED */