PXRMDOUT ; SLC/PKR - Handle outpatient med findings. ;02/10/2010
Source file <PXRMDOUT.m>
| 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 |
|---|---|---|
| GETDATA(DAS,FIEVT) | ;Return data for an outpatient drug finding.
|
|
| EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate terms.
|
|
| MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
| OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
| Name | Field # of Occurrence |
|---|---|
| $$STAT^PSO52CLR | GETDATA+4 |
| PSRX^PSOPXRM1 | GETDATA+2 |
| $$DRUG^PSSCLINR | MHVOUT+4, OUTPUT+4 |
| $$DURATION^PXRMDATE | GETDATA+7 |
| $$EDATE^PXRMDATE | MHVOUT+6, MHVOUT+7, OUTPUT+7, OUTPUT+8, OUTPUT+9, OUTPUT+11 |
| $$INSCHR^PXRMEXLC | OUTPUT+6 |
| EVALTERM^PXRMINDX | EVALTERM+1 |
| FORMATS^PXRMTEXT | MHVOUT+8, OUTPUT+13 |
| $$FMADD^XLFDT | GETDATA+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DAS | GETDATA~, GETDATA+2 |
| DFN | EVALTERM~, EVALTERM+1 |
| DRUG | MHVOUT+1~, MHVOUT+2*, MHVOUT+4*, MHVOUT+5, OUTPUT+2~, OUTPUT+3*, OUTPUT+4*, OUTPUT+6 |
| ENODE | EVALTERM~, EVALTERM+1 |
| FIEVT | GETDATA~, GETDATA+2 |
| FIEVT("DAYS S | UPPLY" , GETDATA+6 |
| FIEVT("DURATION" | GETDATA+7* |
| FIEVT("RELEAS | ED DATE/TIME" , GETDATA+5 |
| FIEVT("START | DATE" , GETDATA+5*, GETDATA+6, GETDATA+7 |
| FIEVT("STATUS" | GETDATA+4* |
| FIEVT("STOP D | ATE" , GETDATA+6*, GETDATA+7 |
| FIEVT("VALUE" | GETDATA+4* |
| FINDPA | EVALTERM~, EVALTERM+1 |
| IFIEVAL | MHVOUT~, OUTPUT~ |
| IFIEVAL("DATE" | OUTPUT+7 |
| IFIEVAL("DAYS | SUPPLY" , OUTPUT+12 |
| IFIEVAL("DISP | ENSE DRUG" , MHVOUT+2, OUTPUT+3 |
| IFIEVAL("DURATION" | OUTPUT+10 |
| IFIEVAL("RELE | ASED DATE/TIME" , OUTPUT+11 |
| IFIEVAL("STAR | T DATE" , MHVOUT+6, OUTPUT+8 |
| IFIEVAL("STATUS" | OUTPUT+7 |
| IFIEVAL("STOP | DATE" , MHVOUT+7, OUTPUT+9 |
| INDENT | MHVOUT~, MHVOUT+8, OUTPUT~, OUTPUT+6, OUTPUT+13 |
| JND | MHVOUT+1~, MHVOUT+9*, OUTPUT+2~, OUTPUT+14* |
| NLINES | MHVOUT~, MHVOUT+9*, OUTPUT~, OUTPUT+5*, OUTPUT+6, OUTPUT+14*, OUTPUT+15* |
| NOUT | MHVOUT+1~, MHVOUT+8, MHVOUT+9, OUTPUT+2~, OUTPUT+13, OUTPUT+14 |
| >> PXRMRM | MHVOUT+8, OUTPUT+13 |
| TEMP | MHVOUT+1~, MHVOUT+5*, MHVOUT+6*, MHVOUT+7*, MHVOUT+8, OUTPUT+2~, OUTPUT+7*, OUTPUT+8*, OUTPUT+9*, OUTPUT+10* , OUTPUT+11*, OUTPUT+12*, OUTPUT+13 |
| TERMARR | EVALTERM~, EVALTERM+1 |
| TEXT | MHVOUT~, OUTPUT~ |
| TEXT( | MHVOUT+9*, OUTPUT+6*, OUTPUT+14*, OUTPUT+15* |
| TEXTOUT | MHVOUT+1~, MHVOUT+8, OUTPUT+2~, OUTPUT+13 |
| TEXTOUT( | MHVOUT+9, OUTPUT+14 |
| TFIEVAL | EVALTERM~, EVALTERM+1 |