Routine: BLRESIGR

Information

BLRESIGR ; IHS/OIT/MKK - Laboratory E-SIG Reports ; [ 04/12/06 4:00 PM ]

Source Information

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC $$FMTE^XLFDT $$CJ^XLFSTR
IHS Changes To Lab	3	(GETESIG2,GETESIGD,NSIGNTXN)^BLRESRCD (ADDTMENU,BLRGHWPN,BLRGPGR,MENUDRFM)^BLRGMENU $$ADDON^BLRUTIL
IHS VA Utilities	2	^XBCLS ^XBFMK
VA Fileman	2	^DIC ^DIR
Lab Service	1	B^LRU

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS Changes To Lab	1	BLRESRNS

Entry Points

Name	Comments	DBIA/ICR reference
SNOSIGNR	;
ASIGNSTS	; EP
SURINHDR(HDCNT)	;
SETMENU	; ; MAIN MENU INITIALIZATION
PEP	; "Real" EP
EEP	; Ersatz EP
FULLRPTH	;
FULLRPTL	;
ALLSTS	; EP
ESIGRPTH(HEAD1)	;
NSGNRPTH()	;
GETPHYIN()	;
SNSGNCOM	;
SELSTS	;
GETDEV()	; EP
SIGNRPT	;
NSIGNCOM	;
ALLNSIGN	; EP
SURROGAT(RESP)
NSIGNRPT	;
ESIGBRKO	;
NSGNRPTL	;
SELCTPHY()	;
ANOSIGNR	; EP
SSIGNSTS	;
FULLCOMP	;
SIGNRPTL	;
ALLESIGN	; EP
ALLESIGS	; EP
SGNPCOMP	;
ALLPCOMP	;
DATERNGE	;
SIGNCOMP	;
ESIGRPT(WOTDLINE)	;

External References

Name	Field # of Occurrence
^%ZIS	GETDEV+1
^%ZISC	ESIGRPT+20, SIGNRPT+21, NSIGNRPT+19
GETESIG2^BLRESRCD	SIGNCOMP+10, SGNPCOMP+10
GETESIGD^BLRESRCD	FULLCOMP+6, ALLPCOMP+6
NSIGNTXN^BLRESRCD	NSIGNCOM+11, SNSGNCOM+11
ADDTMENU^BLRGMENU	SETMENU+2, SETMENU+3, SETMENU+4, SETMENU+5
BLRGHWPN^BLRGMENU	FULLRPTL+3, SIGNRPTL+5, NSGNRPTL+5
BLRGPGR^BLRGMENU	PEP+6, ALLESIGS+7, ESIGRPT+3, ESIGRPT+24, SELCTPHY+15, ALLESIGN+7, SIGNRPT+3, SIGNRPT+23, ALLNSIGN+7, NSIGNRPT+3 , NSIGNRPT+21
MENUDRFM^BLRGMENU	PEP+19
$$ADDON^BLRUTIL	PEP+4
^DIC	GETPHYIN+4
^DIR	ALLESIGS+4, ALLESIGN+4, ALLNSIGN+4
B^LRU	DATERNGE+2
^XBCLS	PEP+21
^XBFMK	ALLESIGS+1, GETPHYIN+1, ALLESIGN+1, ALLNSIGN+1
$$FMTE^XLFDT	FULLRPTL+7, ESIGRPTH+4, ESIGRPTH+5, SIGNRPTL+8, SIGNRPTL+9, SURROGAT+5, SURROGAT+6, NSGNRPTL+8, NSGNRPTL+9
$$CJ^XLFSTR	ESIGRPTH+6, SURINHDR+4, SURINHDR+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),$C(7),! Line Location: EEP+1
Function Call: WRITE	Prompt: "Use Label Only",! Line Location: EEP+2
Function Call: WRITE	Prompt: $C(7),$C(7),$C(7),! Line Location: EEP+3
Function Call: WRITE	Prompt: !!,"IHS LR5.21013 E-SIG is NOT on.",!! Line Location: PEP+5
Function Call: WRITE	Prompt: !,?11,"Lab E-SIG Menu" Line Location: PEP+22
Function Call: WRITE	Prompt: !,?10,"Exit entered. No Report.",! Line Location: ALLESIGS+6
Function Call: WRITE	Prompt: $E(NRESP,1,15) Line Location: FULLRPTL+5
Function Call: WRITE	Prompt: ?16,ACCN Line Location: FULLRPTL+6
Function Call: WRITE	Prompt: ?36,$$FMTE^XLFDT(COLLDTT,"2MZ") Line Location: FULLRPTL+7
Function Call: WRITE	Prompt: ?52,$E(STATUS,1,12) Line Location: FULLRPTL+8
Function Call: WRITE	Prompt: ?65,$E(NSIGN,1,15) Line Location: FULLRPTL+9
Function Call: WRITE	Prompt: ! Line Location: FULLRPTL+10
Function Call: WRITE	Prompt: !,"Output Device Error",!! Line Location: ESIGRPT+2
Function Call: WRITE	Prompt: ! Line Location: ESIGRPT+17
Function Call: WRITE	Prompt: !!,"Number of records = ",CNT,!! Line Location: ESIGRPT+22
Function Call: WRITE	Prompt: ! Line Location: SELCTPHY+11
Function Call: WRITE	Prompt: !,"No Providers selected",! Line Location: SELCTPHY+14
Function Call: WRITE	Prompt: !,?10,"Exit entered. No Report.",! Line Location: ALLESIGN+6
Function Call: WRITE	Prompt: !,"Output Device Error",!! Line Location: SIGNRPT+2
Function Call: WRITE	Prompt: !!,?10,"Number of Signed E-SIG transactions for ",NRESP," = ",PHYCNT,! Line Location: SIGNRPT+18
Function Call: WRITE	Prompt: ACCN Line Location: SIGNRPTL+7
Function Call: WRITE	Prompt: ?19,$$FMTE^XLFDT(COLLDTT,"2MZ") Line Location: SIGNRPTL+8
Function Call: WRITE	Prompt: ?35,$$FMTE^XLFDT(SIGNDT,"2MZ") Line Location: SIGNRPTL+9
Function Call: WRITE	Prompt: ?51,$E(NSIGN,1,25) Line Location: SIGNRPTL+10
Function Call: WRITE	Prompt: ! Line Location: SIGNRPTL+11
Function Call: WRITE	Prompt: !,?10,"Exit entered. No Report.",! Line Location: ALLNSIGN+6
Function Call: WRITE	Prompt: !,"Output Device Error",!! Line Location: NSIGNRPT+2
Function Call: WRITE	Prompt: !,?10,"Number of records = ",CNT,! Line Location: NSIGNRPT+16
Function Call: WRITE	Prompt: ACCN Line Location: NSGNRPTL+7
Function Call: WRITE	Prompt: ?19,$$FMTE^XLFDT(COLLDTT,"2MZ") Line Location: NSGNRPTL+8
Function Call: WRITE	Prompt: ?35,$$FMTE^XLFDT(SIGNDT,"2MZ") Line Location: NSGNRPTL+9
Function Call: WRITE	Prompt: ?51,$E(NSIGN,1,25) Line Location: NSGNRPTL+10
Function Call: WRITE	Prompt: ! Line Location: NSGNRPTL+11
Function Call: WRITE	Prompt: ! Line Location: DATERNGE+1
Routine Call	DIC Line Location: GETPHYIN+4
Routine Call	DIR Line Location: ALLESIGS+4 ALLESIGN+4 ALLNSIGN+4
Routine Call	%ZIS Line Location: GETDEV+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BLRALAB(9009027.1 - [#9009027.1]	SURROGAT+3, SURROGAT+4
^LR - [#63]	ESIGBRKO+1, ESIGBRKO+2, ESIGBRKO+3, ESIGBRKO+6, ESIGBRKO+9
^LR("BLRA"	FULLCOMP+5, SIGNCOMP+7, NSIGNCOM+8
^VA(200 - [#200]	ESIGBRKO+8, SIGNCOMP+8, SGNPCOMP+8, NSIGNCOM+9, SURROGAT+7, SNSGNCOM+9

Label References

Name	Line Occurrences
$$GETDEV	ESIGRPT+1, SIGNRPT+1, NSGNRPTH+3
$$GETPHYIN	SELCTPHY+6
$$NSGNRPTH	NSIGNRPT+1
$$SELCTPHY	SELSTS+1, SSIGNSTS+1, SNOSIGNR+1
@(	ESIGRPT+14
ALLPCOMP	SELSTS+3
ALLSTS	ALLESIGS+9
ANOSIGNR	ALLNSIGN+9
ASIGNSTS	ALLESIGN+9
DATERNGE	FULLCOMP+1, ALLPCOMP+1, SIGNCOMP+1, SGNPCOMP+1, NSIGNCOM+1, SNSGNCOM+1
ESIGBRKO	FULLRPTL+1, SIGNRPTL+1, NSGNRPTL+1
ESIGRPT	ALLSTS+3, SELSTS+5
ESIGRPTH	FULLRPTH+1, SIGNRPT+5, NSGNRPTH+1
FULLCOMP	ALLSTS+1
FULLRPTH	ALLSTS+2, SELSTS+4
NSGNRPTL	NSIGNRPT+15
NSIGNCOM	ANOSIGNR+1
NSIGNRPT	ANOSIGNR+2, SNOSIGNR+4
SELSTS	ALLESIGS+10
SETMENU	PEP+18
SGNPCOMP	SSIGNSTS+3
SIGNCOMP	ASIGNSTS+1
SIGNRPT	ASIGNSTS+2, SSIGNSTS+4
SIGNRPTL	SIGNRPT+16
SNOSIGNR	ALLNSIGN+10
SNSGNCOM	SNOSIGNR+3
SSIGNSTS	ALLESIGN+10
SURINHDR	SIGNRPTL+4, NSGNRPTL+4
SURROGAT	NSIGNRPT+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACCN	PEP+13~, FULLRPTL+6, ESIGBRKO+1*, SIGNRPTL+7, NSGNRPTL+7
BEGIDT	PEP+14~, DATERNGE+3*
BLRA	PEP+9~
BLRESIGR	PEP+10~, FULLCOMP+2!, ALLPCOMP+2!, SIGNCOMP+2!, SGNPCOMP+2!, NSIGNCOM+2!, SNSGNCOM+2!
BLRESIGR(	ESIGRPT+8, ESIGRPT+10, ESIGRPT+11, ESIGRPT+12, ESIGRPT+13, SIGNCOMP+9, SIGNRPT+10, SIGNRPT+12, SIGNRPT+13, SIGNRPT+14 , SIGNRPT+15, SGNPCOMP+9, NSIGNCOM+10, NSIGNCOM+12!, NSIGNRPT+7, NSIGNRPT+8, NSIGNRPT+11, NSIGNRPT+12, NSIGNRPT+13, NSIGNRPT+14 , SURINHDR+8, SNSGNCOM+10, SNSGNCOM+12!
BLRMMENU	PEP+10~, SETMENU+1!
CNT	PEP+11~, FULLRPTL+12, ESIGRPT+7, ESIGRPT+22, SIGNRPT+9, SIGNRPTL+13, NSIGNCOM+6, NSIGNCOM+12, NSIGNRPT+10, NSIGNRPT+16 , NSGNRPTL+13, SNSGNCOM+6, SNSGNCOM+12
>> COLLDTT	FULLRPTL+7, ESIGBRKO+2*, SIGNRPTL+8, NSGNRPTL+8
>> DIC	GETPHYIN+2*
>> DIC(0	GETPHYIN+3*
>> DIR("A"	ALLESIGS+2, ALLESIGN+2, ALLNSIGN+2*
>> DIR("B"	ALLESIGS+3, ALLESIGN+3, ALLNSIGN+3*
>> DIR(0	ALLESIGS+3, ALLESIGN+3, ALLNSIGN+3*
DUZ(2	PEP+4
ENDIDT	PEP+14~, DATERNGE+4*
ESIGIEN	PEP+10~, SELCTPHY+9, GETPHYIN+8*
ESPHY	PEP+9~, FULLCOMP+4, FULLCOMP+5, ALLPCOMP+4, ALLPCOMP+5, SIGNCOMP+6, SIGNCOMP+7, SIGNCOMP+8, SIGNCOMP+9, SGNPCOMP+6* , SGNPCOMP+7, SGNPCOMP+8, SGNPCOMP+9, NSIGNCOM+7, NSIGNCOM+8, NSIGNCOM+9, NSIGNCOM+10, SNSGNCOM+7, SNSGNCOM+8*, SNSGNCOM+9 , SNSGNCOM+10
FLG	SELCTPHY+1~, SELCTPHY+4, SELCTPHY+5, SELCTPHY+6, SELCTPHY+7
HDCNT	SURINHDR~, SURINHDR+1, SURINHDR+2, SURINHDR+4, SURINHDR+5, SURINHDR+17, SURINHDR+18, SURINHDR+20, SURINHDR+21, SURINHDR+23 , SURINHDR+24, SURINHDR+25, SURINHDR+26
HEAD1	ESIGRPTH~, ESIGRPTH+9
HEADER	PEP+12~, ESIGRPTH+8!
HEADER(	FULLRPTH+3, FULLRPTH+4, FULLRPTH+5, FULLRPTH+6, FULLRPTH+7, SURINHDR+2!, SURINHDR+4, SURINHDR+17, SURINHDR+20, SURINHDR+23* , SURINHDR+24, SURINHDR+25, SURINHDR+26*
HEADER(1	ESIGRPTH+9*
HEADER(2	ESIGRPTH+10*
HEADER(3	ESIGRPTH+11*
HEADER(4	ESIGRPTH+12*
HLCNT	PEP+12~, FULLRPTH+2, FULLRPTH+3, FULLRPTH+4, FULLRPTH+5, FULLRPTH+6, FULLRPTH+7, ESIGRPTH+13, SIGNRPTL+4, NSGNRPTL+4
IO	ESIGRPT+5, SIGNRPT+7, NSIGNRPT+5
IOM	ESIGRPTH+6, SURINHDR+4, SURINHDR+17
IOSL	GETDEV+5
>> J	SURINHDR+2*
LINES	PEP+12~, FULLRPTL+3, FULLRPTL+11, ESIGRPT+18, GETDEV+6, SIGNRPT+19, SIGNRPTL+3, SIGNRPTL+12, NSIGNRPT+17, NSGNRPTL+3 , NSGNRPTL+12*
LRAA	PEP+9~, ESIGRPT+6, ESIGRPT+11, ESIGRPT+12, ESIGRPT+13, ESIGBRKO+1, ESIGBRKO+2, ESIGBRKO+3, ESIGBRKO+6, ESIGBRKO+9 , SIGNRPT+8, SIGNRPT+13, SIGNRPT+14, SIGNRPT+15, NSIGNRPT+6, NSIGNRPT+12, NSIGNRPT+13, NSIGNRPT+14
LRAD	PEP+9~
LRAS	PEP+9~
LRDFN	PEP+9~, ESIGRPT+6, ESIGRPT+12, ESIGRPT+13, ESIGBRKO+1, ESIGBRKO+2, ESIGBRKO+3, ESIGBRKO+6, ESIGBRKO+9, SIGNRPT+8* , SIGNRPT+14, SIGNRPT+15, NSIGNRPT+6, NSIGNRPT+13*, NSIGNRPT+14
LRIDT	PEP+9~, ESIGRPT+6, ESIGRPT+13, ESIGBRKO+1, ESIGBRKO+2, ESIGBRKO+3, ESIGBRKO+6, ESIGBRKO+9, SIGNRPT+8, SIGNRPT+15 , NSIGNRPT+6, NSIGNRPT+14
>> LRLDT	ESIGRPTH+5, DATERNGE+4
>> LRSDT	ESIGRPTH+4, DATERNGE+3
MAXLINES	PEP+12~, FULLRPTL+3, GETDEV+5*, GETDEV+6, SIGNRPT+19, SIGNRPTL+3, NSIGNRPT+17, NSGNRPTL+3
NRESP	PEP+11~, FULLRPTL+5, ESIGRPT+6, ESIGRPT+8, ESIGRPT+10, ESIGRPT+11, ESIGRPT+12, ESIGRPT+13, SIGNCOMP+8, SIGNCOMP+9 , SIGNRPT+8, SIGNRPT+10, SIGNRPT+12, SIGNRPT+13, SIGNRPT+14, SIGNRPT+15, SIGNRPT+18, SGNPCOMP+8, SGNPCOMP+9, NSIGNCOM+9* , NSIGNCOM+10, NSIGNCOM+12, NSIGNRPT+6, NSIGNRPT+7, NSIGNRPT+8, NSIGNRPT+11, NSIGNRPT+12, NSIGNRPT+13, NSIGNRPT+14, SURINHDR+4 , SURINHDR+8, SNSGNCOM+9*, SNSGNCOM+10, SNSGNCOM+12
NSIGN	PEP+11~, FULLRPTL+9, ESIGBRKO+7, ESIGBRKO+8, SIGNRPTL+10, NSGNRPTL+10
PATN	PEP+13~, ESIGRPT+6, ESIGRPT+10, ESIGRPT+11, ESIGRPT+12, ESIGRPT+13, SIGNRPT+8, SIGNRPT+12, SIGNRPT+13, SIGNRPT+14 , SIGNRPT+15, NSIGNRPT+6, NSIGNRPT+11, NSIGNRPT+12, NSIGNRPT+13, NSIGNRPT+14
>> PG	FULLRPTL+3, GETDEV+4*, SIGNRPTL+5, NSGNRPTL+5
PHYCNT	PEP+11~, ESIGRPT+9, ESIGRPT+15, ESIGRPT+16, SELCTPHY+1~, SELCTPHY+4, SELCTPHY+10, SELCTPHY+13, SIGNRPT+11, SIGNRPT+17 , SIGNRPT+18, SIGNRPTL+14
PHYSUR	PEP+15~, SURROGAT+2, SURROGAT+3, SURROGAT+4, SURROGAT+7, SURINHDR+12, SURINHDR+13, SURINHDR+14, SURINHDR+15, SURINHDR+16
PHYSURG	PEP+15~, SURROGAT+1!
PHYSURG(	SURROGAT+7*, SURINHDR+13, SURINHDR+14, SURINHDR+15, SURINHDR+16
>> POP	GETDEV+2
QFLG	PEP+12~, FULLRPTL+3, ESIGRPT+8, ESIGRPT+10, ESIGRPT+11, ESIGRPT+12, ESIGRPT+13, GETDEV+7*, SIGNRPT+10, SIGNRPT+12 , SIGNRPT+13, SIGNRPT+14, SIGNRPT+15, SIGNRPTL+3, SIGNRPTL+5, NSIGNRPT+7, NSIGNRPT+11, NSIGNRPT+12, NSIGNRPT+13, NSIGNRPT+14 , NSGNRPTL+3, NSGNRPTL+5, SURINHDR+13
RANGESTR	ESIGRPTH+1~, ESIGRPTH+3, ESIGRPTH+4, ESIGRPTH+5, ESIGRPTH+6, ESIGRPTH+11
RESP	PEP+11~, SURROGAT~, SURROGAT+3, SURROGAT+4, SURROGAT+7, SURINHDR+7~, SURINHDR+8*, SURINHDR+13, SURINHDR+14, SURINHDR+15 , SURINHDR+16
SELPHYS	PEP+16~, SELCTPHY+2!
SELPHYS(	SELCTPHY+9*, ALLPCOMP+5, SGNPCOMP+7, SNSGNCOM+8
SIGN	PEP+11~, ESIGBRKO+6*, ESIGBRKO+7, ESIGBRKO+8
SIGNDT	PEP+16~, ESIGBRKO+9*, SIGNRPTL+9, NSGNRPTL+9
SPHY	PEP+9~
STATUS	PEP+9~, FULLRPTL+8, ESIGBRKO+3, ESIGBRKO+4, SIGNCOMP+4, SGNPCOMP+4, NSIGNCOM+4, SNSGNCOM+4
SURBDT	SURROGAT+5*, SURROGAT+7, SURINHDR+11~
SURDATES	SURROGAT+4*, SURROGAT+5, SURROGAT+6, SURINHDR+11~
SUREDT	SURROGAT+6*, SURROGAT+7, SURINHDR+11~
SURSTR	SURINHDR+11~, SURINHDR+14, SURINHDR+15, SURINHDR+16*, SURINHDR+17
TOTCNT	PEP+11~
WOTDLINE	ESIGRPT~, ESIGRPT+14
>> X	ALLESIGS+5, GETPHYIN+6, ALLESIGN+5, ALLNSIGN+5
>> Y	ALLESIGS+9, ALLESIGS+10, GETPHYIN+5, GETPHYIN+8, ALLESIGN+9, ALLESIGN+10, ALLNSIGN+9, ALLNSIGN+10

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRESIGR

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: