Can someone help me make this work? When i converted my pgm to free form, this is what i got. I have tried several diff ways, but there are so many diff date formats, i cant seem to get one to work. Sorry, i am a newbee.
D w_Date S d
D w_IsoDate S d DATFMT(*ISO)
D w_Year S Like(SYR)
D w_NextFyr S + 2 Like(SYR)
D w_Date8 S Like(SDATE8)
w_IsoDate = %DATE(*DATE:*USA);
w_Date8 = w_IsoDate;
The types of the right and left hand side do not match in the EVAL operation.
D w_Date S d
D w_IsoDate S d DATFMT(*ISO)
D w_Year S Like(SYR)
D w_NextFyr S + 2 Like(SYR)
D w_Date8 S Like(SDATE8)
w_IsoDate = %DATE(*DATE:*USA);
w_Date8 = w_IsoDate;
The types of the right and left hand side do not match in the EVAL operation.