Routine: SRHLUO1

Information

SRHLUO1 ;BIR/DLR - Surgery Interface (Cont.) Utilities for building Outgoing HL7 Segments ; [ 05/20/99 7:14 AM ]

Source Information

Source file <SRHLUO1.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
DRG Grouper	2	$$CPT^ICPTCOD $$MOD^ICPTMOD
Health Level Seven	1	$$HLDATE^HLFNC
Surgery	1	$$HNAME^SRHLU
VA Fileman	1	(C,NOW)^%DTC

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Surgery	2	SRHLZIU SRHLZQR

Entry Points

Name	Comments	DBIA/ICR reference
STAT	;check scheduled cases to scheduled close time
ZCH(SRI,SREVENT,SRSTATUS,SRENT)	;sets ^TMP(SRENT,$J global for sending ZCH Scheduling Appointment Information segment(s)	ICR #6783 Status: Pending Usage: Private
ZIG(SRI,SRENT)	;sets ^TMP(SRENT,$J global for sending ZIG Appointment Information - General Resource Segment(s)	ICR #6783 Status: Pending Usage: Private
ZIP(SRI,SRENT)	;sets ^TMP(SRENT,$J,I) global for sending ZIP Appointment Information - Personnel Segment(s)	ICR #6783 Status: Pending Usage: Private
SZIP	;set the ZIP segment
ZIL(SRI,SRENT)	;sets ^TMP(SRENT,$J global for sending ZIL Appointment Information - Location Resource Segment(s)	ICR #6783 Status: Pending Usage: Private

Name	Field # of Occurrence
C^%DTC	STAT+4
NOW^%DTC	STAT+4
$$HLDATE^HLFNC	ZCH+13, ZCH+14
$$CPT^ICPTCOD	ZCH+7
$$MOD^ICPTMOD	ZCH+8
$$HNAME^SRHLU	ZCH+15, ZIP+3, ZIP+4, ZIP+6, ZIP+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	ZIL+3, ZIL+4
^SRF - [#130]	ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16, ZIG+1 , ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4, ZIP+5 , ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4
^SRO(133 - [#133]	STAT+3
^SRO(133.4 - [#133.4]	ZIG+4
^SRS - [#131.7]	ZIL+3
^TMP(	ZCH+17, ZIG+6, ZIL+10, SZIP+4

Name	Line Occurrences
STAT	ZIL+9, SZIP+3
SZIP	ZIP+3, ZIP+4, ZIP+7, ZIP+10

Name	Field # of Occurrence
^(	ZCH+11
^("1.0"	ZCH+15
^("CON"	ZCH+16
^("NON"	ZIL+4, ZIP+3, ZIP+4
^("OP"	ZCH+6
^(0	ZIL+3, ZIL+4
^(31	ZCH+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	STAT+4
ADD	ZCH+1~
ADD1	ZCH+1~
ADDR	ZCH+1~
>> CASE	ZCH+3, ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16 , ZIG+1, ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4 , ZIP+5, ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4
DT	STAT+4, STAT+5, STAT+6
FAC	ZIL+1~, ZIL+3, ZIL+4, ZIL+5
>> HL("FS"	ZCH+17, ZIG+6, ZIL+10, SZIP+4
>> HL("Q"	ZCH+2
>> HLCOMP	ZCH+5, ZCH+7, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZIG+4, ZIG+5, ZIL+5 , ZIL+6, ZIP+3, ZIP+4, ZIP+6, ZIP+9
>> HLREP	ZCH+9
LOC	ZIL+1~, ZIL+3, ZIL+4, ZIL+5
MON	ZIG+2~, ZIG+3*
PHONE	ZCH+1~
SRC	ZIL+1~, ZIL+7, ZIL+8, ZIP+1~, SZIP+1, SZIP+2, STAT+4, STAT+5, STAT+6*
SRENT	ZCH~, ZCH+17, ZIG~, ZIG+6, ZIL~, ZIL+10, ZIP~, SZIP+4
SREVENT	ZCH~, ZCH+5
SRI	ZCH~, ZCH+17, ZCH+18, ZIG~, ZIG+6, ZIG+7, ZIL~, ZIL+10, ZIL+11, ZIP~ , SZIP+4, SZIP+5, STAT+1~, STAT+3*
SRJ	ZCH+1~, ZCH+8*
SRM	ZCH+1~, ZCH+8*, ZCH+9
SROERR	ZCH+1~
SRP	ZCH+1~, ZCH+8*
SRREP	ZCH+1~, ZCH+8, ZCH+9
SRS	STAT+1~, STAT+3*
SRSTATUS	ZCH~, ZCH+5, ZCH+12, ZCH+14, ZIL+8, ZIL+9, SZIP+2, SZIP+3
SRTIME	STAT+1~, STAT+3, STAT+4
SRX	ZCH+1~, ZCH+7*
>> SRYN	STAT+4*
U	ZCH+6, ZCH+7, ZCH+8, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16 , ZIG+4, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+3, ZIP+4, ZIP+5, ZIP+8 , SZIP+2, STAT+3, STAT+4
X	ZIL+1~, ZIL+10, ZIP+1~, ZIP+5, ZIP+6, ZIP+8*, ZIP+9, STAT+4, STAT+5, STAT+6
X1	STAT+1~, STAT+4*
X2	STAT+1~, STAT+4*
XX	ZCH+1~, ZCH+17, ZIG+6, ZIP+1~, SZIP+4*
ZCH	ZCH+1~
ZCH(	ZCH+17
ZCH(1	ZCH+2*
ZCH(12	ZCH+15*
ZCH(17	ZCH+16*
ZCH(18	ZCH+9*
ZCH(2	ZCH+3*
ZCH(3	ZCH+2*
ZCH(4	ZCH+5*
ZCH(5	ZCH+6, ZCH+7, ZCH+10*
ZCH(6	ZCH+11*
ZCH(7	ZCH+13, ZCH+14
ZIG	ZIG+2~, ZIG+3*, ZIG+4
ZIG(	ZIG+6*
ZIG(1	ZIG+4*
ZIG(2	ZIG+5*
ZIL	ZIL+1~
ZIL(	ZIL+10*
ZIL(1	ZIL+5*
ZIL(2	ZIL+6*
ZIL(6	ZIL+7*
ZIP	ZIP+1~
ZIP(	SZIP+4*
ZIP(1	ZIP+3, ZIP+4, ZIP+5, ZIP+6, ZIP+8, ZIP+9
ZIP(2	ZIP+3, ZIP+4, ZIP+6, ZIP+9
ZIP(6	SZIP+1*

Customize PDF page

Package: Surgery

Routine: SRHLUO1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: