SCMCMU ;ALB/MJK - PCMM Mass Team/Position Unassignment Utility ; 10 Jul 98
Source file <SCMCMU.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 2 | $$TPTM^SCAPMC24 (DATE,EN)^SCMCMU1 |
VA FileMan | 2 | ^DIC ^DIR |
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 |
---|---|---|
Scheduling | 4 | SCMC MU MASS TEAM UNASSIGNMENT SCMCCV1 SCMCCV4 SCRPV1 |
Kernel | 1 | ^DIC(19 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- entry point for mass unassignment (mu)
|
|
ENQ | ||
TYPE() | ; -- get type of mu
|
|
DATE() | ; -- get effective date
|
|
TEAM(SCDATE) | ; -- get team
|
|
POS(SCTEAM,SCDATE) | ; -- get position for team
|
|
POSQ | ||
TMDIS(SCTEAM,SCDATE,SCTPDIS) | ; -- discharge patient from clinics
|
|
TMDISQ | ||
TPDIS(SCPOS,SCTPDIS) | ; -- discharge patient from clinic
|
|
TPDISQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^SCTM(404.51 - [#404.51] | Classic Fileman Calls |
^SCTM(404.57 - [#404.57] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC - [#44] | TMDIS+15, TPDIS+6 |
^SCTM(404.51 - [#404.51] | TMDIS+16 |
^SCTM(404.57 - [#404.57] | TMDIS+12, TPDIS+3 |
^TMP("SCMU" | POS+3, TMDIS+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIC | TEAM+1~, TEAM+4*, POS+1~, POS+7* |
DIC("S" | TEAM+3*, POS+9* |
DIC(0 | TEAM+4*, POS+8* |
DIR | TYPE+1~, DATE+1~, TMDIS+1~, TPDIS+1~ |
DIR("A" | TYPE+3*, DATE+3*, TMDIS+18*, TMDIS+19*, TMDIS+20*, TMDIS+21*, TMDIS+22*, TMDIS+23*, TPDIS+8*, TPDIS+9* |
DIR("B" | TYPE+4*, DATE+4* |
DIR(0 | TYPE+2*, DATE+2*, TMDIS+17*, TPDIS+7* |
DIRUT | TYPE+1~, TYPE+6, DATE+1~, DATE+6, TMDIS+25, TPDIS+1~, TPDIS+11 |
I | POS+1~, POS+6*, TMDIS+1~, TMDIS+8* |
SCABORT | EN+2~, EN+5*, EN+9, EN+13, EN+17, EN+20, EN+24, TMDIS+11, TMDIS+25, TPDIS+11 |
SCCL | TMDIS+1~, TMDIS+13*, TMDIS+14, TMDIS+15, TPDIS+1~, TPDIS+4*, TPDIS+5, TPDIS+6 |
SCCL0 | TPDIS+1~ |
SCCLNM | TMDIS+1~, TMDIS+15*, TMDIS+21, TPDIS+6*, TPDIS+9 |
SCDATE | EN+2~, EN+12*, EN+13, EN+16, EN+21, EN+25, EN+29, TEAM~, TEAM+2, POS~ , POS+2, TMDIS~, TMDIS+3 |
SCDIS | EN+2~, EN+4*, EN+20, EN+21*, EN+24, EN+26* |
SCDTE | TEAM+1~, TEAM+2, POS+1~, POS+2, POS+5, TMDIS+1~, TMDIS+3, TMDIS+7 |
SCMUTYPE | EN+2~, EN+8*, EN+9, EN+20, EN+24, EN+29 |
SCOK | TMDIS+1~, TMDIS+2*, TMDIS+11, TMDIS+25*, TMDISQ, TPDIS+1~, TPDIS+2*, TPDIS+11*, TPDISQ |
SCPOS | EN+2~, EN+4*, EN+24, EN+25*, EN+26, EN+29, POS+1~, POS+3*, POS+4, POS+5 , POS+6, POSQ, TMDIS+1~, TMDIS+5*, TMDIS+6, TMDIS+7, TMDIS+8, TMDIS+9, TMDIS+10*, TMDIS+11* , TMDIS+12, TMDIS+26, TPDIS~, TPDIS+3, TPDIS+12 |
SCPOS0 | TMDIS+1~, TMDIS+12*, TMDIS+13, TMDIS+20, TPDIS+1~, TPDIS+3*, TPDIS+4 |
SCPOSI | POS+1~, TMDIS+1~ |
SCPOSI( | POS+6*, TMDIS+8*, TMDIS+11 |
SCTEAM | EN+2~, EN+4*, EN+16*, EN+17, EN+21, EN+25, EN+29, POS~, POS+5, TMDIS~ , TMDIS+7, TMDIS+16 |
SCTEAMNM | TMDIS+1~, TMDIS+16*, TMDIS+19 |
SCTPDIS | EN+2~, EN+21, EN+26, EN+29, TMDIS~, TPDIS~ |
SCTPDIS( | TMDIS+26*, TPDIS+12* |
U | TMDIS+13, TMDIS+15, TMDIS+16, TMDIS+20, TPDIS+4, TPDIS+6 |
Y | TYPE+1~, TYPE+6, DATE+1~, DATE+6, TEAM+1~, TEAM+6, POS+1~, POS+5*, POSQ+1, TMDIS+1~ , TMDIS+7*, TMDIS+26, TPDIS+1~, TPDIS+5*, TPDIS+12 |