Routine: LRBLUL

Information

LRBLUL ; IHS/DIR/FJE - BB UTIL 4/13/93 07:17 ;

Source file <LRBLUL.m>

Package	Total	Caller Graph
Lab Service	1	^LRD(65

Name	Comments	DBIA/ICR reference
C	; from input transform 65,.04
W

Name	Line Occurrences
Function Call: WRITE	Prompt: Q Line Location: LRBLUL+5
Function Call: WRITE	Prompt: Q Line Location: C+1
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: $C(7),!,$P(^LAB(66,$P(^LRD(65,X(2),0),U,4),0),U)," unit already exists in inventory" Line Location: W+0

Name	Line Occurrences (* Changed, ! Killed)
^LAB(66 - [#66]	W
^LRD(65 - [#65]	LRBLUL+5, C+1, W

Name	Line Occurrences
W	LRBLUL+5, C+1