BLRUTIL ;IHS/ITSC/TPF - BLR LINK UTILITIES AND TESTING SUBROUTINES ; 24-Mar-2016 12:28 ; MKK
Source file <BLRUTIL.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To Lab | 3 | CHKENTRY^BLRENTRY ESIGINFO^BLRUTIL5 (DEBUGMI,GETSTACK)^BLRUTIL6 |
| Kernel | 3 | ^%ZIS ^%ZISC ($$FMTE,$$NOW)^XLFDT |
| VA Fileman | 2 | UPDATE^DIE $$GET1^DIQ |
| IHS VA %Utilities | 1 | ($$ERR,$$KILLOK)^ZIBGCHAR |
| MailMan | 1 | ^XMB |
| Uncategorized | 1 | (DISABLE,ENABLE)^%NOJRN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDON(NAMESP,MAINRTN,DUZ2) | ;EP
|
|
| REPORT(SHORT) | ; EP
|
|
| ERRCHK(ERRDT) | ;EP
|
|
| ENTRYAUD(LABEL,ARRY1,ARRY2,ARRY3) | ;EP
|
|
| ESIGINFO | ;EP
; ----- BEGIN IHS/OIT/MKK LR*5.2*1027 ; Code moved to BLRUTIL3 because BLRUTIL was > 15000 bytes ; D ESIGINFO^BLRUTIL3 |
|
| CHKRTN(KIDIEN,RTNERROR) | ; EP
|
|
| CLRERRS(ERRDT) | ;EP
|
|
| MAIL(BLRERR,MAILGRP) | ; EP
|
|
| NUMTIME(X) | ||
| 4 | ; S BLRQSITE=$P($G(^AUTTSITE(1,0)),U)
|
|
| CAPVARS(XXXX,TARGET) | ;EP
|
|
| NUMDATE(FMDATE) | ||
| TEST | ; EP
|
|
| RESETGLO | ;EP
|
|
| ISPIMS() | ;EP
|
| Name | Field # of Occurrence |
|---|---|
| DISABLE^%NOJRN | ENTRYAUD+9 |
| ENABLE^%NOJRN | ENTRYAUD+52 |
| ^%ZIS | REPORT+1 |
| ^%ZISC | REPORT+19 |
| CHKENTRY^BLRENTRY | ENTRYAUD+6 |
| ESIGINFO^BLRUTIL5 | ESIGINFO+4 |
| DEBUGMI^BLRUTIL6 | ENTRYAUD+27 |
| GETSTACK^BLRUTIL6 | ENTRYAUD+48 |
| UPDATE^DIE | TEST+5 |
| $$GET1^DIQ | ENTRYAUD+4 |
| $$FMTE^XLFDT | NUMDATE+1 |
| $$NOW^XLFDT | ENTRYAUD+19 |
| ^XMB | MAIL+4 |
| $$ERR^ZIBGCHAR | RESETGLO+3 |
| $$KILLOK^ZIBGCHAR | RESETGLO+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BLRSITE - [#9009029] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | ADDON+31, CHKRTN+5 |
| ^%ZOSF("UCI" | 4+5 |
| ^%ZTER(1 - [#3.075] | ERRCHK+7, ERRCHK+9, 4+10, 4+11, 4+15, 4+27* |
| ^AUTTSITE(1 | ERRCHK+4, 4+3 |
| ^BLRENTRY | ENTRYAUD+20, ENTRYAUD+22*, ENTRYAUD+23*, ENTRYAUD+33*, ENTRYAUD+36*, ENTRYAUD+39*, ENTRYAUD+42*, ENTRYAUD+43*, ENTRYAUD+44*, REPORT+4 , REPORT+6, REPORT+8, REPORT+10, REPORT+15, REPORT+17 |
| ^BLRENTRY("C" | ENTRYAUD+50* |
| ^BLRSITE - [#9009029] | ERRCHK+5, ERRCHK+13*, 4+4, 4+31*, ADDON+22, ADDON+24 |
| ^BLRTXLOG("A" | TEST+1 |
| ^DIC(9.4 - [#9.4] | ISPIMS+2, ISPIMS+4 |
| ^XPD(9.7 - [#9.7] | ADDON+4, ADDON+7, ADDON+15, CHKRTN+3, CHKRTN+4 |
| Name | Line Occurrences |
|---|---|
| $$CHKRTN | ADDON+28 |
| CAPVARS | ENTRYAUD+30 |
| ERRCHK+14, ADDON+6, ADDON+20, ADDON+38 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CAPVARS+7*, ENTRYAUD+13, ENTRYAUD+14~, ENTRYAUD+15* |
| %ORIG | ENTRYAUD+11~, ENTRYAUD+13*, ENTRYAUD+15 |
| >> APPIEN | ADDON+22*, ADDON+23, ADDON+24 |
| >> APPNAME | ADDON+18, ADDON+35 |
| >> APPON | ADDON+24*, ADDON+25 |
| ARRY1 | ENTRYAUD~, ENTRYAUD+32, ENTRYAUD+33 |
| ARRY2 | ENTRYAUD~, ENTRYAUD+35, ENTRYAUD+36 |
| ARRY3 | ENTRYAUD~, ENTRYAUD+38, ENTRYAUD+39 |
| BLR | RESETGLO+1~, RESETGLO+2*, RESETGLO+3, RESETGLO+4 |
| >> BLRERLIM | ERRCHK+5*, ERRCHK+6*, ERRCHK+10, 4+4* |
| BLRERR | ERRCHK+14*, ADDON+6*, ADDON+17*, ADDON+20, ADDON+33*, ADDON+38, MAIL~ |
| BLRERR(1 | ERRCHK+14*, ADDON+6*, ADDON+18*, ADDON+34* |
| BLRERR(2 | ERRCHK+14*, ADDON+19*, ADDON+35* |
| BLRERR(3 | ERRCHK+14*, ADDON+36* |
| >> BLRERRS | ERRCHK+3*, ERRCHK+9*, ERRCHK+10, 4+9*, 4+18*, 4+29, 4+30 |
| >> BLRFDA(9009022 | TEST+2*, TEST+3*, TEST+4* |
| >> BLRIEN(1 | TEST+1*, TEST+3 |
| >> BLRQSITE | ERRCHK+4*, ERRCHK+5, ERRCHK+13, 4+3*, 4+4, 4+31 |
| >> CHKRTN | ADDON+28* |
| >> CURUCI | 4+7*, 4+17 |
| >> DILOCKTM | 4+1 |
| >> DISYS | 4+1 |
| DMLRDFN | ENTRYAUD+26~ |
| DMLRIDT | ENTRYAUD+26~ |
| DT | 4+1 |
| DTIME | 4+1 |
| DUZ | ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50, 4+1 |
| DUZ(2 | ENTRYAUD+4 |
| DUZ2 | ADDON~, ADDON+1, ADDON+22, ADDON+24 |
| ENTRYNUM | ENTRYAUD+18~, ENTRYAUD+20*, ENTRYAUD+22, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44 , ENTRYAUD+50, REPORT+7*, REPORT+8*, REPORT+10, REPORT+12, REPORT+15, REPORT+17 |
| ERRDT | ERRCHK~, ERRCHK+1*, ERRCHK+7, ERRCHK+9, CLRERRS~, CLRERRS+1*, 4+1, 4+10, 4+11, 4+15 , 4+27 |
| >> ERRNUM | ERRCHK+2*, ERRCHK+7*, ERRCHK+9, 4+8*, 4+10*, 4+11, 4+15 |
| >> ERRUCI | 4+15*, 4+16*, 4+17 |
| FMDATE | NUMDATE~, NUMDATE+1 |
| IO | 4+1 |
| >> IOBS | 4+1 |
| IOF | REPORT+2, REPORT+11, 4+1 |
| IOM | 4+1 |
| ION | 4+1 |
| >> IOS | 4+1 |
| IOSL | 4+1 |
| IOST | 4+1 |
| >> IOT | 4+1 |
| >> IOXY | 4+1 |
| IS52 | ISPIMS+1~ |
| >> KFINISH1 | ADDON+4*, ADDON+5, ADDON+6, ADDON+7 |
| >> KFINISH2 | ADDON+7*, ADDON+15, ADDON+22, ADDON+28 |
| KIDIEN | CHKRTN~, CHKRTN+3, CHKRTN+4 |
| >> KSTATUS | ADDON+15*, ADDON+16, ADDON+19 |
| LABEL | ENTRYAUD~, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50, REPORT+9* , REPORT+10*, REPORT+12, REPORT+15, REPORT+17 |
| MAILGRP | ERRCHK+14*, ADDON+6*, ADDON+19*, ADDON+20, ADDON+37*, ADDON+38, MAIL~, MAIL+2 |
| MAINRTN | ADDON~, ADDON+1, ADDON+30, ADDON+36 |
| NAMESP | ADDON~, ADDON+1, ADDON+4, ADDON+5, ADDON+6, ADDON+34 |
| NOW | ENTRYAUD+18~, ENTRYAUD+19*, ENTRYAUD+23, ENTRYAUD+33, ENTRYAUD+36, ENTRYAUD+39, ENTRYAUD+42, ENTRYAUD+43, ENTRYAUD+44, ENTRYAUD+50 , REPORT+5*, REPORT+6*, REPORT+8, REPORT+10, REPORT+15, REPORT+17 |
| NOWTIM | ENTRYAUD+18~, ENTRYAUD+21* |
| ORIGX | ENTRYAUD+11~, ENTRYAUD+12*, ENTRYAUD+43 |
| ORIGY | ENTRYAUD+11~, ENTRYAUD+12*, ENTRYAUD+44 |
| >> POP | REPORT+1 |
| >> RETURN | ERRCHK+10*, ERRCHK+12, ERRCHK+15 |
| RTNERROR | ADDON+28, CHKRTN~, CHKRTN+1*, CHKRTN+5*, CHKRTN+6 |
| RTNERROR( | CHKRTN+5* |
| >> RTNNAME | CHKRTN+4*, CHKRTN+5 |
| >> RTNNUM | CHKRTN+2*, CHKRTN+3*, CHKRTN+4 |
| SHORT | REPORT~, REPORT+2, REPORT+11, REPORT+13 |
| STARTTIM | ENTRYAUD+18~ |
| TARGET | CAPVARS~, CAPVARS+4, CAPVARS+8 |
| TARGET2 | CAPVARS+2~, CAPVARS+4*, CAPVARS+7 |
| U | RESETGLO+3, ENTRYAUD+22, ERRCHK+4, ERRCHK+5, ERRCHK+9, ERRCHK+13, 4+1, 4+3, 4+4, 4+15 , 4+27, 4+31, ADDON+15, ADDON+24 |
| >> USER | REPORT+3*, REPORT+4*, REPORT+6, REPORT+8, REPORT+10, REPORT+15, REPORT+17 |
| >> VALUE | REPORT+17*, REPORT+18 |
| >> VARIABLE | REPORT+14*, REPORT+15*, REPORT+17, REPORT+18 |
| VERS | ISPIMS+1~, ISPIMS+4*, ISPIMS+5, ISPIMS+6 |
| >> WOT | 4+24*, 4+25 |
| X | ENTRYAUD+12, ENTRYAUD+18~, ADDON+30*, CHKRTN+5*, ISPIMS+1~, ISPIMS+2*, ISPIMS+3, ISPIMS+4, NUMTIME~, NUMTIME+2 , NUMTIME+3*, NUMTIME+4 |
| >> XMB | MAIL+2* |
| >> XMDUZ | MAIL+3* |
| >> XMTEXT | MAIL+1* |
| >> XPARSYS | 4+1 |
| >> XQXFLG | 4+1 |
| XXXX | CAPVARS~, CAPVARS+5, CAPVARS+7, CAPVARS+8 |
| Y | ENTRYAUD+12, ENTRYAUD+18~, 4+7, NUMTIME+1~, NUMTIME+3* |
| YYYY | CAPVARS+1~, CAPVARS+7* |