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: SCMCHLRR

Package: Scheduling

Routine: SCMCHLRR


Information

SCMCHLRR ;BP/DJB - PCMM HL7 Rejects - Resubmit ; 3/6/00 12:14pm

Source Information

Source file <SCMCHLRR.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 6 $$HLEID^SCMCHL  $$BUILD^SCMCHLB  PTPD^SCMCHLB2  $$GENERATE^SCMCHLG  NOTIFY^SCMCHLM  $$BUILD^SCMCHLP  
Health Level Seven 1 INIT^HLFNC2  
Kernel 1 ($$DT,$$FMDIFF)^XLFDT  
Registration 1 $$SITE^VASITE  
VA FileMan 1 FILE^DIE  

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: 2

Package Total Caller Graph
Scheduling 2 SCMCHL  SD53P234  

Entry Points

Name Comments DBIA/ICR reference
EN(SCLIM) ;Entry point for retransmitting "M"arked messages
EXIT ;
LOOP ;Loop thru PCMM HL7 TRANSMISSION LOG file and find every entry
GETDATA(TRANI) ;Get DFN & VARPTR from PCMM HL7 TRANSMISSION LOG file
; Input:
; TRANI - IEN to file PCMM HL7 TRANSMISSION LOG file (#404.471)
RETRAN ;Re-transmit messages.
GEN
STATUS(TRANI,STATUS) ;Update STATUS field in PCMM HL7 TRANSMISSION LOG file.
; Input: TRANI - IEN of PCM HL7 TRANSMISSION LOG file
; STATUS - A=Accepted, M=Marked for re-transmit, RJ=Rejected
AUTO(SCLIM) ;Auto retransmit messages that have not received an ACK.

External References

Name Field # of Occurrence
FILE^DIE STATUS+9
INIT^HLFNC2 RETRAN+16
$$HLEID^SCMCHL RETRAN+10
$$BUILD^SCMCHLB RETRAN+25
PTPD^SCMCHLB2 RETRAN+23
$$GENERATE^SCMCHLG GEN
NOTIFY^SCMCHLM EN+13
$$BUILD^SCMCHLP RETRAN+17
$$SITE^VASITE EN+16, AUTO+17
$$DT^XLFDT AUTO+20
$$FMDIFF^XLFDT AUTO+32

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Unable to initialize HL7 variables - protocol not found"
  • Line Location: RETRAN+13
Function Call: WRITE
  • Prompt: $P(RESULT,"^",2)
  • Line Location: RETRAN+24
Function Call: WRITE
  • Prompt: $P(RESULT,"^",2)
  • Line Location: RETRAN+26
Routine Call
  • DIE
  • Line Location:
    • STATUS+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCPT(404.43 - [#404.43] GETDATA+21
^SCPT(404.471 - [#404.471] LOOP+5, LOOP+6, GETDATA+14, GETDATA+18, AUTO+26, AUTO+27, AUTO+38
^SCPT(404.49 - [#404.49] GETDATA+15
^SCTM(404.44 - [#404.44] AUTO+22

Label References

Name Line Occurrences
GEN RETRAN+17
GETDATA LOOP+7, AUTO+37
LOOP EN+20
RETRAN LOOP+11, AUTO+39
STATUS LOOP+10, GEN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DAYSDIFF AUTO+12~, AUTO+32*, AUTO+35
DAYSMAX AUTO+12~, AUTO+22*, AUTO+23*, AUTO+35
DFN EN+9~, GETDATA+11*, GETDATA+18*, AUTO+13~
HL RETRAN+3~, RETRAN+16, RETRAN+17, RETRAN+18, RETRAN+25
HL("" RETRAN+18
HLECH RETRAN+3~
HLEID RETRAN+3~, RETRAN+10*, RETRAN+11, RETRAN+16
HLFS RETRAN+3~
HLQ RETRAN+3~
IDI GETDATA+8~, GETDATA+14*, GETDATA+15
IDLONG GETDATA+8~, GETDATA+16*, GETDATA+19
MSGCNT EN+10~, EN+17*, AUTO+14~, AUTO+18*
ND GETDATA+8~, GETDATA+15*, GETDATA+16, AUTO+12~, AUTO+27*, AUTO+28, AUTO+29
PT RETRAN+2~
PTPI GETDATA+8~, GETDATA+19*, GETDATA+20, GETDATA+21, GETDATA+22, RETRAN+2~, RETRAN+22*, RETRAN+23
RESULT RETRAN+2~, RETRAN+17*, RETRAN+24, RETRAN+25*, RETRAN+26, GEN*, GEN+3
SCDELETE EN+9~, GETDATA+12*, GETDATA+21*, RETRAN+21, AUTO+13~
SCERR STATUS+4~
SCFAC EN+10~, EN+16*, AUTO+14~, AUTO+17*
SCFDA STATUS+4~
SCFDA( STATUS+8*
SCIENS STATUS+4~, STATUS+7*, STATUS+8
SCLIM EN~, EN+7, LOOP+5, AUTO~, AUTO+10, AUTO+26
SCSEQ EN+10~, AUTO+14~
STATUS STATUS~, STATUS+6, STATUS+8
TODAY AUTO+12~, AUTO+20*, AUTO+32
TRANDT AUTO+12~, AUTO+29*, AUTO+32
TRANI LOOP+3~, LOOP+4*, LOOP+5*, LOOP+6, LOOP+7, LOOP+10, GETDATA~, GETDATA+14, GETDATA+18, RETRAN+17
GEN+4, STATUS~, STATUS+5, STATUS+7, AUTO+12~, AUTO+25*, AUTO+26*, AUTO+27, AUTO+37, AUTO+38
U LOOP+6, GETDATA+16, GETDATA+18, AUTO+22, AUTO+28, AUTO+29, AUTO+38
VARPTR EN+9~, LOOP+6*, LOOP+10, GETDATA+11*, GETDATA+22*, RETRAN+17, RETRAN+22, RETRAN+25, AUTO+13~, AUTO+37
WORK LOOP+6~*, LOOP+7, RETRAN+17, AUTO+38~*
XMITARRY RETRAN+2~, RETRAN+6*, RETRAN+7, RETRAN+17, RETRAN+25, GEN+2
>> ZTQUEUED RETRAN+12, RETRAN+18, RETRAN+26, GEN+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All