©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
ORWPCE ; SLC/JM/REV - wrap calls to PCE and AICS;24-Aug-2010 08:46;PLS
Source file <ORWPCE.m>
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 3 | $$STATCHK^ICDAPIU $$CODM^ICPTCOD $$MOD^ICPTMOD |
| Lexicon Utility | 3 | LOOK^LEXA CONFIG^LEXSET ($$CPCONE,$$CPTONE,$$ICDONE)^LEXU |
| PCE Patient Care Encounter | 3 | ($$GETENC,$$VST2APPT)^PXAPI $$SVC^PXKCO SCCOND^PXUTLSCC |
| Kernel | 2 | ^%ZTLOAD $$RES^XUDHSET |
| Order Entry Results Reporting | 2 | $$CLINUSER^ORQQPL1 (DQDEL,DQSAVE)^ORWPCE1 |
| Text Integration Utility | 2 | DOCCNT^TIUSRVLV $$VSTRBLD^TIUSRVP |
| Automated Information Collection System | 1 | GETLST^IBDF18A |
| Problem List | 1 | DSELECT^GMPLENFM |
| Registration | 1 | ELIG^VADPT |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 2 | ORQQVI ORWPCE3 |
| Care Management | 1 | ORRCTIU |
| GUI Objects | 1 | BGOUTL |
| IHS Changes To Lab | 1 | BLRAGUT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SK(LST,CLINIC) | ;get list of skin test for clinic
|
|
| TRT(LST,CLINIC) | ;get list of treatments for clinic
|
|
| LEX(LST,X,APP,ORDATE) | ; return list after lexicon lookup
|
|
| PED(LST,CLINIC) | ;get list of education topices for clinic
|
|
| SAVE(OK,PCELIST,NOTEIEN,ORLOC) | ; save PCE information
|
|
| ACTPROB(GLST,DFN,ORDATE) | ;get list of patient's active problems
|
|
| HASVISIT(ORY,IEN,DFN,ORLOC,ORDTE) | ;Has visit or is stand alone
|
|
| IMM(LST,CLINIC) | ;get list of immunizations for clinic
|
|
| LEXCODE(VAL,IEN,APP,ORDATE) | ; return code for a lexicon entry
|
|
| SCDIS(LST,DFN) | ; Return service connected % and rated disabilities
|
|
| VISIT(LST,CLINIC,ORDATE) | ; get list of visit types for clinic
|
|
| HF(LST,CLINIC) | ;get list of health factors for clinic
|
|
| PROC(LST,CLINIC,ORDATE) | ; get list of procedures for clinic P12 for CPTMods
|
|
| CPTREQD(VAL,IEN) | ; return 1 in VAL if note still needs a CPT code
|
|
| GETSVC(NEWSVC,SVC,LOC,INP) | ; Returns the correct Service Connected Category
|
|
| NOTEVSTR(VAL,IEN) | ; return the VSTR^AUTHOR for a note
|
|
| DIAG(LST,CLINIC,ORDATE) | ; get list of diagnoses for clinic
|
|
| SCSEL(VAL,DFN,ATM,LOC,VST) | ; return SC conditions that may be selected
; VAL=SCallow^SCdflt;AOallow^AOdflt;IRallow^IRdflt;ECallow^ECdflt; ; MSTallow^MSTdflt;HNCallow^HNCdflt;CVAllow^CVDflt;SHADAllow^SHADDflt |
|
| DELETE(VAL,VSTR,DFN) | ; delete PCE info when deleting a note
|
|
| ADDRES | ; Add the ORW/PXAPI RESOURCE device
|
|
| GETMOD(MODINFO,ORMODIEN,ORDATE) | ;Returns info for a specific CPT Modifier
|
|
| XAM(LST,CLINIC) | ;get list of exams for clinic
|
|
| CPTMODS(LST,ORCPTCOD,ORDATE) | ;Return CPT Modifiers for a CPT Code
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | DELETE+11, SAVE+11 |
| DSELECT^GMPLENFM | ACTPROB+3 |
| GETLST^IBDF18A | VISIT+3, PROC+2, DIAG+2, IMM+1, SK+1, HF+1, PED+1, TRT+1, XAM+1 |
| $$STATCHK^ICDAPIU | ACTPROB+20 |
| $$CODM^ICPTCOD | CPTMODS+3 |
| $$MOD^ICPTMOD | GETMOD+3 |
| LOOK^LEXA | LEX+10 |
| CONFIG^LEXSET | LEX+4 |
| $$CPCONE^LEXU | LEXCODE+5 |
| $$CPTONE^LEXU | LEXCODE+4 |
| $$ICDONE^LEXU | LEXCODE+3 |
| $$CLINUSER^ORQQPL1 | SAVE+5 |
| DQDEL^ORWPCE1 | DELETE+11 |
| DQSAVE^ORWPCE1 | SAVE+11 |
| $$GETENC^PXAPI | HASVISIT+4 |
| $$VST2APPT^PXAPI | HASVISIT+5 |
| $$SVC^PXKCO | GETSVC+5 |
| SCCOND^PXUTLSCC | SCSEL+4 |
| DOCCNT^TIUSRVLV | DELETE+5, DELETE+6 |
| $$VSTRBLD^TIUSRVP | NOTEVSTR+3 |
| ELIG^VADPT | SCDIS+2 |
| $$RES^XUDHSET | ADDRES+2 |
| RPC Name | Call Tags |
|---|---|
| ORWPCE DIAG | DIAG |
| ORWPCE PROC | PROC |
| ORWPCE VISIT | VISIT |
| ORWPCE SCDIS | SCDIS |
| ORWPCE SCSEL | SCSEL |
| ORWPCE CPTREQD | CPTREQD |
| ORWPCE NOTEVSTR | NOTEVSTR |
| ORWPCE DELETE | DELETE |
| ORWPCE LEX | LEX |
| ORWPCE LEXCODE | LEXCODE |
| ORWPCE IMM | IMM |
| ORWPCE SK | SK |
| ORWPCE PED | PED |
| ORWPCE HF | HF |
| ORWPCE TRT | TRT |
| ORWPCE XAM | XAM |
| ORWPCE ACTPROB | ACTPROB |
| ORWPCE HASVISIT | HASVISIT |
| ORWPCE CPTMODS | CPTMODS |
| ORWPCE GETMOD | GETMOD |
| ORWPCE GETSVC | GETSVC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(391 - [#391] | SCDIS+4 |
| ^DIC(31 - [#31] | SCDIS+6 |
| ^DPT - [#2] | SCDIS+5 |
| ^SC - [#44] | GETSVC+2 |
| ^TIU(8925 - [#8925] | CPTREQD+1, NOTEVSTR+2, HASVISIT+3 |
| ^TMP("IB" | ACTPROB+1!, ACTPROB+7, ACTPROB+8, ACTPROB+13*, ACTPROB+14!, ACTPROB+18, ACTPROB+19, ACTPROB+21*, ACTPROB+22* |
| ^TMP("LEXFND" | LEX+14, LEX+15, LEX+16, LEX+17! |
| ^TMP("LEXHIT" | LEX+17! |
| ^TMP("LEXSCH" | LEX+7*, LEX+9*, LEX+17! |
| ^TMP("ORWPCE" | DELETE+3, SAVE+3!, SAVE+4* |
| Name | Field # of Occurrence |
|---|---|
| ^( | SCDIS+5 |
| ^(12 | NOTEVSTR+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APP | LEX~, LEX+2*, LEX+4, LEX+5, LEX+10, LEXCODE~, LEXCODE+3, LEXCODE+4, LEXCODE+5 |
| ATM | SCSEL~, SCSEL+4 |
| CLINIC | VISIT~, VISIT+3, PROC~, PROC+2, DIAG~, DIAG+2, IMM~, IMM+1, SK~, SK+1 , HF~, HF+1, PED~, PED+1, TRT~, TRT+1, XAM~, XAM+1 |
| CODES | PROC+3~, PROC+6*, PROC+9*, PROC+10*, PROC+12 |
| DFN | ACTPROB~, SCSEL~, SCSEL+4, SCDIS~, SCDIS+5, HASVISIT~, HASVISIT+4, DELETE~, DELETE+6 |
| DIS | SCDIS+1~, SCDIS+6*, SCDIS+8 |
| DSS | GETSVC+1~, GETSVC+2*, GETSVC+3, GETSVC+5 |
| DT | VISIT+1, PROC+1, CPTMODS+2, GETMOD+2, DIAG+1, ACTPROB+2, LEX+3, LEXCODE+2 |
| DUZ | SAVE+5 |
| FIRST | PROC+3~, PROC+6*, PROC+8*, PROC+12 |
| GLST | ACTPROB~, ACTPROB+23* |
| GMPLUSER | SAVE+1~, SAVE+5* |
| I | SCDIS+1~, SCDIS+5*, LEX+1~, LEX+13*, LEX+14*, LEX+15, LEX+16 |
| IDX | PROC+3~*, PROC+4*, PROC+5, PROC+7, PROC+10, PROC+11, PROC+12 |
| IEN | CPTREQD~, CPTREQD+1, NOTEVSTR~, NOTEVSTR+2, HASVISIT~, HASVISIT+3, LEX+1~, LEX+13*, LEX+15*, LEX+16 , LEXCODE~, LEXCODE+3, LEXCODE+4, LEXCODE+5 |
| ILST | SCDIS+1~, SCDIS+5*, SCDIS+8*, SCDIS+9, LEX+1~, LEX+12*, LEX+16* |
| INP | GETSVC~, GETSVC+5 |
| LEX | LEX+1~ |
| LEX("LIST" | LEX+11, LEX+12 |
| LOC | SCSEL~, SCSEL+4, GETSVC~, GETSVC+2, GETSVC+5 |
| LST | VISIT~, PROC~, CPTMODS~, DIAG~, IMM~, SK~, HF~, PED~, TRT~, XAM~ , SCDIS~, LEX~ |
| LST( | PROC+4, PROC+5!, PROC+7, PROC+10, PROC+11!, PROC+12*, CPTMODS+7*, SCDIS+8*, LEX+16* |
| LST(1 | SCDIS+3*, LEX+11*, LEX+12* |
| LST(2 | SCDIS+4*, SCDIS+9* |
| MOD | PROC+3~, PROC+6*, PROC+7*, PROC+10 |
| MODINFO | GETMOD~, GETMOD+4* |
| MODNAME | CPTMODS+1~, CPTMODS+6*, CPTMODS+7 |
| NEWSVC | GETSVC~, GETSVC+5* |
| NOTEIEN | SAVE~, SAVE+5* |
| OK | SAVE~ |
| ORCOUNT | DELETE+1~, DELETE+6, DELETE+7 |
| ORCPTCOD | CPTMODS~, CPTMODS+3 |
| ORDATA | GETMOD+1~, GETMOD+3*, GETMOD+4 |
| ORDATE | VISIT~, VISIT+1*, PROC~, PROC+1*, PROC+2, CPTMODS~, CPTMODS+2*, CPTMODS+3, GETMOD~, GETMOD+2* , GETMOD+3, DIAG~, DIAG+1*, DIAG+2, ACTPROB~, ACTPROB+2*, ACTPROB+20, LEX~, LEX+3*, LEX+4 , LEX+10, LEXCODE~, LEXCODE+2*, LEXCODE+3, LEXCODE+4, LEXCODE+5 |
| ORDTE | HASVISIT~, HASVISIT+4 |
| ORI | CPTMODS+1~, CPTMODS+4*, CPTMODS+6*, CPTMODS+7 |
| ORIDX | CPTMODS+1~, CPTMODS+4*, CPTMODS+5*, CPTMODS+6, CPTMODS+7 |
| ORITEM | ACTPROB+16~, ACTPROB+19*, ACTPROB+20*, ACTPROB+21 |
| ORLOC | HASVISIT~, HASVISIT+4, SAVE~ |
| ORM | CPTMODS+1~, CPTMODS+3 |
| ORM( | CPTMODS+5, CPTMODS+6, CPTMODS+7 |
| ORMODIEN | GETMOD~, GETMOD+3, GETMOD+4 |
| ORPRCNT | ACTPROB+4~, ACTPROB+5*, ACTPROB+12*, ACTPROB+22 |
| ORPROB | ACTPROB+4~, ACTPROB+8*, ACTPROB+9*, ACTPROB+10, ACTPROB+11, ACTPROB+13 |
| ORPROB( | ACTPROB+10, ACTPROB+11* |
| ORPROBIX | ACTPROB+4~, ACTPROB+6*, ACTPROB+7*, ACTPROB+8, ACTPROB+13, ACTPROB+14 |
| ORVISIT | HASVISIT+1~, HASVISIT+3*, HASVISIT+4*, HASVISIT+5 |
| ORWINDEX | ACTPROB+16~, ACTPROB+17*, ACTPROB+18*, ACTPROB+19, ACTPROB+21 |
| ORWSVC | GETSVC+1~, GETSVC+4*, GETSVC+5 |
| ORX | SCSEL+3~, SCSEL+4 |
| ORX("AO" | SCSEL+5 |
| ORX("CV" | SCSEL+5 |
| ORX("EC" | SCSEL+5 |
| ORX("HNC" | SCSEL+5 |
| ORX("IR" | SCSEL+5 |
| ORX("MST" | SCSEL+5 |
| ORX("SC" | SCSEL+5 |
| ORX("SHAD" | SCSEL+5 |
| ORY | HASVISIT~, HASVISIT+2*, HASVISIT+5* |
| PCELIST | SAVE~, SAVE+4 |
| PCELIST(1 | SAVE+3 |
| S | SCSEL+3~*, SCSEL+5 |
| SC | SCDIS+1~, SCDIS+7*, SCDIS+8 |
| SVC | GETSVC~, GETSVC+4 |
| U | PROC+12, CPTMODS+6, CPTMODS+7, GETMOD+4, SCDIS+3, SCDIS+4, SCDIS+6, SCDIS+7, SCDIS+8, CPTREQD+1 , NOTEVSTR+2, NOTEVSTR+4, HASVISIT+3, SAVE+3, LEX+16, GETSVC+2 |
| VAEL | SCDIS+1~ |
| VAEL(3 | SCDIS+3 |
| VAEL(4 | SCDIS+4 |
| VAEL(6 | SCDIS+4 |
| VAERR | SCDIS+1~ |
| VAL | SCSEL~, SCSEL+5*, CPTREQD~, CPTREQD+1*, NOTEVSTR~, NOTEVSTR+3*, NOTEVSTR+4*, DELETE~, DELETE+3*, DELETE+4* , DELETE+5*, DELETE+7*, LEXCODE~, LEXCODE+1*, LEXCODE+3*, LEXCODE+4*, LEXCODE+5* |
| VISIT | NOTEVSTR+1~, NOTEVSTR+2*, NOTEVSTR+3, DELETE+1~ |
| VST | SCSEL~, SCSEL+4 |
| VSTR | DELETE~, DELETE+3, DELETE+4, DELETE+6, DELETE+10, SAVE+1~, SAVE+3*, SAVE+4, SAVE+9 |
| X | SCDIS+1~, SCDIS+5*, SCDIS+6, SCDIS+7, SCDIS+8, LEX~, LEX+10, ADDRES+1~, ADDRES+2* |
| X0 | NOTEVSTR+1~, NOTEVSTR+2*, NOTEVSTR+4 |
| X12 | NOTEVSTR+1~, NOTEVSTR+2*, NOTEVSTR+4 |
| ZTDESC | DELETE+2~, DELETE+9*, SAVE+2~, SAVE+7* |
| ZTDTH | DELETE+2~, DELETE+8*, SAVE+2~, SAVE+6* |
| ZTIO | DELETE+2~, DELETE+8*, SAVE+2~, SAVE+6* |
| ZTRTN | DELETE+2~, DELETE+8*, SAVE+2~, SAVE+6* |
| ZTSAVE | DELETE+2~, SAVE+2~ |
| ZTSAVE("DFN" | DELETE+9* |
| ZTSAVE("DUZ" | SAVE+8* |
| ZTSAVE("GMPLUSER" | SAVE+8* |
| ZTSAVE("NOTEIEN" | SAVE+8* |
| ZTSAVE("ORLOC" | SAVE+10* |
| ZTSAVE("PCELIST(" | SAVE+7* |
| ZTSAVE("VSTR" | DELETE+9* |
| ZTSK | DELETE+2~, DELETE+11, SAVE+2~, SAVE+11 |
| ZTSYNC | DELETE+2~, DELETE+10*, SAVE+2~, SAVE+9* |
| Name | Field # of Occurrence |
|---|---|
| $T(DOCCNT^TIUSRVLV | DELETE+5 |