PSOORRL ;BHAM ISC/SAB - returns patient's outpatient meds ;Dec 10, 2021@09:32:05
Source file <PSOORRL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OCL(DFN,BDT,EDT,VIEW,PSOBDTIN,PSOEDTIN) | ;entry point to return condensed list
; DFN - Pointer to Patient file (#2) ; BDT - Beginning Date for Outpatient & Non-VA Meds ; EDT - Ending Date for Outpatient & Non-VA Meds ; VIEW=0 - This returns the list as it was returned prior to GUI 27 ; VIEW=1 - This returns the list in original view GUI 27 ; VIEW=2 - This is the new sort with GUI 27 ; VIEW=3 - New sort by Sort by Drug Name/status with GUI 27 ; PSOBDTIN - Beginning Date for Inpatient Meds (Optional) ; PSOEDTIN - End Date for Inpatient Meds (Optional) |
|
| ST | ||
| OEL(DFN,RXNUM) | ;returns expanded list on specific order
|
|
| WAIT | ; IF PENDING ENTRY STILL BEING BUILT SEE IF IT COMPLETES WITHIN ANOTHER SECOND
|
|
| NVA | ; Set Non-VA Med Orders in the ^TMP Global
|
|
| TMPBLD | ||
| RSTC(REF) | ; return to stock
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(50.606 - [#50.606] | ST+31, NVA+10 |
| ^PS(50.7 - [#50.7] | ST+31, NVA+10 |
| ^PS(51.2 - [#51.2] | ST+17, ST+18, ST+19 |
| ^PS(52.41 - [#52.41] | ST+27, ST+34, ST+35, ST+36, ST+38, WAIT+1 |
| ^PS(55 - [#55] | ST+1, ST+4, OEL+2, NVA+6, NVA+8, TMPBLD+4 |
| ^PSDRUG - [#50] | ST+8, ST+31, OEL+22, OEL+29, OEL+30, NVA+10 |
| ^PSRX - [#52] | ST+4, ST+5, ST+6, ST+7, ST+8, ST+12, ST+15, ST+16, ST+17, ST+18 , ST+19, ST+21, ST+23, ST+24, ST+25, OEL+9, OEL+10, OEL+12, OEL+14, OEL+15 , OEL+16, OEL+19, OEL+20, OEL+26, OEL+27, OEL+32, OEL+35, OEL+37, OEL+38, OEL+41 , OEL+42, RSTC+1 |
| ^TMP("PS" | ST+2!, ST+8*, ST+9*, ST+13*, ST+14*, ST+15*, ST+16*, ST+18*, ST+19*, ST+20* , ST+23*, ST+24*, ST+25*, ST+31*, ST+32*, ST+33*, ST+34*, ST+35*, ST+36*, ST+37* , ST+38*, OEL+5!, OEL+11*, OEL+12*, OEL+15*, OEL+16*, OEL+17*, OEL+20*, OEL+21*, OEL+22* , OEL+23*, OEL+27*, OEL+28*, OEL+30*, OEL+31*, OEL+32*, OEL+33*, OEL+37*, OEL+38*, OEL+40* , OEL+41*, OEL+42*, TMPBLD*, TMPBLD+1*, TMPBLD+2*, TMPBLD+3*, TMPBLD+4*, RSTC+2*, RSTC+3* |
| ^VA(200 - [#200] | ST+9, OEL+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDT | OCL~, OCL+13, ST+2, ST+42!, NVA+3, NVA+14, NVA+16, NVA+19, NVA+26 |
| >> BDT1 | NVA+19*, NVA+20, NVA+22, NVA+26*, NVA+27, NVA+29 |
| COD | OEL+29*, OEL+30! |
| DBT1 | ST+42! |
| DFN | OCL~, ST+1, ST+4, ST+27, ST+40, OEL~, OEL+1, OEL+2, NVA+6, NVA+8 , TMPBLD+4 |
| >> DRG | NVA+10*, TMPBLD |
| DT | ST+2, ST+10, OEL+24, OEL+29, NVA+4, NVA+5 |
| EDT | OCL~, OCL+14, ST+2, ST+42!, NVA+3, NVA+15, NVA+19, NVA+26 |
| EDT1 | ST+42!, NVA+19*, NVA+21, NVA+26*, NVA+28 |
| >> EXDT | ST+3*, ST+4* |
| >> FL | OEL+5*, OEL+6, OEL+7, OEL+8 |
| >> I | ST+7*, ST+24*, OEL+14*, OEL+15, OEL+16, OEL+18, OEL+19*, OEL+20, OEL+38*, OEL+41* , NVA+6*, NVA+8, TMPBLD, TMPBLD+4 |
| >> IEN | ST+36*, ST+37* |
| IFN | ST+3*, ST+4*, ST+5, ST+6, ST+7, ST+8, ST+12, ST+15, ST+16, ST+17 , ST+18, ST+19, ST+21, ST+23, ST+24, ST+25, ST+27*, ST+31, ST+34, ST+35 , ST+36, ST+38, OEL+5!*, OEL+9, OEL+10, OEL+12, OEL+14, OEL+15, OEL+16, OEL+19 , OEL+20, OEL+26, OEL+27, OEL+32, OEL+35, OEL+37, OEL+38, OEL+41, OEL+42, WAIT+1 , RSTC+1, RSTC+2, RSTC+3 |
| >> II | RSTC+1*, RSTC+2, RSTC+3 |
| INST | ST+36*, OEL+5! |
| INST( | ST+36* |
| >> ITFN | ST+22*, ST+23, ST+24*, OEL+36*, OEL+37, OEL+38*, OEL+40*, OEL+41* |
| >> J | RSTC+1* |
| >> LSTDS | ST+6*, ST+7*, ST+13 |
| >> LSTFD | ST+6*, ST+7*, ST+13, OEL+10*, OEL+14*, OEL+27 |
| >> LSTRD | ST+6*, ST+7*, ST+13 |
| >> MDR | ST+16*, ST+17*, ST+18, ST+19 |
| >> MIG | ST+36*, ST+37 |
| >> MR | ST+16*, ST+17, ST+18, ST+19 |
| >> PSBDT | ST+2*, ST+3, NVA+4, NVA+9 |
| >> PSEDT | ST+2*, NVA+9 |
| PSOACT | NVA+2~ |
| PSOBDT | NVA+2~, NVA+3*, NVA+4*, NVA+5 |
| PSOBDTIN | OCL~, OCL+12, OCL+13*, ST+40 |
| PSODC | NVA+2~ |
| PSODCDT | NVA+2~ |
| PSOEDT | NVA+2~, NVA+3*, NVA+4*, NVA+5* |
| PSOEDTIN | OCL~, OCL+12, OCL+14*, ST+40 |
| PSOELSE | ST+21*, ST+22, ST+26!, OEL+35*, OEL+36, OEL+39! |
| >> PSOR | ST+27*, ST+28, ST+29, ST+30, ST+31, ST+32, ST+33, WAIT+1* |
| REF | RSTC~, RSTC+1, RSTC+2, RSTC+3 |
| >> RX0 | ST+6*, ST+8, ST+9, ST+13, OEL+10*, OEL+11, OEL+22, OEL+23, OEL+27, OEL+28 , OEL+29, OEL+30 |
| >> RX2 | ST+6*, ST+8, ST+10, OEL+10*, OEL+11, OEL+12, OEL+22, OEL+24 |
| >> RX3 | ST+6*, OEL+10*, OEL+11 |
| RXNUM | OEL~, OEL+1, OEL+2, OEL+5* |
| >> SC | ST+15*, OEL+31*, OEL+32* |
| >> SCH | ST+15*, ST+34*, ST+35*, OEL+31*, OEL+32* |
| SD | ST~, ST+34*, ST+35*, ST+36*, ST+37*, OEL+4~ |
| SDT | ST~, ST+42!, NVA+2~, NVA+11*, NVA+12, NVA+14, NVA+15, NVA+18, NVA+19, NVA+24 , NVA+26 |
| SDT1 | ST~, ST+42!, NVA+2~, NVA+19*, NVA+20, NVA+21, NVA+26*, NVA+27, NVA+28 |
| >> SG | ST+37* |
| >> ST | ST+11*, ST+12*, ST+13, OEL+25*, OEL+26*, OEL+27 |
| >> ST0 | ST+10*, ST+11, OEL+24*, OEL+25 |
| >> STA | ST+6*, ST+10, ST+12, OEL+10*, OEL+24, OEL+26 |
| >> TFN | ST+2*, ST+6*, ST+8, ST+9, ST+13, ST+14, ST+15, ST+16, ST+18, ST+19 , ST+20, ST+23, ST+24, ST+25, ST+31*, ST+32, ST+33, ST+34, ST+35, ST+36 , ST+37, ST+38, ST+40, TMPBLD*, TMPBLD+1, TMPBLD+2, TMPBLD+3, TMPBLD+4 |
| >> TRM | ST+6*, ST+7*, ST+8, OEL+10*, OEL+14*, OEL+27 |
| U | ST+25, ST+38, OEL+42, TMPBLD+4 |
| VIEW | OCL~, OCL+16, ST+40 |
| X | ST+2, ST+21*, ST+42!, OEL+35*, NVA+6*, NVA+7, NVA+9, NVA+10, NVA+11, NVA+16 , NVA+22, NVA+24, NVA+29, TMPBLD+1, TMPBLD+2, TMPBLD+3 |
| >> X1 | ST+2* |
| >> X2 | ST+2* |