©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
LA7CHLU5 ;VA/DALOI/JMC - HL7 segment builder utility ; 22-Oct-2013 09:22 ; MKK
Source file <LA7CHLU5.m>
| Package | Total | Call Graph |
|---|---|---|
| Lab Service | 1 | ($$LNC,$$NLT)^LRVER1 |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SPSUB | ; Determine codes for SP subscript
|
|
| DEFCODE(LRSS,LRSB,LA7CODE,LA761) | ; Determine default codes when data is not mapped
|
|
| CHSUB | ; Determine codes for CH subscript.
|
|
| DEFAULT | ; Resolve codes and set defaults as needed
|
|
| CYSUB | ; Determine codes for CY subscript
|
|
| EMSUB | ; Determine codes for EM subscript
|
|
| MISUB | ; Determine codes for MI subscript
|
| FileNo | Call Tags |
|---|---|
| ^LAB(62.06 - [#62.06] | GET1^DIQ |
| ^LAM - [#64] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(63.39 | MISUB+59 |
| ^LAB(60 - [#60] | CHSUB+5, CHSUB+12, CHSUB+16 |
| ^LAB(62.06 - [#62.06] | MISUB+54 |
| Name | Line Occurrences |
|---|---|
| CHSUB | DEFCODE+17 |
| CYSUB | DEFCODE+20 |
| DEFAULT | MISUB+3, MISUB+6, MISUB+9, MISUB+12, MISUB+15, MISUB+18, MISUB+21, MISUB+24, MISUB+27, MISUB+30 , MISUB+33, MISUB+36, MISUB+39, MISUB+42, MISUB+45, MISUB+48, MISUB+62, MISUB+65, MISUB+68, SPSUB+3 , SPSUB+6, SPSUB+9, SPSUB+12, SPSUB+15, SPSUB+18, SPSUB+21, SPSUB+24, SPSUB+27, SPSUB+30, SPSUB+33 , CYSUB+3, CYSUB+6, CYSUB+9, CYSUB+12, CYSUB+15, CYSUB+18, CYSUB+21, CYSUB+24, CYSUB+27, EMSUB+3 , EMSUB+6, EMSUB+9, EMSUB+12, EMSUB+15, EMSUB+18, EMSUB+21, EMSUB+24, EMSUB+27 |
| EMSUB | DEFCODE+21 |
| MISUB | DEFCODE+18 |
| SPSUB | DEFCODE+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| I | DEFCODE+7~, DEFCODE+14* |
| LA760 | DEFCODE+7~, CHSUB+4*, CHSUB+5*, CHSUB+8, CHSUB+12, CHSUB+16 |
| LA761 | DEFCODE~, CHSUB+30, CHSUB+33, DEFAULT+7 |
| LA7CODE | DEFCODE~, DEFCODE+9*, DEFCODE+14, DEFCODE+23, CHSUB+9*, CHSUB+14*, CHSUB+17*, CHSUB+20*, CHSUB+23*, CHSUB+29 , CHSUB+30, CHSUB+31*, CHSUB+32, CHSUB+33, CHSUB+34*, DEFAULT+4*, DEFAULT+5*, DEFAULT+7*, DEFAULT+8* |
| LA7DFCDE | DEFCODE+7~, MISUB+3*, MISUB+6*, MISUB+9*, MISUB+12*, MISUB+15*, MISUB+18*, MISUB+21*, MISUB+24*, MISUB+27* , MISUB+30*, MISUB+33*, MISUB+36*, MISUB+39*, MISUB+42*, MISUB+45*, MISUB+48*, MISUB+53*, MISUB+55*, MISUB+57* , MISUB+61*, MISUB+65*, MISUB+68*, SPSUB+3*, SPSUB+6*, SPSUB+9*, SPSUB+12*, SPSUB+15*, SPSUB+18*, SPSUB+21* , SPSUB+24*, SPSUB+27*, SPSUB+30*, SPSUB+33*, CYSUB+3*, CYSUB+6*, CYSUB+9*, CYSUB+12*, CYSUB+15*, CYSUB+18* , CYSUB+21*, CYSUB+24*, CYSUB+27*, EMSUB+3*, EMSUB+6*, EMSUB+9*, EMSUB+12*, EMSUB+15*, EMSUB+18*, EMSUB+21* , EMSUB+24*, EMSUB+27*, DEFAULT+4, DEFAULT+5, DEFAULT+8 |
| LA7MISS | DEFCODE+7~, DEFCODE+13*, DEFCODE+14*, DEFCODE+16, CHSUB+7, CHSUB+9*, CHSUB+11, CHSUB+14*, CHSUB+15, CHSUB+28 , MISUB+55, DEFAULT+4, DEFAULT+5, DEFAULT+6 |
| LA7NLT | DEFCODE+7~, CHSUB+29*, CHSUB+30, CHSUB+32*, CHSUB+33 |
| LA7X | DEFCODE+7~, CHSUB+8*, CHSUB+9, CHSUB+12*, CHSUB+13, CHSUB+16*, CHSUB+17, CHSUB+29*, CHSUB+30*, CHSUB+31 , CHSUB+32*, CHSUB+33*, CHSUB+34, MISUB+54*, MISUB+55, MISUB+59* |
| LA7Y | DEFCODE+7~, CHSUB+12*, CHSUB+13*, CHSUB+14 |
| LRSB | DEFCODE~, CHSUB+5, MISUB+3, MISUB+6, MISUB+9, MISUB+12, MISUB+15, MISUB+18, MISUB+21, MISUB+24 , MISUB+27, MISUB+30, MISUB+33, MISUB+36, MISUB+39, MISUB+42, MISUB+45, MISUB+48, MISUB+51, MISUB+52 , MISUB+54, MISUB+56, MISUB+59, MISUB+65, MISUB+68, SPSUB+3, SPSUB+6, SPSUB+9, SPSUB+12, SPSUB+15 , SPSUB+18, SPSUB+21, SPSUB+24, SPSUB+27, SPSUB+30, SPSUB+33, CYSUB+3, CYSUB+6, CYSUB+9, CYSUB+12 , CYSUB+15, CYSUB+18, CYSUB+21, CYSUB+24, CYSUB+27, EMSUB+3, EMSUB+6, EMSUB+9, EMSUB+12, EMSUB+15 , EMSUB+18, EMSUB+21, EMSUB+24, EMSUB+27 |
| >> LRSPEC | CHSUB+16 |
| LRSS | DEFCODE~, DEFCODE+17, DEFCODE+18, DEFCODE+19, DEFCODE+20, DEFCODE+21, CHSUB+5 |
| U | CHSUB+16 |
| Y | MISUB+58~, MISUB+59*, MISUB+60, MISUB+61 |