XUSTERM ;SEA/AMF/WDE - DEACTIVATE USER ;10/01/18
Source file <XUSTERM.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Kernel | 2 | XUSERDEACT XUSTERM1 |
| Electronic Health Modernization | 1 | EHM-01793 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LKUP | ||
| WHEN | ||
| NOW | ||
| INQ | ;Ask to show User Inquiry
|
|
| GET | ;XUGRP=mail group, XUKEY=keys, XUSUR=mail surrogates, XUJ=# baskets, XUK=# mail msg, XUIN=# in-basket msg
|
|
| ACT | ;First let others clean-up, Then do our part.
|
|
| ACT1 | ||
| ACT2 | ;XUACT(5) All Mail access, Mail groups
|
|
| END | ||
| ;Remove mail access
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | WHEN+1 |
| ^DIC | LKUP+2 |
| ^DIE | ACT+7, ACT+15 |
| ^DIK | ACT1+2, ACT1+4, ACT1+6, ACT1+8, ACT1+10 |
| EN1^DIP | INQ+3 |
| $$GET1^DIQ | ACT+6 |
| ^DIR | NOW+1, INQ+2, INQ+4 |
| $$NOW^XLFDT | NOW+1 |
| TERMINAT^XMUTERM1 | MAIL+1 |
| $$GET^XPAR | ACT+12 |
| DELUSR^XPAR3 | ACT1+15 |
| TERM^XUA4A72 | ACT1+13 |
| D2^XUFILE1 | ACT1+11 |
| $$GET^XUPARAM | LKUP+4 |
| XUDIE^XUS5 | LKUP+4 |
| DEQUE^XUSERP | ACT+12, ACT+17 |
| SEND^XUSTERM1 | ACT+9 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | GET+2~, GET+10*, GET+11, GET+12 |
| BY | INQ+1~, INQ+3* |
| C | END! |
| D | END! |
| D0 | END! |
| DA | LKUP~, LKUP+4*, LKUP+5, GET+4*, ACT+2~, ACT+7*, ACT+15*, ACT+19*, ACT1+2*, ACT1+4* , ACT1+6*, ACT1+8*, ACT1+10*, ACT1+11*, END! |
| DA(1 | ACT1+2*, ACT1+4*, ACT1+6*, ACT1+8*, ACT1+10*, ACT1+11* |
| DI | END! |
| DIC | LKUP~, LKUP+1*, LKUP+2!, INQ+1~, INQ+3*!, ACT+2~, ACT+19!, END! |
| DIC("A" | LKUP+1* |
| DIC("S" | LKUP+1* |
| DIC(0 | LKUP+1* |
| DIE | LKUP+4*, ACT+2~, ACT+7*, ACT+15*, END! |
| >> DIK | ACT1+2*, ACT1+4*, ACT1+6*, ACT1+8*, ACT1+10* |
| DIR | LKUP~, INQ+1~, INQ+4!, END!, END+1! |
| DIR("??" | NOW* |
| DIR("A" | NOW*, INQ+2* |
| DIR("B" | NOW*, INQ+2* |
| DIR(0 | NOW*, INQ+2*, INQ+4* |
| DIRUT | LKUP~, LKUP+3, INQ+2, END+1! |
| DR | LKUP+4*, ACT+2~, ACT+7*, ACT+15*, END! |
| DT | LKUP+5 |
| FLDS | INQ+1~, INQ+3* |
| FR | INQ+1~, INQ+3* |
| >> I | GET+17*, GET+18, GET+19 |
| L | INQ+1~, INQ+3* |
| TO | INQ+1~, INQ+3* |
| U | LKUP+5, NOW+1, GET+4, GET+6, GET+7, GET+8, GET+11, GET+12, GET+15, GET+18 , GET+24, ACT+19, ACT1+2 |
| >> X | NOW+1 |
| XU10 | GET+2~, GET+3*, GET+8*, GET+21, GET+22 |
| XU11 | GET+2~, GET+3*, GET+8*, GET+22 |
| XU20 | GET+2~, GET+3*, GET+10*, GET+23 |
| XU21 | GET+2~, GET+3*, GET+11*, GET+23 |
| XU30 | GET+2~ |
| XU31 | GET+2~, GET+3*, GET+15*, GET+22 |
| XUACT | LKUP+5*, LKUP+6, END! |
| XUACT( | ACT+19* |
| XUACT(19 | ACT+19* |
| XUACT(5 | MAIL+1 |
| XUACT(6 | ACT1+2, ACT1+4 |
| XUDA | LKUP~, LKUP+2*, LKUP+4, INQ+3, GET+4, GET+5, GET+7, GET+9, GET+14, GET+17 , GET+18, GET+24, ACT+3, ACT+6, ACT+7, ACT+12, ACT+15, ACT+16, ACT+17, ACT+19 , ACT1, ACT1+2, ACT1+4, ACT1+6, ACT1+8, ACT1+10, ACT1+11, ACT1+13, ACT1+15, END! , MAIL+1 |
| XUDB | END! |
| XUDC | END! |
| XUDP | END! |
| XUDT | LKUP+5*, WHEN+1, NOW+1*, ACT1+13, END! |
| XUEMP | GET+24*, END! |
| XUF | END! |
| XUGP | END! |
| XUGRP | GET+2!, GET+24, END! |
| XUGRP( | GET+7* |
| XUI | GET+5*, GET+6, GET+7, GET+9*, GET+10, GET+13, GET+14*, GET+15, ACT+19*, ACT1+2* , ACT1+4*, ACT1+6*, ACT1+8*, ACT1+10*, END! |
| XUIN | GET+16*, GET+19*, GET+24, END! |
| XUJ | GET+16*, GET+18*, GET+21, GET+24, ACT+19*, END! |
| XUK | GET+6*, GET+7, GET+8, GET+16*, GET+19*, GET+21, GET+24, END! |
| XUKEY | GET+2!, GET+24, END! |
| XUKEY( | GET+13* |
| XUNAM | WHEN, NOW, GET+4*, ACT+19*, END! |
| XUNUM | GET+16*, GET+18*, GET+19, END! |
| XUSUR | GET+2!, GET+24, END! |
| XUSUR( | GET+15* |
| XUSVC | ACT+6~*, ACT+9 |
| XUTX1 | GET+2!, END+1! |
| XUTX1(1 | GET+21* |
| XUTX1(2 | GET+22* |
| XUTX1(3 | GET+22* |
| XUTX2 | GET+2!, END+1! |
| XUTX2(1 | GET+23* |
| XUTX2(2 | GET+23* |
| XUVE | NOW+2*, ACT1+2, ACT1+4, ACT2+2, END! |
| Y | LKUP+2, INQ+1~, INQ+2, END! |
| >> ZTDESC | WHEN+1* |
| >> ZTDTH | WHEN+1* |
| >> ZTIO | WHEN+1* |
| >> ZTRTN | WHEN+1* |
| >> ZTSAVE("XUDA" | WHEN+1* |