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: LR243

Package: Lab Service

Routine: LR243


Information

LR243 ;DALOI/FHS - LR*5.2*243 PATCH ENVIRONMENT CHECK & CONVERT ROUTINE ; 5/1/99 ;

Source Information

Source file <LR243.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ($$FMTE,$$NOW)^XLFDT  $$CJ^XLFSTR  ($$VERSION,BMES)^XPDUTL  
VA Fileman 3 ^DIC  (FILE,UPDATE,WP)^DIE  $$IENS^DILF  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
EN ; Does not prevent loading of the transport global.
; Environment check is done only during the install.
END ;
CONV ;Convert data to new DD structure
PUNCT ;Make venipuncture WKLD CODE(s) billable
UPDATE ;
LMI ;
DEL
EXIT ;
LNK6064 ; Relink NATIONAL VA LAB CODE with WKLD CODE file
MAIL ;Send message to G.LMI local mail group
CHECK ; Perform environment check
MSGSET(SUB,TXT) ;SUB=subscript - TXT = array containing the message

External References

Name Field # of Occurrence
^DIC LMI+2, PUNCT+4
FILE^DIE UPDATE+2, DEL+8
UPDATE^DIE LNK6064+13
WP^DIE DEL+10
$$IENS^DILF CONV+12, DEL+7
$$FMTE^XLFDT MAIL+6, DEL+5
$$NOW^XLFDT MAIL+6, DEL+5
$$CJ^XLFSTR CHECK+3, CHECK+6, CHECK+9, CHECK+13, CHECK+17, LMI+4, EXIT+1, EXIT+2, MAIL+1, MAIL+3
, MAIL+4, LNK6064+1
^XMD MAIL+8
$$VERSION^XPDUTL CHECK+11, CHECK+15
BMES^XPDUTL CHECK+3, CHECK+6, CHECK+9, CHECK+13, CHECK+17, LMI+4, EXIT+1, EXIT+2, CONV+10, MAIL+1
, MAIL+3, MAIL+4, LNK6064+1, DEL+2, DEL+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: LNK6064+14
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDATE+3
Routine Call
  • DIE
  • Line Location:
    • LNK6064+13
Routine Call
  • DIC
  • Line Location:
    • LMI+2
    • PUNCT+4
Routine Call
  • DIE
  • Line Location:
    • UPDATE+2
    • DEL+8
Routine Call
  • DIE
  • Line Location:
    • DEL+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls,  WP^DIE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] LNK6064+6, LNK6064+7, LNK6064+9
^LAM - [#64] CONV+5, CONV+6, CONV+7!, CONV+8, PUNCT+5, LNK6064+3!, LNK6064+8, DEL+3
^LAM("AE" LNK6064+4!
^LAM(0 MAIL+10
^LRO(69 - [#69] END+2!
^TMP( MAIL+1, MAIL+2, MSGSET+2, MSGSET+4*, MSGSET+5*
^TMP("LRCPT" CONV+1!, END+3!
^TMP("LRCPT@" CONV+1!, END+3!
^TMP("LRCPTERR" CONV+2!, END+3!
^VA(200 - [#200] CHECK+8

Label References

Name Line Occurrences
CHECK EN+3
DEL CONV+10, UPDATE+3
EXIT EN+4
LNK6064 MAIL+9
MSGSET DEL+9
UPDATE CONV+12

Naked Globals

Name Field # of Occurrence
^(0 MAIL+10*, PUNCT+5*, DEL+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT CONV+3*, END+4!, LNK6064+2~, LNK6064+5*, LNK6064+10*, UPDATE+1*, UPDATE+2, DEL+8, DEL+10
CNTT LNK6064+2~, LNK6064+5*, LNK6064+11*
CODE LNK6064+2~, LNK6064+7*, LNK6064+8, LNK6064+12
DATA LNK6064+2~, LNK6064+11*, LNK6064+12
DIC LMI+1~, LMI+2*, PUNCT+2~, PUNCT+3*
DIC(0 LMI+2*, PUNCT+3*
DIFROM MAIL+5~
DUZ CHECK+5, CHECK+8
DUZ(0 CHECK+5
ERR LNK6064+10!
I END+4!, LNK6064+2~, LNK6064+3*, MSGSET+1~, MSGSET+3*, MSGSET+4
IEN LNK6064+2~, LNK6064+10!, LNK6064+12*
IOM CHECK+2
IOSL CHECK+2
LR64 LNK6064+2~
LRCMT END+4!, MSGSET+2*, MSGSET+4*, MSGSET+5
LRDA CONV+1!, CONV+6*, CONV+7, CONV+8, CONV+12, END+4!, DEL+7
LRDA(1 CONV+5*, CONV+6, CONV+7, CONV+8, DEL+3, DEL+4, DEL+10
>> LRDBUG END+1
LRDEL CONV+1!, END+4!, DEL!
LRDEL( DEL+7*
LRMSG CONV+3*, END+4!
LRN CONV+8*, CONV+10, CONV+12, END+4!, DEL+2
LRNOP DEL+1~, DEL+4*, DEL+8, DEL+10
LRROOT CONV+1!, CONV+9!, END+4!, UPDATE+3
LRROOT( CONV+12*
LRS CONV+10*, CONV+11*, CONV+12, END+4!, DEL+2
LRSUB CONV+4*, MAIL+1, MAIL+2, END+4!, DEL+9
LRTXT CONV+1!, END+4!, DEL+9
LRTXT(2 DEL+2*
LRTXT(3 DEL+3*, DEL+4*, DEL+6
LRTXT(4 CONV+4*, DEL+5*
LRTXT(5 CONV+4*
LRX LNK6064+2~, LNK6064+6*, LNK6064+7, LNK6064+9, LNK6064+11
NAME LNK6064+2~, LNK6064+9*
RT LNK6064+2~, LNK6064+10!
RT( LNK6064+12*
SUB END+4!, MSGSET~, MSGSET+2, MSGSET+4, MSGSET+5
TXT END+4!, MSGSET~
TXT( MSGSET+3, MSGSET+4
U CHECK+2, CONV+10, CONV+12, MAIL+10, PUNCT+5, LNK6064+7, LNK6064+9, DEL+2, DEL+3, MSGSET+2
, MSGSET+5
VER CHECK+1~, CHECK+11*, CHECK+12, CHECK+15*, CHECK+16
X LMI+1~, LMI+2*, PUNCT+2~, PUNCT+4*
XMDUZ MAIL+5~, MAIL+7*, END+5!
XMSUB MAIL+5~, MAIL+6*, END+5!
XMTEXT MAIL+5~, MAIL+7*, END+5!
XMY MAIL+5~, END+5!
XMY("G.LMI" MAIL+7*
>> XPDENV EN+2
>> XPDIQ("XPZ1" LMI+7*
>> XPDQUIT CHECK+4*, CHECK+7*, CHECK+10*, CHECK+14*, CHECK+18*, LMI+5*, LMI+6, EXIT+1, EXIT+2
Y LMI+1~, LMI+3, PUNCT+2~, PUNCT+4, PUNCT+5
>> ZTQUEUED UPDATE+4
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