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* |