LRVER4 ;DALOI/CJS/DALOI/FHS - LAB ROUTINE DATA VERIFICATION ; 13-Oct-2017 14:04 ; MKK
Source file <LRVER4.m>
| Package | Total | Call Graph | 
|---|---|---|
| Lab Service | 11 | PRAC^LR7OMERG  (EN,STD)^LRCAPV  ^LREXEC  PG^LRGVP  $$CALCAGE^LRRPU  $$TMPSB^LRVER1  RONLT^LRVER3  XREF^LRVER3A DISPFLG^LRVER4 (,V25)^LRVER5 DCOM^LRVERA | 
| VA Fileman | 5 | $$GET1^DID (,UPDATE)^DIE $$EXTERNAL^DILFD GETS^DIQ ^DIR | 
| IHS Changes To Lab | 3 | UPDTCOML^BLRAAORU GETCCDTA^BLRCCPED ($$QUALCHEK,QUALCHEK)^BLRQUALU | 
| Kernel | 2 | $$FMTE^XLFDT $$UP^XLFSTR | 
| IHS VA Utilities | 1 | ^XBFMK | 
| Package | Total | Caller Graph | 
|---|---|---|
| Lab Service | 4 | LRVER3 LRVER4 LRVER5 LRVR4 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IHSCHECK | ; EP | |
| IHSRLOW(LRNG,IHSRNG) | ; EP - Reset low | |
| IHSLOGIC | ; EP | |
| WT | ; EP | |
| COM | ;from LRVER5 | |
| V21 | ; | |
| V20 | ; | |
| RQ | ||
| COM1 | ; | |
| ND | ; | |
| LRCFL | ; | |
| PG | ||
| SUBS | ; | |
| RANGECHK | ; Check result against reference ranges and set flag | 
 
 | 
| RANGE | ; | |
| AFTRAAOQ | ; EP - Put any comments AFTER the Ask-At-Order Questions | |
| V | ; EP | |
| V35 | ; | |
| V36 | ; | |
| V37 | ||
| EDIT | ; | |
| VOL | ; | |
| DISPFLG | ; Display critical flags | |
| IHSHIGH(LRNG,IHSRNG) | ; EP - Reset High | |
| LOOP | ; | 
| Name | Field # of Occurrence | 
|---|---|
| UPDTCOML^BLRAAORU | LOOP+3 | 
| GETCCDTA^BLRCCPED | COM+4 | 
| $$QUALCHEK^BLRQUALU | RANGECHK+2 | 
| QUALCHEK^BLRQUALU | RANGECHK+2 | 
| $$GET1^DID | V20+14, V20+24, V21+10, V21+16 | 
| ^DIE | COM+8 | 
| UPDATE^DIE | AFTRAAOQ+18 | 
| $$EXTERNAL^DILFD | V20+15, V20+25, V21+11, V21+17 | 
| GETS^DIQ | LOOP+15 | 
| ^DIR | V36+6, AFTRAAOQ+7 | 
| PRAC^LR7OMERG | LOOP+25 | 
| EN^LRCAPV | V36+13 | 
| STD^LRCAPV | V36+13 | 
| ^LREXEC | LRCFL+1 | 
| PG^LRGVP | PG+2 | 
| $$CALCAGE^LRRPU | LOOP+13 | 
| $$TMPSB^LRVER1 | V20+39 | 
| RONLT^LRVER3 | V20+42 | 
| XREF^LRVER3A | COM1+2 | 
| DISPFLG^LRVER4 | V20+33, RANGE+13, V21+25 | 
| ^LRVER5 | EDIT+2 | 
| V25^LRVER5 | V20+6, V21+6 | 
| DCOM^LRVERA | V20+2, V35+2 | 
| ^XBFMK | AFTRAAOQ+4 | 
| $$FMTE^XLFDT | LOOP+13 | 
| $$UP^XLFSTR | ND+25 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: READ | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: READ | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: READ | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GETS^DIQ | 
| 63.04 | EXTERNAL^DILFD, GET1^DID | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^LAB(60 - [#60] | V20+10, V21+5, V21+7 | 
| ^LAB(62.05 - [#62.05] | LOOP+40 | 
| ^LR - [#63] | LOOP+10, LOOP+31, V+3, V20+5, V20+12, ND+28, COM+3, COM+9, COM+10!, COM+11 , AFTRAAOQ+16, VOL+1, COM1+1, COM1+4, V21+8 | 
| ^LRO(68 - [#68] | LOOP+8, LOOP+14, V+6, V36+13, V36+16, COM1+3* | 
| ^TMP("LR" | SUBS+1, COM1+3 | 
| ^VA(200 - [#200] | LOOP+28 | 
| Name | Line Occurrences | 
|---|---|
| AFTRAAOQ | COM+3 | 
| COM | V36+11, VOL+3 | 
| COM1 | COM+8 | 
| EDIT | V+3, V+5, V36+17 | 
| IHSCHECK | RANGECHK+4 | 
| IHSHIGH | IHSLOGIC+6, IHSLOGIC+8, IHSLOGIC+10, IHSLOGIC+12 | 
| IHSLOGIC | RANGECHK+6, RANGECHK+7 | 
| IHSRLOW | IHSLOGIC+5, IHSLOGIC+7, IHSLOGIC+9, IHSLOGIC+11 | 
| LOOP | V36+12, EDIT+2, EDIT+3 | 
| LRCFL | V35+1, EDIT+2 | 
| ND | V+5 | 
| PG | V20+8 | 
| RANGECHK | RANGE+12 | 
| SUBS | V20+3 | 
| V20 | V+2, V+5, V20+4, V20+5, V20+49 | 
| V21 | V20+2 | 
| V35 | V20+3 | 
| V36 | V36+11 | 
| V37 | V+5, V36+7 | 
| VOL | VOL+2 | 
| WT | V20+49, LRCFL+2, V21+26 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | V20+13, SUBS+1, ND+28, V21+9 | 
| ^(0 | LOOP+8, LOOP+28, LOOP+32, VOL+2*, COM1+4* | 
| ^(2 | V+6, V36+16* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADDON | IHSHIGH+1~, IHSHIGH+2*, IHSHIGH+4*, IHSHIGH+5 | 
| ANSWER | ND+15~, ND+18*, ND+20*, ND+21, ND+22 | 
| CHEK | IHSCHECK+1~, IHSCHECK+5*, IHSCHECK+6*, IHSCHECK+7*, IHSCHECK+8* | 
| COMMENTS | AFTRAAOQ+1~, AFTRAAOQ+12 | 
| COMMENTS( | AFTRAAOQ+10*, AFTRAAOQ+15, AFTRAAOQ+17 | 
| >> DA | COM+7* | 
| >> DA(1 | COM+7* | 
| >> DIE | COM+7* | 
| DIR | V36+3!, ND+1! | 
| DIR("A" | V36+5*, AFTRAAOQ+6* | 
| DIR(0 | V36+4*, AFTRAAOQ+5* | 
| >> DIRUT | V36+7 | 
| DR | COM+6!, COM+7* | 
| DTIME | WT+2, VOL+1 | 
| >> DTOUT | V20+8 | 
| >> DUOUT | V20+8 | 
| DUZ | V20+45, V20+47 | 
| DUZ(2 | V20+45, V20+47 | 
| ERRS | AFTRAAOQ+1~ | 
| FDA | AFTRAAOQ+1~ | 
| FDA( | AFTRAAOQ+17* | 
| >> HRCN | LOOP+7 | 
| I | V20+37~, V20+40* | 
| IENS | AFTRAAOQ+1~ | 
| IENS(1 | AFTRAAOQ+16* | 
| IHSLRNG2 | IHSLOGIC+1~, IHSLOGIC+3*, IHSLOGIC+5, IHSLOGIC+6, IHSLOGIC+16 | 
| IHSLRNG3 | IHSLOGIC+1~, IHSLOGIC+3*, IHSLOGIC+7, IHSLOGIC+8, IHSLOGIC+17 | 
| IHSLRNG4 | IHSLOGIC+1~, IHSLOGIC+3*, IHSLOGIC+9, IHSLOGIC+10, IHSLOGIC+14 | 
| IHSLRNG5 | IHSLOGIC+1~, IHSLOGIC+3*, IHSLOGIC+11, IHSLOGIC+12, IHSLOGIC+15 | 
| IHSRNG | IHSRLOW~, IHSRLOW+5*, IHSHIGH~, IHSHIGH+5* | 
| IOF | PG+1 | 
| IOSL | PG | 
| IOST | LOOP+39, LOOP+41, DISPFLG+2, DISPFLG+4, PG+1 | 
| LINE | AFTRAAOQ+1~, AFTRAAOQ+3*, AFTRAAOQ+8*, AFTRAAOQ+10, AFTRAAOQ+14*, AFTRAAOQ+15*, AFTRAAOQ+17 | 
| >> LRAA | LOOP+8, LOOP+14, LOOP+25, V+6, V36+13, V36+16 | 
| >> LRACC | LOOP+34*, LOOP+35 | 
| >> LRAD | LOOP+8, LOOP+14, LOOP+25, V+6, V36+16 | 
| >> LRALERT | LOOP+38, LOOP+40 | 
| LRAMEND | LRVER4+3~ | 
| >> LRAN | LOOP+8, LOOP+14, LOOP+25 | 
| >> LRCDT | LOOP+13 | 
| >> LRCFL | V35+1, LRCFL+1 | 
| >> LRCHG | V20+2, EDIT+2, ND+26* | 
| >> LRDAT | LOOP+36 | 
| >> LRDAT(2 | LOOP+36 | 
| >> LRDEL | V20+31, V21+23 | 
| >> LRDFN | LOOP+3, LOOP+10, LOOP+31, V+3, V20+5, V20+12, ND+28, COM+3, COM+4, COM+7 , COM+9, COM+10, COM+11, AFTRAAOQ+16, AFTRAAOQ+17, VOL+1, COM1+1, COM1+3, COM1+4, V21+8 | 
| >> LRDL | V20+22*, V21+9*, V21+14* | 
| >> LRDPF | LOOP+8 | 
| >> LRDUZ | V20+45, V20+47 | 
| >> LRDUZ(2 | V20+45, V20+47 | 
| >> LREDIT | V+5, V+6*, V36+9*, V36+17, V20+23*, ND+5*, ND+25*, V21+15* | 
| LREND | V36+13*, V21+1~, V21+3, V21+26* | 
| >> LREXEC | LRCFL+1* | 
| LRFIND | RANGE+1~, RANGE+5* | 
| >> LRFLG | V20+18*, V20+23*, V20+27, V20+33, V20+38, RANGE+10*, RANGE+13, RANGECHK+11*, RANGECHK+12*, RANGECHK+13* , RANGECHK+14*, RANGECHK+23*, RANGECHK+24*, RANGECHK+25*, RANGECHK+26*, RANGECHK+28*, RANGECHK+29*, RANGECHK+30*, RANGECHK+31*, RANGECHK+36* , RANGECHK+37*, RANGECHK+38*, RANGECHK+39*, IHSCHECK+5*, IHSCHECK+6*, IHSCHECK+7*, IHSCHECK+8*, IHSLOGIC+14*, IHSLOGIC+15*, IHSLOGIC+16* , IHSLOGIC+17*, DISPFLG+3, V21+15*, V21+19, V21+25 | 
| >> LRFP | V20+17, V20+27, V21+13, V21+19 | 
| >> LRGVP | LOOP+4, V+2, V36+2, V20+8, WT+1, COM+1 | 
| LRI | RANGE+1~, RANGE+5*, RANGE+6 | 
| >> LRIDT | LOOP+3, LOOP+31, V+3, V20+5, ND+28, COM+3, COM+4, COM+7, COM+9, COM+10 , COM+11, AFTRAAOQ+16, AFTRAAOQ+17, VOL+1, COM1+1, COM1+3, COM1+4 | 
| >> LRINI | ND+21* | 
| >> LRLABKY | ND+3 | 
| >> LRLCT | LOOP+2*, LOOP+7*, LOOP+17*, LOOP+22*, LOOP+28*, LOOP+29*, LOOP+33*, LOOP+37*, LOOP+42*, V20+49* , LRCFL+2, WT+1*, V21+2*, V21+26* | 
| >> LRLDT | V20+12, V21+8 | 
| LRNC | V36+10!, V36+11*!, COM+8 | 
| LRNG | IHSRLOW~, IHSRLOW+3, IHSRLOW+5, IHSHIGH~, IHSHIGH+3, IHSHIGH+5, V21+19 | 
| >> LRNG2 | RANGECHK+4, RANGECHK+6, RANGECHK+7, RANGECHK+13, RANGECHK+25, RANGECHK+26, RANGECHK+38, IHSCHECK+7, IHSLOGIC+5, IHSLOGIC+6 | 
| >> LRNG3 | RANGECHK+4, RANGECHK+6, RANGECHK+7, RANGECHK+14, RANGECHK+30, RANGECHK+31, RANGECHK+39, IHSCHECK+8, IHSLOGIC+7, IHSLOGIC+8 | 
| >> LRNG4 | RANGECHK+4, RANGECHK+6, RANGECHK+7, RANGECHK+11, RANGECHK+23, RANGECHK+24, RANGECHK+36, IHSCHECK+5, IHSLOGIC+9, IHSLOGIC+10 | 
| >> LRNG5 | RANGECHK+4, RANGECHK+6, RANGECHK+7, RANGECHK+12, RANGECHK+28, RANGECHK+29, RANGECHK+37, IHSCHECK+6, IHSLOGIC+11, IHSLOGIC+12 | 
| >> LRNGS | V20+48 | 
| >> LRNOVER( | V20+21! | 
| LRNUF | V+3, V+4!, V20+49, V35+2!, V21+26 | 
| >> LRNX | LOOP+30*, V20+3*, SUBS+1 | 
| >> LRODT | LOOP+3 | 
| >> LRORD( | V20+3, SUBS+1 | 
| >> LRORD(0 | LOOP+44 | 
| LROUT | EDIT+1!, EDIT+2 | 
| >> LRPARAM | LOOP+38, V36+13 | 
| >> LRPER | V+3, EDIT+2 | 
| >> LRPRAC | LOOP+14*, LOOP+15, LOOP+18, LOOP+19, LOOP+20, LOOP+21 | 
| >> LRPRAC( | LOOP+18, LOOP+19, LOOP+20, LOOP+21 | 
| LRQ | V20+31*!, V20+33, RANGE+13, V21+23*!, V21+25 | 
| LRRFLAG | LRVER4+3~ | 
| LRRFLAG( | RANGE+10 | 
| LRSA | ND+27!*, ND+28* | 
| LRSA( | V20+45, V20+46*, ND+28* | 
| >> LRSB | V20+5, V20+12, V20+13, V20+14, V20+15, V20+19, V20+21, V20+22, V20+23, V20+24 , V20+25, V20+27, V20+35, V20+38, V20+39, V20+41, V20+42, V20+44, V20+45, V20+46 , V20+47, V20+48, RANGE+10, SUBS+1*, V21+2*, V21+3*, V21+5, V21+8, V21+9, V21+10 , V21+11, V21+14, V21+15, V21+16, V21+17 | 
| >> LRSB( | V20+5, V20+19, V20+22, V20+23, V20+27, V20+35*, V20+38*, V20+39, V20+41*, V20+42 , V20+44, V20+45*, V20+46*, V20+47*, V20+48*, V21+3, V21+14, V21+15 | 
| >> LRSN | LOOP+3 | 
| >> LRSS | LOOP+31, V+3, V20+5, V20+12, COM+9, COM+11, VOL+1, COM1+1, COM1+4, V21+8 | 
| >> LRTEC | V+6*, V36+15* | 
| >> LRTS | V20+4, V20+10, SUBS+1*, V21+5*, V21+7 | 
| >> LRUSI | V+6, ND+25 | 
| >> LRVF | V+3, V+5, ND+2 | 
| >> LRVIDO | LOOP+39, DISPFLG+2 | 
| >> LRVIDOF | LOOP+41, DISPFLG+4 | 
| >> LRVRM | LOOP+30*, EDIT+2* | 
| >> LRWRD | LOOP+5*, LOOP+8 | 
| >> LRWRDS | LOOP+5 | 
| LRX | V20+20~, V20+22*, V20+25, V20+26, V20+28, V20+37~, V20+39*, V20+40, RANGECHK+20~, RANGECHK+21* , RANGECHK+23, RANGECHK+24, RANGECHK+25, RANGECHK+26, RANGECHK+28, RANGECHK+29, RANGECHK+30, RANGECHK+31, COM1+1~, COM1+3* , V21+4~, V21+14*, V21+17, V21+18, V21+20 | 
| LRY | V20+37~, V20+39*, V20+40*, V20+41 | 
| NUMDEC | IHSRLOW+1~, IHSRLOW+3*, IHSRLOW+4, IHSHIGH+1~, IHSHIGH+3*, IHSHIGH+4 | 
| >> PNM | LOOP+7 | 
| PR | LOOP+24~, LOOP+27*, LOOP+28* | 
| PRAC | LOOP+24~, LOOP+25 | 
| PRAC( | LOOP+28 | 
| PRAC(0 | LOOP+26 | 
| RESULT | IHSCHECK+1~, IHSCHECK+3*, IHSCHECK+5, IHSCHECK+6, IHSCHECK+7, IHSCHECK+8 | 
| >> SEX | LOOP+11 | 
| STEP | ND+15~, ND+20* | 
| SUBTRACT | IHSRLOW+1~, IHSRLOW+2*, IHSRLOW+4*, IHSRLOW+5 | 
| >> T | LOOP+30* | 
| TEXT | ND+15~, ND+20* | 
| U | LOOP+8, LOOP+10, LOOP+14, LOOP+31, LOOP+32, LOOP+34, LOOP+35, LOOP+38, LOOP+40, V+6 , V36+13, V36+16, V20+10, V20+13, V20+22, V20+23, V20+27, V20+35, V20+36, V20+38 , V20+39, V20+41, V20+42, V20+44, V20+45, V20+46, V20+47, V20+48, ND+3, VOL+1 , VOL+2, COM1+1, COM1+4, V21+7, V21+9, V21+14, V21+15, V21+19 | 
| >> VADM(3 | LOOP+13 | 
| X | V+5, V36+7*, V36+8*, V36+9*, V36+11, V36+12, V36+15*, V36+16, V20+13*, V20+15* , V20+16*, V20+17, V20+18*, V20+22*, V20+25*, V20+26*, V20+28*, V20+29, V20+35, V20+36 , V20+38, RANGE+2, RANGE+3, RANGE+5, RANGE+6*, RQ*, RANGECHK+4, RANGECHK+10, RANGECHK+11, RANGECHK+12 , RANGECHK+13, RANGECHK+14, RANGECHK+19, RANGECHK+21, RANGECHK+22, RANGECHK+27, RANGECHK+35, RANGECHK+36, RANGECHK+37, RANGECHK+38 , RANGECHK+39, IHSCHECK+3, IHSLOGIC+14, IHSLOGIC+15, IHSLOGIC+16, IHSLOGIC+17, ND+1!, ND+16!, ND+22*, ND+25! , ND+26, AFTRAAOQ+8, AFTRAAOQ+10, VOL+1*, VOL+2, V21+9*, V21+11*, V21+12*, V21+13, V21+14* , V21+17*, V21+18*, V21+20*, V21+21 | 
| >> X1 | V20+11*, V20+13*, V20+15, V20+16, V21+7*, V21+9*, V21+11, V21+12 | 
| Y | V36+8, V20+30*, V20+49, RANGE+2*, RQ, WT+2*, V21+1~, V21+22*, V21+26 | 
| >> Z1 | LOOP+34 | 
| >> Z2 | LOOP+35 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(QUALCHEK^BLRQUALU | RANGECHK+2 |