SDPHARM ;ALBANY OIFO/KEITH - Determine patients for Rx benefit ; 6/30/03
Source file <SDPHARM.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 1 | $$FMDIFF^XLFDT |
Registration | 1 | $$SITE^VASITE |
Name | Comments | DBIA/ICR reference |
---|---|---|
PAT(DFN) | ;Evaluate a patient
|
|
CPAIR(SDCL0) | ;Get credit pair
|
|
INIT | ; Initialize variables
|
|
DIV(SDCL0) | ;Get facility division name and number
|
|
LOOK | ;Search PATIENT file for eligible patients
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | DIV+8 |
^DIC(40.7 - [#40.7] | CPAIR+3, CPAIR+4 |
^DPT - [#2] | LOOK+6, PAT+8, PAT+9, PAT+10, PAT+11, PAT+13, PAT+14, PAT+15, PAT+16, PAT+17 , PAT+22, PAT+23, PAT+32, PAT+33 |
^PS(52.91 - [#52.91] | PAT+7 |
^SC - [#44] | PAT+27, PAT+42 |
^SCE - [#409.68] | PAT+39 |
^SCE("ADFN" | PAT+37, PAT+38 |
^XTMP("SDPSO145" | PAT+32*, PAT+33*, PAT+35, PAT+46! |
Name | Line Occurrences |
---|---|
$$CPAIR | PAT+28, PAT+43 |
$$DIV | PAT+30 |
$$PAT | LOOK+6 |
INIT | LOOK+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | LOOK+2~, LOOK+6*, PAT~, PAT+7, PAT+8, PAT+9, PAT+10, PAT+11, PAT+13, PAT+14 , PAT+15, PAT+16, PAT+17, PAT+22, PAT+23, PAT+32, PAT+33, PAT+35, PAT+37, PAT+38 , PAT+46 |
SDAP0 | PAT+5~, PAT+23*, PAT+24, PAT+25, PAT+26, PAT+27, PAT+32 |
SDATE | LOOK+2~, INIT+4*, PAT+9, PAT+21 |
SDATE2 | LOOK+2~, INIT+5*, PAT+37 |
SDCL0 | PAT+5~, PAT+27*, PAT+28, PAT+30, PAT+42*, PAT+43, CPAIR~, CPAIR+3, CPAIR+4, DIV~ , DIV+2, DIV+6 |
SDCP | PAT+5~, PAT+28*, PAT+29, PAT+43*, PAT+44 |
SDEN | PAT+5~, PAT+38*, PAT+39 |
SDEN0 | PAT+5~, PAT+39*, PAT+40, PAT+41, PAT+42 |
SDHOLD | DIV+2~, DIV+3*, DIV+4*, DIV+5, DIV+6*, DIV+7, DIV+8*, DIV+9 |
SDI | INIT+3~, INIT+7* |
SDII | INIT+3~, INIT+7* |
SDIV | PAT+5~, PAT+30*, PAT+31, PAT+32, PAT+33 |
SDIVV | DIV+2~*, DIV+4 |
SDOUT | PAT+5~, PAT+21*, PAT+37, PAT+38, PAT+46*, PAT+50 |
SDPT | LOOK+2~, LOOK+6* |
SDSS | LOOK+2~ |
SDSS( | INIT+7*, PAT+29, PAT+44 |
SDT | PAT+5~, PAT+21*, PAT+22*, PAT+23, PAT+32, PAT+33, PAT+37*, PAT+38 |
SDX | CPAIR+2~, CPAIR+3*, CPAIR+4*, CPAIR+6*, CPAIR+7 |
U | PAT+11, PAT+13, PAT+14, PAT+16, PAT+17, PAT+24, PAT+25, PAT+26, PAT+40, PAT+42 , CPAIR+3, CPAIR+4, DIV+2 |