©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
PSJORMA2 ;BIR/MV-COLLECT DATA FOR ACTIVE IV AND FLUID PENDINGS ;19 Mar 99 / 10:20 AM
Source file <PSJORMA2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRT | ;Get IV nodes.
|
|
| INITOPI | ;* Set nurse's initial and the other print info.
|
|
| OS | ; Define admin times.
|
|
| PRTIV | ; Set up order info on IV label.
|
|
| L(X) | ;***Check to see if a new block if needed.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.7 - [#52.7] | PRTIV+11 |
| ^PS(53.1 - [#53.1] | PRT+5, PRT+6, PRT+10, PRTIV+2, INITOPI+3, INITOPI+7 |
| ^PS(55 - [#55] | PRT+5, PRT+6, PRT+10, INITOPI+3 |
| ^VA(200 - [#200] | INITOPI+4 |
| Name | Line Occurrences |
|---|---|
| INITOPI | PRT+14 |
| L | PRTIV+7, PRTIV+10, PRTIV+11, PRTIV+14, PRTIV+16, PRTIV+17, PRTIV+20 |
| OS | PRT+12 |
| PRTIV | PRT+18 |
| Name | Field # of Occurrence |
|---|---|
| ^( | INITOPI+7 |
| ^(0 | INITOPI+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACT | PRT+4, PRT+9 |
| >> DFN | PRT+3, PRT+5, PRT+6, PRT+8, PRT+10, PRT+11, INITOPI+3 |
| DRG | PRT+1! |
| DRG("AD" | PRTIV+6 |
| DRG("SOL" | PRTIV+8, PRTIV+9, PRTIV+11 |
| >> FD | OS+2*, OS+3 |
| >> L | PRTIV+5*, PRTIV+7, PRTIV+8, PRTIV+10*, PRTIV+11*, PRTIV+12, PRTIV+14, PRTIV+15*, PRTIV+17, PRTIV+18* , PRTIV+19, PRTIV+20*, PRTIV+21, PRTIV+22, PRTIV+23, PRTIV+24, L+1*, L+2* |
| >> MARLB( | PRTIV+7*, PRTIV+8*, PRTIV+10*, PRTIV+11*, PRTIV+12*, PRTIV+14*, PRTIV+17*, PRTIV+20*, PRTIV+23*, PRTIV+24* , L+2* |
| >> MARLB(1 | PRTIV+1*, PRTIV+2*, PRTIV+3*, PRTIV+4* |
| NAME | PRTIV+5~, PRTIV+6, PRTIV+9 |
| NAME( | PRTIV+6, PRTIV+7, PRTIV+10 |
| NAMENEED | PRT+16~* |
| NEED | PRT+16~ |
| >> ON | PRT+2, PRT+3, PRT+5, PRT+8, PRT+10, PRT+11, PRTIV+2, PRTIV+3, INITOPI+3, INITOPI+6 , INITOPI+7 |
| ON55 | PRT+1~ |
| P | PRT+1! |
| P( | PRT+13* |
| P("LOG" | PRTIV+1 |
| P("MR" | PRTIV+12 |
| P("OLDON" | PRT+5*, PRT+6 |
| P("OPI" | PRTIV+14, PRTIV+15, PRTIV+16, PRTIV+17, INITOPI+7* |
| P(11 | OS+5*, OS+6, OS+7 |
| P(2 | PRT+11, PRT+12, PRT+15, OS+2, OS+5, PRTIV+3 |
| P(3 | PRT+11, PRT+12, OS+2, PRTIV+3 |
| P(4 | PRTIV+14, PRTIV+15 |
| P(8 | PRTIV+12 |
| P(9 | PRT+11, PRT+12, OS+2, OS+3, PRTIV+12 |
| >> PSGD( | OS+3 |
| >> PSGLBS5 | PRTIV+4 |
| >> PSGLFD | PRT+12* |
| PSGLFFD | PRT+1! |
| >> PSGLR | PRT+10* |
| PSGLRN | PRT+1!, PRTIV+24, INITOPI+2*, INITOPI+3*, INITOPI+4*, INITOPI+5* |
| >> PSGLRPH | PRTIV+23, INITOPI+1 |
| >> PSGLSD | PRT+12* |
| PSGMARFD | OS+2*, OS+4! |
| PSGMARGD | PRT+1!*, OS+6* |
| PSGMARSD | OS+2*, OS+4! |
| PSGMARTS | PRT+1!, OS+6* |
| >> PSGOES | OS+2* |
| >> PSGS0XT | OS+2 |
| >> PSGST | PRT+11*, PRT+15*, OS+3, PRTIV+7, INITOPI+8* |
| >> PSJF | PRT+6*, PRT+7*, PRT+8*, PRT+9* |
| >> PSJLDT | PRT+7, PRT+9 |
| PSJPRT2 | PRTIV+8~, PRTIV+11* |
| >> PSJROC | PRT+6*, PRT+7 |
| >> PST | PRT+11* |
| OS+3*, OS+6 | |
| >> S | OS+3 |
| >> S( | OS+3 |
| >> SD | OS+2*, OS+3* |
| >> T | OS+2*, OS+5 |
| TS | PRT+1!*, OS+7!, PRTIV+21, PRTIV+22 |
| U | PRT+5, PRT+6, PRT+7, PRT+9, PRT+10, OS+3, PRTIV+11, PRTIV+12 |
| X | PRT+13*, PRT+16~, OS+2*, OS+3*, PRTIV+3*, PRTIV+6*, PRTIV+9*, PRTIV+11, PRTIV+19*, PRTIV+21* , PRTIV+22*, L~, L+1, INITOPI+4*, INITOPI+7* |
| >> Y | PRTIV+6*, PRTIV+7, PRTIV+10*, PRTIV+11, PRTIV+17*, INITOPI+7* |
| >> Z | INITOPI+7* |