Date is on record type (column 1, length2, CHAR) 90, 91 and 92
File is FB and LRECL 170
above julian date is 14100 (YYDDD). It occurs twice on record type 90 (column 11 and 22) and once on record type 91 and 92, column 13.

I want to write a sort card to change this date to current system date.

Y4 means a four-digit year. Y2 means a two-digit year. Is that the only problem? "It does not work" is never very helpful if we don't know exactly how it didn't work for you. I'm sure that Y4U does work.