SCMCWAIT ;ALB/SCK - Broker Utilities for Placement on Wait List ; 30 Oct 2002 3:42 PM ; Compiled May 25, 2007 09:07:17
Source file <SCMCWAIT.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 8 | $$TPPT^SCAPMC $$TMPT^SCAPMC3 $$GETALL^SCAPMCA $$TEAMCNT^SCAPMCU1 $$GETEAM^SCAPMCU3 $$ACTTM^SCMCTMU INPUT^SDWLRP1 SDSC^SDWLRP3 |
VA Fileman | 2 | (,FILE,UPDATE)^DIE ^DIK |
Registration | 1 | (DEM,ELIG)^VADPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
SORT | ;From sort template
|
|
ONWAIT(DFN) | ;is patient on wait list
|
|
WAITS(DFN,TEAM,POS,SC) | ; PLACE PATIENT ON WAIT LIST
|
|
WMT() | ||
SC(DFN) | ;Is patient 0-50 sc%
|
|
CLONE(DFN,TEAM,POS) | ;clean one entry only or two if position
|
|
WAIT(SCOK,SC) | ; Place patient on wait list
; 'SC BLD PAT CLN LIST' |
|
TEAMRM(DFN,TEAM) | ;
|
|
WT | ||
PCPVER(DFN,SDTM) | ;verify if PCP assignment
|
|
PC(RESULT,POS) | ;rpc to see if provider can be pc
|
|
POSRM(TEAMP,POS) | ;
; |
|
ROLE(RESULT,POS) | ;rpc to see if role of position is resident
|
|
SCLI(RESULT,SC) | ;sc sc list
|
Name | Field # of Occurrence |
---|---|
^DIE | WMT+6 |
FILE^DIE | POSRM+16 |
UPDATE^DIE | TEAMRM+13, CLONE+11 |
^DIK | WMT+7 |
$$TPPT^SCAPMC | ONWAIT+13 |
$$TMPT^SCAPMC3 | ONWAIT+12 |
$$GETALL^SCAPMCA | PCPVER+7 |
$$TEAMCNT^SCAPMCU1 | WAIT+18, WAITS+14 |
$$GETEAM^SCAPMCU3 | WAIT+19, WAITS+15 |
$$ACTTM^SCMCTMU | WAIT+17, WAITS+13 |
INPUT^SDWLRP1 | WT, WMT+1 |
SDSC^SDWLRP3 | SCLI+3 |
DEM^VADPT | ONWAIT+1 |
ELIG^VADPT | SC+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
RPC Name | Call Tags |
---|---|
SCMC WAIT LIST ENTRY | WAIT |
SC PC PROVIDER | PC |
SC SC CONDITION LIST | SCLI |
SC POSITION RESIDENT ROLE | ROLE |
FileNo | Call Tags |
---|---|
^SDWL(409.3 - [#409.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCPT(404.42 - [#404.42] | POSRM+2, POSRM+6 |
^SCPT(404.43 - [#404.43] | POSRM+5 |
^SCTM(404.51 - [#404.51] | WAIT+6, WAIT+12, WAIT+13, WAIT+16, WAIT+17, WAIT+23, WAITS+5, WAITS+8, WAITS+9, WAITS+12 , WAITS+13, WAITS+19, ONWAIT+7, SC+1 |
^SCTM(404.52 - [#404.52] | PC+3 |
^SCTM(404.57 - [#404.57] | ONWAIT+8, ROLE+1 |
^SD(403.46 - [#403.46] | ROLE+4 |
^SDWL(409.3 - [#409.3] | TEAMRM+5, TEAMRM+8, POSRM+9, POSRM+12, CLONE+2, CLONE+6, ONWAIT+4, ONWAIT+6 |
^TMP("SDPCP" | PCPVER+2!, PCPVER+9, PCPVER+10 |
^TMP("SDWLRP3" | SCLI+4 |
Name | Line Occurrences |
---|---|
$$WMT | WAITS+20, WAITS+21 |
CLONE | TEAMRM+1, TEAMRM+2, POSRM+3, POSRM+4 |
PCPVER | WAIT+11, WAITS+7, TEAMRM+1, POSRM+3 |
ROLE | PC+2 |
SORT | PC+6 |
WT | WAIT+24, WAIT+25 |
Name | Field # of Occurrence |
---|---|
^( | PC+3, SCLI+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | TEAMRM+5*, TEAMRM+6, POSRM+9*, POSRM+10, CLONE+2*, CLONE+3, CLONE+4, CLONE+5, ONWAIT+4*, ONWAIT+5 , ONWAIT+7, ONWAIT+8, SC+3~*, SC+4 |
CNT | SCLI+4~* |
COMMENT | WAIT+4~, WAIT+5*, WT |
D0 | PC+6~* |
DA | WMT+3~, WMT+5* |
DFN | WAIT+5*, WAIT+11, WT, WAITS~, WAITS+7, WMT+1, TEAMRM~, TEAMRM+1, TEAMRM+2, TEAMRM+5 , POSRM+2*, POSRM+3, POSRM+4, POSRM+9, CLONE~, CLONE+2, PCPVER~, PCPVER+7, PCPVER+9, PCPVER+10 , ONWAIT~, ONWAIT+4, ONWAIT+12, ONWAIT+13, SC~, SC+1, SC+2*, SCLI+2*, SCLI+3 |
DIE | WMT+3~, WMT+5*, WMT+7 |
DIK | WMT+3~, WMT+7* |
DR | WAIT+24~, WAITS+20~, WAITS+21~, WMT+3~, WMT+5* |
DT | TEAMRM+11, POSRM+14, CLONE+9, PCPVER+4, PCPVER+12, PC+3 |
DUZ | WT, WMT+1, TEAMRM+12, POSRM+15, CLONE+10 |
FDA | TEAMRM+10~, POSRM+13~, CLONE+8~ |
FDA( | TEAMRM+10*, TEAMRM+11*, TEAMRM+12*, POSRM+13*, POSRM+14*, POSRM+15*, CLONE+8*, CLONE+9*, CLONE+10* |
I | TEAMRM+4~, TEAMRM+5*, TEAMRM+8, TEAMRM+10, TEAMRM+11, TEAMRM+12, POSRM+8~, POSRM+9*, POSRM+12, POSRM+13 , POSRM+14, POSRM+15, CLONE+1~, CLONE+2*, CLONE+6, CLONE+8, CLONE+9, CLONE+10, ONWAIT+2~, ONWAIT+4* , ONWAIT+6, SCLI+4~* |
INST | SC+1~* |
OK | WMT+3~, WMT+5*, WMT+7 |
POENT | PC+1~, PC+3*, PC+5, PC+6 |
POS | WAIT+5*, WAIT+11, WT, WAITS~, WAITS+4, WAITS+7, WMT+1, POSRM~, POSRM+3, POSRM+4 , POSRM+5, CLONE~, CLONE+5, PC~, PC+2, PC+3, ROLE~, ROLE+1 |
RES | WT~, WT+1, WMT~, WMT+1, WMT+2, WMT+4, WMT+5, WMT+7*, WMT+8, PC+1~ , PC+2, SCLI+1~, SCLI+3 |
RESULT | PC~, ROLE~, ROLE+2*, ROLE+3*, ROLE+4*, SCLI~, SCLI+1! |
RESULT( | SCLI+4* |
RESULT(0 | PC+2*, PC+5*, PC+6*, SCLI+3*, SCLI+4* |
SC | WAIT~, WAIT+5*, WT, WAITS~, WMT+1, SCLI~ |
SC("COMMENT" | WAIT+5 |
SC("DFN" | WAIT+5, SCLI+2 |
SC("POSITION" | WAIT+5 |
SC("SC" | WAIT+5 |
SC("SDINTR" | WAIT+6 |
SC("SDMTM" | WAIT+6 |
SC("SDREJ" | WAIT+6 |
SC("TEAM" | WAIT+5 |
SCD | ONWAIT+12~ |
SCD(1 | ONWAIT+12 |
SCDT | ONWAIT+12~, ONWAIT+13 |
SCOK | WAIT~, ONWAIT+12~*, ONWAIT+13* |
SCPOS | ONWAIT+13~ |
SCPOS(1 | ONWAIT+13 |
SCTMCT | WAIT+18~*, WAIT+20, WAITS+14~*, WAITS+16 |
SCTMMAX | WAIT+19~*, WAIT+20, WAITS+15~*, WAITS+16 |
SDATE | PCPVER+3~, PCPVER+5*, PCPVER+7 |
SDATE( | PCPVER+4* |
SDCC | WAIT+8*, WAIT+24*, WT, WAITS+1~, WAITS+20* |
SDCNT | WAIT+4~, WAIT+8*, WAIT+15*, WAIT+22*, WAIT+23*, WAIT+24, WAIT+25, WAITS+4*, WAITS+11*, WAITS+18* , WAITS+19*, WAITS+20, WAITS+21 |
SDI | PCPVER+4~*, PCPVER+7~* |
SDII | PCPVER+8~*, PCPVER+9*, PCPVER+10 |
SDINS | WAIT+4~, WAIT+13*, WAIT+16, WAITS+9*, WAITS+12 |
SDINTR | WAIT+4~, WAIT+6*, WAIT+8*, WAIT+12*, WAIT+22, WT, WAITS+1~, WAITS+4*, WAITS+8*, WAITS+18 , WMT+1 |
SDMTM | WAIT+4~, WAIT+6*, WAIT+8*, WAIT+24*, WT, WAITS+1~, WAITS+4*, WAITS+20*, WMT+1 |
SDONE | CLONE+1~*, CLONE+2, CLONE+12* |
SDPCP | PCPVER+3~, PCPVER+5*, PCPVER+7 |
SDREJ | WAIT+4~, WAIT+6*, WAIT+8*, WAIT+13, WAIT+16, WAIT+20*, WT, WAITS+1~, WAITS+4*, WAITS+9 , WAITS+12, WAITS+16*, WMT+1 |
SDT | WAIT+15~*, WAIT+16*, WAIT+17, WAIT+18, WAIT+19, WAIT+22*, WAIT+23*, WAITS+11~*, WAITS+12*, WAITS+13 , WAITS+14, WAITS+15, WAITS+18*, WAITS+19* |
SDTEAM | WAITS+1~, WAITS+2*, WAITS+22 |
SDTM | WAIT+4~, WAIT+11, WAIT+12, WAIT+13, WAITS+7, WAITS+8, WAITS+9, TEAMRM+1~, TEAMRM+2, POSRM+3~ , POSRM+4, PCPVER~, PCPVER+1*, PCPVER+13* |
SDWLIN | WAIT+4~, WAIT+6*, WAIT+12, WAIT+13, WAIT+23, WAITS+1~, WAITS+5*, WAITS+8, WAITS+9, WAITS+19 |
SDWLRES | WT+1*, WAITS+1~, WAITS+20*, WAITS+21*, WAITS+22, WMT+4* |
SDX | PCPVER+10~*, PCPVER+11, PCPVER+12, PCPVER+13 |
TEAM | WAIT+5*, WAIT+6, WAIT+8, WAIT+11, WAITS~, WAITS+2, WAITS+4, WAITS+5, WAITS+7, WAITS+20* , WAITS+22*, WMT+1, TEAMRM~, TEAMRM+1, TEAMRM+2, CLONE~, CLONE+4, SC+1~* |
TEAM( | WAIT+23*, WAIT+24, WAITS+19*, WAITS+20 |
TEAMP | POSRM~, POSRM+2, POSRM+3, POSRM+4, POSRM+6 |
U | WAIT+6, WAIT+12, WAIT+17, WAIT+23, WT, WAITS+5, WAITS+8, WAITS+13, WAITS+19, WMT+1 , WMT+5, TEAMRM+6, POSRM+5, POSRM+6, POSRM+10, CLONE+3, CLONE+4, CLONE+5, PCPVER+11, PCPVER+12 , PCPVER+13, ONWAIT+5, ONWAIT+7, ONWAIT+8, ROLE+2, ROLE+4, SC+1, SC+3, SC+4 |
>> VADM(6 | ONWAIT+1 |
>> VAEL(3 | SC+3 |
X | ONWAIT+2~, ONWAIT+3*, ONWAIT+4, ONWAIT+7*, ONWAIT+8*, ONWAIT+9, ONWAIT+12*, ONWAIT+13*, ONWAIT+14, SORT+1* , PC+6, SC+2* |
Y | WAIT+24~, WAITS+20~, WAITS+21~ |
ZERO | ROLE+1~*, ROLE+2, ROLE+4 |