©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
ORWDPS4 ;; SLC/JDL - Order Dialogs CO-PAY and Other;[12/31/01 6:38pm]
Source file <ORWDPS4.m>
| Package | Total | Call Graph |
|---|---|---|
| Order Entry Results Reporting | 1 | ($$VALUE,SC)^ORCSAVE2 |
| Outpatient Pharmacy | 1 | SCNEW^PSOCP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ISUDIV(ORY,ORIFN) | ;True: OI of the order is for both UD and IV
|
|
| CPCOMP(PREX) | ; -- Compare the existed exemptions with new exemption questions
|
|
| CPLST(TEST,PTIFN,ORIFNS) | ; --Get CP questions
|
|
| REFMT(ORX,INFO) | ;
|
|
| UPDTDG(ORY,ORID) | ;Update Inpt order for outpatient DG to Inpt DG
|
|
| SC(ORIFN) | ; -- Dialog validation, to ask CP questions
|
|
| IPOD4OP(ORY,ORID) | ;True: is an Inpt (IV OI) order on an OutPatient
|
|
| CPINFO(Y,ORINFO) | ; -- Save reponses to CP questions
|
| RPC Name | Call Tags |
|---|---|
| ORWDPS4 CPLST | CPLST |
| ORWDPS4 CPINFO | CPINFO |
| ORWDPS4 IPOD4OP | IPOD4OP |
| ORWDPS4 UPDTDG | UPDTDG |
| ORWDPS4 ISUDIV | ISUDIV |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(9.4 - [#9.4] | CPLST+2, IPOD4OP+7 |
| ^OR(100 - [#100] | CPLST+5, CPLST+7, CPLST+8, SC+5, SC+11, SC+12, SC+13, SC+14, SC+34, IPOD4OP+1 , IPOD4OP+8, IPOD4OP+9, IPOD4OP+10, IPOD4OP+11, UPDTDG+1, UPDTDG+4*, ISUDIV+3 |
| ^ORD(100.98 - [#100.98] | IPOD4OP+5, UPDTDG+3 |
| ^ORD(101.41 - [#101.41] | IPOD4OP+6 |
| ^ORD(101.43 - [#101.43] | ISUDIV+4 |
| Name | Line Occurrences |
|---|---|
| $$SC | CPLST+10 |
| CPCOMP | SC+31 |
| REFMT | CPINFO+6 |
| Name | Field # of Occurrence |
|---|---|
| ^("URGENCY" | CPLST+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AAO | SC+7~, SC+17*, SC+18, SC+32! |
| ACV | SC+7~, SC+27*, SC+28 |
| ADG | IPOD4OP+3~, IPOD4OP+9*, IPOD4OP+12 |
| ADLG | IPOD4OP+3~, IPOD4OP+8*, IPOD4OP+12 |
| AEC | SC+7~, SC+21*, SC+22, SC+32! |
| AHNC | SC+7~, SC+25*, SC+26, SC+32! |
| AIR | SC+7~, SC+19*, SC+20, SC+32! |
| AMST | SC+7~, SC+23*, SC+24, SC+32! |
| ANS | CPINFO+2~, CPINFO+5*, CPINFO+6, CPINFO+9! |
| APKG | IPOD4OP+3~, IPOD4OP+10*, IPOD4OP+12 |
| APTCLS | IPOD4OP+3~, IPOD4OP+11*, IPOD4OP+12 |
| ASC | SC+7~, SC+15*, SC+16, SC+32! |
| ASHD | SC+7~, SC+29*, SC+30 |
| CPI | CPCOMP+1~, CPCOMP+5*, CPCOMP+6, CPCOMP+8, CPCOMP+9, CPCOMP+10, CPCOMP+11, CPCOMP+12 |
| CPNODE | SC+7~, SC+14*, SC+15, SC+17, SC+19, SC+21, SC+23, SC+25, SC+27, SC+29 , SC+32! |
| CPX | CPLST+1~, CPLST+10*, CPLST+11, CPLST+12! |
| DR | SC+3~*, SC+4, SC+5, SC+11, SC+12, SC+16*, SC+18*, SC+20*, SC+22*, SC+24* , SC+26*, SC+28*, SC+30*, SC+31, SC+33, SC+36, SC+38*, SC+39 |
| I | SC+7~, SC+37*, SC+38, REFMT+6* |
| INFO | REFMT~, REFMT+6 |
| IPPKG | IPOD4OP+3~, IPOD4OP+4*, IPOD4OP+7*, IPOD4OP+12 |
| LSTCP | CPCOMP+1~, CPCOMP+2*, CPCOMP+13*, CPCOMP+14 |
| OI | ISUDIV+1~, ISUDIV+2*, ISUDIV+3*, ISUDIV+4 |
| OR3 | SC+7~, SC+11*, SC+34 |
| ORDA | CPLST+1~, CPLST+4*, CPLST+11, CPLST+12!, SC+4, SC+5 |
| ORDRUG | SC+7~, SC+35*, SC+36 |
| ORDRUG1 | CPCOMP+1~, CPCOMP+3*, CPCOMP+4 |
| ORENEW | SC+7~, SC+34*, SC+36, CPCOMP+4 |
| ORI | CPLST+1~, CPLST+2*, CPLST+3*, CPLST+4, CPLST+12!, CPINFO+2~*, CPINFO+3*, CPINFO+4, CPINFO+5, CPINFO+9! |
| ORID | IPOD4OP~, IPOD4OP+1, IPOD4OP+8, IPOD4OP+9, IPOD4OP+10, IPOD4OP+11, UPDTDG~, UPDTDG+1, UPDTDG+4 |
| ORIFN | CPLST+1~, CPLST+4*, CPLST+5, CPLST+7, CPLST+8, CPLST+10, CPLST+11, CPLST+12!, CPINFO+2~, CPINFO+4* , CPINFO+7, CPINFO+9!, SC~, SC+4, SC+5, SC+11, SC+12, SC+13, SC+14, SC+35 , CPCOMP+3, ISUDIV~, ISUDIV+3 |
| ORIFNS | CPLST~ |
| ORIFNS( | CPLST+3, CPLST+4 |
| ORINFO | CPINFO~, CPINFO+1 |
| ORINFO( | CPINFO+3, CPINFO+4, CPINFO+5 |
| ORPSO | CPLST+1~, CPLST+2*, CPLST+5 |
| ORX | CPINFO+2~, CPINFO+6, CPINFO+7, CPINFO+9!, SC+7~, SC+8*, SC+36, REFMT~ |
| ORX( | SC+38 |
| ORX("AO" | REFMT+10* |
| ORX("CV" | REFMT+14* |
| ORX("EC" | REFMT+12* |
| ORX("HNC" | REFMT+13* |
| ORX("IR" | REFMT+11* |
| ORX("MST" | REFMT+9* |
| ORX("SC" | REFMT+8* |
| ORX("SHD" | REFMT+15* |
| ORX1 | CPCOMP+1~, CPCOMP+4 |
| ORX1( | CPCOMP+6 |
| ORY | IPOD4OP~, IPOD4OP+2*, IPOD4OP+12*, UPDTDG~, ISUDIV~, ISUDIV+2*, ISUDIV+4* |
| PREX | CPCOMP~, CPCOMP+8, CPCOMP+9, CPCOMP+14* |
| PRIO | CPLST+6~*, CPLST+7*, CPLST+8*, CPLST+9 |
| PTIFN | CPLST~, CPLST+12!, SC+36, CPCOMP+4 |
| RST | REFMT+4~, REFMT+5*, REFMT+6*, REFMT+7, REFMT+16! |
| RST1 | REFMT+4~, REFMT+7*, REFMT+8, REFMT+9, REFMT+10, REFMT+11, REFMT+12, REFMT+13, REFMT+14, REFMT+15 , REFMT+16! |
| RXDG | IPOD4OP+3~, IPOD4OP+4*, IPOD4OP+5*, IPOD4OP+12 |
| TEST | CPLST~ |
| TEST( | CPLST+11* |
| TMPVAL | CPCOMP+1~, CPCOMP+7*, CPCOMP+9*, CPCOMP+10*, CPCOMP+11*, CPCOMP+12*, CPCOMP+13 |
| U | CPLST+5, CPINFO+4, CPINFO+5, SC+5, SC+11, SC+16, SC+18, SC+20, SC+22, SC+24 , SC+26, SC+28, SC+30, SC+34, SC+38, REFMT+6, REFMT+8, REFMT+9, REFMT+10, REFMT+11 , REFMT+12, REFMT+13, REFMT+14, REFMT+15, CPCOMP+13, IPOD4OP+8, IPOD4OP+9, IPOD4OP+10, IPOD4OP+11, UPDTDG+4 |
| UDDG | UPDTDG+2~, UPDTDG+3*, UPDTDG+4 |
| UDDLG | IPOD4OP+3~, IPOD4OP+4*, IPOD4OP+6*, IPOD4OP+12 |
| XACT | SC+7~, SC+8*, SC+11*, SC+12, SC+34 |
| Y | CPINFO~, CPINFO+8* |
| YACT | SC+7~, SC+34* |
| Name | Field # of Occurrence |
|---|---|
| $T(SCNEW^PSOCP | SC+4 |