SCUTBK11 ;ALB/SCK - Scheduling Broker Utilities; 2/2/96 ;9/7/96 17:28
Source file <SCUTBK11.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 |
---|---|---|
Scheduling | 7 | SC FILE SINGLE VALUE SC KEY CHECK SC PATIENT LOOKUP SC POSITION MEMBERS SC TEAM LIST SCMC POSITION ASSIGN LIST SCUTBK3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PARSE(SC) | ;
|
|
TMLST(SCDATA,SC) | ;
; -- Return a list of teams for a patient. Pass in the DFN and ; optionally a date range and/or a team purpose to restrict the ; team look up. Return only the team entry, strip out any other ; array items. |
|
TMQ | ||
FINDP(SCOUT,SCIN) | ; patient lookup used by SC PATIENT LOOKUP rpc
; input: ; SCIN("VALUE") = value to lookup ; Lookup uses multiple index lookup of File #2 ; output: ; SCOUT = location of data = ^TMP("DILIST",$J,i,0) ; for i=1:number of records returned: ; DFN^patient name^DOB^PID^DOD ; 1 2 3 4 5 |
|
PSLST(SCDATA,SC) | ;
|
|
PSLTQ | ||
PSMBR(SCPIEN,SCPDT) | ;
|
|
VFILE(SCOK,SC) | ;
|
|
SECKEY(SCOK,SCKEY) | ;
|
|
PSALST(SCDATA,SC) | ;
|
|
PSALSTQ |
Name | Field # of Occurrence |
---|---|
FIND^DIC | FINDP+14 |
FILE^DIE | VFILE+10 |
CLEAN^DILF | FINDP+15 |
$$DOB^DPTLK1 | FINDP+21 |
$$SSN^DPTLK1 | FINDP+23 |
$$TPPT^SCAPMC | PSLST+26, PSALST+27 |
$$TMPT^SCAPMC3 | TMLST+17 |
$$GETPRTP^SCAPMCU2 | PSMBR+4 |
$$OKPREC2^SCMCLK | PSMBR+6 |
CHK^SCUTBK | TMLST+8, PSLST+18, VFILE+3, SECKEY+2, PSALST+18 |
TMP^SCUTBK | TMLST+9, PSLST+19, VFILE+4, PSALST+19 |
RPC Name | Call Tags |
---|---|
SC TEAM LIST | TMLST |
SC PATIENT LOOKUP | FINDP |
SC POSITION MEMBERS | PSLST |
SC FILE SINGLE VALUE | VFILE |
SC KEY CHECK | SECKEY |
SCMC POSITION ASSIGN LIST | PSALST |
FileNo | Call Tags |
---|---|
^DPT - [#2] | FIND^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCPT(404.43 - [#404.43] | PSLST+40, PSALST+37 |
^SCTM(404.57 - [#404.57] | PSLST+40, PSALST+37 |
^TMP("DILIST" | FINDP+16, FINDP+19, FINDP+30*, FINDP+31! |
^TMP($J | PSLST+25!, PSLST+30*, PSLST+33*, PSLST+37, PSLST+39, PSLST+40, PSLST+42!, PSALST+26!, PSALST+30*, PSALST+34 , PSALST+36, PSALST+37, PSALST+39! |
^XUSEC( | SECKEY+4 |
Name | Line Occurrences |
---|---|
$$PSMBR | PSLST+40, PSALST+37 |
PARSE | PSLST+21, VFILE+7, PSALST+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> CNT | PSLST+24*, PSLST+35*, PSLST+40, PSLST+41*, PSALST+25*, PSALST+32*, PSALST+37, PSALST+38* |
DFN | TMLST+6~, TMLST+11*, TMLST+17 |
>> DIERR | FINDP+15 |
DSSN | FINDP+18~, FINDP+24*, FINDP+26*, FINDP+27 |
DT | PSLST+38, PSALST+23, PSALST+35 |
DUZ | SECKEY+4 |
>> I | TMLST+19*, PSLST+27*, PSLST+29, PSLST+30, PSLST+33, PSLST+36*, PSLST+37*, PSLST+39, PSLST+40, PSALST+28* , PSALST+29, PSALST+30, PSALST+33*, PSALST+34*, PSALST+36, PSALST+37 |
NODE | FINDP+18~, FINDP+19*, FINDP+21*, FINDP+23, FINDP+25, FINDP+27*, FINDP+30 |
PLID | FINDP+18~, FINDP+25*, FINDP+26*, FINDP+27 |
SC | PARSE~, TMLST~, FINDP+17~*, FINDP+19, FINDP+30, PSLST~, PSLST+21, VFILE~, VFILE+7, PSALST~ , PSALST+21 |
SC("BEGIN" | PARSE+4, TMLST+12 |
SC("DFN" | PARSE+1, TMLST+11 |
SC("END" | PARSE+5, PARSE+6, TMLST+14 |
SC("FIELD" | PARSE+9 |
SC("FILE" | PARSE+7 |
SC("IEN" | PARSE+8 |
SC("INCL" | TMLST+13 |
SC("PIEN" | PARSE+2 |
SC("PURP" | TMLST+15 |
SC("TEAM" | PARSE+3 |
SC("TEAMASSIGN" | PSALST+22 |
SC("VALUE" | PARSE+10 |
SCD | TMLST+6~, PSLST+16~, PSALST+16~ |
SCD( | TMLST+19, PSLST+27, PSLST+29, PSLST+30, PSLST+33, PSALST+28, PSALST+29, PSALST+30 |
SCDATA | TMLST~, PSLST~, PSALST~ |
SCDATA( | TMLST+19*, PSLST+40*, PSALST+37* |
SCDFN | PARSE+1*, PSLST+16~, PSLST+26, PSALST+16~, PSALST+27 |
SCDT | TMLST+6~, PSLST+16~, PSLST+26, PSALST+16~, PSALST+27 |
SCDT("BEGIN" | PARSE+4*, TMLST+12*, TMLST+13, PSLST+22, PSALST+23 |
SCDT("END" | PARSE+5*, TMLST+14* |
SCDT("INCL" | PARSE+6*, TMLST+13* |
SCDTE | PSLST+16~, PSLST+22*, PSLST+38*, PSLST+40, PSALST+16~, PSALST+23*, PSALST+35*, PSALST+37 |
SCER1 | TMLST+6~, PSLST+16~, PSALST+16~ |
SCFDA | VFILE+1~ |
SCFDA( | VFILE+8* |
SCFIELD | PARSE+9*, VFILE+1~, VFILE+8 |
SCFILE | PARSE+7*, VFILE+1~, VFILE+8 |
SCIEN | PARSE+8*, VFILE+1~, VFILE+8 |
SCIN | FINDP~ |
SCIN("VALUE" | FINDP+14 |
SCIND | PSLST+16~, PSALST+16~ |
SCKEY | SECKEY~, SECKEY+4 |
SCLIST | TMLST+6~ |
SCMBR | PSMBR+2~, PSMBR+4*, PSMBR+5*, PSMBR+8 |
SCMSG | VFILE+1~ |
SCMSG("DIERR" | VFILE+12 |
SCOK | TMLST+6~, TMLST+17*, PSLST+26*, VFILE~, VFILE+6*, VFILE+13*, SECKEY~, SECKEY+4*, PSALST+27* |
SCOUNT | FINDP+16~*, FINDP+17 |
SCOUT | FINDP~, FINDP+32!* |
SCPDT | PSMBR~, PSMBR+4, PSMBR+6 |
SCPIEN | PARSE+2*, PSLST+39*, PSLST+40, PSMBR~, PSMBR+4, PSMBR+6, PSALST+36*, PSALST+37 |
SCPP | PSMBR+2~, PSMBR+6*, PSMBR+7 |
SCPRCP | PSMBR+2~, PSMBR+7*, PSMBR+8 |
SCPRP | PSLST+16~, PSALST+16~ |
SCPST | PSLST+16~, PSALST+16~ |
SCPTTMA | PSALST+16~, PSALST+22*, PSALST+29 |
SCPURP | TMLST+6~, TMLST+15* |
SCRLE | PSLST+16~, PSALST+16~ |
SCTM | PARSE+3*, PSLST+16~, PSLST+28, PSLST+29, PSLST+32, PSALST+16~ |
SCUSR | PSLST+16~, PSALST+16~ |
SCVAL | PARSE+10*, VFILE+1~, VFILE+8 |
SSN | FINDP+18~, FINDP+23*, FINDP+24, FINDP+26 |
U | FINDP+21, FINDP+25, FINDP+27, FINDP+30, PSLST+29, PSLST+30, PSLST+33, PSLST+39, PSLST+40, PSMBR+5 , PSMBR+7, PSMBR+8, PSALST+29, PSALST+30, PSALST+36, PSALST+37 |