PXRMDRGR ; SLC/PKR - Handle groups of drug findings. ;01/25/2008
Source file <PXRMDRGR.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 6 | DEVAL^PXRMDRUG NOINDEX^PXRMERRH GPLIST^PXRMINDL SRXTYL^PXRMRXTY SPFINDPA^PXRMTERM SFRES^PXRMUTIL |
Pharmacy Data Management | 1 | ($$ITEM,IX)^PSSCLINR |
Package | Total | Caller Graph |
---|---|---|
Clinical Reminders | 2 | PXRMDGEN PXRMDRCL |
Name | Comments | DBIA/ICR reference |
---|---|---|
FIEVAL(DFN,DRGRIEN,FINDPA,DEFARR,FINDING,XREF,FIEVAL) | ;
|
|
EVALTERM(DFN,FINDPA,ENODE,XREF,TERMARR,TFIEVAL) | ;Evaluate drug
|
|
GPLIST(DRGRIEN,PFINDPA,XREF,PLIST) | ;
|
|
EVALPL(FINDPA,ENODE,XREF,TERMARR,PLIST) | ;Evaluate drug group
|
|
GETPDR(DFN,RXTYL,DRBEG,DREND,POIBEG,POIEND) | ;Return the beginning drug and
|
|
EVALFI(DFN,DEFARR,ENODE,XREF,FIEVAL) | ;Evaluate drug group findings.
|
|
ONLIST(FIEVTL,IND,FIEVT) | ;Return true if FIEVT(IND) is already on
|
Name | Field # of Occurrence |
---|---|
$$ITEM^PSSCLINR | FIEVAL+18, GPLIST+11 |
IX^PSSCLINR | FIEVAL+13, GPLIST+8 |
DEVAL^PXRMDRUG | FIEVAL+22 |
NOINDEX^PXRMERRH | EVALFI+4, EVALFI+7, EVALPL+6, EVALPL+9, EVALTERM+6, EVALTERM+9 |
GPLIST^PXRMINDL | GPLIST+12, GPLIST+13, GPLIST+14 |
SRXTYL^PXRMRXTY | FIEVAL+10, GPLIST+7 |
SPFINDPA^PXRMTERM | EVALPL+19, EVALTERM+19 |
SFRES^PXRMUTIL | FIEVAL+44 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXRMINDX("55NVA" | GETPDR+14, GETPDR+15 |
^PXRMINDX(52 | EVALFI+3, EVALPL+5, EVALTERM+5, GETPDR+8, GETPDR+9 |
^PXRMINDX(55 | EVALFI+6, EVALPL+8, EVALTERM+8, GETPDR+4, GETPDR+5 |
^TMP($J | FIEVAL+15, FIEVAL+45!, GPLIST+5!, GPLIST+10, GPLIST+20, GPLIST+23, GPLIST+25, GPLIST+27, GPLIST+28, GPLIST+40* , GPLIST+41! |
Name | Line Occurrences |
---|---|
$$ONLIST | FIEVAL+27 |
FIEVAL | EVALFI+16, EVALTERM+20 |
GETPDR | FIEVAL+11 |
GPLIST | EVALPL+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATE | FIEVAL+2~, FIEVAL+37*, FIEVAL+38*, FIEVAL+40, GPLIST+2~, GPLIST+29*, GPLIST+30, GPLIST+31*, GPLIST+32*, GPLIST+34 , GPLIST+36, GPLIST+38 |
DATEORDR | FIEVAL+2~ |
DATEORDR( | FIEVAL+30*, FIEVAL+33, FIEVAL+34!, FIEVAL+38, FIEVAL+40 |
DATEORDR("" | FIEVAL+33 |
DEFARR | EVALFI~, EVALFI+16, FIEVAL~, FIEVAL+22 |
DEFARR("E" | EVALFI+10, EVALFI+12 |
DEFARR(20 | EVALFI+15 |
DFN | EVALFI~, EVALFI+16, EVALTERM~, EVALTERM+20, FIEVAL~, FIEVAL+11, FIEVAL+22, GETPDR~, GETPDR+4, GETPDR+5 , GETPDR+8, GETPDR+9, GETPDR+14, GETPDR+15, GPLIST+2~, GPLIST+19*, GPLIST+20*, GPLIST+23, GPLIST+25, GPLIST+27 , GPLIST+28, GPLIST+40 |
DRBEG | FIEVAL+2~, FIEVAL+11, FIEVAL+16, GETPDR~, GETPDR+11* |
DREND | FIEVAL+2~, FIEVAL+11, FIEVAL+12, FIEVAL+16, GETPDR~, GETPDR+12* |
DRGRIEN | EVALFI+1~, EVALFI+9*, EVALFI+10*, EVALFI+12, EVALFI+16, EVALPL+2~, EVALPL+12*, EVALPL+13*, EVALPL+15, EVALPL+20 , EVALTERM+2~, EVALTERM+11*, EVALTERM+12*, EVALTERM+14, EVALTERM+20, FIEVAL~, FIEVAL+13, FIEVAL+15, GPLIST~, GPLIST+8 , GPLIST+10 |
DRUG | FIEVAL+2~, FIEVAL+16*, FIEVAL+17*, FIEVAL+22 |
DRUGIEN | FIEVAL+2~, FIEVAL+14*, FIEVAL+15*, FIEVAL+16, FIEVAL+18, FIEVAL+28, GPLIST+2~, GPLIST+9*, GPLIST+10*, GPLIST+11 , GPLIST+12, GPLIST+14 |
ENODE | EVALFI~, EVALFI+10, EVALFI+12, EVALPL~, EVALPL+13, EVALPL+15, EVALTERM~, EVALTERM+12, EVALTERM+14 |
FIEVAL | EVALFI~, FIEVAL~, FIEVAL+12*, FIEVAL+35*, FIEVAL+44 |
FIEVAL( | EVALFI+13*, EVALFI+17*, EVALFI+18*, FIEVAL+42* |
FIEVT | EVALFI+1~, EVALFI+14!, EVALFI+16, EVALFI+17, EVALTERM+2~, EVALTERM+16!, EVALTERM+20, EVALTERM+21, FIEVAL+2~, FIEVAL+21! , FIEVAL+22, FIEVAL+23, FIEVAL+27, ONLIST~ |
FIEVT( | FIEVAL+25, FIEVAL+29, FIEVAL+30, ONLIST+5, ONLIST+6 |
FIEVTL | FIEVAL+2~, FIEVAL+27, ONLIST~ |
FIEVTL( | FIEVAL+28*, FIEVAL+29*, FIEVAL+34!, FIEVAL+42, ONLIST+4, ONLIST+5, ONLIST+6 |
FILENUM | GPLIST+2~, GPLIST+26*, GPLIST+27*, GPLIST+28, GPLIST+30, GPLIST+37*, GPLIST+38*, GPLIST+40 |
FINDING | EVALFI+1~, EVALFI+11*, EVALFI+12*, EVALFI+13, EVALFI+15, EVALFI+16, EVALFI+17, EVALFI+18, FIEVAL~, FIEVAL+22 |
FINDPA | EVALFI+1~, EVALFI+14!, EVALFI+15*, EVALFI+16, EVALPL~, EVALPL+19, EVALTERM~, EVALTERM+19, FIEVAL~, FIEVAL+22 |
FINDPA(0 | EVALFI+18, FIEVAL+5, FIEVAL+10, GPLIST+16 |
IBEG | GETPDR+2~, GETPDR+4*, GETPDR+6*, GETPDR+11 |
IEND | GETPDR+2~, GETPDR+5*, GETPDR+6*, GETPDR+12 |
IND | FIEVAL+2~, FIEVAL+24*, FIEVAL+25*, FIEVAL+27, FIEVAL+29, FIEVAL+30, FIEVAL+39*, FIEVAL+40*, FIEVAL+42, GPLIST+2~ , GPLIST+35*, GPLIST+36*, GPLIST+38, GPLIST+40, ONLIST~, ONLIST+5, ONLIST+6 |
ITEM | GPLIST+2~, GPLIST+22*, GPLIST+23*, GPLIST+25, GPLIST+27, GPLIST+28, GPLIST+30, GPLIST+33*, GPLIST+34*, GPLIST+36 , GPLIST+38, GPLIST+40 |
JND | ONLIST+2~, ONLIST+3*, ONLIST+4*, ONLIST+5, ONLIST+6 |
NFOUND | FIEVAL+3~, FIEVAL+14*, FIEVAL+28*, FIEVAL+29, FIEVAL+30, FIEVAL+32, FIEVAL+35, FIEVAL+37*, FIEVAL+38, FIEVAL+40 , FIEVAL+41*, FIEVAL+42, FIEVAL+44, GPLIST+2~, GPLIST+24*, GPLIST+25*, GPLIST+27, GPLIST+28, GPLIST+30, GPLIST+31* , GPLIST+32, GPLIST+34, GPLIST+36, GPLIST+38, GPLIST+39*, GPLIST+40 |
NOCC | FIEVAL+3~, FIEVAL+5*, FIEVAL+6*, FIEVAL+7, FIEVAL+8*, FIEVAL+32, FIEVAL+38, FIEVAL+40, GPLIST+2~, GPLIST+16* , GPLIST+17*, GPLIST+32, GPLIST+34, GPLIST+36, GPLIST+38 |
NOINDEX | EVALFI+1~, EVALFI+2*, EVALFI+5*, EVALFI+8*, EVALFI+13, EVALPL+2~, EVALPL+4*, EVALPL+7*, EVALPL+10*, EVALPL+11 , EVALTERM+2~, EVALTERM+4*, EVALTERM+7*, EVALTERM+10*, EVALTERM+15 |
OBEG | GETPDR+2~, GETPDR+8*, GETPDR+10*, GETPDR+11 |
OEND | GETPDR+2~, GETPDR+9*, GETPDR+10*, GETPDR+12 |
ONLIST | ONLIST+2~, ONLIST+3*, ONLIST+4, ONLIST+7*, ONLIST+8 |
PFINDPA | EVALPL+2~, EVALPL+16!, EVALPL+19, EVALPL+20, EVALTERM+2~, EVALTERM+16!, EVALTERM+19, EVALTERM+20, GPLIST~, GPLIST+12 , GPLIST+13, GPLIST+14 |
PFINDPA(0 | GPLIST+7 |
PLIST | EVALPL~, EVALPL+20, GPLIST~, GPLIST+40 |
POI | FIEVAL+3~, FIEVAL+19*, FIEVAL+20*, FIEVAL+22, GPLIST+2~, GPLIST+11*, GPLIST+13 |
POIBEG | FIEVAL+3~, FIEVAL+11, FIEVAL+19, GETPDR~, GETPDR+14*, GETPDR+16* |
POIEND | FIEVAL+3~, FIEVAL+11, FIEVAL+12, FIEVAL+19, GETPDR~, GETPDR+15*, GETPDR+16* |
POIIEN | FIEVAL+3~, FIEVAL+18*, FIEVAL+19 |
>> PXRMITEM | EVALFI+4, EVALFI+7 |
RXTYL | FIEVAL+3~, FIEVAL+10, FIEVAL+11, FIEVAL+22, GETPDR~, GPLIST+2~, GPLIST+7 |
RXTYL("I" | GETPDR+3, GPLIST+12 |
RXTYL("N" | GETPDR+13, GPLIST+13 |
RXTYL("O" | GETPDR+7, GPLIST+14 |
SDIR | FIEVAL+4~, FIEVAL+7*, FIEVAL+33, FIEVAL+38, FIEVAL+44 |
TDATE | FIEVAL+4~, FIEVAL+33*, FIEVAL+34 |
TEMP | EVALPL+3~, EVALTERM+3~, GPLIST+3~, GPLIST+28*, GPLIST+29 |
TERMARR | EVALPL~, EVALTERM~, EVALTERM+20 |
TERMARR("E" | EVALPL+13, EVALPL+15, EVALTERM+12, EVALTERM+14 |
TERMARR("IEN" | EVALPL+6, EVALPL+9, EVALTERM+6, EVALTERM+9 |
TERMARR(20 | EVALPL+17, EVALTERM+17 |
TF | GPLIST+3~, GPLIST+18*, GPLIST+20, GPLIST+23, GPLIST+25, GPLIST+27, GPLIST+28, GPLIST+30, GPLIST+32, GPLIST+34 , GPLIST+36, GPLIST+38, GPLIST+40 |
TFIEVAL | EVALTERM~ |
TFIEVAL( | EVALTERM+15*, EVALTERM+21*, EVALTERM+22* |
TFINDING | EVALPL+3~, EVALPL+14*, EVALPL+15*, EVALPL+17, EVALTERM+3~, EVALTERM+13*, EVALTERM+14*, EVALTERM+15, EVALTERM+17, EVALTERM+20 , EVALTERM+21, EVALTERM+22 |
TFINDPA | EVALPL+3~, EVALPL+16!, EVALPL+17*, EVALPL+19, EVALTERM+3~, EVALTERM+16!, EVALTERM+17*, EVALTERM+19 |
TFINDPA(0 | EVALTERM+22 |
TGLIST | GPLIST+3~, GPLIST+4*, GPLIST+5, GPLIST+12, GPLIST+13, GPLIST+14, GPLIST+20, GPLIST+23, GPLIST+25, GPLIST+27 , GPLIST+28, GPLIST+40, GPLIST+41 |
TIND | FIEVAL+4~, FIEVAL+33*, FIEVAL+34 |
TLIST | GPLIST+3~, GPLIST+21! |
TLIST( | GPLIST+30*, GPLIST+32, GPLIST+34, GPLIST+36, GPLIST+38 |
U | EVALFI+18, EVALTERM+22, FIEVAL+5, GPLIST+16, GPLIST+29 |
XREF | EVALFI~, EVALFI+16, EVALPL~, EVALPL+20, EVALTERM~, EVALTERM+20, FIEVAL~, FIEVAL+13, FIEVAL+15, FIEVAL+45 , GPLIST~, GPLIST+8, GPLIST+10, GPLIST+41 |