SDPHARM1 ;BIRMINGHAM OIFO/RON - Determine default Institution/Station no. ; 8/9/03
Source file <SDPHARM1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | DD^%DT EN^DIQ1 |
| Kernel | 1 | ($$DT,$$FMDIFF)^XLFDT |
| Registration | 1 | $$SITE^VASITE |
| Scheduling | 1 | GETAPPT^SDAMA201 |
| Package | Total | Caller Graph |
|---|---|---|
| Outpatient Pharmacy | 2 | PSOORUT2 PSOTPCEE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PAT | ;
|
|
| APPX | ;
|
|
| CPAIR(SDPSOCL0) | ;Get credit pair
|
|
| PRIAPT(SDPSOPAT) | ;Find nearest Primary care appt, past or future
|
|
| INIT | ;Initialize variables
|
|
| APPE | ;
|
|
| DEF(SDPSODFN) | ;Pass in Patient
|
|
| DIV(SDPSOCL0) | ;Get facility division name and number
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | CPAIR+2, CPAIR+3 |
| ^DPT - [#2] | DEF+1 |
| ^SC - [#44] | PAT+12, PRIAPT+14, PRIAPT+25, APPX+1, APPE+1 |
| ^SCE - [#409.68] | PRIAPT+9 |
| ^SCE("ADFN" | PRIAPT+8 |
| ^TMP($J | PAT+7!, PAT+10, PAT+17, PAT+19!, PRIAPT+20!, PRIAPT+23, PRIAPT+28, PRIAPT+31! |
| ^UTILITY("DIQ1" | DIV+7! |
| Name | Line Occurrences |
|---|---|
| $$CPAIR | PAT+13, PRIAPT+15, PRIAPT+26 |
| $$DIV | PAT+14 |
| APPE | PRIAPT+34, PRIAPT+38, PRIAPT+40 |
| APPX | PRIAPT+33, PRIAPT+39 |
| INIT | DEF+3, PRIAPT+4 |
| PAT | DEF+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DEF+2~, PAT+15*!, DIV+7*! |
| DD | PAT+15! |
| DIC | DEF+2~, PAT+15!*, DIV+7*! |
| DIE | DEF+2~ |
| DIQ | DEF+2~, PAT+15!*, DIV+7! |
| DIQ(0 | PAT+15*, DIV+7* |
| DR | DEF+2~, PAT+15!*, DIV+7*! |
| DT | PAT+3*, PAT+8, PRIAPT+1*, PRIAPT+21, PRIAPT+35, PRIAPT+36, APPX+2, APPE+2 |
| SDPSOAP0 | PAT+1~, PAT+10*, PAT+12 |
| SDPSOATZ | PAT+1~, PAT+15! |
| SDPSOATZ(4 | PAT+15 |
| SDPSOCL0 | PAT+1~, PAT+12*, PAT+13, PAT+14, CPAIR~, CPAIR+2, CPAIR+3, DIV~, DIV+1, DIV+5 |
| SDPSOCNT | PAT+6~, PAT+8, PAT+9, PAT+10 |
| SDPSOCOU | PRIAPT+19~, PRIAPT+21, PRIAPT+22, PRIAPT+23 |
| SDPSODCP | PAT+1~, PAT+13*, PAT+18 |
| SDPSODF1 | DEF+2~, DEF+7*, DEF+8, DEF+9 |
| SDPSODF2 | DEF+2~, DEF+7*, DEF+8, DEF+9, DEF+10 |
| SDPSODF3 | DEF+2~, DEF+8*, DEF+9, DEF+10 |
| SDPSODFA | DEF+2~, DEF+5 |
| SDPSODFA( | DEF+7, DEF+8, DEF+9, PAT+18* |
| SDPSODFN | DEF~, DEF+1, PAT+8 |
| SDPSODI | INIT+2~, INIT+3* |
| SDPSODII | INIT+2~, INIT+3* |
| SDPSODIV | PAT+1~, PAT+14*, PAT+15, PAT+16, PAT+18 |
| SDPSODSI | PRIAPT+19~, PRIAPT+23*, PRIAPT+28 |
| SDPSODSS | DEF+2~, PRIAPT+3~ |
| SDPSODSS( | INIT+3*, PAT+18, PRIAPT+16, PRIAPT+27 |
| SDPSODVX | DIV+1~*, DIV+3 |
| SDPSOHLD | DIV+1~, DIV+2*, DIV+3*, DIV+4, DIV+5*, DIV+6, DIV+7*, DIV+8 |
| SDPSOOUT | PAT+1~, PAT+2* |
| SDPSOPAT | PRIAPT~, PRIAPT+2, PRIAPT+8, PRIAPT+17, PRIAPT+21, PRIAPT+23, PRIAPT+29, PRIAPT+30, PRIAPT+32, PRIAPT+33 , PRIAPT+34, PRIAPT+35, PRIAPT+36, APPX+1, APPX+2, APPE+1, APPE+2 |
| SDPSOPDF | DEF+2~, DEF+6*, DEF+9*, DEF+10*, DEF+11 |
| SDPSOPRM | DEF+2~, DEF+6*, DEF+7, DEF+8, DEF+9* |
| SDPSOQEC | PRIAPT+5~, PRIAPT+7*, PRIAPT+8, PRIAPT+17* |
| SDPSOSDI | PAT+6~, PAT+10*, PAT+17 |
| SDPSOSDT | PAT+1~, PAT+17*, PAT+18 |
| SDPSOSDX | CPAIR+1~, CPAIR+2*, CPAIR+3*, CPAIR+4*, CPAIR+5 |
| SDPSOSTA | PAT+1~, PAT+15!*, PAT+16, PAT+18 |
| SDPSOX | PRIAPT+5~, PRIAPT+6*, PRIAPT+8*, PRIAPT+17 |
| SDPSOX1 | PRIAPT+5~, PRIAPT+8*, PRIAPT+9 |
| SDPSOX10 | PRIAPT+5~ |
| SDPSOX10( | PRIAPT+23, PRIAPT+29*, PRIAPT+30*, PRIAPT+32, PRIAPT+33, PRIAPT+34, PRIAPT+35, APPX+1, APPX+2 |
| SDPSOX11 | PRIAPT+5~, PRIAPT+33, PRIAPT+34, PRIAPT+38, PRIAPT+39, PRIAPT+40, APPX+1*, APPX+2*, APPE+1*, APPE+2* |
| SDPSOX12 | PRIAPT+5~, PRIAPT+35*, PRIAPT+36*, APPX+2*, APPE+2* |
| SDPSOX13 | PRIAPT+5~, APPX+2*, APPE+2* |
| SDPSOX14 | PRIAPT+5~, PRIAPT+35*, PRIAPT+38, PRIAPT+39 |
| SDPSOX15 | PRIAPT+5~, PRIAPT+36*, PRIAPT+38, PRIAPT+39 |
| SDPSOX2 | PRIAPT+5~, PRIAPT+9*, PRIAPT+10, PRIAPT+11, PRIAPT+13, PRIAPT+14, PRIAPT+17 |
| SDPSOX3 | PRIAPT+5~, PRIAPT+14*, PRIAPT+15 |
| SDPSOX4 | PRIAPT+5~, PRIAPT+15*, PRIAPT+16 |
| SDPSOX5 | PRIAPT+5~ |
| SDPSOX5( | PRIAPT+17*, PRIAPT+32, PRIAPT+33, PRIAPT+34, PRIAPT+36, APPE+1, APPE+2 |
| SDPSOX6 | PRIAPT+5~, PRIAPT+28*, PRIAPT+29, PRIAPT+30 |
| SDPSOX7 | PRIAPT+5~, PRIAPT+23*, PRIAPT+25, PRIAPT+29, PRIAPT+30 |
| SDPSOX8 | PRIAPT+5~, PRIAPT+25*, PRIAPT+26 |
| SDPSOX9 | PRIAPT+5~, PRIAPT+26*, PRIAPT+27 |
| U | CPAIR+2, CPAIR+3, DIV+1, DIV+3 |
| X | DEF+2~, PAT+1~, PRIAPT+3~ |
| X1 | PAT+1~, PRIAPT+3~ |
| X2 | PAT+1~, PRIAPT+3~ |
| Y | DEF+2~, PAT+1~, PRIAPT+3~, APPX+1*, APPE+1* |