PSSJORDF ;BIR/MV - RETURN MED ROUTES(MR) AND INSTRUCTIONS(INS) ;May 25, 2021@07:40:03
Source file <PSSJORDF.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 10 | ORBCMA32 ORCDPS ORCDPS1 ORCDPSH ORWDPS ORWDPS1 ORWDPS2 ORWDPS3 ORWDPS32 ORWDPS33 |
| Inpatient Medications | 2 | PSGOE4 PSIVEDT |
| Outpatient Pharmacy | 1 | PSOORED5 |
| Pharmacy Data Management | 1 | PSSPOIMO |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START(PSJORD,PSJOPAC) | ;
|
|
| SCPASS | ;
|
|
| DF | ;* Loop thru DF node to find all available med routes, nouns, and instructions.
|
|
| MEDROUTE | ;* Return all med routes in the med routes file.
|
|
| NOD | ||
| START1(PSJORD,PSJQOF) | ;Entry point for IV dialog PSS*1*94
; This is the new entry point for the IV Dialog box from CPRS GUI 27. PSJORD will be an array ; sent by CPRS that contains all the IENS for all orderable items that are part of the order. The zero node of the array ; will contain the total number of orderable items in the order. |
|
| MEDRT(PSJORD) | ;All Med Routes for dosage form.
|
|
| ALLMED(MCT) | ;Return all med routes with IV flag set to 1
|
|
| OVERLAP | ; Only maintains any overlapping med routes between orderable items in order
|
|
| REMDUP | ; Remove duplicate entries
|
|
| MULTIDEF(PSJORD,PSJORD1) | ; PSS*1*142
|
|
| IND | ;*187 - indications for use
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(50.606 - [#50.606] | SCPASS+1, DF+3, DF+9, DF+10, DF+15, MEDRT+9, MEDRT+10 |
| ^PS(50.7 - [#50.7] | START+3, START+4, DF+3, DF+6, DF+7, DF+8, NOD+1, MEDRT+3, MEDRT+4, MEDRT+6 , MEDRT+7, MEDRT+8, MEDRT+11, MULTIDEF+11, IND+3, IND+4 |
| ^PS(51.2 - [#51.2] | DF+4, DF+8, DF+11, MEDROUTE+2, NOD+1, MEDRT+4, MEDRT+8, MEDRT+12, ALLMED+4, ALLMED+5 , OVERLAP+14 |
| ^TMP("PSJIND" | IND+1!, IND+3*, IND+7* |
| ^TMP("PSJMR" | SCPASS+1, SCPASS+2!, DF+4*, DF+6*, DF+8*, DF+10, DF+13*, MEDROUTE+1!, MEDROUTE+2*, NOD! , NOD+1*, START1+22!, START1+26, START1+27, START1+31!, START1+36!, START1+39, START1+44!, MEDRT+4*, MEDRT+6* , MEDRT+8*, MEDRT+14*, ALLMED+8* |
| ^TMP("PSJNOUN" | SCPASS+2!, DF+15* |
| ^TMP("PSJSCH" | START+5*, START+6* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARR | IND+2~ |
| ARR( | IND+6*, IND+7 |
| DEFAULT | START1+44!, MULTIDEF+8*, MULTIDEF+10*, MULTIDEF+11 |
| DEFAULT( | MULTIDEF+11*, MULTIDEF+13, MULTIDEF+14 |
| DEFAULT(1 | MULTIDEF+14, MULTIDEF+15 |
| I | IND+2~*, IND+4*, IND+5, IND+7* |
| II | DF+1~, DF+7*, MEDRT+1~, MEDRT+7* |
| IND | IND+2~, IND+5*, IND+6 |
| K | IND+2~*, IND+3*, IND+7* |
| MCT | START+1~, DF+2*, DF+4*, DF+8*, DF+13*, MEDROUTE+1*, MEDROUTE+2*, START1+26*, START1+38*, MEDRT+1~ , MEDRT+2*, MEDRT+4*, MEDRT+8*, MEDRT+14*, ALLMED~, ALLMED+2*, ALLMED+8* |
| MR | START+1~, DF+1~, DF+2*, DF+3*, DF+4, DF+9*, DF+10, MEDROUTE+1*, MEDROUTE+2*, NOD+1* , MEDRT+1~, MEDRT+2*, MEDRT+4*, MEDRT+9*, MEDRT+10, ALLMED+1~, ALLMED+3*, ALLMED+4*, ALLMED+5, ALLMED+8 , OVERLAP+1~, OVERLAP+3*, OVERLAP+5*, OVERLAP+6, OVERLAP+8*, OVERLAP+9*, OVERLAP+10, OVERLAP+12*, OVERLAP+13*, OVERLAP+14 , OVERLAP+15, REMDUP+1~, REMDUP+2*, REMDUP+3*, REMDUP+4, REMDUP+5, REMDUP+6, REMDUP+7, REMDUP+8, REMDUP+9* , REMDUP+10*, REMDUP+11 |
| MRNODE | START+1~, DF+11*, DF+12, DF+13, MEDROUTE+2*, START1+44!, MEDRT+12*, MEDRT+13, MEDRT+14, ALLMED+1~ , ALLMED+3*, ALLMED+5*, ALLMED+6, ALLMED+7, ALLMED+8, OVERLAP+1~, OVERLAP+3*, OVERLAP+6*, OVERLAP+7, OVERLAP+12* , OVERLAP+14*, OVERLAP+15, REMDUP+1~, REMDUP+2*, REMDUP+4*, REMDUP+5, REMDUP+6 |
| MRNODE1 | START1+44! |
| MRTEMP | START1+44!, OVERLAP+2!, OVERLAP+11, OVERLAP+16!, REMDUP+12, REMDUP+13! |
| MRTEMP( | OVERLAP+7*, OVERLAP+9, OVERLAP+10!, OVERLAP+13, REMDUP+5, REMDUP+6*, REMDUP+7*, REMDUP+8*, REMDUP+10, REMDUP+11! |
| MRTEMP2 | START1+44!, OVERLAP+2!, OVERLAP+17 |
| MRTEMP2( | OVERLAP+15* |
| MRTEMP2("A" | START1+38 |
| PM | DF+1~, DF+7*, DF+8, MEDRT+1~, MEDRT+7*, MEDRT+8 |
| PSJDFNO | START+1~, START+3*, SCPASS+1, DF+3, DF+9, DF+10, DF+15, MEDRT+1~, MEDRT+2*, MEDRT+3* , MEDRT+9, MEDRT+10 |
| PSJOISC | START+1~, START+4*, START+5, START+6 |
| PSJOPAC | START~, START+5, START1+23*, START1+44! |
| PSJORD | START~, START+2, START+3, START+4, DF+3, DF+6, DF+7, DF+8, NOD+1, START1~ , START1+24*, START1+25, START1+29!, START1+30*, START1+34*, START1+35, START1+41, START1+42!, START1+43*, MEDRT~ , MEDRT+3, MEDRT+4, MEDRT+6, MEDRT+7, MEDRT+8, MEDRT+11, MULTIDEF~, IND+3, IND+4 |
| PSJORD( | START1+33, START1+34, MULTIDEF+9, MULTIDEF+10 |
| PSJORD(0 | START1+23, OVERLAP+10, REMDUP+12 |
| PSJORD(1 | START1+24 |
| PSJORD1 | START1+22!, START1+27*, START1+30, START1+31!, START1+39*, START1+41, START1+43, START1+44!, OVERLAP+11!*, OVERLAP+16! , OVERLAP+17*, REMDUP+12*, MULTIDEF~ |
| PSJORD1( | START1+36*, OVERLAP+4, OVERLAP+5, OVERLAP+6, REMDUP+3, REMDUP+4, REMDUP+5!, REMDUP+6, REMDUP+7, REMDUP+8 , MULTIDEF+19, MULTIDEF+20* |
| PSJQOF | START1~, START1+21*, START1+26, START1+38 |
| PSSCNTR1 | START1+44!, OVERLAP+1~, OVERLAP+12*, OVERLAP+15* |
| SAMEDEF | START1+44!, MULTIDEF+12*, MULTIDEF+13, MULTIDEF+14*, MULTIDEF+15*, MULTIDEF+16, MULTIDEF+17, MULTIDEF+20 |
| U | START+3, DF+3, DF+4, DF+6, DF+8, DF+13, DF+15, MEDROUTE+2, NOD+1, MEDRT+3 , MEDRT+4, MEDRT+6, MEDRT+8, MEDRT+14, ALLMED+6, ALLMED+7, ALLMED+8, OVERLAP+15 |
| VERB | DF+1~, DF+3* |
| X | START+1~, DF+1~, DF+2*, DF+10*, DF+11, DF+13, DF+14*, DF+15*, START1+32*, START1+33* , START1+34, START1+36, MEDRT+1~, MEDRT+2*, MEDRT+10*, MEDRT+11, MEDRT+12, MEDRT+14, OVERLAP+1~, OVERLAP+3* , OVERLAP+4*, OVERLAP+5, OVERLAP+6 |
| Z | START+1~, DF+15* |
| ZZX | START1+44!, MULTIDEF+8*, MULTIDEF+9*, MULTIDEF+10, MULTIDEF+11, MULTIDEF+12*, MULTIDEF+13*, MULTIDEF+14, MULTIDEF+18*, MULTIDEF+19* , MULTIDEF+20 |
