©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
ORB3 ; slc/CLA,WAT - Main routine for OE/RR 3 notifications ;23-Nov-2011 11:43;PLS
Source file <ORB3.m>
| Package | Total | Call Graph |
|---|---|---|
| Order Entry Results Reporting | 7 | ($$DUP,$$ENTITY,$$TMDEV,ADT,QUEUE,REGDEV)^ORB31 $$ONOFF^ORB3FN REGULAR^ORB3REG SPECIAL^ORB3SPEC USER^ORB3USER ($$ORDERER,$$UNSIGNOR)^ORQOR2 (TEAMPR,TEAMPROV,TMSPT)^ORQPTQ1 |
| Kernel | 2 | ($$FMADD,$$FMTE,$$HADD,$$NOW)^XLFDT SETUP^XQALERT |
| Registration | 2 | $$CVEDT^DGCV OERR^VADPT |
| Scheduling | 2 | $$PRPT^SCAPMC ($$OUTPTAP,$$OUTPTPR)^SDUTL3 |
| IHS Electronic Health Record | 1 | TEAM^BEHOPTPC |
| Toolkit | 1 | $$GET^XPAR |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUIT | ;
|
|
| ENTERBY | ;
|
|
| IHSDP | ||
| PCMMPRIM | ;
|
|
| ATTEND | ;
|
|
| START | ||
| IHSPRIM | ;Send alert to designated provider
|
|
| TITLE | ;get provider recips
|
|
| SPECDUZS | ;get DUZs rtn by SPECIAL^ORB3SPEC
|
|
| PRIMARY | ;
|
|
| UTL(ORBU,ORN,ORBDFN,ORNUM,ORBADUZ,ORBPMSG,ORBPDATA) | ;
|
|
| DOALERT | ; Entry point for alert logic outside of TaskMan
|
|
| ORDERER | ;
|
|
| USER | ;should USER (ORBDUZ) be a recip
|
|
| PCMMTEAM | ;
|
|
| ZTSK | ;
|
|
| PKGDUZS | ;get DUZs from pkg-passed ORBADUZ() array
|
|
| IHSTEAM | ;IHS/CIA/MGH
|
|
| TEAMS | ;
|
|
| EN(ORN,ORBDFN,ORNUM,ORBADUZ,ORBPMSG,ORBPDATA) | ;
|
|
| PCMMASSC | ;
|
| Name | Field # of Occurrence |
|---|---|
| TEAM^BEHOPTPC | IHSTEAM+5 |
| $$CVEDT^DGCV | DOALERT+34 |
| $$GET1^DIQ | IHSPRIM+2, IHSTEAM+4 |
| $$DUP^ORB31 | EN+15 |
| $$ENTITY^ORB31 | EN+3, DOALERT+8 |
| $$TMDEV^ORB31 | TEAMS+15 |
| ADT^ORB31 | DOALERT+15 |
| QUEUE^ORB31 | EN+21, START+13, START+19 |
| REGDEV^ORB31 | DOALERT+43, DOALERT+44, DOALERT+45 |
| $$ONOFF^ORB3FN | EN+7 |
| REGULAR^ORB3REG | DOALERT+20 |
| SPECIAL^ORB3SPEC | DOALERT+21 |
| USER^ORB3USER | USER+1 |
| $$ORDERER^ORQOR2 | ORDERER+4 |
| $$UNSIGNOR^ORQOR2 | ORDERER+4 |
| TEAMPR^ORQPTQ1 | ORDERER+11 |
| TEAMPROV^ORQPTQ1 | TEAMS+10, ORDERER+23 |
| TMSPT^ORQPTQ1 | TEAMS+3, ORDERER+13 |
| $$PRPT^SCAPMC | PCMMTEAM+3 |
| $$OUTPTAP^SDUTL3 | PCMMASSC+2 |
| $$OUTPTPR^SDUTL3 | PCMMPRIM+2 |
| OERR^VADPT | DOALERT+10 |
| $$FMADD^XLFDT | START+8 |
| $$FMTE^XLFDT | DOALERT+34 |
| $$HADD^XLFDT | START+13, START+19 |
| $$NOW^XLFDT | START+3, PCMMPRIM+2, PCMMASSC+2 |
| $$GET^XPAR | EN+5, DOALERT+37, DOALERT+38, DOALERT+39, DOALERT+40, DOALERT+41, TITLE+6 |
| SETUP^XQALERT | DOALERT+47 |
| FileNo | Call Tags |
|---|---|
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BDPRECN - [#90360.1] | IHSDP+7 |
| ^BDPRECN("AA" | IHSDP+1, IHSDP+4, IHSDP+6 |
| ^OR(100 - [#100] | ENTERBY+3, ENTERBY+4 |
| ^ORD(100.9 - [#100.9] | EN+6, EN+13, EN+19, START+1, START+12, START+18, DOALERT+6 |
| ^TMP("ORIHS" | IHSTEAM+7, IHSTEAM+9! |
| ^TMP("ORPCMM" | PCMMTEAM+5, PCMMTEAM+7! |
| ^XTMP("ORBLOCK" | START+8*, START+11, START+17, QUIT+4, QUIT+5 |
| ^XTMP("ORBUSER" | QUIT+2! |
| ^XUSEC("ORES" | ORDERER+9, ORDERER+26 |
| Name | Line Occurrences |
|---|---|
| ATTEND | TITLE+8 |
| ENTERBY | TITLE+11 |
| IHSDP | TITLE+18 |
| IHSPRIM | TITLE+16 |
| IHSTEAM | TITLE+17 |
| ORDERER | TITLE+10 |
| PCMMASSC | TITLE+13 |
| PCMMPRIM | TITLE+12 |
| PCMMTEAM | TITLE+14 |
| PKGDUZS | DOALERT+24 |
| PRIMARY | TITLE+7 |
| QUIT | START+22, DOALERT+11 |
| SPECDUZS | DOALERT+23 |
| START | ZTSK+1 |
| TEAMS | TITLE+9 |
| TITLE | DOALERT+25 |
| USER | PKGDUZS+7, SPECDUZS+6, PRIMARY+3, ATTEND+3, TEAMS+13, ORDERER+6, ORDERER+26, ENTERBY+5, PCMMPRIM+3, PCMMASSC+3 , PCMMTEAM+6, IHSPRIM+3, IHSTEAM+8, IHSDP+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDPCPRV | IHSDP~ |
| BDPQ | IHSDP~, IHSDP+3* |
| BEHOCT | IHSDP~, IHSDP+3* |
| BEHOPR | IHSDP~, IHSDP+5*, IHSDP+6*, IHSDP+7 |
| BEHORIEN | IHSDP~ |
| BEHOTYPE | IHSDP~, IHSDP+3*, IHSDP+4*, IHSDP+6 |
| CVMRKR | DOALERT+34~*, DOALERT+35 |
| DFN | DOALERT+10~*, DOALERT+34 |
| >> DGPMA | EN+21, START+13, START+19 |
| I | IHSDP~, IHSDP+3* |
| ORBADT | DOALERT+2~, DOALERT+3*, DOALERT+12*, DOALERT+14, DOALERT+15, PRIMARY+1, PRIMARY+2, ATTEND+1, ATTEND+2 |
| ORBADUZ | EN~, EN+21, UTL~, START+13, START+19, DOALERT+24 |
| ORBADUZ( | PKGDUZS+7 |
| ORBASPEC | DOALERT+2~, DOALERT+21, DOALERT+23 |
| ORBASPEC( | SPECDUZS+6 |
| ORBATTD | DOALERT+1~, DOALERT+14*, DOALERT+15, DOALERT+21, ATTEND+3 |
| ORBDEL | DOALERT+2~ |
| ORBDESC | EN+18~, EN+19*, EN+21, START+2~, START+12*, START+13, START+18*, START+19 |
| ORBDEV | DOALERT+1~, DOALERT+20, DOALERT+28, DOALERT+43 |
| ORBDFN | EN~, EN+15, EN+21, UTL~, START, START+11, START+13, START+17, START+19, DOALERT+10 , DOALERT+15, DOALERT+20, DOALERT+21, DOALERT+26, DOALERT+30, QUIT+4, QUIT+5, TEAMS+3, ORDERER+13, PCMMPRIM+2 , PCMMASSC+2, PCMMTEAM+3, IHSPRIM+2, IHSTEAM+4, IHSDP+1, IHSDP+4, IHSDP+6, USER+1 |
| ORBDI | DOALERT+2~ |
| ORBDUP | EN+12~, EN+15*, EN+16 |
| ORBDUZ | DOALERT+1~, PKGDUZS+7*, SPECDUZS+6*, PRIMARY+3*, ATTEND+3*, TEAMS+13*, ORDERER+4*, ORDERER+5, ORDERER+9, ORDERER+11 , ORDERER+26*, ENTERBY+4*, ENTERBY+5, PCMMPRIM+2*, PCMMPRIM+3, PCMMASSC+2*, PCMMASSC+3, PCMMTEAM+6*, IHSPRIM+2*, IHSPRIM+3 , IHSTEAM+4*, IHSTEAM+5, IHSTEAM+8*, IHSDP+7*, USER+1 |
| ORBENT | EN+2~, EN+3*, EN+5, DOALERT+1~, DOALERT+8*, DOALERT+37, DOALERT+38, DOALERT+39, DOALERT+40, DOALERT+41 , TITLE+6 |
| ORBI | TEAMS+2~, TEAMS+5*, TEAMS+6, TEAMS+7, ORDERER+3~, ORDERER+15*, ORDERER+17 |
| ORBID | START+2~, START+9*, START+10, START+11, START+16, QUIT+4 |
| ORBJ | TEAMS+2~, TEAMS+12*, TEAMS+13, ORDERER+3~, ORDERER+25*, ORDERER+26 |
| ORBLOCK | START+2~, START+4*, START+14*, START+20*, START+22, QUIT+3 |
| ORBLST | TEAMS+2~, TEAMS+3, ORDERER+3~, ORDERER+11 |
| ORBLST( | TEAMS+5, TEAMS+6, TEAMS+7, ORDERER+15, ORDERER+17 |
| ORBLST(1 | TEAMS+4, ORDERER+12 |
| ORBLST2 | TEAMS+10~, ORDERER+23~ |
| ORBLST2( | TEAMS+12, TEAMS+13, ORDERER+25, ORDERER+26 |
| ORBLST2(1 | TEAMS+11, ORDERER+24 |
| ORBN | EN+12~, EN+13*, EN+14, DOALERT+1~, DOALERT+6*, DOALERT+17, DOALERT+26, DOALERT+29, DOALERT+31, DOALERT+36 |
| ORBNOW | START+2~, START+3*, START+8 |
| ORBPDATA | EN~, EN+21, UTL~, START+9, START+13, START+19, DOALERT+5*, DOALERT+21, DOALERT+32 |
| ORBPDUZ | PKGDUZS+1~, PKGDUZS+6*, PKGDUZS+7* |
| ORBPI | ORDERER+3~, ORDERER+16*, ORDERER+17, ORDERER+20, ORDERER+21 |
| ORBPLST | ORDERER+3~, ORDERER+13 |
| ORBPLST( | ORDERER+16, ORDERER+17, ORDERER+20, ORDERER+21 |
| ORBPLST(1 | ORDERER+14 |
| ORBPMSG | EN~, EN+9*, EN+15, EN+21, UTL~, START+13, START+19, DOALERT+4*, DOALERT+21, DOALERT+22* , DOALERT+36 |
| ORBPRIM | DOALERT+1~, DOALERT+14*, DOALERT+15, DOALERT+21, PRIMARY+3 |
| ORBPTM | ORDERER+3~, ORDERER+17*, ORDERER+18, ORDERER+19, ORDERER+23, ORDERER+26 |
| ORBSDEV | DOALERT+2~, DOALERT+21, DOALERT+28, DOALERT+44 |
| ORBSDUZ | SPECDUZS+1~, SPECDUZS+5*, SPECDUZS+6* |
| ORBSMSG | DOALERT+2~, DOALERT+21, DOALERT+22 |
| ORBTD | TEAMS+2~, TEAMS+15*, TEAMS+16, TEAMS+17, TEAMS+19 |
| ORBTDEV | DOALERT+2~, DOALERT+45 |
| ORBTDEV( | TEAMS+17* |
| ORBTM | TEAMS+2~, TEAMS+6*, TEAMS+10, TEAMS+13, TEAMS+15, ORDERER+3~, ORDERER+17*, ORDERER+18 |
| ORBTNAME | TEAMS+2~, TEAMS+6*, TEAMS+9, ORDERER+3~, ORDERER+20*, ORDERER+22 |
| ORBTTYPE | TEAMS+2~, TEAMS+7*, TEAMS+9, ORDERER+3~, ORDERER+21*, ORDERER+22 |
| ORBU | UTL~, UTL+1, START+7, DOALERT+16, DOALERT+20, DOALERT+21, QUIT+3, PKGDUZS+2, SPECDUZS+2, TITLE+2 , PRIMARY+1, PRIMARY+2, ATTEND+1, ATTEND+2, TEAMS+1, TEAMS+8, TEAMS+18, ORDERER+2, ORDERER+10, ORDERER+22 , ENTERBY+1, PCMMPRIM+1, PCMMASSC+1, PCMMTEAM+2, IHSPRIM+1, IHSTEAM+3, IHSDP+2, USER+1 |
| ORBU( | DOALERT+17*, DOALERT+18*, DOALERT+19*, PKGDUZS+3*, PKGDUZS+4*, PKGDUZS+5*, SPECDUZS+3*, SPECDUZS+4*, TITLE+3*, TITLE+4* , PRIMARY+1*, PRIMARY+2*, ATTEND+1*, ATTEND+2*, TEAMS+1*, TEAMS+9*, TEAMS+19*, ORDERER+2*, ORDERER+10*, ORDERER+22* , ENTERBY+1*, PCMMPRIM+1*, PCMMASSC+1*, PCMMTEAM+2*, IHSPRIM+1*, IHSTEAM+3*, IHSDP+2* |
| ORBUI | DOALERT+2~, DOALERT+3*, DOALERT+17*, DOALERT+18*, DOALERT+19*, DOALERT+20, DOALERT+21, PKGDUZS+3*, PKGDUZS+4*, PKGDUZS+5* , SPECDUZS+3*, SPECDUZS+4*, TITLE+3*, TITLE+4*, PRIMARY+1*, PRIMARY+2*, ATTEND+1*, ATTEND+2*, TEAMS+1*, TEAMS+9* , TEAMS+19*, ORDERER+2*, ORDERER+10*, ORDERER+22*, ENTERBY+1*, PCMMPRIM+1*, PCMMASSC+1*, PCMMTEAM+2*, IHSPRIM+1*, IHSTEAM+3* , IHSDP+2*, USER+1 |
| ORBXQAID | DOALERT+1~, DOALERT+26*, DOALERT+46 |
| >> ORDGPMA | DOALERT+15 |
| ORIHDUZ | IHSTEAM+2~, IHSTEAM+6*, IHSTEAM+7*, IHSTEAM+8 |
| ORIHS | IHSTEAM+2~ |
| ORN | EN~, EN+6, EN+7, EN+13, EN+14, EN+15, EN+19, EN+21, UTL~, START , START+1, START+11, START+12, START+13, START+17, START+18, START+19, DOALERT+6, DOALERT+12, DOALERT+15 , DOALERT+20, DOALERT+21, DOALERT+26, DOALERT+34, DOALERT+37, DOALERT+38, DOALERT+39, DOALERT+40, DOALERT+41, QUIT+4 , QUIT+5, PKGDUZS+4, TITLE+6, ORDERER+4, ORDERER+9, USER+1 |
| ORNUM | EN~, EN+3, EN+15, EN+21, UTL~, START+13, START+19, DOALERT+5, DOALERT+8, DOALERT+19 , DOALERT+21, ORDERER+1, ORDERER+4, ENTERBY+2, ENTERBY+3, ENTERBY+4, USER+1 |
| ORPCMM | PCMMTEAM+1~, PCMMTEAM+3* |
| ORPCMMDZ | PCMMTEAM+1~, PCMMTEAM+4*, PCMMTEAM+5*, PCMMTEAM+6 |
| ORPTNAM | DOALERT+1~, DOALERT+33*, DOALERT+35 |
| ORY | DOALERT+2~ |
| RSLT | DOALERT+34~* |
| TITLES | TITLE+1~, TITLE+6*, TITLE+7, TITLE+8, TITLE+9, TITLE+10, TITLE+11, TITLE+12, TITLE+13, TITLE+14 , TITLE+16, TITLE+17, TITLE+18 |
| U | EN+19, START+12, START+18, DOALERT+14, DOALERT+17, DOALERT+34, TEAMS+6, TEAMS+7, TEAMS+13, TEAMS+15 , ORDERER+17, ORDERER+20, ORDERER+21, ORDERER+26, ENTERBY+4, IHSDP+7 |
| VA | QUIT+1! |
| VA("BID" | DOALERT+11, DOALERT+35 |
| VA200 | DOALERT+10*, QUIT+1! |
| VADM | QUIT+1! |
| VADM(1 | DOALERT+11, DOALERT+18, DOALERT+33 |
| VAERR | QUIT+1! |
| VAIN | QUIT+1! |
| VAIN(11 | DOALERT+14 |
| VAIN(2 | DOALERT+14 |
| X | IHSDP~ |
| XQA | DOALERT+20, DOALERT+28, DOALERT+47, QUIT+1!, USER+1 |
| XQAARCH | DOALERT+37*, QUIT+1! |
| >> XQACNDEL | DOALERT+41*, DOALERT+42* |
| XQADATA | DOALERT+32*, QUIT+1! |
| XQADFN | DOALERT+30*, QUIT+1! |
| XQAFLG | DOALERT+29*, DOALERT+31, QUIT+1! |
| XQAID | DOALERT+46*, QUIT+1! |
| XQAMSG | DOALERT+35*, DOALERT+36*, QUIT+1! |
| >> XQAREVUE | DOALERT+40* |
| XQAROU | DOALERT+31*, QUIT+1! |
| XQASUPV | DOALERT+38*, QUIT+1! |
| XQASURO | DOALERT+39*, QUIT+1! |
| >> ZTREQ | ZTSK+2* |