CHECK: Interview Date>= TODATE (year told had heart attack, month told had heart attack,  
1)  
││ [QInit.IntDat >= TODATE HeAgbRY, HeAgbR.ORD, 1]  
││ INTERVIEWER: This date is in the future (^HeAgbR ^HeAgbRY)! Please  
││ change!  
││  
END CHECK  
END OF FILTER  
IF ((Previous Interview Date= RESPONSE) AND (Month told had heart attack = RESPONSE))  
AND  
(Year told had heart attack = RESPONSE) [PrevDate = RESPONSE AND HeAgbR =  
RESPONSE AND HeAgbRY = RESPONSE]  
CHECK: Previous Interview Date <= TODATE  
││ (year told had heart attack, month told had heart attack, 28)  
││ [PrevDate <= TODATE HeAgbRY, HeAgbR.ORD, 28]  
││  
││ INTERVIEWER: This date is before the date of ^IName[Pnum]'s last interview. Please  
││ check!  
││  
END CHECK  
END OF FILTER  
HE21 HEAGC  
HE22 HEAGC  
IF (Respondent Age Age > 0) AND (age first told had congestive heart failure = RESPONSE)  
[IAgeOf > 0 AND HeAgc = RESPONSE]  
CHECK: age first told had congestive heart failure <= Respondent Age [HeAgc <= IAgeOf ]  
││  
││ INTERVIEWER: ^IName[Pnum] is only ^iageof[Pnum] now!  
││ Please change!  
││  
END CHECK  
END OF FILTER  
IF age first told had congestive heart failure = RESPONSE [HeAgc = RESPONSE]  
CHECK: age first told had congestive heart failure > 35 [HeAgc > 35 ]  
││  
││ This seems young (^heagc), can I check?  
││  
END CHECK  
END OF FILTER  
HE23 HEAGCRY  
HE24 HEAGCRY  
IF (Interview Date = RESPONSE) AND (month told had congestive heart failure = RESPONSE)  
AND (year told had congestive heart failure = RESPONSE) [QInit.IntDat = RESPONSE AND  
HeAgcR = RESPONSE AND HeAgcRY = RESPONSE]