PXRMDNVA ;SLC/PKR - Handle non-VA med findings. ;07/08/2010
Source file <PXRMDNVA.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 4 | ($$DURATION,$$EDATE)^PXRMDATE $$INSCHR^PXRMEXLC EVALTERM^PXRMINDX FORMATS^PXRMTEXT |
| Outpatient Pharmacy | 1 | NVA^PSOPXRM1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
| GETDATA(DAS,FIEVT) | ;Return data for an non-VA med finding.
|
|
| EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate terms.
|
|
| OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DAS | GETDATA~, GETDATA+2 |
| DATE | MHVOUT+1~, MHVOUT+4*, MHVOUT+5*, MHVOUT+6, OUTPUT+2~, OUTPUT+5*, OUTPUT+6, OUTPUT+8*, OUTPUT+9*, OUTPUT+10 |
| DFN | EVALTERM~, EVALTERM+1 |
| ENODE | EVALTERM~, EVALTERM+1 |
| FIEVT | GETDATA~, GETDATA+2 |
| FIEVT("DISCON | TINUED DATE" , GETDATA+5 |
| FIEVT("DOCUME | NTED DATE" , GETDATA+4 |
| FIEVT("DURATION" | GETDATA+5* |
| FIEVT("START | DATE" , GETDATA+4*, GETDATA+5 |
| FIEVT("STATUS" | GETDATA+3 |
| FIEVT("VALUE" | GETDATA+3* |
| FINDPA | EVALTERM~, EVALTERM+1 |
| IFIEVAL | MHVOUT~, OUTPUT~ |
| IFIEVAL("DATE" | OUTPUT+5 |
| IFIEVAL("DISC | ONTINUED DATE" , MHVOUT+4, OUTPUT+8 |
| IFIEVAL("DOSA | GE FORM" , OUTPUT+12 |
| IFIEVAL("DOSAGE" | OUTPUT+13 |
| IFIEVAL("DURATION" | OUTPUT+11 |
| IFIEVAL("MEDI | CATION ROUTE" , OUTPUT+14 |
| IFIEVAL("ORDE | RABLE ITEM" , MHVOUT+2, OUTPUT+4 |
| IFIEVAL("STAR | T DATE" , MHVOUT+3, OUTPUT+7 |
| IFIEVAL("STATUS" | OUTPUT+6 |
| INDENT | MHVOUT~, MHVOUT+7, OUTPUT~, OUTPUT+4, OUTPUT+15 |
| JND | MHVOUT+1~, MHVOUT+8*, OUTPUT+2~, OUTPUT+16* |
| NLINES | MHVOUT~, MHVOUT+8*, OUTPUT~, OUTPUT+3*, OUTPUT+4, OUTPUT+16*, OUTPUT+17* |
| NOUT | MHVOUT+1~, MHVOUT+7, MHVOUT+8, OUTPUT+2~, OUTPUT+15, OUTPUT+16 |
| >> PXRMRM | MHVOUT+7, OUTPUT+15 |
| TEMP | MHVOUT+1~, MHVOUT+2*, MHVOUT+3*, MHVOUT+6*, MHVOUT+7, OUTPUT+2~, OUTPUT+6*, OUTPUT+7*, OUTPUT+10*, OUTPUT+11* , OUTPUT+12*, OUTPUT+13*, OUTPUT+14*, OUTPUT+15 |
| TERMARR | EVALTERM~, EVALTERM+1 |
| TEXT | MHVOUT~, OUTPUT~ |
| TEXT( | MHVOUT+8*, OUTPUT+4*, OUTPUT+16*, OUTPUT+17* |
| TEXTOUT | MHVOUT+1~, MHVOUT+7, OUTPUT+2~, OUTPUT+15 |
| TEXTOUT( | MHVOUT+8, OUTPUT+16 |
| TFIEVAL | EVALTERM~, EVALTERM+1 |