SCMCTPU3 ;ALB/MJK - Team Position Utility ; 1 SEP 98
Source file <SCMCTPU3.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | PID^VADPT6 FIRST^VAUTOMA |
Kernel | 1 | (,$$S)^%ZTLOAD |
Scheduling | 1 | BULL^SCMCTPU4 |
VA FileMan | 1 | ^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 | 2 | SC PCMM POSITION ASSIGN REVIEW SCMCTPU4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point to find pat position assignments w/o team assignment
|
|
ENQ | ||
MODE() | ; -- get mode from user (1 - diagnostic 2 - fix 0 - abort)
|
|
TEAM() | ; -- get teams from user
|
|
QUE() | ; -- setup task and queue job to run
|
|
START | ; -- entry point for queued job
|
|
CNT(TYPE) | ; -- set counter
|
|
ERR(NUMBER) | ; -- set error array
|
|
SET | ; -- set tmp for report
|
|
DATA(SCTPA) | ; -- get team, position, tm pos assign, tm assignment & patient data
; input: SCPTA := ien to patient team position assignment (404.43) |
|
PAUSE | ; -- pause
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^SCTM(404.51 - [#404.51] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | DATA+26 |
^SCPT(404.42 - [#404.42] | DATA+15 |
^SCPT(404.43 - [#404.43] | START+19, DATA+4 |
^SCTM(404.51 - [#404.51] | START+15, DATA+21 |
^SCTM(404.57 - [#404.57] | DATA+10 |
^TMP("SCTP DANGLERS" | START+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | DATA+28~, DATA+29* |
DIC | TEAM+1~, TEAM+5* |
DIR | PAUSE+1~ |
DIR("A" | PAUSE+3* |
DIR(0 | PAUSE+2* |
NUMBER | ERR~, ERR+1 |
SCER | START+2~, SET+1~, SET+2*, SET+3*, SET+4 |
SCERAR | START+21~ |
SCERAR( | ERR+1*, SET+3 |
SCERAR(0 | START+53 |
SCERTMP | START+2~, START+9*, START+10, START+59, SET+4 |
SCMODE | EN+1~, EN+4*, EN+5 |
SCNT | START+2~ |
SCNT( | CNT+1* |
SCPT | START+5~, SET+4, DATA+25*, DATA+26, DATA+29 |
SCPT0 | START+5~, DATA+26*, DATA+27 |
SCPTID | START+5~, DATA+30* |
SCPTNM | START+5~, SET+4, DATA+27* |
SCSTOP | START+2~, START+18*, START+19, START+20*, START+57 |
SCTM | START+4~, START+14*, START+15*, START+27, SET+4, DATA+20*, DATA+21 |
SCTM0 | START+4~, DATA+21*, DATA+22 |
SCTMA | START+7~, DATA+14*, DATA+15 |
SCTMA0 | START+7~, DATA+15*, DATA+16, DATA+17, DATA+20, DATA+25 |
SCTMASDT | START+7~, START+39, DATA+16* |
SCTMLST | EN+1~, START+13 |
SCTMLST( | START+15*, START+27 |
SCTMNM | START+4~, SET+4, DATA+22* |
SCTMUNDT | START+7~, START+40, DATA+17* |
SCTP | START+3~, SET+4, DATA+9*, DATA+10 |
SCTP0 | START+3~, DATA+10*, DATA+11 |
SCTPA | START+6~, START+18*, START+19*, START+24, SET+4, DATA~, DATA+4 |
SCTPA0 | START+6~, DATA+4*, DATA+5, DATA+6, DATA+9, DATA+14 |
SCTPASDT | START+6~, START+39, SET+4, DATA+5* |
SCTPNM | START+3~, SET+4, DATA+11* |
SCTPUNDT | START+6~, START+40, DATA+6* |
SCTSK | EN+1~, EN+11*, EN+12, EN+13 |
TYPE | CNT~, CNT+1 |
U | START+15, DATA+5, DATA+6, DATA+9, DATA+11, DATA+16, DATA+17, DATA+20, DATA+22, DATA+27 |
VA | DATA+28~ |
VA("BID" | DATA+30 |
VAUTINI | TEAM+1~ |
>> VAUTNI | TEAM+4* |
VAUTSTR | TEAM+1~, TEAM+3* |
VAUTVB | TEAM+1~, TEAM+2* |
>> X | QUE+7*, START+15* |
Y | TEAM+1~, TEAM+7, PAUSE+1~ |
ZTDESC | QUE+2~, QUE+4* |
ZTDTH | QUE+2~, QUE+5* |
ZTIO | QUE+2~, QUE+6* |
ZTRTN | QUE+2~, QUE+3* |
ZTSAVE | QUE+2~ |
ZTSAVE( | QUE+7* |
ZTSK | QUE+2~, QUE+9 |
>> ZTSTOP | START+20* |