ORWDXM2 ; SLC/KCM - Quick Orders ;23-Nov-2011 11:54;PLS
Source file <ORWDXM2.m>
| Package | Total | Call Graph | 
|---|---|---|
| Order Entry Results Reporting | 12 | $$VAL^ORCD  EN2^ORCDFH  CNV^ORCDFH1  $$ITEM^ORCDLG  ($$COLLTYPE,GETIMES)^ORCDLR1  ($$ASKSC,ASKSC,CHOICES,INSTR)^ORCDPS  VOLUME^ORCDPSIV  $$DIV^ORCDRA1 DISPLAY^ORWDBA3 PS^ORWDPS3 AUTH^ORWDPS32 VALDT^ORWU | 
| Lab Service | 2 | TEST^LR7OR3 $$VALID^LR7OV4 | 
| Dietetics | 1 | EN^FHWOR8 | 
| Kernel | 1 | $$NOW^XLFDT | 
| Radiology Nuclear Medicine | 1 | EN4^RAO7PC1 | 
| Toolkit | 1 | $$GET^XPAR | 
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 2 | ORWDXM1 ORWDXM4 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LRTEST | ; -- Setup ORTEST() array of ordering parameters (copied from ORCDLR) | |
| CLRRCL(OK) | ; clear ORECALL | |
| VERTXT | ; set verify text for order | |
| MEDACTV(USAGE) | ; sets ORQUIT if the orderable item is not active for a med | |
| ADMTIME(ORDLOC,PATLOC,ENCLOC,DELAY,ISIMO) | ; | |
| DO | ; setup environment for diet order ; partially copied from EN^ORCDFH | |
| LRASMP() | ; return true to ask collection sample (from ASKSAMP^ORCDLR) | |
| AUTHMED | ; sets ORQUIT if not authorized to write meds | |
| LRRQCM() | ; return true if lab test has required comments | |
| IV | ; setup environment for IV fluid | |
| SCHEDULD() | ; Is patient scheduled for PREOP (Imaging) | |
| LR | ; setup environment for lab ; -- setup ORTIME, ORIMTIME & ORTEST arrays ; setup ORMAX, ORDG, & ORCOLLCT variables | |
| RA | ; setup environment for radiology ; -- get imaging types based on display group of quick order and ; setup list of imaging locations based on imaging type | |
| UD | ; setup environment for unit dose med | |
| LRICTMOK | ; | |
| EL | ; setup environment for early/late tray | |
| OP | ; setup environment for outpatient pharmacy | 
| Name | Field # of Occurrence | 
|---|---|
| EN^FHWOR8 | DO+6, EL+1 | 
| TEST^LR7OR3 | LRTEST+3, LRRQCM+5 | 
| $$VALID^LR7OV4 | LRICTMOK+4 | 
| $$VAL^ORCD | LRRQCM+3 | 
| EN2^ORCDFH | EL+3 | 
| CNV^ORCDFH1 | DO+13 | 
| $$ITEM^ORCDLG | VERTXT+25, VERTXT+30 | 
| $$COLLTYPE^ORCDLR1 | LR+10 | 
| GETIMES^ORCDLR1 | LR+4 | 
| $$ASKSC^ORCDPS | OP+19 | 
| ASKSC^ORCDPS | OP+19 | 
| CHOICES^ORCDPS | UD+8, OP+8 | 
| INSTR^ORCDPS | UD+7, OP+7 | 
| VOLUME^ORCDPSIV | IV+10 | 
| $$DIV^ORCDRA1 | RA+4 | 
| DISPLAY^ORWDBA3 | VERTXT+31 | 
| PS^ORWDPS3 | UD+1, OP+1 | 
| AUTH^ORWDPS32 | AUTHMED+2 | 
| VALDT^ORWU | LRICTMOK+3 | 
| EN4^RAO7PC1 | RA+6 | 
| $$NOW^XLFDT | MEDACTV+2 | 
| $$GET^XPAR | RA+9, LR+5 | 
| RPC Name | Call Tags | 
|---|---|
| ORWDXM2 CLRRCL | CLRRCL | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^LAB(60 - [#60] | LRRQCM+6, LRRQCM+7, LRRQCM+8 | 
| ^LAB(62 - [#62] | LRASMP+2 | 
| ^ORD(100.98 - [#100.98] | RA+4, LRTEST+5 | 
| ^ORD(101.41 - [#101.41] | VERTXT+4, VERTXT+5, VERTXT+6, VERTXT+9, RA+11, LR+6, LR+8, LR+12, LR+14, DO+9 , DO+12, EL+5, EL+7, UD+5, IV+5, IV+11, OP+5, OP+10 | 
| ^ORD(101.43 - [#101.43] | LRTEST+3, LRTEST+4, LRRQCM+5, DO+11, MEDACTV+2, MEDACTV+4, MEDACTV+5, MEDACTV+7 | 
| ^RA(79.2 - [#79.2] | RA+5 | 
| ^TMP("ORECALL" | CLRRCL+2! | 
| ^TMP("ORWDXMQ" | CLRRCL+2! | 
| ^TMP("ORWORD" | VERTXT+18, VERTXT+19, LRRQCM+1 | 
| ^VA(200 - [#200] | AUTHMED+6, AUTHMED+7 | 
| Name | Line Occurrences | 
|---|---|
| AUTHMED | UD+3, IV+1, OP+3 | 
| LRICTMOK | LR+13 | 
| LRTEST | LR+7 | 
| MEDACTV | UD+6, IV+9, IV+14, OP+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | MEDACTV+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADMLOC | ADMTIME+1~, ADMTIME+2*, ADMTIME+3, ADMTIME+4, ADMTIME+5, ADMTIME+6, ADMTIME+7, ADMTIME+8, ADMTIME+12 | 
| CHILD | VERTXT+1~, VERTXT+12* | 
| CNT | VERTXT+16~, VERTXT+17*, VERTXT+19*, VERTXT+20, VERTXT+21, RA+3~, RA+7*, RA+8*, RA+9, RA+10 , LRRQCM+2~, IV+4~, IV+6*, IV+8*, IV+10, OP+4~, OP+11*, OP+12*, OP+13 | 
| DA | VERTXT+1~, VERTXT+5*, VERTXT+6, LRRQCM+2~, LRRQCM+6*, LRRQCM+7 | 
| DEFSAMP | LRASMP+1~, LRASMP+2*, LRASMP+4, LRASMP+5 | 
| DELAY | ADMTIME~, ADMTIME+6 | 
| DG | LRTEST+1~, LRTEST+4*, LRTEST+5* | 
| DUZ(2 | LRICTMOK+4 | 
| EDITONLY | LR+3~, LR+10* | 
| ENCLOC | ADMTIME~, ADMTIME+6 | 
| >> FIRST | LRASMP+5 | 
| I | LRRQCM+2~ | 
| IFN | RA+3~, RA+7*, RA+8 | 
| ILST | VERTXT+1~, VERTXT+3*, VERTXT+20*, VERTXT+22*, VERTXT+23*, VERTXT+26*, VERTXT+28, VERTXT+30* | 
| INST | ADMTIME+1~, ADMTIME+4*, ADMTIME+5, ADMTIME+7*, ADMTIME+8, ADMTIME+10*, ADMTIME+11, ADMTIME+12, VERTXT+1~, VERTXT+13* , VERTXT+18, VERTXT+19, VERTXT+25, VERTXT+29, VERTXT+30*, LR+3~, LR+6*, LRTEST+2, LRRQCM+1, LRRQCM+4 , LRASMP+2, IV+4~, IV+6*, IV+7*, IV+9, IV+10*, IV+12*, IV+13*, IV+14, OP+4~ , OP+11*, OP+12* | 
| ISADMIN | VERTXT+2~, VERTXT+9*, VERTXT+10, VERTXT+11, VERTXT+12 | 
| ISIMO | ADMTIME~, ADMTIME+6 | 
| ITYPE | RA+3~, RA+4*, RA+5, RA+6 | 
| IWP | VERTXT+16~, VERTXT+17*, VERTXT+18*, VERTXT+19, VERTXT+22*, VERTXT+23* | 
| LRCCOM | LRRQCM+2~ | 
| LRSAMP | LRRQCM+2~, LRRQCM+3*, LRRQCM+6 | 
| LRSPEC | LRRQCM+2~, LRRQCM+3* | 
| LRTCOM | LRRQCM+2~ | 
| LRTEST | LRRQCM+2~ | 
| LRTEST(1 | LRRQCM+6*, LRRQCM+7, LRRQCM+8 | 
| LRTSTN | LRRQCM+2~, LRRQCM+6* | 
| >> LST( | VERTXT+20*, VERTXT+22*, VERTXT+23*, VERTXT+26*, VERTXT+28*, VERTXT+30*, DO+5*, AUTHMED+8*, MEDACTV+4*, MEDACTV+7* | 
| >> LST(0 | DO+4*, AUTHMED+5*, MEDACTV+3*, MEDACTV+6* | 
| MULT | VERTXT+1~, VERTXT+12*, VERTXT+29 | 
| NAME | AUTHMED+1~, AUTHMED+6*, AUTHMED+7*, AUTHMED+8 | 
| NOAUTH | AUTHMED+1~, AUTHMED+2, AUTHMED+3 | 
| OI | LRTEST+1~, LRTEST+2*, LRTEST+3, LRTEST+4, LRRQCM+2~, LRRQCM+4*, LRRQCM+5, DO+8~, DO+10*, DO+11 , UD+4~, UD+6*, UD+7, IV+4~, IV+9*, IV+14*, OP+4~, OP+5*, OP+6*, OP+7 , MEDACTV+1, MEDACTV+2, MEDACTV+4, MEDACTV+5, MEDACTV+7 | 
| OK | CLRRCL~, CLRRCL+1* | 
| >> ORCAT | DO+2 | 
| >> ORCOLLCT | LR+9*, LR+10*, LR+11, LRASMP+3 | 
| >> ORCOMPLX | OP+14*, OP+17* | 
| >> ORCOPAY | OP+18*, OP+19* | 
| >> ORDG | RA+4, LRTEST+5* | 
| >> ORDIALOG | VERTXT+4, VERTXT+5, VERTXT+6 | 
| >> ORDIALOG( | ADMTIME+4, ADMTIME+5*, ADMTIME+7, ADMTIME+8*, ADMTIME+10, ADMTIME+11, ADMTIME+12*, VERTXT+13, VERTXT+14, VERTXT+15 , VERTXT+29, VERTXT+30, RA+12*, LR+9, LR+15, LRTEST+2, LRRQCM+4, LRASMP+2, LRASMP+6, LRICTMOK+1 , LRICTMOK+3, LRICTMOK+4*, DO+10, DO+13*, EL+6, EL+8, UD+6, IV+7, IV+9, IV+13 , IV+14, OP+6, OP+12, OP+14, OP+15, SCHEDULD+1 | 
| >> ORDIALOG("B" | ADMTIME+2, ADMTIME+9 | 
| >> ORDIV | RA+4* | 
| ORDLOC | ADMTIME~, ADMTIME+3, VERTXT+10 | 
| >> ORDRUG | OP+14*, OP+15, OP+19 | 
| >> OREFILLS | OP+15*, OP+16*, OP+17* | 
| >> OREVENT | VERTXT+9 | 
| ORIMLOC | RA+3~, RA+9!, RA+10*, RA+12 | 
| ORIMLOC( | RA+8* | 
| ORIMLOC("B" | RA+8* | 
| >> ORIMO | VERTXT+9 | 
| >> ORIMTYPE | RA+5* | 
| >> ORL | LR+5 | 
| >> ORMAX | LR+5* | 
| >> ORMEAL | EL+6* | 
| >> ORNP | AUTHMED+2, AUTHMED+6, AUTHMED+7 | 
| >> ORNPO | DO+11* | 
| >> ORPARAM | DO+6, EL+1 | 
| >> ORPARAM(3 | DO+7*, EL+2* | 
| >> ORQUIT | DO+3*, UD+3, UD+6, IV+1, IV+7, IV+13, OP+3, OP+6, AUTHMED+4*, MEDACTV+3* , MEDACTV+6* | 
| >> ORSCH | LR+15* | 
| >> ORTEST | LRTEST+3*, LRRQCM+5*, LRRQCM+6 | 
| >> ORTEST("Lab C | ollSamp" , LRASMP+3 | 
| >> ORTEST("Uniqu | e CollSamp" , LRASMP+4 | 
| >> ORTRAY | EL+8* | 
| >> ORVP | DO+6, EL+1 | 
| >> ORWP94 | UD+1, OP+1 | 
| ORY | RA+3~, LRICTMOK+2~, LRICTMOK+3, LRICTMOK+4 | 
| ORY( | RA+7, RA+8 | 
| PATLOC | ADMTIME~, ADMTIME+3, ADMTIME+6, VERTXT+10 | 
| PROMPT | VERTXT+1~, VERTXT+12*, VERTXT+13, VERTXT+14, VERTXT+15, VERTXT+18, VERTXT+19, VERTXT+25, VERTXT+29, VERTXT+30 , RA+3~, RA+11*, RA+12, LR+3~, LR+6*, LR+8*, LR+9, LR+12*, LR+14*, LR+15 , LRTEST+2, LRRQCM+1, LRRQCM+4, LRASMP+2, LRASMP+6, LRICTMOK+1, LRICTMOK+3, LRICTMOK+4, DO+8~, DO+9* , DO+10, DO+12*, DO+13, EL+4~, EL+5*, EL+6, EL+7*, EL+8, UD+4~, UD+5* , UD+6, IV+4~, IV+5*, IV+7, IV+9, IV+11*, IV+13, IV+14, OP+4~, OP+5* , OP+6, OP+10*, OP+12, OP+14, OP+15, SCHEDULD+1 | 
| REQDCOMM | LRRQCM+2~, LRRQCM+7*, LRRQCM+8*, LRRQCM+9 | 
| SAMP0 | LRASMP+1~, LRASMP+2* | 
| SCHLOC | ADMTIME+1~, ADMTIME+9*, ADMTIME+10, ADMTIME+11 | 
| >> SCHTYP | ADMTIME+11*, ADMTIME+12 | 
| SCHTYPE | ADMTIME+1~ | 
| SEQ | VERTXT+1~, VERTXT+4*, VERTXT+5 | 
| SPACES | VERTXT+1~, VERTXT+3*, VERTXT+30 | 
| TEMP | VERTXT+1~, VERTXT+25*, VERTXT+28 | 
| TITLE | VERTXT+1~, VERTXT+14*, VERTXT+20, VERTXT+22, VERTXT+26 | 
| TST | LRTEST+1~, LRTEST+3*, LRRQCM+2~, LRRQCM+5* | 
| U | ADMTIME+2, ADMTIME+9, VERTXT+9, VERTXT+11, VERTXT+12, RA+4, RA+8, LRTEST+3, LRTEST+4, LRRQCM+5 , LRRQCM+7, LRRQCM+8, DO+11, OP+15, AUTHMED+6, AUTHMED+7, MEDACTV+4, MEDACTV+5, MEDACTV+7 | 
| USAGE | MEDACTV~, MEDACTV+1*, MEDACTV+5, MEDACTV+7 | 
| WP | VERTXT+16~ | 
| WP( | VERTXT+19*, VERTXT+23 | 
| WP(1 | VERTXT+20 | 
| X | VERTXT+1~, DO+13* | 
| >> X0 | VERTXT+6*, VERTXT+9, VERTXT+11, VERTXT+12 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(ASKSC^ORCDPS | OP+19 |