Routine: HLCSRPT4

Package	Total	Call Graph
Kernel	1	($$DT,$$FMADD,$$FMTE)^XLFDT
VA Fileman	1	^DIR

Package	Total	Caller Graph
Health Level Seven	13	HLCSRPT2 HLDIEDBG HLEVAPI0 HLEVAPI1 HLEVMST0 HLEVSRV1 HLEVSRV3 HLEVSRV4 HLEVUTI0 HLEVUTI1 HLEVUTI2 HLEVUTIL HLEVX000

Entry Points

Name	Comments	DBIA/ICR reference
SETUP()	; Setup "limit" variables... ;HL1.685
TYPEINFO()	; Display error type or application information?
NUMERR()	; How many errors, maximum, does user want to see ;HL1.685 ; HLCSER -- req
DATE(PMT,BDT,PDT)	; Entry of date for looping ;HL1.685
PROCDT(IEN773)	; Return 773'S processing date (1st), or if not available ; return the 772 creation date/time. ;HL1.685
S1
RECERR(ERR4,IEN773)	; Store error in ^TMP("HLERR",$J,STATUS,IEN773) ;HL1.685
TM(PDT)	; Show the 5 character hh:mm time
LOADERR	; Find latest NUMERR statuses in ERRDTB->ERRDTE date range. ;HL1.685
EOR	;HLCSRPT4 - Error Listing code ;3/18/02 10:19
YN(PMT,DEF,FF)	; Generic YES/NO DIR call... ;HL1.685
OKDATE(IEN773,DTBEG,DTEND)	; Does 773 processing time fall in date range? ;HL1.685
DT(PDT)	; Show the 8 character mm/dd/yy date
KILLERR(ERR4,OLDPDT,OLD773)	; Remove entry and adjust counts... ;HL1.685
DTORTM(DTB,DTE,PDT)	; Show date or time?
TMPLOG	; Reset ^TMP("TMPLOG") data created in ERRRPT to ^TMP("TLOG") format ; expected by the browser. (See DISPLAY^HLCSRPT) ; [This subroutine created by HL1.685.]
CHKERR(ERR4,IEN773,DTB,DTE)	; Should this entry be included? ;HL1.685

External References

Name	Field # of Occurrence
^DIR	NUMERR+17, DATE+11, YN+5, TYPEINFO+10
$$DT^XLFDT	S1
$$FMADD^XLFDT	S1
$$FMTE^XLFDT	SETUP+15, DATE+6, DATE+9, TM+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," If you answer NO below, you will be allowed to specify the number of" Line Location: SETUP+4
Function Call: WRITE	Prompt: !," errors to be included in the report." Line Location: SETUP+5
Function Call: WRITE	Prompt: ! Line Location: SETUP+6
Function Call: WRITE	Prompt: !!," All errors in the date range you specify next will be included" Line Location: SETUP+10
Function Call: WRITE	Prompt: !," in the report." Line Location: SETUP+11
Function Call: WRITE	Prompt: !!," The newest ",NUMERR," errors, for every error status, in the date range you" Line Location: SETUP+13
Function Call: WRITE	Prompt: !," specify next will be included in the report." Line Location: SETUP+14
Function Call: WRITE	Prompt: !!,"The first entry at your site is from ",$$FMTE^XLFDT($O(^HL(772,"B",2840000))),"." Line Location: SETUP+15
Function Call: WRITE	Prompt: ! Line Location: SETUP+16
Function Call: WRITE	Prompt: ! Line Location: S1+1
Function Call: WRITE	Prompt: !!,"You cannot enter the same values for the beginning and ending times!" Line Location: S1+4
Function Call: WRITE	Prompt: ! Line Location: S1+5
Function Call: WRITE	Prompt: !!,"Enter the maximum number errors to report for every error status." Line Location: NUMERR+3
Function Call: WRITE	Prompt: ! Line Location: NUMERR+4
Function Call: WRITE	Prompt: ! Line Location: YN+2
Function Call: WRITE	Prompt: !!,"Select the report view now. There are two report views. Both list the " Line Location: TYPEINFO+2
Function Call: WRITE	Prompt: !,"internal entry number from the HL7 Message Administration file (#773) entry," Line Location: TYPEINFO+3
Function Call: WRITE	Prompt: !,"message ID, processing date or time, and logical link. The two report views" Line Location: TYPEINFO+4
Function Call: WRITE	Prompt: !,"differ in the remainder of the information displayed on the report. " Line Location: TYPEINFO+5
Routine Call	DIR Line Location: NUMERR+17 DATE+11 YN+5 TYPEINFO+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HL(772 - [#772]	SETUP+15, PROCDT+4
^HLMA - [#773]	LOADERR+11, OKDATE+4, PROCDT+3, PROCDT+4
^HLMA("AG"	LOADERR+8, LOADERR+10
^TMP("ERRLST"	LOADERR+5!, LOADERR+21*
^TMP("HLERR"	LOADERR+5!, LOADERR+16, LOADERR+18, LOADERR+20, LOADERR+23!, CHKERR+11, CHKERR+17, CHKERR+18, KILLERR+3!, KILLERR+5 , KILLERR+6!, KILLERR+7, KILLERR+8, KILLERR+9, KILLERR+11, KILLERR+12!, KILLERR+13, KILLERR+14, KILLERR+15, KILLERR+17 , KILLERR+18!, KILLERR+19, KILLERR+20, KILLERR+21, RECERR+1, RECERR+2, RECERR+3
^TMP("TLOG"	TMPLOG+9*
^TMP("TMPLOG"	TMPLOG+5, TMPLOG+7, TMPLOG+9, TMPLOG+10!

Label References

Name	Line Occurrences
$$DATE	S1, S1+2
$$DT	DTORTM+1
$$NUMERR	SETUP+8
$$PROCDT	CHKERR+6, OKDATE+9
$$TM	DTORTM+1
$$TYPEINFO	SETUP+1
$$YN	SETUP+7
CHKERR	LOADERR+12
KILLERR	CHKERR+27
RECERR	CHKERR+14, CHKERR+28
S1	S1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BDT	DATE~, DATE+2*, DATE+3, DATE+4, DATE+6
CT	LOADERR+3~, LOADERR+7, LOADERR+13
DEF	YN~, YN+4
DIR	NUMERR+2~, DATE+1~, YN+1~, TYPEINFO+1~
DIR("?"	NUMERR+7, NUMERR+8, NUMERR+10, NUMERR+11, NUMERR+12, NUMERR+13, NUMERR+15, NUMERR+16, DATE+7, TYPEINFO+8 , TYPEINFO+9*
DIR("A"	NUMERR+5, DATE+8, YN+3, TYPEINFO+7
DIR("B"	NUMERR+6, DATE+9, DATE+10, YN+4, TYPEINFO+7*
DIR(0	NUMERR+5, DATE+3, YN+3, TYPEINFO+6
DIRUT	NUMERR+2~, DATE+1~, YN+1~, YN+6, TYPEINFO+1~
DTB	CHKERR~, CHKERR+7, DTORTM~, DTORTM+1
DTBEG	OKDATE~, OKDATE+5, OKDATE+12, OKDATE+13
DTE	CHKERR~, CHKERR+7, DTORTM~, DTORTM+1
DTEND	OKDATE~, OKDATE+6, OKDATE+12, OKDATE+14
DTOUT	NUMERR+2~, DATE+1~, YN+1~, YN+6, TYPEINFO+1~
DUOUT	NUMERR+2~, DATE+1~, YN+1~, YN+6, TYPEINFO+1~
ERR	LOADERR+3~, LOADERR+15, LOADERR+16, LOADERR+18, LOADERR+20, LOADERR+21
ERR4	LOADERR+3~, LOADERR+11*, LOADERR+12, CHKERR~, CHKERR+11, CHKERR+14, CHKERR+17, CHKERR+18, CHKERR+27, CHKERR+28 , KILLERR~, KILLERR+3, KILLERR+5, KILLERR+6, KILLERR+7, KILLERR+8, KILLERR+9, KILLERR+11, KILLERR+12, KILLERR+13 , KILLERR+14, KILLERR+15, RECERR~, RECERR+1, RECERR+2, RECERR+3
>> ERRDTB	LOADERR+12, SETUP+3, S1, S1+2, S1+3
>> ERRDTE	LOADERR+12, SETUP+3, S1+2, S1+3
ERRNO	CHKERR+3~, CHKERR+11*, CHKERR+14
FF	YN~, YN+2
>> HLCSER	NUMERR+9, NUMERR+14
HLCSLN	TMPLOG+3~, TMPLOG+4, TMPLOG+8, TMPLOG+9
>> HLERR	LOADERR+7, LOADERR+8, LOADERR+10
IEN	LOADERR+3~, LOADERR+19, LOADERR+20, LOADERR+21
IEN773	LOADERR+9, LOADERR+10, LOADERR+11, LOADERR+12, CHKERR~, CHKERR+6, CHKERR+14, CHKERR+22, CHKERR+28, RECERR~ , RECERR+3, TMPLOG+3~, TMPLOG+6, TMPLOG+7, TMPLOG+9, OKDATE~, OKDATE+4, OKDATE+9, PROCDT~, PROCDT+3 , PROCDT+4
NUM	KILLERR+1~, KILLERR+8, KILLERR+9, KILLERR+14, KILLERR+15, KILLERR+20*, KILLERR+21
>> NUMERR	CHKERR+14, SETUP+3, SETUP+7, SETUP+8*, SETUP+9, SETUP+12, SETUP+13
OLD773	CHKERR+3~, CHKERR+18*, CHKERR+22, CHKERR+27, KILLERR~, KILLERR+3
OLDPDT	CHKERR+3~, CHKERR+17*, CHKERR+18, CHKERR+21, CHKERR+22, CHKERR+27, KILLERR~, KILLERR+3, KILLERR+5, KILLERR+6 , KILLERR+7, KILLERR+8, KILLERR+9
PDT	DATE~, DATE+9, DATE+10, DATE+12, DTORTM~, DTORTM+1, TM~, TM+1, DT~, DT+1
PMT	DATE~, DATE+8, DATE+12, YN~, YN+3
PROCDT	CHKERR+3~, CHKERR+6, CHKERR+7, CHKERR+21, CHKERR+22, RECERR+2, RECERR+3, TMPLOG+3~, TMPLOG+4, TMPLOG+5* , TMPLOG+7, TMPLOG+9, OKDATE+1~, OKDATE+9, OKDATE+12, OKDATE+13, OKDATE+14, PROCDT+2~, PROCDT+3
TIME	LOADERR+3~, LOADERR+17, LOADERR+18, LOADERR+20
TXT	DATE+5~, DATE+6*, DATE+7
>> TYPEINFO	SETUP+1*
U	LOADERR+11, PROCDT+3, PROCDT+4
X	NUMERR+2~, DATE+1~, YN+1~, YN+2*, TYPEINFO+1~
Y	NUMERR+2~, NUMERR+18, DATE+1~, DATE+12, DATE+13, YN+1~, YN+7, TYPEINFO+1~, TYPEINFO+11

Customize PDF page

Package: Health Level Seven

Routine: HLCSRPT4

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 13

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: