ORCDPS2 ;SLC/MKB-Pharmacy dialog utilities ;25-Mar-2013 09:41;DU
Source file <ORCDPS2.m>
| Package | Total | Call Graph | 
|---|---|---|
| Order Entry Results Reporting | 4 | ($$DISPDRUG,NF,RESETID)^ORCDPS ADMIN^ORCDPS3 TXT^ORCHTAB SHOWSIG^ORCMED | 
| Pharmacy Data Management | 3 | ALL^PSS51P2 DOSE^PSSORUTL SCH^PSSUTIL1 | 
| Inpatient Medications | 1 | $$ENDCM^PSJORUTL | 
| Kernel | 1 | $$UP^XLFSTR | 
| VA Fileman | 1 | ^DIR | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DOSE() | ; -- Dosage | |
| SCH() | ; -- [outpatient] expansion of schedule | |
| PTR(X) | ; -- Ptr to prompt OR GTX X | |
| EXDOSE | ; -- Exit Action | |
| CONJ() | ; -- Conjunction | |
| DUR() | ; -- Duration | |
| WORD(X) | ; -- Words for number X | |
| RTE() | ; -- Expansion of route | |
| CHDOSE | ; -- Kill dependent values if inst ORI of dose changes | |
| DOSETEXT | ; -- Reset dose text in ORDIALOG(INSTR) for backdoor orders ; [Called from ORMPS1 - uses ORCAT,PSOI,ORVP,DRUG,INSTR,DOSE] | |
| EXD1 | ; -- Kill dangling conjunction, [re]build Sig, get Qty info | |
| DOSES | ; -- Available common doses | |
| CP1 | ||
| PIOUT | ; -- Store Pt instructions exit action | |
| PI | ; -- Include Pt Instructions w/Sig in Outpt order? | |
| COMPLEX() | ; -- Single or complex? | |
| CLEARWP | ; -- Clear INST of wp field PROMPT | |
| SIG | ; -- Create ORDIALOG(SIG) from Instructions PROMPT,ORDOSE,ORDRUG,ORCAT ; Return text in ^TMP("ORWORD",$J,SIG,INST) ; [also called from PSJ^ORCSEND1 to build child orders] | |
| D1 | ; -- Entry from ORCMED,NF^ORCDPS to build list | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ORD(101.41 - [#101.41] | PTR+1 | 
| ^ORD(101.43 - [#101.43] | EXDOSE+10 | 
| ^TMP("ORWORD" | CHDOSE+11!, SIG+14!, SIG+15, PI+4, PI+5, PI+22*, PI+24*, PIOUT+3, PIOUT+5!, CLEARWP+1! | 
| ^TMP($J | RTE+2!, RTE+6, RTE+8 | 
| Name | Line Occurrences | 
|---|---|
| $$COMPLEX | DOSES+5 | 
| $$CONJ | SIG+11 | 
| $$DOSE | SIG+11 | 
| $$DUR | SIG+11 | 
| $$PTR | COMPLEX+2, CHDOSE+9, CHDOSE+10, CHDOSE+11, CHDOSE+12, EXDOSE+6, EXDOSE+9, EXDOSE+11, EXD1+1, SIG+5 , SIG+6, DOSETEXT+13 | 
| $$RTE | SIG+11 | 
| $$SCH | SIG+11 | 
| $$WORD | DOSE+4 | 
| CLEARWP | PI+2 | 
| CP1 | COMPLEX+5 | 
| SIG | EXD1+2, DOSETEXT+13 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | PI+5 | 
| ^(1 | SIG+14* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CNT | D1+1~, D1+2*, D1+11*, D1+18, SIG+4~, SIG+9*, SIG+12*, SIG+13, PI+1~, PI+20* , PI+23*, PI+24, PI+25, PIOUT+1~ | 
| COMPLX | COMPLEX+1~, COMPLEX+2*, COMPLEX+3, COMPLEX+4, COMPLEX+5, COMPLEX+6 | 
| CONJ | D1+1~, D1+2*, D1+8, DOSETEXT+3~, DOSETEXT+6*, DOSETEXT+11 | 
| COST | D1+1~, D1+7*, D1+10 | 
| DD | D1+1~, D1+4*, D1+13, D1+14, D1+16*, D1+17, CHDOSE+1~, CHDOSE+13*, CHDOSE+14, CHDOSE+15* , CHDOSE+16 | 
| DIR | COMPLEX+1~, PI+1~, PIOUT+1~ | 
| DIR("?" | CP1+1*, PIOUT+3* | 
| DIR("A" | CP1*, PIOUT+2* | 
| DIR("B" | CP1*, PIOUT+3* | 
| DIR(0 | CP1*, PIOUT+2* | 
| DIRUT | PI+1~ | 
| DONE | CHDOSE+5!, CHDOSE+6! | 
| DOSE | D1+1~, D1+7*, D1+8*, D1+10, D1+11, D1+12, D1+13, D1+14, D1+17, CHDOSE+1~ , CHDOSE+12*, CHDOSE+14, CHDOSE+15, SIG+4~, SIG+10*, DOSE+2, DOSETEXT+10 | 
| DRUG | D1+1~, D1+4*, D1+8, D1+10, D1+14, D1+16*, D1+17, EXDOSE+1~, EXDOSE+2*, EXDOSE+8 , EXDOSE+9, EXD1+4, DOSETEXT+7 | 
| DRUG0 | DOSETEXT+3~, DOSETEXT+7*, DOSETEXT+8, DOSETEXT+11 | 
| DT | SIG+13, PI+24 | 
| DTOUT | COMPLEX+1~, CP1+2, PI+1~, PIOUT+4 | 
| DUOUT | COMPLEX+1~, PI+1~, PIOUT+4 | 
| >> FIRST | COMPLEX+3, COMPLEX+6, DOSES+4 | 
| I | D1+1~, D1+2*, D1+3*, D1+4, D1+14, D1+15, D1+16, D1+17, PI+1~, PI+3* , PI+5*, PI+8*, PI+21*, PI+22 | 
| >> INST | PI+4, PI+5, PI+22, PI+24, PI+25, PIOUT+5, PIOUT+6, CLEARWP+1 | 
| >> INSTR | DOSETEXT+9, DOSETEXT+10, DOSETEXT+11, DOSETEXT+13 | 
| >> ISIMO | SIG+8, RTE+6, RTE+8, SCH+2 | 
| J | D1+1~, D1+15*, D1+16, D1+17 | 
| LAST | EXDOSE+1~, EXD1+1* | 
| LDOSE | DOSETEXT+3~, DOSETEXT+10*, DOSETEXT+11 | 
| MED | EXDOSE+8~, EXDOSE+10*, EXDOSE+11 | 
| MISC | EXDOSE+1~, EXD1+5*, EXD1+6 | 
| >> MULT | DOSES+5* | 
| NAME | CHDOSE+1~, CHDOSE+9* | 
| >> ORCAT | DOSES+2, EXDOSE+7, EXDOSE+11, EXDOSE+12, EXD1+3, SIG+8, DOSE+4, RTE+6, RTE+8, SCH+2 , DOSETEXT+4, PI+2 | 
| ORCNJ | SIG+4~, SIG+6*, CONJ+1 | 
| >> ORCOMPLX | COMPLEX+5, COMPLEX+6, DOSES+5* | 
| ORDD | SIG+4~ | 
| >> ORDIALOG( | COMPLEX+2, COMPLEX+3, DOSES+2*, DOSES+3*, DOSES+4, DOSES+6, D1+11*, D1+12*, D1+13*, D1+18* , CHDOSE+1, CHDOSE+4*, CHDOSE+6, CHDOSE+9!, CHDOSE+10!, CHDOSE+12, CHDOSE+13, CHDOSE+14*, CHDOSE+15, EXDOSE+1 , EXDOSE+6*, EXDOSE+9*, EXDOSE+11*, EXD1+1!, SIG+9, SIG+10, SIG+14*, SIG+15*, DOSE+1, RTE+1 , SCH+1, DUR+1, CONJ+1, DOSETEXT+7, DOSETEXT+9, DOSETEXT+10, DOSETEXT+11*, DOSETEXT+13, PI+25*, PIOUT+5! , PIOUT+6*, CLEARWP+1! | 
| ORDOSE | DOSES+6, DOSETEXT+3~, DOSETEXT+5 | 
| ORDOSE( | D1+3, D1+4, D1+14, D1+15, D1+16, D1+17 | 
| ORDOSE("DD" | D1+4, D1+14*, D1+16, D1+17*, CHDOSE+14, CHDOSE+16, EXDOSE+2, DOSETEXT+7 | 
| ORDOSE("MISC" | D1+2, SIG+7, DOSETEXT+6 | 
| ORDOSE("PI" | PI+4!, PI+5*, PI+8 | 
| ORDOSE(1 | EXDOSE+9, EXDOSE+11, DOSETEXT+9 | 
| ORDRUG | CHDOSE+10!, EXDOSE+2*, EXDOSE+3, EXDOSE+6, EXDOSE+12, EXD1+3, EXD1+5, DOSE+2, DOSETEXT+3~, DOSETEXT+7* | 
| ORDUR | SIG+4~, SIG+5*, DUR+1 | 
| >> OREDIT | COMPLEX+5, PI+4 | 
| >> ORENEW | COMPLEX+4, PI+3 | 
| >> ORESET | CHDOSE+7 | 
| >> OREWRITE | COMPLEX+4, PI+4 | 
| ORI | CHDOSE+1, CHDOSE+4, CHDOSE+9, CHDOSE+12, CHDOSE+14, CHDOSE+15, SIG+4~, SIG+9*, SIG+10, DOSE+1 , RTE+1, SCH+1, DUR+1, CONJ+1, DOSETEXT+3~, DOSETEXT+9*, DOSETEXT+10, DOSETEXT+11 | 
| ORID | SIG+4~, SIG+6*, DOSE+1 | 
| >> ORIV | DOSES+2, DOSES+3 | 
| ORMAX | PI+1~, PI+3* | 
| ORMISC | SIG+4~, SIG+7*, SIG+8 | 
| >> OROI | EXDOSE+10 | 
| ORPREP | SIG+4~, SIG+7*, RTE+8 | 
| ORQTY | CHDOSE+10!, EXD1+5* | 
| ORQTYUNT | CHDOSE+10!, EXD1+4* | 
| >> ORQUIT | DOSES+5*, EXDOSE+3*, PIOUT+4* | 
| ORS | SIG+4~, SIG+6*, SIG+14, SIG+15 | 
| ORSCH | SIG+4~, SIG+5*, SCH+1 | 
| ORSIG | SIG+4~, SIG+14 | 
| ORSIG( | SIG+12* | 
| ORSIG(0 | SIG+13* | 
| ORT | SIG+4~, SIG+5*, RTE+1 | 
| ORTX | PI+1~ | 
| ORTX( | PI+21, PI+22 | 
| ORTYPE | COMPLEX+3, EXD1+2, DOSETEXT+3~, DOSETEXT+4*, DOSETEXT+5 | 
| >> ORVP | DOSETEXT+5 | 
| ORX | SIG+4~, SIG+8*, SIG+11*, SIG+12* | 
| >> ORXFER | COMPLEX+4, DOSES+4 | 
| P | CHDOSE+1~, CHDOSE+9* | 
| PROMPT | COMPLEX+2, COMPLEX+3, DOSES+2, DOSES+3, DOSES+4, DOSES+6, D1+11, D1+12, D1+13, D1+18 , CHDOSE+1, CHDOSE+4, CHDOSE+6, CHDOSE+13, EXDOSE+1, EXD1+1, SIG+9, SIG+10, SIG+14, DOSETEXT+3~ , DOSETEXT+13*, PI+4, PI+5, PI+22, PI+24, PI+25, PIOUT+3, PIOUT+5, PIOUT+6, CLEARWP+1 | 
| PROMPTS | CHDOSE+1~, CHDOSE+8*, CHDOSE+9 | 
| >> PSOI | DOSETEXT+5 | 
| QUIT | EXDOSE+1~, EXDOSE+3 | 
| >> S | CONJ+2* | 
| STR | EXDOSE+8~*, EXDOSE+9, EXDOSE+11 | 
| STRG | DOSETEXT+3~, DOSETEXT+8*, DOSETEXT+11 | 
| TEXT | D1+1~, D1+10*, D1+11, D1+12 | 
| TXT | PIOUT+1~ | 
| U | D1+2, D1+4, D1+7, D1+8, D1+10, D1+11, D1+14, D1+16, D1+17, CHDOSE+9 , CHDOSE+16, EXDOSE+8, EXDOSE+9, EXDOSE+10, EXD1+4, EXD1+5, EXD1+6, SIG+7, SIG+8, SIG+13 , DOSETEXT+6, DOSETEXT+8, DOSETEXT+11, PI+24 | 
| UD | D1+1~, D1+7* | 
| X | COMPLEX+1~, D1+1~, D1+4*, D1+7, D1+8, CHDOSE+1~*, CHDOSE+4, CHDOSE+5, CHDOSE+6, CHDOSE+7 , CHDOSE+12, CHDOSE+13, CHDOSE+14, PTR~, PTR+1, WORD~, WORD+1, RTE+1~*, RTE+3, RTE+6 , RTE+8, SCH+1~*, SCH+2, SCH+3, DUR+1~*, DUR+2, CONJ+1~*, CONJ+2*, CONJ+3, DOSETEXT+3~ , DOSETEXT+10*, DOSETEXT+11, PI+1~, PI+8* | 
| X0 | DOSE+1~*, DOSE+2, DOSE+3, DOSE+4, RTE+1~ | 
| X1 | WORD+1~*, WORD+2 | 
| X2 | WORD+1~*, WORD+3 | 
| Y | COMPLEX+1~, COMPLEX+6*, CP1+2*, CP1+3, DOSE+1~, DOSE+2*, DOSE+3*, DOSE+4*, DOSE+5, WORD+1~ , WORD+2*, WORD+3*, WORD+4, RTE+1~, RTE+5*, RTE+6*, RTE+8*, RTE+9, SCH+1~, SCH+3* , SCH+4, DUR+1~*, DUR+2*, DUR+3, CONJ+1~, CONJ+3*, CONJ+4, PI+1~, PIOUT+1~, PIOUT+5 |