©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
LR7OF1 ;slc/dcm/JAH - Setup new order from OE/RR ; 18-Apr-2016 06:13 ; MKK
Source file <LR7OF1.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To Lab | 4 | $$ORD^BLRRLEDI ERRMSG^BLRSGNS3 ($$REFLAB,$$REFLABCK,ADBLRRLO)^BLRUTIL6 IHSURGNT^BLRUTIL8 |
| Lab Service | 3 | ($$FIND,$$ORES)^LR7OF5 SDGX69^LRBEBA2 ORDER^LROW2 |
| VA Fileman | 3 | $$FIND1^DIC UPDATE^DIE $$GET1^DIQ |
| Kernel | 2 | $$DT^XLFDT $$TRIM^XLFSTR |
| DRG Grouper | 1 | $$ICDDX^ICDEX |
| IHS Standard Terminology | 1 | ($$CONC,$$DESC,$$ICD2SMD,$$SEARCH,CNCLKP)^BSTSAPI |
| Order Entry Results Reporting | 1 | $$VALUE^ORCSAVE2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Setup NEW orders from OE/RR messages
|
|
| TESTIT | ; EP - Test the REFLICDS logic
|
|
| REFLICDS | ; EP - Store the ICD code(s) into the BLR REFERENCE LAB ORDER/ACCESSION (#9009026.3) file
|
|
| ICD2SMD(ICD,PROVNARR) | ; EP - Use Provider Narrative and ICD-10 Code to get SNOMED match
|
|
| LOCK | ;
|
|
| ZSN1(NODE,STATUS,INDIC) | ; EP Add tests ;IHS/CIA/DKM - Added INDIC
; ----- IHS/OIT/MKK - END Lab Patch 1022 Modification |
|
| IHSICDI | ; ICD Clinical Indication
; S ICDCODE=$P(INDIC,"^") |
|
| IHSSNOI | ; SNOMED Clinical Indication
|
|
| FSNOMED | ; EP - Try to find a SNOMED Code using an OE/RR API & BSTSAPI call
|
|
| ADD | ;
|
|
| IHSCLINI | ; EP - Clinical Indication
|
|
| ZX | ;
|
|
| ZSN | ;
|
|
| DT | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$ORD^BLRRLEDI | REFLICDS+19 |
| ERRMSG^BLRSGNS3 | IHSCLINI+14, REFLICDS+40 |
| $$REFLAB^BLRUTIL6 | REFLICDS+16 |
| $$REFLABCK^BLRUTIL6 | REFLICDS+11 |
| ADBLRRLO^BLRUTIL6 | IHSCLINI+19 |
| IHSURGNT^BLRUTIL8 | ZSN1+24 |
| $$CONC^BSTSAPI | IHSICDI+21, ICD2SMD+19 |
| $$DESC^BSTSAPI | IHSSNOI+8 |
| $$ICD2SMD^BSTSAPI | IHSICDI+19 |
| $$SEARCH^BSTSAPI | ICD2SMD+6 |
| CNCLKP^BSTSAPI | FSNOMED+13 |
| $$FIND1^DIC | IHSSNOI+13, REFLICDS+20 |
| UPDATE^DIE | IHSCLINI+11, REFLICDS+38 |
| $$GET1^DIQ | IHSSNOI+14, REFLICDS+7, REFLICDS+10, REFLICDS+14, REFLICDS+18, REFLICDS+31, REFLICDS+34, TESTIT+10 |
| $$ICDDX^ICDEX | IHSICDI+5 |
| $$FIND^LR7OF5 | ZX+7 |
| $$ORES^LR7OF5 | ZX+6 |
| SDGX69^LRBEBA2 | ZSN1+13 |
| ORDER^LROW2 | ZX+8 |
| $$VALUE^ORCSAVE2 | FSNOMED+8, FSNOMED+10 |
| $$DT^XLFDT | DT+1, IHSSNOI+23 |
| $$TRIM^XLFSTR | IHSSNOI+10, FSNOMED+8 |
| FileNo | Call Tags |
|---|---|
| ^LR - [#63] | GET1^DIQ |
| 69.01 | GET1^DIQ |
| 69.03 | GET1^DIQ |
| 69.05 | GET1^DIQ |
| ^ICD9 - [#80] | GET1^DIQ |
| ^ICDS - [#80.4] | FIND1^DIC, GET1^DIQ |
| ^BLRRLO - [#9009026.3] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LRO(69 - [#69] | ZX+2, ZX+3*, ZX+8, LOCK+1, LOCK+3, ZSN+1, ZSN+2*, ZSN+3, ZSN+4*, ZSN+5* , ZSN+6*, ZSN+7*, ZSN+8, ADD+13, ADD+14*, ADD+16, ADD+17*, ZSN1+3, ZSN1+5, ZSN1+6* , ZSN1+15*, ZSN1+16, ZSN1+17*, ZSN1+18*, ZSN1+19*, ZSN1+20, ZSN1+22*, REFLICDS+24, REFLICDS+29, TESTIT+7 , TESTIT+9, TESTIT+13 |
| ^TMP("OR" | EN+11, EN+12, EN+13, ZSN+4*, ADD+2*, ADD+5, ADD+10, ZSN1+14, ZSN1+15, ZSN1+17 |
| Name | Line Occurrences |
|---|---|
| $$ICD2SMD | IHSICDI+24 |
| ADD | ZX+9 |
| DT | EN+9 |
| FSNOMED | IHSICDI+10 |
| IHSCLINI | ZSN1+11 |
| IHSICDI | IHSCLINI+8 |
| IHSSNOI | IHSCLINI+9 |
| LOCK | ZX+8, LOCK+2 |
| REFLICDS | IHSCLINI+17, TESTIT+15 |
| ZSN | ZSN+1 |
| ZSN1 | ADD+10 |
| ZX | EN+15 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+13, ADD+5, ADD+10, ZSN1+19*, ZSN1+22* |
| ^("CTR" | EN+11* |
| ^(0 | ZX+3*, LOCK+3, ZSN1+15, ZSN1+20*, ZSN1+22* |
| ^(1 | ZSN+6*, ZSN1+20* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BSTSFLAG | IHSICDI+17~ |
| C | ZSN1+2~, ZSN1+16*, ZSN1+17* |
| CLININD | FSNOMED+1~, FSNOMED+8*, FSNOMED+11, FSNOMED+16, FSNOMED+19, FSNOMED+24 |
| CNT | ZSN1+2~, ZSN1+3*, ZSN1+6, ZSN1+13, ZSN1+15, ZSN1+16, ZSN1+17, ZSN1+18, ZSN1+20, ZSN1+22 , IHSCLINI+6, IHSCLINI+19, REFLICDS+10, REFLICDS+13, REFLICDS+24, REFLICDS+29, TESTIT+14*, ICD2SMD+12*, ICD2SMD+13*, ICD2SMD+14 , ICD2SMD+16, ICD2SMD+18 |
| CNT1 | ZSN1+21~, ZSN1+22* |
| COMBINE | ZX+1~, ZX+4*, ZX+6*, ZX+7*, ZX+8, ZX+9, ZX+10, ADD+15, ADD+16, ADD+17 , ZSN1+20, ZSN1+22 |
| CONCID | IHSICDI+17~, IHSICDI+20*, IHSICDI+21, ICD2SMD+18*, ICD2SMD+19 |
| >> CSNOMED | ICD2SMD+20*, ICD2SMD+21*, ICD2SMD+22, ICD2SMD+25 |
| DFN | REFLICDS+1~, REFLICDS+18*, REFLICDS+19 |
| >> DILOCKTM | TESTIT+1, ICD2SMD+1 |
| >> DISYS | TESTIT+1, ICD2SMD+1 |
| DT | ZX+8, ZSN+8, ZSN1+15, DT+1*, DT+2, TESTIT+1, ICD2SMD+1 |
| DTIME | TESTIT+1, ICD2SMD+1 |
| DUZ | TESTIT+1, ICD2SMD+1 |
| DUZ(2 | REFLICDS+16 |
| ERRS | IHSCLINI+2~, IHSCLINI+14, REFLICDS+2~, REFLICDS+36!, REFLICDS+40 |
| F60IEN | REFLICDS+1~, REFLICDS+10*, REFLICDS+11, REFLICDS+14*, REFLICDS+16, REFLICDS+26 |
| FDA | IHSCLINI+1~, IHSCLINI+11, REFLICDS+2~, REFLICDS+36! |
| FDA( | IHSICDI+6*, IHSICDI+7*, IHSICDI+26*, IHSSNOI+3*, IHSSNOI+4*, IHSSNOI+11*, IHSSNOI+24*, REFLICDS+4, REFLICDS+37*, FSNOMED+16* , FSNOMED+19*, FSNOMED+26* |
| >> FOUND | ICD2SMD+12*, ICD2SMD+13, ICD2SMD+26*, ICD2SMD+28 |
| >> FOUND("SNOMED" | ICD2SMD+24!, ICD2SMD+25*, ICD2SMD+28 |
| FOUNDIT | FSNOMED+1~, FSNOMED+22*, FSNOMED+23, FSNOMED+24*, FSNOMED+26 |
| I | ADD+1~, ADD+12*, ADD+13*, ADD+16*, ZSN1+2~, ZSN1+16*, ZSN1+17* |
| ICD | REFLICDS+1~, REFLICDS+28*, REFLICDS+29*, REFLICDS+30, ICD2SMD~, ICD2SMD+1, ICD2SMD+10, ICD2SMD+15 |
| ICD10 | IHSSNOI+7~, IHSSNOI+20*, IHSSNOI+22, IHSSNOI+23 |
| ICD10CS | IHSSNOI+7~, IHSSNOI+13*, IHSSNOI+14 |
| ICD10DT | IHSSNOI+7~, IHSSNOI+14*, IHSSNOI+15*, IHSSNOI+23 |
| >> ICD2CHK | ICD2SMD+10*, ICD2SMD+15 |
| ICD9 | IHSSNOI+7~, IHSSNOI+21*, IHSSNOI+22*, IHSSNOI+23 |
| ICDCODE | IHSICDI+2*, IHSICDI+5, IHSICDI+7, IHSICDI+15, IHSICDI+18, IHSICDI+24, IHSSNOI+7~, IHSSNOI+23*, IHSSNOI+24, REFLICDS+1~ , REFLICDS+31*, REFLICDS+34, REFLICDS+37 |
| >> ICDDESC | IHSICDI+3*, IHSICDI+5*, IHSICDI+6, IHSICDI+24 |
| ICDEXIST | REFLICDS+1~, REFLICDS+24* |
| IENS | IHSCLINI+1~, IHSCLINI+6*, IHSICDI+6, IHSICDI+7, IHSICDI+26, IHSSNOI+3, IHSSNOI+4, IHSSNOI+11, IHSSNOI+24, REFLICDS+1~ , REFLICDS+6*, REFLICDS+7, REFLICDS+10, REFLICDS+13*, REFLICDS+14, REFLICDS+30, FSNOMED+16, FSNOMED+19, FSNOMED+26 |
| IENSICD | REFLICDS+1~, REFLICDS+30*, REFLICDS+31 |
| IN | IHSICDI+17~, IHSICDI+18*, IHSICDI+19, ICD2SMD+5*, ICD2SMD+6 |
| INDIC | ADD+5*, ADD+10, ZSN1~, ZSN1+11, IHSCLINI+4, IHSCLINI+7, IHSICDI+2, IHSICDI+3, IHSSNOI+1, IHSSNOI+2 |
| IO | TESTIT+1, ICD2SMD+1 |
| >> IOBS | TESTIT+1, ICD2SMD+1 |
| IOF | TESTIT+1, ICD2SMD+1 |
| IOM | TESTIT+1, ICD2SMD+1 |
| ION | TESTIT+1, ICD2SMD+1 |
| >> IOS | TESTIT+1, ICD2SMD+1 |
| IOSL | TESTIT+1, ICD2SMD+1 |
| IOST | TESTIT+1, ICD2SMD+1 |
| >> IOT | TESTIT+1, ICD2SMD+1 |
| >> IOXY | TESTIT+1, ICD2SMD+1 |
| J | ADD+1~, ADD+7*, ADD+10*, ZSN1+13, ZSN1+14, ZSN1+15, ZSN1+17 |
| >> LRDFN | ZX+6, ZX+7, ZSN+2, ZSN+4, ADD+2, ZSN1+19, REFLICDS+18, TESTIT+10* |
| >> LRDUZ | ZX+6, ZX+7, ZSN+2 |
| LRJ | ADD+1~, ADD+10*, ZSN1+6, ZSN1+13, ZSN1+15, ZSN1+16, ZSN1+17, ZSN1+18, ZSN1+20, ZSN1+22 , IHSCLINI+6, IHSCLINI+19, REFLICDS+10, REFLICDS+13, REFLICDS+24, REFLICDS+29, TESTIT+14* |
| >> LRLLOC | ZSN+2, ZSN+5 |
| LRNT | EN+8~, ZSN+2, DT+2* |
| >> LRODT | ZX+2, ZX+3, ZX+7, LOCK+1, LOCK+3, ZSN+1, ZSN+2, ZSN+3, ZSN+4, ZSN+5 , ZSN+6, ZSN+7, ADD+2, ADD+13, ADD+14, ADD+16, ADD+17, ZSN1+3, ZSN1+5, ZSN1+6 , ZSN1+13, ZSN1+15, ZSN1+16, ZSN1+17, ZSN1+18, ZSN1+19, ZSN1+20, ZSN1+22, IHSCLINI+6, IHSCLINI+19 , REFLICDS+6, REFLICDS+11, REFLICDS+13, REFLICDS+24, REFLICDS+29, TESTIT+6*, TESTIT+7*, TESTIT+9, TESTIT+10, TESTIT+13 |
| >> LROLLOC | ZX+6, ZX+7, ZSN+2 |
| >> LRORD | ZX+9*, ZX+10*, ZSN+7, ADD+2, ZSN1+20 |
| LRORDR | EN+8~, EN+10*, ZSN+2 |
| LRORIFN | ADD+1~, ADD+5*, ZSN1+6 |
| >> LROT | TESTIT+12*, TESTIT+13*, TESTIT+14 |
| >> LROUTINE | ZSN1+6 |
| >> LRPRAC | ZX+6, ZX+7, ZSN+2 |
| >> LRQUANT | ZSN1+4* |
| >> LRSAMP | EN+12*, EN+13, ZX+6, ZX+7, ZSN+2, ZSN+4, ADD+5, ADD+10, ZSN1+14, ZSN1+15 , ZSN1+17 |
| >> LRSDT | EN+12, EN+13, ZX+6, ZX+7, ZSN+2, ZSN+4, ADD+2, ADD+5, ADD+10, ZSN1+14 , ZSN1+15, ZSN1+17 |
| >> LRSN | ZX+9*, LOCK+3*, ZSN+1*, ZSN+2, ZSN+4, ZSN+5, ZSN+6, ZSN+7, ADD+2, ADD+13 , ADD+14, ZSN1+3, ZSN1+5, ZSN1+6, ZSN1+13, ZSN1+15, ZSN1+16, ZSN1+17, ZSN1+18, ZSN1+20 , ZSN1+22, IHSCLINI+6, IHSCLINI+19, REFLICDS+6, REFLICDS+11, REFLICDS+13, REFLICDS+24, REFLICDS+29, TESTIT+8*, TESTIT+9* , TESTIT+10, TESTIT+13 |
| >> LRSPEC | EN+13*, ZX+6, ZX+7, ZSN+4, ZSN+6, ADD+5, ADD+10, ZSN1+14, ZSN1+15, ZSN1+17 , ZSN1+19 |
| >> LRSUM | LOCK+3*, ZSN+2 |
| LRSXN | ADD+1~, ADD+12*, ADD+13*, ADD+14, ADD+16*, ADD+17 |
| >> LRTSTS | ZSN1+4*, ZSN1+5, ZSN1+6, ZSN1+18, ZSN1+19, ZSN1+22 |
| >> LRXZ | EN+10, EN+12, EN+13, ZX+6, ZX+7, ZSN+4, ADD+2, ADD+5, ADD+10, ZSN1+14 , ZSN1+15, ZSN1+17 |
| NEWORD | ZX+1~, ZX+8*, ZSN+8 |
| NODE | ADD+1~, ADD+10*, ZSN1~, ZSN1+4 |
| ORDERIEN | REFLICDS+1~ |
| ORDERN | REFLICDS+1~, REFLICDS+7*, REFLICDS+8, REFLICDS+19, REFLICDS+20, TESTIT+3*, TESTIT+4, TESTIT+7, TESTIT+9 |
| >> ORDIEN | REFLICDS+20*, REFLICDS+22, REFLICDS+37 |
| >> ORIFN | EN+14*, ZSN+2, FSNOMED+3, FSNOMED+8, FSNOMED+10 |
| OUT | IHSICDI+17~, IHSICDI+18*, IHSICDI+19, ICD2SMD+5*, ICD2SMD+6 |
| PROVNARR | ICD2SMD~, ICD2SMD+1, ICD2SMD+5, ICD2SMD+16 |
| >> REJECT( | ZSN1+5* |
| SCHEMA | IHSCLINI+1~, IHSCLINI+7*, IHSCLINI+8, IHSCLINI+9 |
| SNOCONID | FSNOMED+1~, FSNOMED+10*, FSNOMED+11, FSNOMED+13 |
| >> SNOMDESC | IHSSNOI+2*, IHSSNOI+3, IHSSNOI+11 |
| SNOMED | IHSICDI+17~, IHSICDI+22*, IHSICDI+23*, IHSICDI+24*, IHSICDI+26, IHSSNOI+1*, IHSSNOI+4, IHSSNOI+8, ICD2SMD+3*, ICD2SMD+7 , ICD2SMD+28 |
| >> SNOMEDESC | IHSSNOI+3, IHSSNOI+9, IHSSNOI+10*, IHSSNOI+11 |
| STATUS | ADD+1~, ADD+10*, ZSN1~, ZSN1+6 |
| STR | IHSICDI+17~, IHSICDI+21*, IHSICDI+22, IHSICDI+23, IHSSNOI+7~, IHSSNOI+8*, IHSSNOI+9, IHSSNOI+10, IHSSNOI+20, IHSSNOI+21 , ICD2SMD+19*, ICD2SMD+20, ICD2SMD+21 |
| >> SYN | FSNOMED+22*, FSNOMED+23*, FSNOMED+24 |
| TCNT | ZSN1+2~, ZSN1+16*, ZSN1+17 |
| >> TSICD | ICD2SMD+14*, ICD2SMD+15 |
| U | ZX+3, LOCK+3, TESTIT+1, ICD2SMD+1 |
| UNEEK | EN+8~, EN+14*, ZX+5 |
| VARS | FSNOMED+1~ |
| VARS( | ICD2SMD+13, ICD2SMD+14, ICD2SMD+16, ICD2SMD+18 |
| VARS(1 | IHSICDI+20, FSNOMED+16, FSNOMED+19, FSNOMED+23, FSNOMED+24 |
| X | EN+8~, EN+13*, EN+14, ZX+1~, ZSN1+2~, ZSN1+15*, ZSN1+20*, ZSN1+22, REFLICDS+19*, ICD2SMD+6* , ICD2SMD+7 |
| XI | ZSN1+2~, ZSN1+20* |
| >> XPARSYS | TESTIT+1, ICD2SMD+1 |
| >> XQXFLG | TESTIT+1, ICD2SMD+1 |
| ZTQUEUED | ZX+8*! |
| ZTREQ | ZX+8! |
| ZTSK | EN+8~, ZX+8! |