Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: HLCSRPT4

Package: Health Level Seven

Routine: HLCSRPT4


Information

HLCSRPT4 ;OIFO-O/LJA - Error Listing code ;3/18/02 10:19

Source Information

Source file <HLCSRPT4.m>

Call Graph

Call Graph

Call Graph Total: 2

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

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 13

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

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All