PXRMDRUG ;SLC/PKR - Handle drug findings. ;01/13/2017
Source file <PXRMDRUG.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 8 | (MHVOUT,OUTPUT)^PXRMDIN (MHVOUT,OUTPUT)^PXRMDNVA (MHVOUT,OUTPUT)^PXRMDOUT NOINDEX^PXRMERRH $$INSCHR^PXRMEXLC GPLIST^PXRMINDL SRXTYL^PXRMRXTY (COPY,DORDER,IEVALTER,SPFINDPA)^PXRMTERM |
National Drug File | 1 | ($$CLASS2,$$VAGN)^PSNAPIS |
Pharmacy Data Management | 1 | ($$DRUG,$$ITEM)^PSSCLINR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
DEVAL(DFN,FINDPA,DEFARR,FINDING,RXTYL,DRUG,POI,FIEVAL) | ;Evaluate a drug
|
|
EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;Evaluate drug findings.
|
|
EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate drug terms for
|
|
EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate drug terms.
|
|
MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
|
CLORGNT(FINDING) | ;Generate drug class or VA Generic text.
|
Name | Field # of Occurrence |
---|---|
$$CLASS2^PSNAPIS | CLORGNT+7 |
$$VAGN^PSNAPIS | CLORGNT+12 |
$$DRUG^PSSCLINR | MHVOUT+4, OUTPUT+4 |
$$ITEM^PSSCLINR | EVALFI+12, EVALPL+16, EVALTERM+18 |
MHVOUT^PXRMDIN | MHVOUT+14 |
OUTPUT^PXRMDIN | OUTPUT+12 |
MHVOUT^PXRMDNVA | MHVOUT+15 |
OUTPUT^PXRMDNVA | OUTPUT+13 |
MHVOUT^PXRMDOUT | MHVOUT+16 |
OUTPUT^PXRMDOUT | OUTPUT+14 |
NOINDEX^PXRMERRH | EVALFI+5, EVALFI+8, EVALPL+6, EVALPL+9, EVALTERM+6, EVALTERM+9 |
$$INSCHR^PXRMEXLC | MHVOUT+7, OUTPUT+5 |
GPLIST^PXRMINDL | EVALPL+25, EVALPL+26, EVALPL+27 |
SRXTYL^PXRMRXTY | EVALFI+19, EVALPL+24, EVALTERM+29 |
COPY^PXRMTERM | EVALTERM+44 |
DORDER^PXRMTERM | EVALTERM+43 |
IEVALTER^PXRMTERM | DEVAL+19, EVALTERM+42 |
SPFINDPA^PXRMTERM | EVALPL+22, EVALTERM+27 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXRMINDX(52 | EVALFI+4, EVALPL+5, EVALTERM+5 |
^PXRMINDX(55 | EVALFI+7, EVALPL+8, EVALTERM+8 |
^TMP($J | EVALPL+13!, EVALPL+33, EVALPL+36, EVALPL+38, EVALPL+40, EVALPL+41, EVALPL+53*, EVALPL+54! |
Name | Line Occurrences |
---|---|
$$CLORGNT | MHVOUT+2, OUTPUT+3 |
DEVAL | EVALFI+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BDT | EVALPL+2~ |
DATE | EVALPL+2~, EVALPL+42*, EVALPL+43, EVALPL+44*, EVALPL+45*, EVALPL+47, EVALPL+49, EVALPL+51 |
DATEORDR | EVALTERM+1~, EVALTERM+3~, EVALTERM+43, EVALTERM+44 |
DEFARR | DEVAL~, EVALFI~, EVALFI+20 |
DEFARR("E" | EVALFI+11, EVALFI+14 |
DEFARR(20 | DEVAL+7, DEVAL+11, DEVAL+15, EVALFI+16 |
DFN | DEVAL~, DEVAL+19, EVALFI~, EVALFI+20, EVALPL+2~, EVALPL+32*, EVALPL+33*, EVALPL+36, EVALPL+38, EVALPL+40 , EVALPL+41, EVALPL+53, EVALTERM~, EVALTERM+42 |
DRUG | DEVAL~, DEVAL+2, DEVAL+6, DEVAL+8, DEVAL+9, DEVAL+10, DEVAL+12, DEVAL+13, DEVAL+21, MHVOUT+1~ , MHVOUT+4*, MHVOUT+5, MHVOUT+7, MHVOUT+13, OUTPUT+2~, OUTPUT+4*, OUTPUT+5, OUTPUT+11 |
DRUGCLAS | CLORGNT+1~, CLORGNT+7*, CLORGNT+8 |
DRUGIEN | EVALFI+1~, EVALFI+10*, EVALFI+11*, EVALFI+12, EVALFI+14, EVALFI+20, EVALPL+2~, EVALPL+14*, EVALPL+15*, EVALPL+16 , EVALPL+18, EVALPL+25, EVALPL+27, EVALTERM+1~, EVALTERM+16*, EVALTERM+17*, EVALTERM+18, EVALTERM+20, EVALTERM+32, EVALTERM+33 , EVALTERM+40, EVALTERM+41, EVALTERM+47, MHVOUT+1~, MHVOUT+3*, MHVOUT+4 |
DTERM | DEVAL+3~, DEVAL+19, EVALFI+1~, EVALTERM+1~, EVALTERM+23!, EVALTERM+42 |
DTERM("E" | DEVAL+9*, DEVAL+13*, DEVAL+17*, EVALTERM+33*, EVALTERM+37*, EVALTERM+41* |
DTERM("IEN" | DEVAL+5*, EVALTERM+24* |
DTERM(0 | DEVAL+5*, EVALTERM+24* |
DTERM(20 | DEVAL+7*, DEVAL+8*, DEVAL+11*, DEVAL+12*, DEVAL+15*, DEVAL+16*, EVALTERM+31*, EVALTERM+32*, EVALTERM+35*, EVALTERM+36* , EVALTERM+39*, EVALTERM+40* |
DTFIEVAL | EVALTERM+1~, EVALTERM+23!, EVALTERM+42, EVALTERM+43, EVALTERM+44 |
EDT | EVALPL+2~ |
ENODE | EVALFI~, EVALFI+11, EVALFI+14, EVALPL~, EVALPL+15, EVALPL+18, EVALTERM~, EVALTERM+17, EVALTERM+20 |
FIEVAL | DEVAL~, DEVAL+2*, DEVAL+20*, DEVAL+21, EVALFI~ |
FIEVAL( | EVALFI+15*, EVALFI+21* |
FIEVAL("DISPE | NSE DRUG" , DEVAL+21* |
FIEVAL("FINDING" | DEVAL+21* |
FIEVT | DEVAL+3~, DEVAL+18!, DEVAL+19, EVALFI+1~, EVALFI+17!, EVALFI+20, EVALFI+21 |
FIEVT(1 | DEVAL+20 |
FILENUM | EVALPL+2~, EVALPL+39*, EVALPL+40*, EVALPL+41, EVALPL+43, EVALPL+50*, EVALPL+51*, EVALPL+53 |
FINDING | DEVAL~, DEVAL+7, DEVAL+11, DEVAL+15, EVALFI+1~, EVALFI+13*, EVALFI+14*, EVALFI+15, EVALFI+16, EVALFI+20 , EVALFI+21, CLORGNT~, CLORGNT+3, CLORGNT+4 |
FINDPA | DEVAL~, DEVAL+19, EVALFI+1~, EVALFI+16*, EVALFI+20, EVALPL~, EVALPL+22, EVALTERM~, EVALTERM+27 |
FINDPA(0 | EVALFI+19, EVALPL+29, EVALTERM+12 |
FTYPE | MHVOUT+1~, MHVOUT+11*, MHVOUT+14, MHVOUT+15, MHVOUT+16, OUTPUT+2~, OUTPUT+9*, OUTPUT+12, OUTPUT+13, OUTPUT+14 |
GBL | CLORGNT+1~, CLORGNT+4*, CLORGNT+5, CLORGNT+10 |
IEN | CLORGNT+1~, CLORGNT+3*, CLORGNT+7, CLORGNT+12 |
IFIEVAL | MHVOUT~, OUTPUT~ |
IFIEVAL( | MHVOUT+9, MHVOUT+10, MHVOUT+12, OUTPUT+7, OUTPUT+8, OUTPUT+10 |
IFIEVAL("DISP | ENSE DRUG" , MHVOUT+3, OUTPUT+4 |
IFIEVAL("TERM | FINDING" , MHVOUT+2, OUTPUT+3 |
IND | EVALPL+2~, EVALPL+48*, EVALPL+49*, EVALPL+51, EVALPL+53, EVALTERM+1~, MHVOUT+1~, MHVOUT+8*, MHVOUT+9*, MHVOUT+10 , MHVOUT+12, OUTPUT+2~, OUTPUT+6*, OUTPUT+7*, OUTPUT+8, OUTPUT+10 |
INDENT | MHVOUT~, MHVOUT+7, MHVOUT+14, MHVOUT+15, MHVOUT+16, OUTPUT~, OUTPUT+5, OUTPUT+12, OUTPUT+13, OUTPUT+14 |
ITEM | EVALPL+2~, EVALPL+35*, EVALPL+36*, EVALPL+38, EVALPL+40, EVALPL+41, EVALPL+43, EVALPL+46*, EVALPL+47*, EVALPL+49 , EVALPL+51, EVALPL+53 |
JND | EVALTERM+1~, EVALTERM+46*, EVALTERM+47* |
LIST | EVALPL+2~ |
NAME | MHVOUT+1~, MHVOUT+5* |
NFOUND | EVALPL+2~, EVALPL+37*, EVALPL+38*, EVALPL+40, EVALPL+41, EVALPL+43, EVALPL+44*, EVALPL+45, EVALPL+47, EVALPL+49 , EVALPL+51, EVALPL+52*, EVALPL+53 |
NLINES | MHVOUT~, MHVOUT+2*, MHVOUT+6*, MHVOUT+7, MHVOUT+14, MHVOUT+15, MHVOUT+16, MHVOUT+17*, OUTPUT~, OUTPUT+3* , OUTPUT+5*, OUTPUT+12, OUTPUT+13, OUTPUT+14 |
NOCC | EVALPL+2~, EVALPL+29*, EVALPL+30*, EVALPL+45, EVALPL+47, EVALPL+49, EVALPL+51, EVALTERM+3~, EVALTERM+12*, EVALTERM+13* , EVALTERM+14, EVALTERM+15*, EVALTERM+44 |
NOINDEX | EVALFI+2~, EVALFI+3*, EVALFI+6*, EVALFI+9*, EVALFI+15, EVALPL+2~, EVALPL+4*, EVALPL+7*, EVALPL+10*, EVALPL+11 , EVALTERM+1~, EVALTERM+4*, EVALTERM+7*, EVALTERM+10*, EVALTERM+22 |
PFIEVAL | MHVOUT+1~, MHVOUT+12!*, MHVOUT+14, MHVOUT+15, MHVOUT+16, OUTPUT+2~, OUTPUT+10!*, OUTPUT+12, OUTPUT+13, OUTPUT+14 |
PFIEVAL("DISP | ENSE DRUG" , MHVOUT+13*, OUTPUT+11* |
PFINDPA | EVALPL+3~, EVALPL+19!, EVALPL+22, EVALPL+25, EVALPL+26, EVALPL+27, EVALTERM+1~, EVALTERM+23!, EVALTERM+27, EVALTERM+42 |
PFINDPA(0 | EVALPL+24, EVALTERM+29 |
PLIST | EVALPL~, EVALPL+53 |
POI | DEVAL~, DEVAL+2, DEVAL+14, DEVAL+16, DEVAL+17, EVALFI+2~, EVALFI+12*, EVALFI+20, EVALPL+3~, EVALPL+16* , EVALPL+26, EVALTERM+1~, EVALTERM+18*, EVALTERM+34, EVALTERM+36, EVALTERM+37 |
>> PXRMITEM | EVALFI+5, EVALFI+8 |
RXTYL | DEVAL~, EVALFI+2~, EVALFI+17!, EVALFI+19, EVALFI+20, EVALPL+3~, EVALPL+24, EVALTERM+2~, EVALTERM+29 |
RXTYL("I" | DEVAL+6, EVALPL+25, EVALTERM+30 |
RXTYL("N" | DEVAL+14, EVALPL+26, EVALTERM+34 |
RXTYL("O" | DEVAL+10, EVALPL+27, EVALTERM+38 |
SDIR | EVALTERM+3~, EVALTERM+14*, EVALTERM+44 |
TEMP | EVALPL+3~, EVALPL+41*, EVALPL+42, EVALTERM+2~, MHVOUT+1~, MHVOUT+10*, MHVOUT+11, OUTPUT+2~, OUTPUT+8*, OUTPUT+9 |
TERMARR | EVALPL~, EVALTERM~ |
TERMARR("E" | EVALPL+15, EVALPL+18, EVALTERM+17, EVALTERM+20 |
TERMARR("IEN" | EVALPL+6, EVALPL+9, EVALTERM+6, EVALTERM+9 |
TERMARR(20 | EVALPL+20, EVALTERM+25, EVALTERM+31, EVALTERM+35, EVALTERM+39 |
TEXT | MHVOUT~, MHVOUT+14, MHVOUT+15, MHVOUT+16, OUTPUT~, OUTPUT+12, OUTPUT+13, OUTPUT+14, CLORGNT+1~, CLORGNT+2* , CLORGNT+8*, CLORGNT+12*, CLORGNT+13 |
TEXT( | MHVOUT+2*, MHVOUT+7*, MHVOUT+17*, OUTPUT+3*, OUTPUT+5* |
TEXTOUT | OUTPUT+2~ |
TF | EVALPL+3~, EVALPL+31*, EVALPL+33, EVALPL+36, EVALPL+38, EVALPL+40, EVALPL+41, EVALPL+43, EVALPL+45, EVALPL+47 , EVALPL+49, EVALPL+51, EVALPL+53 |
TFIEVAL | EVALTERM~, EVALTERM+44 |
TFIEVAL( | EVALTERM+21*, EVALTERM+47* |
TFINDING | EVALPL+3~, EVALPL+17*, EVALPL+18*, EVALPL+20, EVALTERM+2~, EVALTERM+19*, EVALTERM+20*, EVALTERM+21, EVALTERM+25, EVALTERM+31 , EVALTERM+35, EVALTERM+39, EVALTERM+42, EVALTERM+44, EVALTERM+47 |
TFINDPA | EVALPL+3~, EVALPL+19!, EVALPL+20*, EVALPL+22, EVALTERM+2~, EVALTERM+23!, EVALTERM+25*, EVALTERM+27 |
TGLIST | EVALPL+3~, EVALPL+12*, EVALPL+13, EVALPL+25, EVALPL+26, EVALPL+27, EVALPL+33, EVALPL+36, EVALPL+38, EVALPL+40 , EVALPL+41, EVALPL+53, EVALPL+54 |
TLIST | EVALPL+3~, EVALPL+34! |
TLIST( | EVALPL+43*, EVALPL+45, EVALPL+47, EVALPL+49, EVALPL+51 |
U | DEVAL+8, DEVAL+12, DEVAL+16, EVALPL+29, EVALPL+42, EVALTERM+12, EVALTERM+32, EVALTERM+36, EVALTERM+40, CLORGNT+8 |