Here’s the other date conversion - It’s a JBA 7,0 numeric date to 8 character alpha in JIS format (YYYYMMDD) with no separators.

If you want separators in your result then simply expand the result field by 2 characters (to 10) and replace the “0” in the “*jis0” with what ever separator you prefer.

Eval F30_EDLDAT=(%char(%date(F1_DTLP40:*cymd):*jis0))