Routine: LRAPTIUP

Package	Total	Call Graph
Kernel	5	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$CHKSUM^XUSESIG1 $$ENCRYP^XUSRB1
VA Fileman	2	$$GET1^DIQ ^DIR
Text Integration Utility	1	EXTRACT^TIULQ

Package

Total

Call Graph

Kernel

(,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$CHKSUM^XUSESIG1 $$ENCRYP^XUSRB1

VA Fileman

$$GET1^DIQ ^DIR

Text Integration Utility

EXTRACT^TIULQ

Package	Total	Caller Graph
Lab Service	4	LRAPFICH LRAPMOD LRAURPT LRSPRPT

Package

Total

Caller Graph

Lab Service

LRAPFICH LRAPMOD LRAURPT LRSPRPT

Entry Points

Name	Comments	DBIA/ICR reference
BODY	;Body of Report
END	;
FOOTER	;Report Footer
DISSECT	;Dissect the report into header,body, and footer
HEADER	;Report Header
CHKSUM	;Compare LR and TIU checksums
REPORT	;
MAIN(LRTIUDA,LRDEV)	; Control Branching
EXTRACT	;Extract the report from TIU
ASKDEV	;

Name	Field # of Occurrence
^%ZIS	ASKDEV+2
HOME^%ZIS	ASKDEV+8
^%ZISC	END+2
^%ZTLOAD	ASKDEV+7
$$GET1^DIQ	CHKSUM+15
^DIR	HEADER+3
EXTRACT^TIULQ	EXTRACT+1
$$CHKSUM^XUSESIG1	CHKSUM+20
$$ENCRYP^XUSRB1	BODY+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ASKDEV+1
Function Call: WRITE	Prompt: ! Line Location: ASKDEV+3
Function Call: WRITE	Prompt: !,"Request Queued, #",ZTSK Condition for execution: $D(ZTSK) Line Location: ASKDEV+7
Function Call: WRITE	Prompt: ! Line Location: ASKDEV+7
Function Call: WRITE	Prompt: ! Line Location: HEADER+3
Function Call: WRITE	Prompt: ! Line Location: FOOTER+2
Function Call: WRITE	Prompt: LRTXT,! Line Location: FOOTER+7
Function Call: WRITE	Prompt: ?57,"(See next page)",! Line Location: FOOTER+8
Routine Call	%ZIS Line Location: ASKDEV+8
Routine Call	DIR Line Location: HEADER+3
Routine Call	%ZIS Line Location: ASKDEV+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LR - [#63]	CHKSUM+5, CHKSUM+9
^TMP("LRTIU"	MAIN+6!, EXTRACT+2, EXTRACT+5, CHKSUM+18*, END+3!
^TMP("LRTIUTXT"	MAIN+6!, EXTRACT+5, DISSECT+2, DISSECT+3, DISSECT+9!, DISSECT+12, DISSECT+13!, DISSECT+17, DISSECT+18!, DISSECT+21 , DISSECT+22!, DISSECT+26, DISSECT+27!, DISSECT+30, DISSECT+31!, DISSECT+32, DISSECT+33, REPORT+4, REPORT+5, REPORT+6 , HEADER+6, HEADER+7, BODY+2, BODY+4, FOOTER+3, FOOTER+5, END+3!

Name	Line Occurrences
ASKDEV	MAIN+16
BODY	REPORT+15
CHKSUM	REPORT+13
DISSECT	MAIN+14
END	MAIN+13, MAIN+15, MAIN+17, MAIN+19
EXTRACT	MAIN+12
FOOTER	REPORT+18, BODY+3
HEADER	REPORT+9, BODY+3
REPORT	MAIN+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	END+4!
%ZIS	ASKDEV+2*, END+5!
DIR	HEADER+2!, END+4!
DIR(0	HEADER+2*
DIRUT	END+4!
DTOUT	HEADER+4, END+4!
DUOUT	END+4!
IO	REPORT+1
IO("Q"	ASKDEV+4, ASKDEV+8!
IOF	REPORT+1, HEADER+5, END+1
IOSL	REPORT+7, REPORT+8, BODY+3, FOOTER+2
IOST	REPORT+1, HEADER+1, HEADER+10, END+1
LRCKSUM	REPORT+14, CHKSUM+12, CHKSUM+15, CHKSUM+16*, END+5!
LRCNT	MAIN+7~, DISSECT+1, DISSECT+12, DISSECT+14, DISSECT+16, DISSECT+17, DISSECT+21, DISSECT+25, DISSECT+26, DISSECT+29* , DISSECT+30, DISSECT+32
LRCNTF	MAIN+7~, FOOTER+1, FOOTER+4, FOOTER+6
LRCNTT	MAIN+7~, DISSECT+1, DISSECT+16, DISSECT+25, DISSECT+29, DISSECT+33
LRDEV	MAIN~, MAIN+8*, MAIN+16, END+2
>> LRDFN	CHKSUM+5, CHKSUM+6, CHKSUM+9, CHKSUM+10
LRENCRYP	REPORT+14, BODY+5, CHKSUM+3, END+5!
LREND	REPORT+2~, REPORT+3, REPORT+17, FOOTER+8
LRFILE	CHKSUM+2~, CHKSUM+7, CHKSUM+11, CHKSUM+12, CHKSUM+15
LRFLD	CHKSUM+2~
LRFLG	MAIN+7~, DISSECT+1, DISSECT+10, DISSECT+14, DISSECT+15, DISSECT+19, DISSECT+20, DISSECT+23*, DISSECT+24, DISSECT+28
LRFTC	REPORT+2~, REPORT+5*, REPORT+7, REPORT+8, BODY+3, FOOTER+2
LRHDC	REPORT+2~, REPORT+4*, REPORT+7, REPORT+8
LRHFLG	MAIN+7~, DISSECT+1, DISSECT+4, DISSECT+8
>> LRI	CHKSUM+9, CHKSUM+10
LRIENS	CHKSUM+2~, CHKSUM+6, CHKSUM+10, CHKSUM+14*, CHKSUM+15
LROR	MAIN+7~, DISSECT+1, DISSECT+2, DISSECT+3, DISSECT+9, DISSECT+13, DISSECT+18, DISSECT+22, DISSECT+27, DISSECT+31 , HEADER+6*, HEADER+7
LROR1	REPORT+2~, BODY+1, BODY+2, BODY+4
LROR2	REPORT+2~, FOOTER+1, FOOTER+3, FOOTER+5
LRPG	REPORT+2~, REPORT+3, HEADER+1, HEADER+5, HEADER+11
LRPTR	CHKSUM+5, CHKSUM+9, END+5!
>> LRQUIT	MAIN+9, MAIN+13, MAIN+15, MAIN+17, EXTRACT+4, DISSECT+2, DISSECT+6, ASKDEV+3, ASKDEV+9, REPORT+3 , REPORT+10, REPORT+16, HEADER+1, HEADER+4*, BODY+2, BODY+3
LRREL	CHKSUM+2~
LRROOT	CHKSUM+2~
>> LRSS	CHKSUM+4, CHKSUM+8, CHKSUM+9, CHKSUM+11
LRTIUDA	MAIN~, MAIN+10, EXTRACT+1, EXTRACT+2, EXTRACT+5, CHKSUM+18, CHKSUM+19
LRTOTPGS	REPORT+2~, REPORT+7, REPORT+8, HEADER+11
LRTREC	CHKSUM+2~, CHKSUM+3, CHKSUM+5, CHKSUM+9*, CHKSUM+12, CHKSUM+14
LRTXC	REPORT+2~, REPORT+6*, REPORT+7, REPORT+8
LRTXT	MAIN+7~, DISSECT+3, DISSECT+4, DISSECT+7, DISSECT+11, DISSECT+17, DISSECT+20, DISSECT+26, DISSECT+30, HEADER+7 , HEADER+8, HEADER+9, BODY+4, BODY+5, BODY+6, FOOTER+5*, FOOTER+7, FOOTER+10
LRVAL	MAIN+7~, CHKSUM+19*, CHKSUM+20
POP	MAIN+17, ASKDEV+3, END+5!
TIUCKSUM	REPORT+14, CHKSUM+20*, END+5!
U	HEADER+4, CHKSUM+18
X	HEADER+4, END+4!
Y	END+4!
ZTDESC	ASKDEV+5*, END+6!
ZTQUEUED	END+2, END+6!
ZTREQ	END+2*, END+6!
ZTRTN	ASKDEV+6*, END+6!
ZTSK	ASKDEV+7, ASKDEV+8!

Customize PDF page

Package: Lab Service

Routine: LRAPTIUP

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: