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 |  Marked Items  | All
Print Page as PDF
Routine: LR258PO

Package: Lab Service

Routine: LR258PO


Information

LR258PO ;DALOI/FHS/RSH - LR*5.2*258 PATCH POST INSTALL ROUTINE

Source Information

Source file <LR258PO.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 5 ^DIC  (FILE,UPDATE)^DIE  (,IXALL)^DIK  GETS^DIQ  EN^DIU2  
Kernel 4 ($$FMTE,$$HTE,$$HTFM,$$NOW)^XLFDT  $$CJ^XLFSTR  ($$PATCH,BMES)^XPDUTL  SETUP^XQALERT  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Entry Points

Name Comments DBIA/ICR reference
PRE ;
EN1 ;Find and correct existing spelling or duplicate numbers errors.
REINDEX ;Reindex LAM to fire new x-refs
ALERT ;
CHK
SET ;
DEL ;
ERR ;
WRT ;
POST ;TRANSPORT FILE 64.81 INTO FILE 64 IF REQUIRED
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
MAIL ;Send message to G.LMI local mail group of added 64 codes
NEWLST ;Build list of added WKLD CODES
CHK642 ;Looking for locally added suffix
MES642 ;

External References

Name Field # of Occurrence
^DIC REINDEX+9, CHK+6, CHK+20, CMP+5
FILE^DIE REINDEX+12, SET+1, CHGNM+3
UPDATE^DIE AREC+1
^DIK DEL+2, KREC+4
IXALL^DIK REINDEX+3
GETS^DIQ GNDE+2, GNDE+8, GNDE+12
EN^DIU2 PRE+26
$$SITE^VASITE MES642+2
$$FMTE^XLFDT NEWLST+18
$$HTE^XLFDT ALERT+3
$$HTFM^XLFDT PRE+24, REINDEX+14, REINDEX+16
$$NOW^XLFDT NEWLST+18
$$CJ^XLFSTR PRE+20, REINDEX+2, REINDEX+13, REINDEX+23, ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17
^XMD NEWLST+20, MES642+5
$$PATCH^XPDUTL PRE+18
BMES^XPDUTL REINDEX+2, REINDEX+13, REINDEX+23, ALERT+1, NEWLST+2, NEWLST+12, NEWLST+17
SETUP^XQALERT ALERT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$CJ^XLFSTR("You must install LR*5.2*263 Patch",80)
  • Line Location: PRE+20
Function Call: WRITE
  • Prompt: "."
  • Line Location: REINDEX+19
Function Call: WRITE
  • Prompt: !,LRIEN_" ( "_LRFILE_" ERROR"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: ". "
  • Line Location: POST+11
Function Call: WRITE
  • Prompt: !,LRREC_" "
  • Line Location: POST+13
Function Call: WRITE
  • Prompt: !,"ADD=",LRADD," CHG=",LRCHG
  • Line Location: CMP+16
Function Call: WRITE
  • Prompt: !,"NEW IEN=",$G(LRSIXT4(LRTRIEN))
  • Line Location: GNDE+15
Routine Call
  • DIC
  • Line Location:
    • REINDEX+9
    • CHK+6
    • CHK+20
    • CMP+5
Routine Call
  • DIE
  • Line Location:
    • REINDEX+12
    • SET+1
    • CHGNM+3
Routine Call
  • DIE
  • Line Location:
    • AREC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls
^LAB(64.81 - [#64.81] Classic Fileman Calls
64.8117 GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB( POST+23
^LAB(64.2 - [#64.2] PRE+21, PRE+25, PRE+27, REINDEX+7, REINDEX+8, CHK+29, CHK642+7
^LAB(64.81 - [#64.81] REINDEX+18, REINDEX+19, POST+9, POST+12, GNDE+5, GNDE+6
^LAM - [#64] REINDEX+1, ALERT+6, NEWLST+8
^LAM("C" CHK+14, CMP+7, CMP+8
^LAM("VR" POST+22*
^LAM(0 PRE+17, POST+2*, POST+21*
^LAM(99999 POST+1
^XTMP("LRNLT" REINDEX+15!, REINDEX+16*, SCR+1, SCR+2*, NEWLST+14
^XTMP("LRNLT642" PRE+22, PRE+23*, PRE+24*, PRE+25*, POST+3, CMP+10*, ERMSG+2*, ERMSG+5*, CHK642+4!, CHK642+8!
, CHK642+10!, MES642+1!
^XTMP("LRNLTERR" REINDEX+14!*

Label References

Name Line Occurrences
AREC GNDE+15
CHGNM POST+17
CHK REINDEX+22
CMP POST+15
DEL REINDEX+21, CHK+6, CHK+20, SET+3
ERMSG CHGNM+7, AREC+4
GNDE POST+18
KREC POST+19
MAIL POST+24
POST REINDEX+24
SCR WRT+1, WRT+2, POST+5, POST+6, POST+7, CHGNM+8, NEWLST+11, NEWLST+16
SET CHK+33
SETUP GNDE+4, GNDE+10, GNDE+14
WRT SET+3

Naked Globals

Name Field # of Occurrence
^("VR" POST+23*
^(0 PRE+27*, SCR+1*, NEWLST+8
^(1 REINDEX+19
^(2 REINDEX+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EN1+1~, REINDEX+17~, DEL+1~, DEL+2*, KREC+2~, KREC+3*
DA(1 KREC+3*, KREC+4
DIC EN1+1~, REINDEX+5~, REINDEX+6*, CHK~, CHK+4*, CHK+18*, CMP+1~, CMP+4*
DIC("S" CHK+5*, CHK+19*
DIC(0 REINDEX+6*, CHK+2*, CMP+4*
DIFROM MAIL+1~, CHK642+1!
DIK EN1+1~, REINDEX+3*!, REINDEX+17~, DEL+1~, DEL+2*, KREC+2~, KREC+4*
DIRUT EN1+1~
DIU PRE+26*!, EN1+1~
DIU(0 PRE+26*
DT PRE+24, REINDEX+14, REINDEX+16, MES642+2
DTOUT EN1+1~
DUOUT EN1+1~
>> I POST+23*
LRADD POST+4*, POST+18, KIL!, CMP+2*, CMP+7*, CMP+14*
LRANS REINDEX+5~, REINDEX+10!, CHK+1!, SET+2, KIL!
LRAR1 POST+10!, KIL!, SETUP+19!
LRBEG KIL!, SETUP+11*, SETUP+13
LRCHG POST+4*, POST+17, KIL!, CHGNM+2, CMP+2*, CMP+14*, CMP+15*
LRCNT KIL!, NEWLST+3~, NEWLST+4*, NEWLST+9*, NEWLST+10, CHK642+2~, CHK642+3*, CHK642+4*
LRCODE KIL!, CHGNM+8, CMP+3*, CMP+4, CMP+7, CMP+8, CMP+10, ERMSG+2
LRCTR KIL!, GNDE+1*
>> LRDBUG CHK+32, CHK642+9
>> LRDEBUG CHK+7, SET+2, POST+13, POST+24, GNDE+15, KREC+1
LRDOT POST+4*, POST+11*, KIL!
LREND KIL!, SETUP+12*, SETUP+13
LRENODE KIL+1!, CHGNM+6*, AREC+3*, ERMSG+3*, ERMSG+5, ERMSG+7!
LRERR POST+12*, POST+16, KIL+1!, CHGNM+5*, CMP+2*, CMP+11*, ERMSG+6*
LRFDA REINDEX+5~, REINDEX+10!, CHK+1!, CHK+33, POST+10!, KIL+1!, CHGNM+1!
LRFDA( REINDEX+11*, CHK+11*, CHK+15*, CHK+24*, CHK+27*, CHK+31*
LRFDA(42 CHGNM+2*, CHGNM+9!
LRFDA(45 SETUP+17*, GNDE+16!, AREC+5!
LRFILE REINDEX+17~, REINDEX+20*, REINDEX+21, CHK+3, CHK+7, CHK+11, CHK+15, CHK+16, CHK+24, CHK+27
, CHK+32, 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!, CMP+13*, CMP+14, CMP+15
LRI REINDEX+5~, REINDEX+7*, REINDEX+8, REINDEX+11, KIL+1!, CHK642+2~, CHK642+10*
LRIEN REINDEX+17~, REINDEX+18*, REINDEX+19, DEL+2, ERR+1, POST+8*, POST+9, POST+12, KIL+1!, GNDE+2
, GNDE+8, GNDE+12, KREC+3, MAIL+1~, NEWLST+3~, NEWLST+7*, NEWLST+8, NEWLST+10
LRIENS CHK+8*, CHK+11, CHK+15, CHK+21*, CHK+24, CHK+27, CHK+29, CHK+31, KIL+1!, SETUP+8*
, SETUP+15*, SETUP+17
LRLAST PRE+21*, PRE+23, PRE+27, PRE+28!
LRLAST64 POST+1*, NEWLST+5*, NEWLST+8, NEWLST+13!
LRMLT KIL+2!, GNDE+1*, GNDE+2, GNDE+7*, GNDE+8, GNDE+11*, GNDE+12
LRMSG SCR~, SCR+2
LRN POST+3*, KIL+2!, CMP+9*, CMP+10, ERMSG+1*, ERMSG+2, ERMSG+4*, ERMSG+5, MAIL+1~, NEWLST+3~
, NEWLST+5*, NEWLST+6*, NEWLST+7
LRN0 REINDEX+17~, REINDEX+19*, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+17, CHK+22
, CHK+23, KIL+2!
LRN1 REINDEX+17~, REINDEX+19*, REINDEX+20, CHK+18, CHK+25, CHK+26, CHK+28, CHK+29, KIL+2!
LRNAMX CHK+1!, CHK+2*, CHK+17*, WRT+1, KIL+2!
LRNAMY CHK+1!, CHK+2*, CHK+10*, CHK+11, CHK+17*, CHK+23*, CHK+24, WRT+2, KIL+2!
LRNEXT POST+1*, POST+2, POST+8*, POST+9*, POST+12, 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+18*, WRT+1, KIL+3!
LRNUMY CHK+1!, CHK+4*, CHK+13*, CHK+14, CHK+15, CHK+26*, CHK+27, WRT+2, KIL+3!
LRNX KIL+3!, CHK642+2~, CHK642+5*, CHK642+6*, CHK642+7, CHK642+8, CHK642+9
LROUT POST+10!, POST+20!, KIL+3!
LROUT(42 POST+19, CHGNM+4, CHGNM+8
LROUT(45 POST+19, AREC+2
LRPROCNM KIL+3!, CHGNM+2, CHGNM+8, CHGNM+9!, CMP+3*, CMP+10, CMP+14, CMP+15, ERMSG+2
>> LRPRT NEWLST+15
LRREC POST+12*, POST+13, POST+14, KIL+3!, CMP+3
LRSC KIL+3!, CHK642+2~, CHK642+3*
LRSCR KIL+3!, SCR+1*, SCR+2
LRSEQ KIL+3!, SETUP+14*, SETUP+15, GNDE+5*, GNDE+6*, GNDE+11*
LRSIXT4 POST+10!, KIL+3!, GNDE+16!
LRSIXT4( GNDE+15
LRSTR NEWLST+3~, NEWLST+8*, NEWLST+10*, NEWLST+11
LRSUBFLE KIL+4!, SETUP+5*, SETUP+13*, SETUP+17
LRSYN CHK+29*, KIL+4!
LRSYNIEN CHK+29*, CHK+30, CHK+31, KIL+4!
LRTRIEN POST+14*, KIL+4!, SETUP+8, SETUP+15, GNDE+2, GNDE+5, GNDE+6, GNDE+8, GNDE+12, GNDE+15
, ERMSG+2, KREC+3
LRVAL KIL+4!, SETUP+16*, SETUP+17
LRVR POST+21*, POST+22, POST+23, KIL+4!
U PRE+27, REINDEX+8, REINDEX+20, CHK+2, CHK+4, CHK+9, CHK+10, CHK+12, CHK+13, CHK+17
, CHK+18, CHK+22, CHK+23, CHK+25, CHK+26, CHK+28, CHK+29, POST+2, POST+14, POST+21
, CMP+3, CMP+13, GNDE+5, NEWLST+8, MES642+2
X EN1+1~, REINDEX+5~, REINDEX+8*, REINDEX+9, CHK~, CHK+2*, CHK+17*, KIL+4!, CMP+1~, CMP+4*
XMDUZ MAIL+1~, NEWLST+19*, CHK642+1!, MES642+4*
XMSUB MAIL+1~, NEWLST+18*, CHK642+1!, MES642+2*
XMTEXT MAIL+1~, NEWLST+19*, CHK642+1!, MES642+4*
XMY MAIL+1~, CHK642+1!
XMY("G.LMI" NEWLST+19*
XMY("G.LMI@ISC-DALLAS" MES642+3*
>> XPDNM PRE+16, ALERT+3
>> XPDQUIT PRE+17, PRE+19*
XQA ALERT+2~
XQA("G.LMI" ALERT+4*
XQAMSG ALERT+2~, ALERT+3*
Y EN1+1~, REINDEX+5~, REINDEX+9, REINDEX+11, CHK~, CHK+6, CHK+7, CHK+8, CHK+20, CHK+21
, CHK+32, KIL+4!, CMP+1~, CMP+6, CMP+12, CMP+15
Y(0 CMP+13

Marked Items

Name Field # of Occurrence
$T( POST+21
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 |  Marked Items  | All