Routine: HLCSRPT1

Information

HLCSRPT1 ;ISC-SF/RAH-TRANS LOG PENDING MSG LIST;03/01/2010 14:59 ;08/25/2010

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Health Level Seven	1	(DISPLAY,FORMAT)^HLCSRPT
VA FileMan	1	^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 3

Package	Total	Caller Graph
Health Level Seven	3	HLCSRPT HLCSRPT2 HLCSRPT3

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Entry Point for Pending Message Search.
SEARCH1	;
SEARCH2	;
LNKSRCH	; Report pending messages on A logical link.
FAKR	; Build fake record to pass FM21 Browser edits.
SHOWMSG(XXY,XXZ)	; ; Each node, ^tmp($j,"message",record_ien), invokes this code ; to compile a 'virtual w-p document' when a message is browsed.
HLCSBAR	; Center Title on Top Line of Screen
HEADSEG(IEN,SEG)	; ; patch HL1.6145 ; input: ; IEN: ien of message in file #773 ; SEG: passing by reference ; output: ; SEG

External References

Name	Field # of Occurrence
^DIR	SEARCH1+27, SEARCH2+29, LNKSRCH+3
DISPLAY^HLCSRPT	SEARCH1+31, SEARCH2+33
FORMAT^HLCSRPT	SEARCH1+24, SEARCH2+25

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," . . . PLEASE WAIT, THIS CAN TAKE AWHILE . . .",! Line Location: SEARCH1+1
Function Call: WRITE	Prompt: !!,HLCSNREC,!! Line Location: SEARCH1+27
Function Call: WRITE	Prompt: !!," . . . PLEASE WAIT, THIS CAN TAKE AWHILE . . .",! Line Location: SEARCH2+1
Function Call: WRITE	Prompt: !!,HLCSNREC,!! Line Location: SEARCH2+29
Function Call: WRITE	Prompt: @IOF,! Line Location: LNKSRCH+1
Function Call: WRITE	Prompt: !,X_" NOT VALID " Line Location: LNKSRCH+5
Function Call: WRITE	Prompt: RVON,?(80-$L(HLCSHDR)\2),HLCSHDR,$E(SPACE,$X,77),RVOFF,! Line Location: HLCSBAR+1
Routine Call	DIR Line Location: SEARCH1+27 SEARCH2+29 LNKSRCH+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HL(771 - [#771]	SHOWMSG+28, SHOWMSG+30
^HL(771.6 - [#771.6]	SHOWMSG+22
^HL(771.7 - [#771.7]	SHOWMSG+26
^HL(772 - [#772]	SHOWMSG+11, SHOWMSG+54, SHOWMSG+55, SHOWMSG+56
^HLCS(870 - [#870]	SEARCH1+10, SEARCH2+11, SHOWMSG+16
^HLMA - [#773]	SEARCH1+6, SEARCH1+8, SEARCH2+7, SEARCH2+9, SHOWMSG+3, SHOWMSG+4, SHOWMSG+5, SHOWMSG+7, SHOWMSG+12, SHOWMSG+18 , SHOWMSG+20, SHOWMSG+22, SHOWMSG+24, SHOWMSG+26, SHOWMSG+44, SHOWMSG+45, SHOWMSG+46, HEADSEG+10
^HLMA("AC"	SEARCH1+3, SEARCH1+5, SEARCH2+3, SEARCH2+5, SEARCH2+6
^HLMA("AG"	SEARCH1+7, SEARCH2+8
^TMP("TLOG"	SEARCH1+27, SEARCH1+31!, SEARCH2+29, SEARCH2+33!, FAKR+1
^TMP($J	FAKR+3, FAKR+4, SHOWMSG+4, SHOWMSG+6, SHOWMSG+10, SHOWMSG+15, SHOWMSG+19, SHOWMSG+23, SHOWMSG+27, SHOWMSG+29 , SHOWMSG+31, SHOWMSG+41, SHOWMSG+42, SHOWMSG+46, SHOWMSG+53, SHOWMSG+56, SHOWMSG+64*

Label References

Name	Line Occurrences
FAKR	SEARCH1+30, SEARCH2+32
HEADSEG	SEARCH1+15, SEARCH2+16, SHOWMSG+35
HLCSBAR	LNKSRCH+1
LNKSRCH	EN+1, LNKSRCH+5
SEARCH1	EN+2
SEARCH2	EN+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	SEARCH1+27!, SEARCH2+29!, LNKSRCH+4!, LNKSRCH+6!
DIR("A"	LNKSRCH+2*
DIR(0	SEARCH1+27, SEARCH2+29, LNKSRCH+2*
DTE	SHOWMSG+11*, SHOWMSG+14, SHOWMSG+15!
>> DTOUT	LNKSRCH+3
DTP	SHOWMSG+12, SHOWMSG+13, SHOWMSG+14, SHOWMSG+15!
DTS	SHOWMSG+20*, SHOWMSG+21, SHOWMSG+23!
>> DUOUT	LNKSRCH+3
>> HLCSDTE	SEARCH1+8, SEARCH2+9
>> HLCSEVN	SEARCH1+23, SEARCH2+24
>> HLCSEVN1	SEARCH1+16, SEARCH1+19, SEARCH1+21, SEARCH1+23, SEARCH2+17, SEARCH2+20, SEARCH2+22, SEARCH2+24
>> HLCSEVN2	SEARCH1+17, SEARCH1+20, SEARCH1+22, SEARCH1+23, SEARCH2+18, SEARCH2+21, SEARCH2+23, SEARCH2+24
>> HLCSHDR	LNKSRCH+1*, HLCSBAR+1
>> HLCSI	SEARCH1+2, SEARCH1+4, SEARCH2+2, SEARCH2+4
>> HLCSIO	SEARCH1+2, SEARCH1+3, SEARCH1+5, SEARCH2+2, SEARCH2+3, SEARCH2+5, SEARCH2+6
>> HLCSJ	SEARCH1+4, SEARCH1+5, SEARCH1+6, SEARCH1+7, SEARCH1+8, SEARCH1+15, SEARCH2+4, SEARCH2+6, SEARCH2+7, SEARCH2+8 , SEARCH2+9, SEARCH2+16, FAKR+1, FAKR+2, FAKR+3, FAKR+4, FAKR+5
>> HLCSLINK	SEARCH1+5, SEARCH1+10, SEARCH2+4, SEARCH2+5, SEARCH2+6, SEARCH2+11, LNKSRCH+6*
>> HLCSLN	SEARCH1+2, SEARCH2+2
>> HLCSLNK	SEARCH1+9, SEARCH1+10, SEARCH2+10, SEARCH2+11, LNKSRCH+6*
>> HLCSLS	EN+2, LNKSRCH+4, LNKSRCH+7
>> HLCSN	SEARCH1+4, SEARCH2+4
>> HLCSNREC	SEARCH1+27, SEARCH2+29
>> HLCSRNO	FAKR+5*
>> HLCSTITL	SEARCH1+28, SEARCH1+29, SEARCH2+30, SEARCH2+31
>> HLCSX	SEARCH1+8, SEARCH2+9
IEN	HEADSEG~, HEADSEG+8, HEADSEG+10
IOF	LNKSRCH+1
LINE	SHOWMSG+8, SHOWMSG+9, SHOWMSG+10, SHOWMSG+14, SHOWMSG+15, SHOWMSG+16, SHOWMSG+17, SHOWMSG+18, SHOWMSG+19, SHOWMSG+21* , SHOWMSG+22, SHOWMSG+23, SHOWMSG+24, SHOWMSG+25, SHOWMSG+26, SHOWMSG+27, SHOWMSG+28, SHOWMSG+29, SHOWMSG+30, SHOWMSG+31 , SHOWMSG+36, SHOWMSG+37, SHOWMSG+39*, SHOWMSG+41!
LN1	SHOWMSG+43, SHOWMSG+45, SHOWMSG+46, SHOWMSG+52, SHOWMSG+55, SHOWMSG+56, SHOWMSG+65!
LN2	SHOWMSG+43, SHOWMSG+46, SHOWMSG+49, SHOWMSG+53, SHOWMSG+56, SHOWMSG+59, SHOWMSG+62, SHOWMSG+65!
>> RVOFF	HLCSBAR+1
>> RVON	HLCSBAR+1
SEG	SEARCH1+14~, SEARCH1+15, SEARCH2+15~, SEARCH2+16, SHOWMSG+34~, SHOWMSG+35, HEADSEG~, HEADSEG+9!, HEADSEG+10*, HEADSEG+11 , HEADSEG+12, HEADSEG+14, HEADSEG+16, HEADSEG+18, HEADSEG+19, HEADSEG+25, HEADSEG+30
SEG("CODE"	HEADSEG+12*, HEADSEG+13, HEADSEG+24, HEADSEG+29
SEG("COMPONENT"	HEADSEG+16*, HEADSEG+17, HEADSEG+26, HEADSEG+27, HEADSEG+32
SEG("ECH-2"	HEADSEG+19*, HEADSEG+34, HEADSEG+35, HEADSEG+36
SEG("EVENT TY	PE" , SEARCH1+17, SEARCH2+18, SHOWMSG+39, HEADSEG+22, HEADSEG+27, HEADSEG+36, HEADSEG+41
SEG("FIELD"	HEADSEG+14*, HEADSEG+15, HEADSEG+25, HEADSEG+30
SEG("MESSAGE	TYPE" , SEARCH1+16, SEARCH2+17, SHOWMSG+36, HEADSEG+21, HEADSEG+26, HEADSEG+33, HEADSEG+35, HEADSEG+40*
SEG("SEG-9"	HEADSEG+25, HEADSEG+26, HEADSEG+27, HEADSEG+30, HEADSEG+31, HEADSEG+32
SEG("SEG-9-2"	HEADSEG+32*, HEADSEG+33, HEADSEG+34, HEADSEG+35, HEADSEG+36, HEADSEG+39, HEADSEG+40, HEADSEG+41
SEG("SUB-COMPONENT"	HEADSEG+18*, HEADSEG+38, HEADSEG+39, HEADSEG+40, HEADSEG+41
>> SPACE	HLCSBAR+1
>> STOP	EN+1, LNKSRCH+3*
U	SEARCH1+8, SEARCH1+10, SEARCH2+9, SEARCH2+11, LNKSRCH+6, SHOWMSG+5, SHOWMSG+9, SHOWMSG+11, SHOWMSG+12, SHOWMSG+16 , SHOWMSG+18, SHOWMSG+20, SHOWMSG+22, SHOWMSG+24, SHOWMSG+26, SHOWMSG+28, SHOWMSG+30, SHOWMSG+64
>> VERS22	SEARCH1+28, SEARCH1+30, SEARCH2+30, SEARCH2+32
X	LNKSRCH+4!, LNKSRCH+5!, LNKSRCH+6!
XLINE	SHOWMSG+7*, SHOWMSG+9, SHOWMSG+11, SHOWMSG+16, SHOWMSG+18, SHOWMSG+28, SHOWMSG+30, SHOWMSG+41!
XXY	SHOWMSG~, SHOWMSG+3, SHOWMSG+4, SHOWMSG+5, SHOWMSG+6, SHOWMSG+7, SHOWMSG+8, SHOWMSG+10, SHOWMSG+12, SHOWMSG+15 , SHOWMSG+19, SHOWMSG+20, SHOWMSG+22, SHOWMSG+23, SHOWMSG+24, SHOWMSG+26, SHOWMSG+27, SHOWMSG+29, SHOWMSG+31, SHOWMSG+35 , SHOWMSG+41, SHOWMSG+42, SHOWMSG+44, SHOWMSG+45, SHOWMSG+46, SHOWMSG+53, SHOWMSG+56, SHOWMSG+64
XXZ	SHOWMSG~, SHOWMSG+54, SHOWMSG+55, SHOWMSG+56
Y	LNKSRCH+4!, LNKSRCH+5!, LNKSRCH+6!
Y1Y2	SHOWMSG+63*, SHOWMSG+64, SHOWMSG+65!
YY1	SHOWMSG+5, SHOWMSG+62, SHOWMSG+63, SHOWMSG+65!
YY2	SHOWMSG+5, SHOWMSG+62, SHOWMSG+63, SHOWMSG+65!

Customize PDF page

Package: Health Level Seven