Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BLR35PST

Package: IHS Changes To Lab

Routine: BLR35PST


Information

BLR35PST ; IHS/MSC/MKK - IHS Lab Patch LR*5.2*1035 Post Routine ; 28-Jul-2015 06:30 ; MKK

Source Information

Source file <BLR35PST.m>

Call Graph

Call Graph Total: 21

Package Total Call Graph
IHS Changes To Lab 9 OERRSTSC^BLR7OB1  (EEP,PRESSKEY)^BLRGMENU  (BOKAY,NOSNAPS)^BLRKIDS2  TABMENU^BLRKIDSU  PASSMESG^BLRPRE31  (ENVICHEK,PRE)^BLRPRE35  MAILALMI^BLRUTIL3  $$PATCH^BLRUTIL4  
($$PLURAL,$$PLURALI)^BLRUTIL7  
Kernel 6 ENDR^%ZISS  (FRAME,IOXY,PREP)^XGF  ($$DT,$$HTE,$$HTFM,$$NOW)^XLFDT  ($$CJ,$$UP)^XLFSTR  ($$ADD,$$LKOPT)^XPDMENU  (BMES,MES)^XPDUTL  
VA Fileman 5 $$FIND1^DIC  (FILE,UPDATE)^DIE  ^DIK  $$GET1^DIQ  ^DIR  
IHS VA Utilities 1 ^XBFMK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Changes To Lab 2 BLRPRE35  BLRPRE36  

Entry Points

Name Comments DBIA/ICR reference
PEP ; EP
EEP ; EP - Ersatz EP
CLEANUP ; EP - Ensure ^BLRENTRY global is purged
SETEVARS ; EP - SET standard "Enviroment" VARiables.
ENDINSTL(CURPATCH) ; EP - End Installation
INITSCR ; EP - Initialize screen. Cloned from INIT^XPDID
ADDNOPTS ; EP - ADD New OPTionS
WARMFZZY(ORDCNT) ; EP - "Warm Fuzzy" for user
MESCNTR(STR) ; EP - Center a line and use XPDUTL to display it
BLANK ; EP - Blank Line
POSTMAIL(BLRVERN,CPSTR) ; EP - Post Install MailMan Message
NEWOPT(MENU,NEWOPTN,NEWSYNM,NEWORD) ; EP - Add Option to a Menu
POSTDBG ; EP - POST INSTALL for DEBUG
CHKOERRT(LRODT,LRSP,LROT) ; EP - Delete invalid OERR #'s at the Test level
POSTIT(CP,MSG,BL) ; EP - Write the MSG string and store into the INSTALL file
BADOERRC ; EP - Clean Up OERR Data in File 69
DEBUG ; EP - Debugging Line Label for environment checker
POST ; EP - POST INSTALL
NOPCEON ; EP - Ensure LABORATORY SITE (#69.9) file's PCE VISIT ON field is OFF if PCE not installed.
WOTCNT(BLRVERN) ; EP - Counter for ^XTMP
SAVERRS(FDA,ERR,MSG) ; EP
CHKBCKUP ; EP - Check to determine if BACKUP has been performed.
LABJRNL ; EP - Get rid of pointers in file 61.2 that point to an empty File 95.
CHKOERRO(LRODT,LRSP) ; EP - Delete invalid OERR #'s at the Order level

External References

Name Field # of Occurrence
ENDR^%ZISS INITSCR+6
OERRSTSC^BLR7OB1 POSTDBG+11
EEP^BLRGMENU EEP+1
PRESSKEY^BLRGMENU DEBUG+27
BOKAY^BLRKIDS2 CHKBCKUP+27, NOPCEON+9, BADOERRC+17
NOSNAPS^BLRKIDS2 POSTDBG+9
TABMENU^BLRKIDSU BADOERRC+18, BADOERRC+20, BADOERRC+21, BADOERRC+22, BADOERRC+23, BADOERRC+24
PASSMESG^BLRPRE31 CHKBCKUP+4, CHKBCKUP+16
ENVICHEK^BLRPRE35 DEBUG+26
PRE^BLRPRE35 DEBUG+31
MAILALMI^BLRUTIL3 POSTMAIL+12
$$PATCH^BLRUTIL4 NOPCEON+3
$$PLURAL^BLRUTIL7 BADOERRC+24
$$PLURALI^BLRUTIL7 BADOERRC+20, BADOERRC+21, BADOERRC+22, BADOERRC+23
$$FIND1^DIC NEWOPT+6
FILE^DIE CHKOERRO+11, CHKOERRT+11
UPDATE^DIE NOPCEON+7
^DIK LABJRNL+17
$$GET1^DIQ CHKBCKUP+18, CHKBCKUP+27, ENDINSTL+5
^DIR DEBUG+38, CHKBCKUP+11
^XBFMK DEBUG+34, CHKBCKUP+7
FRAME^XGF INITSCR+9
IOXY^XGF INITSCR+11
PREP^XGF INITSCR+3, INITSCR+4
$$DT^XLFDT POSTDBG+4, LABJRNL+10, WOTCNT+3
$$HTE^XLFDT CHKBCKUP+25, ENDINSTL+6
$$HTFM^XLFDT LABJRNL+10, SAVERRS+3
$$NOW^XLFDT POSTDBG+24
$$CJ^XLFSTR MESCNTR+1
$$UP^XLFSTR NEWOPT+15
$$ADD^XPDMENU NEWOPT+10
$$LKOPT^XPDMENU NEWOPT+5
BMES^XPDUTL POSTDBG+7, POSTDBG+18, NEWOPT+8, CHKBCKUP+17, CHKBCKUP+18, CHKBCKUP+19, NOPCEON+11, BADOERRC+3, POSTIT+4
MES^XPDUTL NEWOPT+12, NEWOPT+14, NEWOPT+15, BLANK+1, MESCNTR+1, POSTIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOSTBM
  • Line Location: INITSCR+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEBUG+7
Function Call: WRITE
  • Prompt: "Debug Routine ",BLRVERN," Begins:",!!
  • Line Location: DEBUG+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DEBUG+22
Function Call: WRITE
  • Prompt: !!!
  • Line Location: DEBUG+32
Function Call: WRITE
  • Prompt: !!,"Debug Routine ",BLRVERN," Ends.",!!
  • Line Location: DEBUG+43
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKBCKUP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKBCKUP+12
Function Call: WRITE
  • Prompt: ?4
  • Line Location: BADOERRC+5
Routine Call
  • DIE
  • Line Location:
    • NOPCEON+7
Routine Call
  • DIC
  • Line Location:
    • NEWOPT+6
Routine Call
  • DIE
  • Line Location:
    • CHKOERRO+11
    • CHKOERRT+11
Routine Call
  • DIR
  • Line Location:
    • DEBUG+38
    • CHKBCKUP+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
19.01 FIND1^DIC
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRENTRY CLEANUP+3
^BLRINSTL("LAB PATCH" CHKBCKUP+23, CHKBCKUP+24*, CHKBCKUP+25*, ENDINSTL+3, ENDINSTL+5*, ENDINSTL+6*
^LAB(61.2 - [#61.2] LABJRNL+6, LABJRNL+7, LABJRNL+12
^LAB(95 - [#95] LABJRNL+3
^LRO(69 - [#69] BADOERRC+6, BADOERRC+8, BADOERRC+12, CHKOERRO+3, CHKOERRT+3
^OR(100 - [#100] CHKOERRO+5, CHKOERRT+5
^VA(200 - [#200] CHKBCKUP+24
^XPD(9.7 - [#9.7] POSTIT+8, POSTIT+10, POSTIT+11*, POSTIT+12*
^XTMP( POSTDBG+24*, WOTCNT+5, WOTCNT+6*
^XTMP("BLRPRE35" SAVERRS+4*, SAVERRS+5*, SAVERRS+7*, SAVERRS+8*, SAVERRS+9*
^XTMP("LABJOURNL" LABJRNL+10*, LABJRNL+11*, LABJRNL+12*, LABJRNL+19*

Label References

Name Line Occurrences
$$WOTCNT POSTDBG+5
BADOERRC POSTDBG+14
BLANK POSTDBG+7, POSTDBG+16, NEWOPT+12, NEWOPT+15
CHKOERRO BADOERRC+10
CHKOERRT BADOERRC+13
CLEANUP POSTDBG+13
ENDINSTL POSTDBG+16
LABJRNL POSTDBG+10
NEWOPT ADDNOPTS+5, ADDNOPTS+6, ADDNOPTS+7, ADDNOPTS+8, ADDNOPTS+9
NOPCEON POSTDBG+12
POSTDBG DEBUG+41
POSTMAIL POSTDBG+22
SAVERRS CHKOERRO+15, CHKOERRT+15
SETEVARS POSTDBG+2, DEBUG+5
WARMFZZY BADOERRC+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BADCNT BADOERRC+4*, BADOERRC+18, BADOERRC+20, CHKOERRO+7*, CHKOERRT+7*
>> BADOCNT BADOERRC+4*, BADOERRC+21, BADOERRC+22, CHKOERRO+8*
>> BADTCNT BADOERRC+4*, BADOERRC+22, CHKOERRT+8*
>> BCKUPCNT CHKBCKUP+23*, CHKBCKUP+24, CHKBCKUP+25
BL POSTIT~, POSTIT+1, POSTIT+3*, POSTIT+4, POSTIT+5, POSTIT+11
BLRIEN NEWOPT+1~, NEWOPT+5*, NEWOPT+6
BLRVERN POSTDBG+5, POSTDBG+22, POSTDBG+24, POSTMAIL~, POSTMAIL+4, POSTMAIL+12, SETEVARS+3*, WOTCNT~, WOTCNT+5, WOTCNT+6
, DEBUG+8, DEBUG+43
CNT LABJRNL+5*, LABJRNL+8*, LABJRNL+9, LABJRNL+19, WOTCNT+1~, WOTCNT+5*, WOTCNT+6, WOTCNT+7, BADOERRC+4*
CP POSTDBG+16, SETEVARS+1*, SETEVARS+2, CHKBCKUP+1~, CHKBCKUP+2*, CHKBCKUP+23, CHKBCKUP+24, CHKBCKUP+25, POSTIT~, POSTIT+1
, POSTIT+8
CPSTR POSTDBG+7, POSTDBG+18, POSTDBG+22, POSTMAIL~, POSTMAIL+6, POSTMAIL+12, SETEVARS+2*, DEBUG+23
CURPATCH ENDINSTL~, ENDINSTL+3, ENDINSTL+5, ENDINSTL+6
DA LABJRNL+14!, LABJRNL+15*
DA(1 LABJRNL+15*, LABJRNL+16
DAYSPURG SAVERRS+1~, SAVERRS+3*, SAVERRS+4
>> DEBUG POSTDBG+20, ADDNOPTS+1, POSTMAIL+9, DEBUG+20*
DEBUGGLO CLEANUP+1~, CLEANUP+5*, CLEANUP+6
>> DELCNT BADOERRC+4*, BADOERRC+23, CHKOERRO+13*, CHKOERRT+13*
>> DIK LABJRNL+16*
>> DILOCKTM POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> DIR("A" DEBUG+37*, CHKBCKUP+10*
>> DIR("B" DEBUG+36*, CHKBCKUP+9*
>> DIR(0 DEBUG+35*, CHKBCKUP+8*
>> DISYS POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
DT POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, SAVERRS+4, SAVERRS+5, POSTIT+1
DTIME POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
DUZ POST+1, LABJRNL+1, DEBUG+1, CHKBCKUP+18, CHKBCKUP+24, CHKBCKUP+27, ENDINSTL+5, BADOERRC+1, POSTIT+1
ERR SAVERRS~
ERRS NOPCEON+1~, NOPCEON+8, CHKOERRO+1~, CHKOERRO+9!, CHKOERRO+13, CHKOERRO+15, CHKOERRT+1~, CHKOERRT+9!, CHKOERRT+13, CHKOERRT+15
, SAVERRS+8
>> ERRSCNT BADOERRC+4*, BADOERRC+24, CHKOERRT+15*
FDA NOPCEON+1~, CHKOERRO+1~, CHKOERRO+9!, CHKOERRO+15, CHKOERRT+1~, CHKOERRT+9!, CHKOERRT+15, SAVERRS~, SAVERRS+7
FDA( NOPCEON+6*, CHKOERRO+10*, CHKOERRT+10*
>> IEN LABJRNL+5*, LABJRNL+6*, LABJRNL+7, LABJRNL+11, LABJRNL+12, LABJRNL+15, POSTIT+8*, POSTIT+10, POSTIT+11, POSTIT+12
INSTCNT ENDINSTL+1~, ENDINSTL+3*, ENDINSTL+5, ENDINSTL+6
IO POST+1, LABJRNL+1, INITSCR+2, DEBUG+1, BADOERRC+1, POSTIT+1
IO(0 INITSCR+2
>> IOBM INITSCR+7*
>> IOBS POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
IOF POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
IOM POST+1, LABJRNL+1, MESCNTR+1, INITSCR+9, DEBUG+1, BADOERRC+1, POSTIT+1
ION POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> IOS POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
IOSL POST+1, LABJRNL+1, INITSCR+7, DEBUG+1, BADOERRC+1, POSTIT+1
IOST POST+1, LABJRNL+1, INITSCR+2, DEBUG+1, BADOERRC+1, POSTIT+1
>> IOSTBM INITSCR+8
>> IOT POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> IOTM INITSCR+7*, INITSCR+9, INITSCR+11
>> IOXY POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> JOURN LABJRNL+7*, LABJRNL+12, LABJRNL+15
>> LINE POSTIT+10*, POSTIT+11*, POSTIT+12
LRODT BADOERRC+4*, BADOERRC+6*, BADOERRC+8, BADOERRC+10, BADOERRC+12, BADOERRC+13, CHKOERRO~, CHKOERRO+3, CHKOERRO+10, CHKOERRT~
, CHKOERRT+3, CHKOERRT+10
LROT BADOERRC+11*, BADOERRC+12*, BADOERRC+13, CHKOERRT~, CHKOERRT+3, CHKOERRT+10
LRSP BADOERRC+7*, BADOERRC+8*, BADOERRC+10, BADOERRC+12, BADOERRC+13, CHKOERRO~, CHKOERRO+3, CHKOERRO+10, CHKOERRT~, CHKOERRT+3
, CHKOERRT+10
MENU NEWOPT~, NEWOPT+5, NEWOPT+8, NEWOPT+10, NEWOPT+12, NEWOPT+14
MSG SAVERRS~, SAVERRS+9, POSTIT~, POSTIT+1, POSTIT+4, POSTIT+5, POSTIT+12
NEWOPTN NEWOPT~, NEWOPT+8, NEWOPT+10, NEWOPT+12, NEWOPT+14
NEWORD NEWOPT~, NEWOPT+10
NEWSYNM NEWOPT~, NEWOPT+6, NEWOPT+10
NOW SAVERRS+1~, SAVERRS+6*, SAVERRS+7, SAVERRS+8, SAVERRS+9
OERRNUM CHKOERRO+1~, CHKOERRO+3*, CHKOERRO+4, CHKOERRO+5, CHKOERRT+1~, CHKOERRT+3*, CHKOERRT+4, CHKOERRT+5
ORDCNT BADOERRC+4*, BADOERRC+9, BADOERRC+17, WARMFZZY~, WARMFZZY+1*, WARMFZZY+2
>> PATCHNUM SETEVARS+1*
>> QUIET POST+3*, POSTDBG+9, DEBUG+40*
STR POSTMAIL+1~, POSTMAIL+12, MESCNTR~, MESCNTR+1
STR(1 POSTMAIL+3*
STR(2 POSTMAIL+4*
STR(3 POSTMAIL+5*
STR(4 POSTMAIL+6*
STR(5 POSTMAIL+7*
TAB ADDNOPTS+3*, NEWOPT+1~, NEWOPT+3*, NEWOPT+12, NEWOPT+14, NEWOPT+15
TODAY POSTDBG+4*, POSTDBG+24, WOTCNT+1~, WOTCNT+3*, WOTCNT+5, WOTCNT+6
U POST+1, LABJRNL+1, DEBUG+1, CHKBCKUP+24, BADOERRC+1, CHKOERRO+3, CHKOERRT+3, SAVERRS+4, SAVERRS+5, POSTIT+1
>> WOTCNT POSTDBG+5*, POSTDBG+24
X NEWOPT+10*, NEWOPT+12, NEWOPT+15, INITSCR+1~, INITSCR+5*
>> XPARSYS POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> XPDABORT DEBUG+29, CHKBCKUP+15*
>> XPDENV DEBUG+24*
>> XPDIDVT INITSCR+2*, INITSCR+3*, INITSCR+5*
>> XPDNM DEBUG+23*
XPDSTR INITSCR+1~, INITSCR+5*
>> XQXFLG POST+1, LABJRNL+1, DEBUG+1, BADOERRC+1, POSTIT+1
>> Y DEBUG+41, CHKBCKUP+14

Marked Items

Name Field # of Occurrence
$T( SETEVARS+1, SETEVARS+3, CHKBCKUP+2
$T(PREP^XGF INITSCR+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All