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 |