DATA WORK.EXAMPLE;
INPUT DATE1 :DATE9. DATE2 :DATE9.;
FORMAT DATE1 DATE9. DATE2 :DATE9. AREA1 DATE9. AREA2 DATE9. TEST 8. DATE_MIN DATE9. DATE_MAX DATE9.;
DATE_MAX=MAX(DATE1, DATE2);
DATE_MIN=MIN(DATE1, DATE2);
AREA1 = INTNX('month', DATE_MIN, -6);
AREA2 = INTNX('month', DATE_MIN, 6);
TEST=IFN( (AREA1 =< DATE_MAX AND AREA2 >= DATE_MAX ), 1, 0);
INFILE DATALINES4 DLM=";";
DATALINES4;
01JAN2016;02JAN2016
01JAN2016;02AUG2016
01JAN2016;01JUL2016
01JUL2016;01JAN2016
05JAN2016;02JAN2015
29FEB2016;02JAN2014
01JAN2016;02JAN2012
01JAN2016;02JAN2016
01JAN2016;02MAR2016
01JAN2016;02DEC2015
;;;;
RUN;