©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PXRMDRCL ; SLC/PKR - Handle VA DRUG CLASS findings. ;08/04/2006
Source file <PXRMDRCL.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 5 | (MHVOUT,OUTPUT)^PXRMDIN (MHVOUT,OUTPUT)^PXRMDNVA (MHVOUT,OUTPUT)^PXRMDOUT (EVALFI,EVALPL,EVALTERM)^PXRMDRGR $$INSCHR^PXRMEXLC |
| National Drug File | 1 | $$CLASS2^PSNAPIS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
| EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate drug class
|
|
| EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;Evaluate drug class (file #50.605) findings.
|
|
| OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
|
| EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate VA Drug Class terms
|
| Name | Field # of Occurrence |
|---|---|
| $$CLASS2^PSNAPIS | MHVOUT+4, OUTPUT+5 |
| MHVOUT^PXRMDIN | MHVOUT+12 |
| OUTPUT^PXRMDIN | OUTPUT+14 |
| MHVOUT^PXRMDNVA | MHVOUT+13 |
| OUTPUT^PXRMDNVA | OUTPUT+15 |
| MHVOUT^PXRMDOUT | MHVOUT+14 |
| OUTPUT^PXRMDOUT | OUTPUT+16 |
| EVALFI^PXRMDRGR | EVALFI+1 |
| EVALPL^PXRMDRGR | EVALPL+2 |
| EVALTERM^PXRMDRGR | EVALTERM+2 |
| $$INSCHR^PXRMEXLC | OUTPUT+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLASSIEN | MHVOUT+1~, MHVOUT+2*, MHVOUT+4, OUTPUT+2~, OUTPUT+3*, OUTPUT+5 |
| DEFARR | EVALFI~, EVALFI+1 |
| DFN | EVALFI~, EVALFI+1, EVALTERM~, EVALTERM+2 |
| DRUGCLAS | MHVOUT+1~, MHVOUT+4*, MHVOUT+5, OUTPUT+2~, OUTPUT+5*, OUTPUT+6 |
| ENODE | EVALFI~, EVALFI+1, EVALTERM~, EVALTERM+2, EVALPL~, EVALPL+2 |
| FIEVAL | EVALFI~, EVALFI+1 |
| FINDPA | EVALTERM~, EVALTERM+2, EVALPL~, EVALPL+2 |
| FTYPE | MHVOUT+1~, MHVOUT+10*, MHVOUT+12, MHVOUT+13, MHVOUT+14, OUTPUT+2~, OUTPUT+12*, OUTPUT+14, OUTPUT+15, OUTPUT+16 |
| IFIEVAL | MHVOUT~, OUTPUT~ |
| IFIEVAL( | MHVOUT+8, MHVOUT+9, MHVOUT+11, OUTPUT+10, OUTPUT+11, OUTPUT+13 |
| IFIEVAL("FINDING" | MHVOUT+2, OUTPUT+3 |
| IND | MHVOUT+1~, MHVOUT+7*, MHVOUT+8*, MHVOUT+9, MHVOUT+11, OUTPUT+2~, OUTPUT+9*, OUTPUT+10*, OUTPUT+11, OUTPUT+13 |
| INDENT | MHVOUT~, MHVOUT+12, MHVOUT+13, MHVOUT+14, OUTPUT~, OUTPUT+8, OUTPUT+14, OUTPUT+15, OUTPUT+16 |
| NLINES | MHVOUT~, MHVOUT+6*, MHVOUT+12, MHVOUT+13, MHVOUT+14, MHVOUT+15*, OUTPUT~, OUTPUT+7*, OUTPUT+8, OUTPUT+14 , OUTPUT+15, OUTPUT+16 |
| PFIEVAL | MHVOUT+1~, MHVOUT+11!*, MHVOUT+12, MHVOUT+13, MHVOUT+14, OUTPUT+2~, OUTPUT+13!*, OUTPUT+14, OUTPUT+15, OUTPUT+16 |
| PLIST | EVALPL~, EVALPL+2 |
| PNAME | MHVOUT+1~, MHVOUT+5*, MHVOUT+6 |
| TEMP | MHVOUT+9*, MHVOUT+10, OUTPUT+2~, OUTPUT+6*, OUTPUT+8, OUTPUT+11*, OUTPUT+12 |
| TERMARR | EVALTERM~, EVALTERM+2, EVALPL~, EVALPL+2 |
| TEXT | MHVOUT~, MHVOUT+12, MHVOUT+13, MHVOUT+14, OUTPUT~, OUTPUT+14, OUTPUT+15, OUTPUT+16 |
| TEXT( | MHVOUT+6*, MHVOUT+15*, OUTPUT+8* |
| TFIEVAL | EVALTERM~, EVALTERM+2 |
| U | MHVOUT+5, OUTPUT+6 |