Routine: HBHCXMD1

Information

HBHCXMD1 ;LR VAMC(IRMS)/MJT - HBHC, called by ^HBHCXMD, calls HOSP^HBHCUTL1 ;9/2/09

Source file <HBHCXMD1.m>

Name	Comments	DBIA/ICR reference
START	; Initialization
DFLT1	; Process fields 5, 10, & 11 as default values for fields 40, 41 & 42
ICDDFLT	; Process field 18 as default value for field 46
DFLT2	; Process fields 19 - 26 as default values for fields 47 - 54
DFLT3	; Process fields 27 - 36 as default values for fields 55 - 64
EXIT	; Exit module

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Processing Discharge/Form 5 Data" Line Location: START+1