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

Package: Lab Service

Routine: LR105PO

Information

LR105PO ; IHS/DIR/FJE - LR*5.2*105 POST INSTALL ROUTINE KIDS INSTALL" ;

Source Information

Source file <LR105PO.m>

Call Graph

Call Graph Total: 6

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

Entry Points

Name	Comments	DBIA/ICR reference
STOP
EN	;
END	;
BB	;G END ;Blood bank's multi-divisional test sites should uncomment this line.
DIS

External References

Name	Field # of Occurrence
^DIC	EN+5
^DIE	EN+9
^DIK	BB+1
EN^DIQ	DIS+1
$$CJ^XLFSTR	END+2, END+3, END+7, END+8, END+9, STOP+2
$$ADD^XPDMENU	EN+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Option [LR WKLD CODE EDIT PRINT] was ",$S(X:"added",1:"NOT ADDED")," to [LR LIM/WKLD] MENU",!! Line Location: EN+2
Function Call: WRITE	Prompt: !,"^LAB(64.2) GLOBAL IS LOCKED BY ANOTHER USER",!,"DSS ACC suffix not added.",!! Line Location: EN+4
Function Call: WRITE	Prompt: !?5,"Not able to install new workload code.",! Line Location: EN+6
Function Call: WRITE	Prompt: !!?5,"This new Workload Code Suffix has been added to ^LAB(64.2 ",!! Line Location: DIS+2
Function Call: WRITE	Prompt: !!," The DIVISION #.16 field has been deleted from the BLOOD INVENTORY #65",!! Line Location: BB+2
Function Call: WRITE	Prompt: !!,"Database Error",!?5,"Your system is missing the ^LRO(64.03) Global" Line Location: END+1
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Preparing to purge data from WKLD LOG FILE (#64.03)",80) Line Location: END+2
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Purging data <Please wait> ",80),! Line Location: END+3
Function Call: WRITE	Prompt: !,"Turning [OFF] COLLECT WKLD LOG FILE (#616) field in LABORATORY SITE (#69.9) file",!! Line Location: END+5
Function Call: WRITE	Prompt: !?5,"Laboratory DSS Site Preparation completed",!! Line Location: END+6
Function Call: WRITE	Prompt: !!!,$$CJ^XLFSTR("Unable to Lock the ^LRO(64.03) Global - Contact the CS Clin2",80) Line Location: END+7
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("for assistance. The Patch install is complete but data in file #64.03",80) Line Location: END+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("was NOT PURGED.",80),! Line Location: END+9
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Post install completed",80),!! Line Location: STOP+2
Routine Call	DIE Line Location: EN+9
Routine Call	DIC Line Location: EN+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^LAB(64.2 - [#64.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(64.2 - [#64.2]	EN+3, EN+4, EN+6, EN+9
^LAB(69.9 - [#69.9]	END+6*
^LAM(0	STOP+1
^LRO(64.03 - [#64.03]	END+1, END+3, END+4!*, STOP

Label References

Name	Line Occurrences
BB	EN+4, EN+6, DIS
DIS	EN+3
STOP	END+1, END+3

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	EN+3, EN+5!, EN+7!, DIS, BB+1!*, STOP+3!
DA(1	BB+1*
DIC	EN+5!, EN+7!, DIS!, DIS+1, STOP+3!
DIC(0	EN+5*
DIE	EN+5!, EN+7!*, DIS!, STOP+3!
DIK	BB+1!*
DLAYGO	EN+5, EN+7!, DIS!, STOP+3!
DR	EN+5!, EN+7!, EN+8*, DIS!, STOP+3!
S	DIS+1*, STOP+3!
U	END+4, END+6, STOP+1
X	EN+1, EN+2, EN+5, EN+7!, END+4*, STOP+3!
Y	EN+6, EN+7, STOP+3!

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