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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LR127PO

Package: Lab Service

Routine: LR127PO


Information

LR127PO ; IHS/DIR/AAB - LR*5.2*127 POST INSTALL ROUTINE KIDS INSTALL ;

Source Information

Source file <LR127PO.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 $$CJ^XLFSTR  $$ADD^XPDMENU  
VA Fileman 2 ^DIE  ^DIK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRBLFX72  

Entry Points

Name Comments DBIA/ICR reference
SUF
EN ;
END ;
ERR ;
STOP ;
LK ;
ADD ;
PURG ;
MSG
CPT ;

External References

Name Field # of Occurrence
^DIE ADD+4
^DIK PURG+1
$$CJ^XLFSTR STOP+5, STOP+6, CPT+5, MSG+1, MSG+2, MSG+3, MSG+4, MSG+5
$$ADD^XPDMENU STOP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$$CJ^XLFSTR("No data in file # 64.81 - No linking done.",80)
  • Line Location: STOP+5
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Starting CPT to NLT linking Standby",80),!
  • Line Location: STOP+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: CPT+4
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Database Upgrade Completed Sucessfully",80),!!
  • Line Location: CPT+5
Function Call: WRITE
  • Prompt: !?10," Database Upgrade Incomplete - Use FM to Print a Listing"
  • Line Location: CPT+6
Function Call: WRITE
  • Prompt: !,"of the LAB NLT/CPT CODES (#64.81) for a listing of errors",!!
  • Line Location: CPT+7
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PCE/VSIT ON (#615) field in LABORATORY SITE (#69.9) file",80)
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("has been set to BOTH PCE/VSIT AND STOP CODES",80),!!
  • Line Location: MSG+2
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("You can use the [Edit or Print WKLD CODES] option for a printed list",80)
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("of linked CPT linked NLT codes.",80),!
  • Line Location: MSG+4
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Post install completed",80),!!
  • Line Location: MSG+5
Function Call: WRITE
  • Prompt: !!?5," The Laboratory LIM should use the National Laboratory File"
  • Line Location: MSG+6
Function Call: WRITE
  • Prompt: !,"Menu [LR7O 60-64] to link Laboratory Test to WKLD CODES (#64) "
  • Line Location: MSG+7
Function Call: WRITE
  • Prompt: !,"This should be done before 10/1/96 to permit CPT codes to be"
  • Line Location: MSG+8
Function Call: WRITE
  • Prompt: !,"passed to the PCE package",!,$C(7),!
  • Line Location: MSG+9
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !,"Error Processing WKLD CODE "_LRNLT_" Logged in "_LRIEN,!
  • Line Location: ERR+2
Routine Call
  • DIE
  • Line Location:
    • ADD+4

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(64.81 - [#64.81] STOP+5, CPT+2, CPT+5, ERR+1*
^LAB(69.9 - [#69.9] STOP+2*, MSG*
^LAM - [#64] LK+2, LK+3, ADD+1, ADD+2, ADD+4
^LAM("C" LK+1
^LAM(0 STOP+1

Label References

Name Line Occurrences
ADD LK+4, SUF+1
ERR LK+2, LK+3, ADD+5
LK CPT+4
MSG STOP+5, CPT+5
PURG CPT+2

Naked Globals

Name Field # of Occurrence
^( CPT+2
^(0 STOP+1*, CPT+2, ADD+2, ERR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA END+2!, LK+2!*, LK+3, SUF+1!*, ADD+1, ADD+2, ADD+4, PURG+1*
DA(1 ADD+3*, PURG+1*
DATA CPT+2*, CPT+3, END+2!
DIC END+2!, SUF+1!
DIE CPT+2!*, END+2!
DIK END+2!, PURG+1!*
DR END+2!, LK+4!, SUF+1!, ADD+3*
DR(1 ADD+3*
DR(2 ADD+3*
LRACTDT CPT+1*, END+2!, ADD+3
LRCODE END+2!, LK+1*, LK+2
LRCPT CPT+3*, CPT+4, END+2!, ADD+1, ADD+3, ADD+4
>> LRDBUG END+1, ADD+4
LRIEN CPT+2*, END+2!, ERR+1, ERR+2, PURG+1
LRNLT CPT+3*, CPT+4, END+2!, LK+1, LK+3, SUF, ADD+2, ERR+1, ERR+2
LRNODE END+2!, SUF*, SUF+1
TAG END+2!, LK+2*, LK+3*, ADD+5*, ERR+1*
U STOP+1, STOP+2, CPT+2, CPT+3, MSG, LK+3, ADD+2, ERR+1
X STOP+3*, STOP+4, END+2!
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 |  Naked Globals |  Local Variables |  All