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* |