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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LR201

Package: Lab Service

Routine: LR201


Information

LR201 ;IHS/DIR/AAB - LAB Y2K PATCH ENVIRNMENT CHECK ROUTINE ;2/18/98 09:30 ; [ 12/17/1998 8:27 AM ]

Source Information

Source file <LR201.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 2 $$CJ^XLFSTR  $$VERSION^XPDUTL  

Entry Points

Name Comments DBIA/ICR reference
POST ;
EN ;--> Does not prevent loading of the transport global.
EXIT
CHECK ;

External References

Name Field # of Occurrence
$$CJ^XLFSTR EXIT, EXIT+1, CHECK+1, CHECK+2, CHECK+3, CHECK+5
$$VERSION^XPDUTL CHECK+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Install Environment Check FAILED",80)
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Environment Check is Ok ---",80)
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Terminal Device is not defined",80),!!
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Please Log in to set local DUZ... variables",80),!
  • Line Location: CHECK+2
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("You are not a valid user on this system",80),!
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("You must have LAB SERVICE V5.2 Installed",80),!
  • Line Location: CHECK+5
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(RN_"--Patch 'LR*5.2*1004' has not been installed.",80)
  • Line Location: CHECK+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAM(0 POST+1
^VA(200 - [#200] CHECK+3

Label References

Name Line Occurrences
CHECK EN+3

Naked Globals

Name Field # of Occurrence
^(0 POST+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DUZ CHECK+2, CHECK+3
DUZ(0 CHECK+2
IOM CHECK+1
IOSL CHECK+1
LN2 EXIT+2!
RN EXIT+2!
U CHECK+1, POST+1
VER EXIT+2!, CHECK+4*, CHECK+5
>> XPDENV EN+2
>> XPDQUIT EXIT, EXIT+1, CHECK+1*, CHECK+2*, CHECK+3*, CHECK+5*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All