PREAPO3 ;BIR/RTR - Identify AMPL users for patch PREA*1*3; OCT 16, 2020
Source file <PREAPO3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Identify AMPL Users - called from the PREA AMPL GUI ACCESS option
|
|
RUN | ;Run job
|
|
TASK | ;Task Job
|
|
CLEAN | ;Kill TMP Globals
|
|
ASK | ;User prompts
|
|
TEST | ;Test account
|
|
;Send mail message
|
||
SETTMP | ;Set TMP global data
|
|
USER | ;Find users to get AMPL access
|
|
ADD(PREAUSE1) | ;User gets access, add to TMP global
|
|
ACTIVE(PREAINAC) | ;Check if user is inactive
|
|
PER(PREAUSE2) | ;Person Class check
|
|
MAILF | ;Send final mail message
|
|
DATE() | ;Returns Date/Time
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GETS^DIQ |