Global: ^HL(779.001

FileMan FileNo	FileMan Filename	Package
779.001	HL7 EVENT TYPE CODE	Health Level Seven

Directly Accessed By Routines, Total: 26

Package	Total	Routines
Health Level Seven	20	HLCSRPT1 HLCSRPT2 HLCSRPT3 HLEMU HLERCHK HLFNC2 HLPA108A HLPAT54 HLPAT96A HLPAT96B HLTF0 HLTP HLTP1 HLTP3 HLTP4 HLTPCK1A HLTPCK2A HLUTIL2 VERSION ^HL(779.001
IHS Support HL7 Interfaces	2	BHLBPS BHLRXPS2
IHS RPMS CHR System	1	BCHPOS2
Radiology Nuclear Medicine	1	RAHLRU
Registration	1	DGQEPST1
Scheduling	1	SC53272P

Accessed By FileMan Db Calls, Total: 7

Package	Total	Routines
Health Level Seven	3	HLPAT54 HLPAT96B HLUPDATE
Scheduling	2	SC53272P SCMSP0
IHS Changes To Lab	1	BLRRLMV
Surgery	1	SRHLPRE

Pointed To By FileMan Files, Total: 5

Package	Total	FileMan Files
Health Level Seven	1	HL7 MESSAGE ADMINISTRATION(#773)[16]
Kernel	1	PROTOCOL(#101)[770.4]
Radiology Nuclear Medicine	1	RAD/NUC MED HL7 APPLICATION EXCEPTION(#79.7)[#79.721(.01)]
Registration	1	ADT/HL7 EVENT REASON(#391.72)[.03]
Scheduling	1	SCHEDULING EVENT(#403.43)[.04]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Health Level Seven	1	HL7 VERSION(#771.5)[#779.0101(.01)]

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `JUL 22, 1994` HELP-PROMPT: `Enter the 3 character code for the event` CROSS-REFERENCE: `779.001^B` 1)= S ^HL(779.001,"B",$E(X,1,30),DA)="" 2)= K ^HL(779.001,"B",$E(X,1,30),DA)
2	DESCRIPTION	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>200!($L(X)<3) X` LAST EDITED: `FEB 05, 2003` HELP-PROMPT: `Answer must be 3-200 characters in length`
100	VERSION	1;0	POINTER Multiple #779.0101	779.0101

.01

CODE

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>3!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JUL 22, 1994
HELP-PROMPT: Enter the 3 character code for the event

CROSS-REFERENCE: 779.001^B

1)= S ^HL(779.001,"B",$E(X,1,30),DA)=""

2)= K ^HL(779.001,"B",$E(X,1,30),DA)

2

DESCRIPTION

0;2

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>200!($L(X)<3) X
LAST EDITED: FEB 05, 2003
HELP-PROMPT: Answer must be 3-200 characters in length

100 VERSION 1;0 POINTER Multiple #779.0101 779.0101

Found Entries, Total: 308

CODE: A01	CODE: A02	CODE: A03	CODE: A04	CODE: A05	CODE: A06	CODE: A07	CODE: A08
CODE: A09	CODE: A10	CODE: A11	CODE: A12	CODE: A13	CODE: A14	CODE: A15	CODE: A16
CODE: A17	CODE: A18	CODE: A19	CODE: A20	CODE: A21	CODE: A22	CODE: A23	CODE: A24
CODE: A25	CODE: A26	CODE: A27	CODE: A28	CODE: A29	CODE: A30	CODE: A31	CODE: A32
CODE: A33	CODE: A34	CODE: A35	CODE: A36	CODE: A37	CODE: A38	CODE: A39	CODE: A40
CODE: A41	CODE: A42	CODE: A43	CODE: A44	CODE: A45	CODE: A46	CODE: A47	CODE: A48
CODE: A49	CODE: A50	CODE: A51	CODE: A52	CODE: A53	CODE: A54	CODE: A55	CODE: A60
CODE: A61	CODE: A62	CODE: B01	CODE: B02	CODE: B03	CODE: B04	CODE: B05	CODE: B06
CODE: B07	CODE: B08	CODE: C01	CODE: C02	CODE: C03	CODE: C04	CODE: C05	CODE: C06
CODE: C07	CODE: C08	CODE: C09	CODE: C10	CODE: C11	CODE: C12	CODE: CNQ	CODE: I01
CODE: I02	CODE: I03	CODE: I04	CODE: I05	CODE: I06	CODE: I07	CODE: I08	CODE: I09
CODE: I10	CODE: I11	CODE: I12	CODE: I13	CODE: I14	CODE: I15	CODE: J01	CODE: J02
CODE: K11	CODE: K13	CODE: K15	CODE: K21	CODE: K22	CODE: K23	CODE: K24	CODE: K25
CODE: M01	CODE: M02	CODE: M03	CODE: M04	CODE: M05	CODE: M06	CODE: M07	CODE: M08
CODE: M09	CODE: M10	CODE: M11	CODE: M12	CODE: M13	CODE: M14	CODE: M15	CODE: N01
CODE: N02	CODE: O01	CODE: O02	CODE: O03	CODE: O04	CODE: O05	CODE: O06	CODE: O07
CODE: O08	CODE: O09	CODE: O10	CODE: O11	CODE: O12	CODE: O13	CODE: O14	CODE: O15
CODE: O16	CODE: O17	CODE: O18	CODE: O19	CODE: O20	CODE: O21	CODE: O22	CODE: O23
CODE: O24	CODE: O25	CODE: O26	CODE: O27	CODE: O28	CODE: O29	CODE: O30	CODE: O31
CODE: O32	CODE: O33	CODE: O34	CODE: O35	CODE: O36	CODE: P01	CODE: P02	CODE: P03
CODE: P04	CODE: P05	CODE: P06	CODE: P07	CODE: P08	CODE: P09	CODE: P10	CODE: P11
CODE: P12	CODE: PC1	CODE: PC2	CODE: PC3	CODE: PC4	CODE: PC5	CODE: PC6	CODE: PC7
CODE: PC8	CODE: PC9	CODE: PCA	CODE: PCB	CODE: PCC	CODE: PCD	CODE: PCE	CODE: PCF
CODE: PCG	CODE: PCH	CODE: PCJ	CODE: PCK	CODE: PCL	CODE: Q01	CODE: Q02	CODE: Q03
CODE: Q04	CODE: Q05	CODE: Q06	CODE: Q07	CODE: Q08	CODE: Q09	CODE: Q11	CODE: Q13
CODE: Q15	CODE: Q16	CODE: Q17	CODE: Q21	CODE: Q22	CODE: Q23	CODE: Q24	CODE: Q25
CODE: Q26	CODE: Q27	CODE: Q28	CODE: Q29	CODE: Q30	CODE: QNC	CODE: R01	CODE: R02
CODE: R03	CODE: R04	CODE: R05	CODE: R06	CODE: R07	CODE: R08	CODE: R09	CODE: R21
CODE: R22	CODE: R23	CODE: R24	CODE: R30	CODE: R31	CODE: R32	CODE: RAR	CODE: RDR
CODE: RER	CODE: RGR	CODE: ROR	CODE: S01	CODE: S02	CODE: S03	CODE: S04	CODE: S05
CODE: S06	CODE: S07	CODE: S08	CODE: S09	CODE: S10	CODE: S11	CODE: S12	CODE: S13
CODE: S14	CODE: S15	CODE: S16	CODE: S17	CODE: S18	CODE: S19	CODE: S20	CODE: S21
CODE: S22	CODE: S23	CODE: S24	CODE: S25	CODE: S26	CODE: T01	CODE: T02	CODE: T03
CODE: T04	CODE: T05	CODE: T06	CODE: T07	CODE: T08	CODE: T09	CODE: T10	CODE: T11
CODE: T12	CODE: U01	CODE: U02	CODE: U03	CODE: U04	CODE: U05	CODE: U06	CODE: U07
CODE: U08	CODE: U09	CODE: U10	CODE: U11	CODE: U12	CODE: U13	CODE: V01	CODE: V02
CODE: V03	CODE: V04	CODE: W01	CODE: W02	CODE: Z00	CODE: Z01	CODE: Z02	CODE: Z03
CODE: Z04	CODE: Z05	CODE: Z06	CODE: Z07	CODE: Z08	CODE: Z09	CODE: Z10	CODE: Z11
CODE: Z12	CODE: Z13	CODE: Z15	CODE: Z16

ICR, Total: 2

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #1565	SCHEDULING	CODE (.01). Access: Write w/Fileman DESCRIPTION (2). Access: Write w/Fileman VERSION (100). Access: Write w/Fileman
ICR #6351	INTEGRATED BILLING	CODE (.01). Access: Write w/Fileman DESCRIPTION (2). Access: Write w/Fileman VERSION (100). Access: Write w/Fileman

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HL(779.001 - [#779.001]	.01(XREF 1S), .01(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^(0	ID2+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K)
U	ID2+1
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 2+1!

Customize PDF page

Package: Health Level Seven