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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LR588

Package: Lab Service

Routine: LR588


Information

LR588 ;SLC/PBB - LR*5.2*588 PATCH UNIVERSAL ENVIRONMENT CHECK ROUTINE ;01/21/06

Source Information

Source file <LR588.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 APPERROR^%ZTER  ($$HTE,$$HTFM)^XLFDT  ($$CJ,$$UP)^XLFSTR  (BMES,MES)^XPDUTL  SETUP^XQALERT  
VA FileMan 4 (,$$FIND1,FIND)^DIC  (FILE,UPDATE)^DIE  (,ENALL,ENALL2,IXALL)^DIK  ($$GET1,GETS)^DIQ  

Entry Points

Name Comments DBIA/ICR reference
EN ; Does not prevent loading of the transport global.
; Environment check is done only during the install.
; DBIA #7126
; DBIA #7127
PRE(ZZP,ZZV) ; KIDS Pre install for LR*5.2*588
POST(ZZP,ZZV) ; KIDS Post install for LR*5.2*588
SSS ; Special Update some entries of 64.2 Workload Code Change suffix + NAME *******************************************
SSS1 ;Process
NLT1 ;
EN1 ;Find and correct existing spelling or duplicate numbers errors.
REINDEX ;Reindex LAM to fire new x-refs
CHK
SET ;
DEL ;
ERR ;
WRT ;
POST1 ;TRANSPORT FILE 64.81 INTO FILE 64 IF REQUIRED
P1
KIL
CHGNM ; CHANGE THE PROCEDURE NAME IN THE RECORD
CMP ; COMPARE FOUND CODES AND PROCEDURE NAMES
SCR(LRMSG) ;Store message in ^XTMP("LRNLT" Global
SETUP ; SETS UP THE FDA ARRAY TO ADD A NODE
GNDE ; RETRIEVES NODES FROM THE TRANSPORT MULTIPLE
AREC ; ADDS ENTRIES FROM THE TRANSPORT MULTIPLE TO FILE 64
ERMSG ;STUFF THE TEMP GLOBAL WITH ANY ERROR MESSAGES
KREC ; DELETES THE RECORD FROM THE FILE
DSS ;Update WKLD CODE file , DSS Feeder Key (#14) field to 'Yes"

External References

Name Field # of Occurrence
APPERROR^%ZTER P1+28
^DIC CHK+6, CHK+21
$$FIND1^DIC CMP+4
FIND^DIC SSS1+1, DSS+9
FILE^DIE SSS1+6, SET+1, CHGNM+3, DSS+15
UPDATE^DIE PRE+26, AREC+1
^DIK DEL+2, KREC+4
ENALL^DIK POST+33, POST+36
ENALL2^DIK POST+32, POST+35
IXALL^DIK REINDEX+6
$$GET1^DIQ DSS+6
GETS^DIQ GNDE+2, GNDE+8, GNDE+12
$$HTE^XLFDT EN+9, PRE+7, POST+27
$$HTFM^XLFDT REINDEX+9, REINDEX+13, POST1+5, ERMSG+1
$$CJ^XLFSTR EN+13, PRE+12, PRE+29, PRE+32, POST+5, POST+37, POST+39, POST+40, P1+31
$$UP^XLFSTR SSS1+4
BMES^XPDUTL EN+13, PRE+12, PRE+29, PRE+32, POST+5, POST+37, POST+39, POST+40, P1, P1+31
MES^XPDUTL SSS1+2, SSS1+7
SETUP^XQALERT EN+11, PRE+9, POST+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,LRIEN_" ( "_LRFILE_" ERROR"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: POST1+8
Function Call: WRITE
  • Prompt: ". "
  • Line Location: P1+12
Function Call: WRITE
  • Prompt: !,LRREC_" "
  • Line Location: P1+15
Function Call: WRITE
  • Prompt: !,"NEW IEN=",$G(LRSIXT4(LRTRIEN))
  • Line Location: GNDE+15
Function Call: WRITE
  • Prompt: !,$C(7),ERR
  • Line Location: DSS+16
Function Call: WRITE
  • Prompt: "*"
  • Line Location: DSS+17
Routine Call
  • DIC
  • Line Location:
    • CHK+6
    • CHK+21
Routine Call
  • DIC
  • Line Location:
    • CMP+4
Routine Call
  • DIC
  • Line Location:
    • SSS1+1
    • DSS+9
Routine Call
  • DIE
  • Line Location:
    • SSS1+6
    • SET+1
    • CHGNM+3
    • DSS+15
Routine Call
  • DIE
  • Line Location:
    • PRE+26
    • AREC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls,  FIND1^DIC,  FIND^DIC
^LAB(64.2 - [#64.2] FIND^DIC
^LAB(64.81 - [#64.81] Classic Fileman Calls
64.8117 GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(64 NLT1+6*
^DD(64.061 PRE+24!, POST+20*, NLT1+7*
^DD(64.2 SSS+2, SSS+3*, SSS+4, SSS+5*, SSS+8*, SSS+9*, NLT1+8*
^DD(64.21 NLT1+9*
^DD(95.3 PRE+17!, PRE+20!, POST+12*, POST+17!, NLT1+2*, NLT1+4*
^DD(95.3099 NLT1+3*
^DD(95.31 NLT1+5*
^LAB(64.061 - [#64.061] NLT1+19*
^LAB(64.2 - [#64.2] NLT1+20*, CHK+30
^LAB(64.21 - [#64.21] NLT1+21*
^LAB(64.81 - [#64.81] P1+10, P1+13, P1+14, GNDE+5, GNDE+6
^LAB(95.3 - [#95.3] PRE+22*, POST+18*, NLT1+16*
^LAB(95.31 - [#95.31] NLT1+17*
^LAM - [#64] REINDEX+1, REINDEX+16, P1, CMP+9*, DSS+13
^LAM("C" CHK+14
^LAM("VR" NLT1+18*
^LAM(0 REINDEX+7*, P1+3*, P1+24*
^LAM(99999 P1+1
^XTMP("LRNLT" REINDEX+11!, REINDEX+13*, POST1+3!, POST1+5*, POST1+7*, SCR+2, SCR+4*
^XTMP("LRNLT642" P1+4, ERMSG+1*, ERMSG+2, ERMSG+3*, ERMSG+6*, ERMSG+7*
^XTMP("LRNLTERR" REINDEX+9!*

Label References

Name Line Occurrences
AREC GNDE+15
CHGNM P1+20
CMP P1+18
DEL CHK+6, CHK+21, SET+3
EN1 POST+30, REINDEX+1
ERMSG CHGNM+7, AREC+4
GNDE P1+21
KREC P1+17, P1+22
NLT1 POST+30
POST1 REINDEX+15
SCR WRT+1, WRT+2, P1+6, P1+7, P1+8, CHGNM+8, CMP+7
SET CHK+34
SETUP GNDE+4, GNDE+10, GNDE+14
SSS POST+42
SSS1 SSS+6, SSS+7
WRT SET+3

Naked Globals

Name Field # of Occurrence
^(0 SCR+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS CMP+1~
DA EN1+1~, REINDEX+14~, DEL+1~, DEL+2*, KREC+2~, KREC+3*
DA(1 KREC+3*, KREC+4
DIC EN1+1~, CHK~, CHK+4*, CHK+17~, CHK+19*, CMP+1~
DIC("S" CHK+5*, CHK+20*
DIC(0 CHK+2*
DIK POST+32!*, POST+33!*, POST+35!*, POST+36!*, EN1+1~, REINDEX+4~, REINDEX+6*, REINDEX+14~, DEL+1~, DEL+2*
, KREC+2~, KREC+4*
DIK(1 POST+32*, POST+33*, POST+35*, POST+36*
DIRUT EN1+1~
DIU EN1+1~, REINDEX+4~
DIU(0 REINDEX+6*
DT REINDEX+9, REINDEX+13, POST1+5, ERMSG+1
DTOUT EN1+1~
DUOUT EN1+1~
ERR PRE+25~, PRE+27, SSS+1~, SSS1+6!, SSS1+7, DSS+3~, DSS+8!, DSS+10, DSS+14!, DSS+16
FDA PRE+25~, SSS+1~, SSS1+3!, DSS+3~, DSS+14!
FDA( PRE+26*, SSS1+4*, SSS1+5*
FDA(1 DSS+14*
I NLT1+1~, NLT1+2*
IEN SSS+1~, SSS1+1*, SSS1+2, SSS1+3*, SSS1+4, SSS1+5, DSS+3~, DSS+12*, DSS+13, DSS+14
LRADD P1+5*, P1+21, KIL!, CMP+2*, CMP+6*
LRANS CHK+1!, SET+2, KIL!
LRAR1 P1+11!, KIL!, SETUP+19!
LRBEG KIL!, SETUP+11*, SETUP+13
LRCHG P1+5*, P1+20, KIL!, CHGNM+2, CMP+2*
LRCNT KIL!
LRCODE KIL!, CHGNM+8, CMP+3*, CMP+4, CMP+7, ERMSG+3
LRCTR KIL!, GNDE+1*
>> LRDBUG CHK+7, CHK+33, SET+2, P1+15, P1+25, GNDE+15, KREC+1
LRDOT P1+5*, P1+12*, KIL!
LREND KIL!, SETUP+12*, SETUP+13
LRENODE KIL+1!, CHGNM+6*, AREC+3*, ERMSG+4*, ERMSG+6, ERMSG+9!
LRERR P1+13*, P1+19, KIL+1!, CHGNM+5*, CMP+2*, ERMSG+8*
LRFDA CHK+1!, CHK+34, P1+11!, KIL+1!, CHGNM+1!
LRFDA( CHK+11*, CHK+15*, CHK+25*, CHK+28*, CHK+32*
LRFDA(42 CHGNM+2*, CHGNM+9!
LRFDA(45 SETUP+17*, GNDE+16!, AREC+5!
LRFILE REINDEX+14~, CHK+3, CHK+7, CHK+11, CHK+15, CHK+16, CHK+25, CHK+28, CHK+33, ERR+1
, KIL+1!
LRFLD KIL+1!, SETUP+3*, SETUP+6*, SETUP+7*, SETUP+14, SETUP+17
LRFLE KIL+1!, SETUP+2*, SETUP+4, SETUP+9, SETUP+11, SETUP+12
LRFNAM KIL+1!
LRI KIL+1!
LRIEN REINDEX+14~, DEL+2, ERR+1, P1+9*, P1+10, P1+13, P1+14, KIL+1!, GNDE+2, GNDE+8
, GNDE+12, KREC+3
LRIENS CHK+8*, CHK+11, CHK+15, CHK+22*, CHK+25, CHK+28, CHK+30, CHK+32, KIL+1!, SETUP+8*
, SETUP+15*, SETUP+17
LRLAST KIL+2!
>> LRLAST64 P1+1*, P1+2*
LRMLT KIL+2!, GNDE+1*, GNDE+2, GNDE+7*, GNDE+8, GNDE+11*, GNDE+12
LRMSG SCR~, SCR+4
LRN P1+4*, KIL+2!, CMP+6*, ERMSG+2*, ERMSG+3, ERMSG+5*, ERMSG+6, ERMSG+7
LRN0 REINDEX+14~, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+18, CHK+23, CHK+24
, KIL+2!
LRN1 REINDEX+14~, CHK+19, CHK+26, CHK+27, CHK+29, CHK+30, KIL+2!
LRNAMX CHK+1!, CHK+2*, CHK+18*, WRT+1, KIL+2!
LRNAMY CHK+1!, CHK+2*, CHK+10*, CHK+11, CHK+18*, CHK+24*, CHK+25, WRT+2, KIL+2!
LRNEXT P1+1*, P1+2*, P1+3, P1+9*, P1+10*, P1+13, P1+14, KIL+2!
LRNIEN KIL+2!
LRNODE KIL+2!, SETUP+1*, SETUP+2, SETUP+3, SETUP+16, GNDE+3*, GNDE+9*, GNDE+13*
LRNUM KIL+2!, GNDE+5*
LRNUMX CHK+1!, CHK+4*, CHK+19*, WRT+1, KIL+3!
LRNUMY CHK+1!, CHK+4*, CHK+13*, CHK+14, CHK+15, CHK+27*, CHK+28, WRT+2, KIL+3!
LRNX KIL+3!
LROUT P1+11!, P1+23!, KIL+3!
LROUT(42 P1+22, CHGNM+4, CHGNM+8
LROUT(45 P1+22, AREC+2
LRPROCNM KIL+3!, CHGNM+2, CHGNM+8, CHGNM+9!, CMP+3*, CMP+7, ERMSG+3
LRREC POST1+1~, P1+13*, P1+15, P1+16, P1+17, KIL+3!, CMP+3
LRREC9 POST1+1~, P1+14*, CMP+8, CMP+9
LRSC KIL+3!
LRSCR KIL+3!, SCR+2*, SCR+4
LRSEQ KIL+3!, SETUP+14*, SETUP+15, GNDE+5*, GNDE+6*, GNDE+11*
LRSIXT4 P1+11!, KIL+3!, GNDE+16!
LRSIXT4( GNDE+15
LRSUBFLE KIL+4!, SETUP+5*, SETUP+13*, SETUP+17
LRSYN CHK+30*, KIL+4!
LRSYNIEN CHK+30*, CHK+31, CHK+32, KIL+4!
LRTRIEN P1+16*, KIL+4!, SETUP+8, SETUP+15, GNDE+2, GNDE+5, GNDE+6, GNDE+8, GNDE+12, GNDE+15
, ERMSG+3, KREC+3
LRVAL KIL+4!, SETUP+16*, SETUP+17
LRVR KIL+4!
LRZZP PRE+2~, PRE+3*, PRE+4, POST+2~, POST+3*, POST+4, REINDEX+9, REINDEX+11, ERMSG+1
LRZZPP PRE+4*, POST+2~, POST+4*, POST1+3, POST1+5, POST1+7, P1+28, SCR+2, SCR+4
LST DSS+3~, DSS+11*, DSS+12
MSG EN+12*, EN+13!, PRE+11*, PRE+12!, PRE+28*, PRE+29!, P1+29*, P1+30*, P1+31!
NODE DSS+3~, DSS+4*, DSS+5*, DSS+6
OUT SSS1+1!, DSS+3~, DSS+8!
OUT("DILIST" SSS1+1, DSS+11, DSS+12
S1 SSS+1~, SSS+6*, SSS+7*, SSS1+1, SSS1+2, SSS1+4, SSS1+5, SSS1+7
SPX01 SSS+1~, SSS+4*, SSS+5, SSS+9
SPX1 SSS+1~, SSS+2*, SSS+3, SSS+8
U PRE+22, POST+18, SSS+1*, SSS+2, SSS+3, SSS+4, SSS+5, SSS+8, SSS+9, SSS1+1
, SSS1+4, SSS1+5, REINDEX+7, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+18
, CHK+19, CHK+23, CHK+24, CHK+26, CHK+27, CHK+29, CHK+30, POST1+5, P1+3, P1+16
, P1+17, P1+24, CMP+3, CMP+9, GNDE+5, ERMSG+1
X EN1+1~, CHK~, CHK+2*, CHK+18*, KIL+4!, CMP+1~, DSS+3~, DSS+6*, DSS+7, DSS+9
>> XPDENV EN+6
>> XPDNM EN+8, PRE+6, POST+26
XQA EN+7~, PRE+2~, POST+2~
XQA("G.LMI" EN+10*, PRE+8*, POST+28*
XQAMSG EN+7~, EN+8*, EN+9*, PRE+2~, PRE+6*, PRE+7*, POST+2~, POST+26*, POST+27*
Y NLT1+15*, NLT1+16, NLT1+17, NLT1+18, NLT1+19, NLT1+20, NLT1+21, EN1+1~, CHK~, CHK+6
, CHK+7, CHK+8, CHK+21, CHK+22, CHK+33, KIL+4!, CMP+1~, CMP+4*, CMP+5, CMP+8
, CMP+9
ZZP PRE~, PRE+3, POST~, POST+3, NLT1+15, REINDEX+9, REINDEX+13
ZZV PRE~, POST~, NLT1+4, NLT1+5, NLT1+6, NLT1+7, NLT1+8, NLT1+9, NLT1+15
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All