Routine: SCMCHLRR

Information

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

Source Information

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

Caller Graph Total: 2

Package	Total	Caller Graph
Scheduling	2	SCMCHL SD53P234

Entry Points

Name	Comments	DBIA/ICR reference
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.
RETRAN	;Re-transmit messages.
EXIT	;
EN(SCLIM)	;Entry point for retransmitting "M"arked messages
GEN
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)

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

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

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

Customize PDF page

Package: Scheduling

Routine: SCMCHLRR

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: