OR3CONV ;SLC/MLI-OE/RR v3 conversion entry points ;8/11/06 13:31
Source file <OR3CONV.m>
| Package | Total | Call Graph |
|---|---|---|
| Order Entry Results Reporting | 4 | ORDERS^OR3C100 (CLEANUP,PTCONV)^OR3CONV1 $$CLINERR^ORQRY01 ($$LOCK,UNLOCK)^ORX2 |
| Kernel | 3 | ^%ZTLOAD ($$FMADD,$$NOW)^XLFDT (BMES,MES)^XPDUTL |
| Lab Service | 1 | EN^LR7OV2 |
| Outpatient Pharmacy | 1 | EN1^PSOHLUP |
| Scheduling | 1 | GETPLIST^SDAMA202 |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 1 | OR3CONV1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BGJ | ; process via background job in order below
; if restart, set ORPROCES = to step last on, call BGJ1 ; 0. initialize list of patients to convert, then convert orders for: ; 1. current inpatients ; 2. patients with future scheduled admissions ; 3. patients on waiting list ; 4. patients with discharges in last 4 weeks ; 5. patients with appointments in last 4 weeks or next 4 weeks ; 6. everyone else (loop through DPT for remaining patients) ; 7. orders associated with entities not in the PATIENT file |
|
| QUEUE | ; queue background process to run. DO NOT CALL MANUALLY!
; called from OR3POST and RESTART^OR3CONV1 |
|
| DONE(DFN) | ; remove entry from multiple
|
|
| PSCONV(DFN) | ; return 1 to convert pharmacy orders for patient, otherwise 0
|
|
| ORCONV(ORVP) | ; return 1 if OR orders need to be converted, otherwise 0
|
|
| 1 | ; order conversion for inpatients
|
|
| 0 | ; populate list of patients to convert
|
|
| 3 | ; patients on waiting list
|
|
| 2 | ; patients with future scheduled admissions
|
|
| 5 | ; patients with appointments past 4 weeks through next 4 weeks
; this call is no longer used |
|
| 4 | ; patients with discharges in last 4 weeks
|
|
| 7 | ; orders not associated with DPT entries
|
|
| 6 | ; rest of patients
|
|
| LRCONV() | ; return 1 to convert
|
|
| STOP() | ; check stop conversion flag
|
|
| WRITE(DFN,TYPE) | ; write converting message
|
|
| LOCK | ||
| OTF(DFN,ORQUIET) | ; on-the-fly conversion
|
|
| CONVERT(DFN,ORQUIET,OROTF) | ; convert orders by patient, set flag when done
|
|
| SET(PIECE,VALUE) | ; update order parameter file field with value
|
|
| ALLDONE() | ; return 1 if conversion done, otherwise 0
|
|
| PTDONE(DFN) | ; return 1 if patient already converted or PTCONV mult not done
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | QUEUE+17 |
| EN^LR7OV2 | 7+5, CONVERT+33 |
| ORDERS^OR3C100 | 7+4, CONVERT+26 |
| CLEANUP^OR3CONV1 | 7+8 |
| PTCONV^OR3CONV1 | 0+2 |
| $$CLINERR^ORQRY01 | 5+8 |
| $$LOCK^ORX2 | CONVERT+18 |
| UNLOCK^ORX2 | CONVERT+34 |
| EN1^PSOHLUP | CONVERT+29 |
| GETPLIST^SDAMA202 | 5+7 |
| $$FMADD^XLFDT | 4+2, 5+3 |
| $$NOW^XLFDT | QUEUE+14, BGJ+19, 1+9, 2+2, 7+7, SET+4 |
| BMES^XPDUTL | QUEUE+19, QUEUE+22 |
| MES^XPDUTL | QUEUE+23 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM("AMV3" | 4+3, 4+4 |
| ^DGS(41.1 - [#41.1] | 2+3, 2+4, 2+5 |
| ^DGWAIT - [#42.5] | 3+7 |
| ^DGWAIT("C" | 3+3, 3+5, 3+6 |
| ^DPT - [#2] | OTF+14, WRITE+1 |
| ^DPT("CN" | 1+3, 1+5 |
| ^OR(100 - [#100] | 7+3, ORCONV+1 |
| ^ORD(100.99 - [#100.99] | QUEUE+5, BGJ+16, 6+3, ALLDONE+1, PTDONE+1, PTDONE+2, STOP+1, SET+2, SET+8*, DONE+2 , DONE+3!, LOCK, LOCK+1, LOCK+2*, LOCK+3, LOCK+4 |
| ^SC - [#44] | 5+6 |
| ^TMP($J | 5+5!, 5+11, 5+12, 5+15! |
| Name | Line Occurrences |
|---|---|
| $$ALLDONE | OTF+13 |
| $$CONVERT | 1+7, 2+7, 3+8, 4+5, 5+13, 6+4, OTF+15 |
| $$LRCONV | CONVERT+30 |
| $$ORCONV | CONVERT+23 |
| $$PSCONV | CONVERT+27 |
| $$PTDONE | CONVERT+17 |
| $$STOP | CONVERT+14 |
| @( | BGJ+22 |
| DONE | CONVERT+35 |
| LOCK | LOCK |
| SET | QUEUE+20, BGJ+14, BGJ+19, BGJ+21, BGJ+24, 0+1, 1+4, 1+6, 1+8, 1+9 , 2+8, 3+9, 4+6, 5+14, 6+5, 7+7, CONVERT+16 |
| WRITE | CONVERT+25, CONVERT+28, CONVERT+32 |
| Name | Field # of Occurrence |
|---|---|
| ^("CONV" | LOCK+4* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNT | DONE+1~, LOCK+1*, LOCK+2 |
| DFN | 1+1~, 1+5*, 1+6, 1+7, 3+1~, 3+2*, 3+3*, 3+5, 3+6, 3+8 , 3+9, 4+1~, 4+4*, 4+5, 5+2~, 5+12*, 5+13, 6+1~, 6+2*, 6+3* , 6+4, 6+5, OTF~, OTF+12*, OTF+14, OTF+15, CONVERT~, CONVERT+12, CONVERT+17, CONVERT+18 , CONVERT+24~, CONVERT+27, CONVERT+28, CONVERT+29, CONVERT+31~, CONVERT+34, CONVERT+35, PSCONV~, WRITE~, WRITE+1 , PTDONE~, PTDONE+1, DONE~, DONE+3 |
| DT | 4+2, 4+3, 5+3 |
| LAST | DONE+1~, LOCK+1*, LOCK+2 |
| NODE | DONE+1~ |
| ORDATE | 2+1~, 2+2*, 2+3*, 2+4, 2+8, CONVERT+9~ |
| ORDISCH | 4+1~, 4+2*, 4+3*, 4+4, 4+6, CONVERT+9~ |
| OREND | 5+2~, 5+3*, 5+7, CONVERT+9~ |
| ORERR | 5+2~, 5+8*, 5+9 |
| ORERRMSG | CONVERT+11~, CONVERT+19, CONVERT+21* |
| ORESTART | BGJ+15, 0+1, 1+2!, 2+2!, 3+2!, 4+2!, 5+4!, 6+2!, 7+2! |
| ORFLAG | 3+1~, 3+4*, 3+5, 3+8* |
| ORI | 5+2~, 5+10*, 5+11*, 5+12 |
| ORIEN | 2+1~, 2+4*, 2+5, 3+1~, 3+5*, 3+6, 3+7, CONVERT+9~ |
| ORIEN1 | 3+1~, 3+6*, 3+7, CONVERT+9~ |
| ORLOC | 5+2~, 5+4*, 5+6*, 5+7, 5+14, CONVERT+9~ |
| OROTF | CONVERT~, CONVERT+13*, CONVERT+14 |
| ORPROCES | BGJ+13~, BGJ+16*, BGJ+18*, BGJ+20, BGJ+21, BGJ+22, BGJ+23*, CONVERT+9~ |
| ORPTLK | CONVERT+11~, CONVERT+18*, CONVERT+19, CONVERT+20, CONVERT+21 |
| ORQUIET | OTF~, OTF+12*, OTF+15, CONVERT~, CONVERT+20, CONVERT+25, CONVERT+28, CONVERT+29, CONVERT+32, CONVERT+33 |
| ORSTART | 5+2~, 5+3*, 5+7, CONVERT+9~ |
| ORSTOP | BGJ+13~, BGJ+14*, BGJ+20, BGJ+22, BGJ+24, 1+3, 1+5, 2+3, 2+4, 3+3 , 4+3, 5+6, 5+9*, 6+3, 7+3, 7+6, CONVERT+15* |
| ORVP | 7+1~, 7+2*, 7+3*, 7+4, 7+5, CONVERT+11~, CONVERT+12*, CONVERT+23, CONVERT+25, CONVERT+26 , CONVERT+32, CONVERT+33, ORCONV~, ORCONV+1 |
| ORWARD | 1+1~, 1+2*, 1+3*, 1+4, 1+5, 1+8, CONVERT+9~ |
| PIECE | SET~, SET+3, SET+4, SET+5, SET+6, SET+7 |
| TYPE | WRITE~, WRITE+1 |
| U | CONVERT+20, CONVERT+21 |
| VALUE | SET~, SET+3 |
| X | QUEUE+4~, QUEUE+5*, QUEUE+6, QUEUE+7, 1+1~, 1+7*, 2+1~, 2+5*, 2+6, 2+7* , 3+1~, 3+8*, 4+1~, 4+5*, 5+2~, 5+13*, 6+1~, 6+4*, SET+1~, SET+2* , SET+3*, SET+4*, SET+5*, SET+6*, SET+7*, SET+8, DONE+1~, DONE+2*, LOCK+1 |
| ZTDESC | QUEUE+15*, QUEUE+24! |
| ZTDTH | QUEUE+14*, QUEUE+24! |
| ZTIO | QUEUE+13*, QUEUE+24! |
| >> ZTQUEUED | BGJ+11 |
| ZTRTN | QUEUE+13*, QUEUE+24! |
| ZTSAVE | QUEUE+24! |
| ZTSAVE("ORESTART" | QUEUE+6, QUEUE+7, QUEUE+14 |
| ZTSK | QUEUE+18, QUEUE+19, QUEUE+20, QUEUE+24! |