I am passing in a numeric field that is a 8 digit date, I want it to convert to *USA MM/DD/YYYY
D CHARDATE1 S 8 0 INZ(01151949)
D USADATE S D DATFMT(*USA)
C MOVE DATEPO CHARDATE1
C EVAL USADATE = %DATE(CHARDATE1: *usa )
C MOVE USADATE ORDDAT1
Passing is a date into DATEPO of 20210325
What I need is ORDDAT1 to come back as 03/25/2021
Any ideas would be appreciated.
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.