I suggest you start reading the SAS documentation, because your code has so many errors resulting from missing knowledge.
You don't need INFLE1, you can use the functions directly when createding infle2.
A SET statement with multiple datasets appends the datasets.
Using a format designed for variables containing dates on a variable containing just the year-part of a date, will lead to wrong results. You don't need formats to solve the problem.
data INFLE2;
infile DD01;
input
@36 YearX 4.
@1 Record $char150.;
if YearX = year(today());
run;
... View more