You are here: Development Standards > Routines > General Routines > GENEMAIL.PUB

# GENEMAIL.PUB

GENEMAIL.PUB is a public program that performs several functions related to e-mail processing.

GET_INFORMATION:

This entry point prompts the user for from, to, CC, subject, and attachment information when sending e-mails when users select the EMAIL option when processing reports.

`1000 GET_INFORMATION:`
`1010 ENTER MSG$,OSGUI$`

Variable | Description
MSG$ | Set if unable to open file OSED
OSGUI$ | Standard graphical template

Exit Points | Explanation
EXIT | This callpiont does not normally return an error.

SEND_EMAIL_OLD:

This entry point is provided for the old e-mail interface, prior to implementation of the e-mail queues. This routine will take STBL variables that were set when the GET_INFORMATION call point was called, and send an e-mail from OSAS

`2200 SEND_EMAIL:`
`2205 ENTER MSG$,OSGUI$`

Variable | Description
MSG$ | Contains any error messages when trying to process email from mailcall.bb
OSGUI$ | Standard graphical template

Exit Points | Explanation
EXIT | This callpiont does not normally return an error.

PROCESS_EMAIL_QUEUE:

This entry point will take all e-mails in the OSQA and OSQE files, for the user ID found in STBL(“USERID”) and attempt to send them.

`3000 PROCESS_EMAIL_QUEUE:`
`3010 ENTER MSG$,OSGUI$`

Variable | Description
MSG$ | Contains any error messages when trying to process email from mailcall.bb
OSGUI$ | Standard graphical template

Exit Points | Explanation
EXIT | This callpiont does not normally return an error.

PROCESS_EMAIL_FROM_MENU:

This entry point, which is called from all menu types, will check if any e-mails exact for the current user ID found in STBL(“USERID”), and attempt to send them.

`4500 PROCESS_EMAIL_FROM_MENU`
`45010 ENTER MSG$,OSGUI$`

Variable | Description
MSG$ | Contains any error messages when trying to process email from mailcall.bb
OSGUI$ | Standard graphical template

Exit Points | Explanation
EXIT | This callpiont does not normally return an error.

VALIDATE_EMAIL:

This entry point will take an e-mail address and validate it for errors. The method used here is consistent with how Mailcall checks e-mail addresses for validity. Calling this routine before saving e-mail address should assure that they pass successfully thru Mailcall.

`5500 VALIDATE_EMAIL:`
`5510 ENTER EMAIL$,PASSFLAG,MSG$`

Variable | Description
EMAIL$ | E-mail address to validate
PASSFLAG | Set to 1 if e-mail address passes check
MSG$ | Error message returned if validation fails
OSGUI$ | Standard graphical template

Exit Points | Explanation
EXIT | This callpiont does not normally return an error.