%DATE{(expression{:date-format})}
%DATE は式の値を文字、数値、またはタイム・スタンプのデータから、日付タイプに変換します。 変換後の値は変更されないままですが、日付として戻されます。
最初のパラメーターは、変換される対象の値です。値を指定しない場合、%DATE は現行システム日付を戻します。
2 番目のパラメーターは、文字または数値の入力データの日付の形式です。 入力データの形式にかかわらず、出力は *ISO 形式で戻されます。
使用できる入力データの形式については、日付データ・タイプを参照してください。 文字または数値の入力データの場合に日付の形式が指定されていない場合、デフォルトの値は制御仕様書の DATFMT キーワードに指定された形式または *ISO のいずれかになります。詳細については、DATFMT(形式{区切り記号})を参照してください。
最初のパラメーターが、タイム・スタンプ、*DATE、または UDATE の場合は、2 番目のパラメーターは指定してはなりません。システムは、これらの場合の入力データの形式については理解しています。
詳細については、情報命令または 組み込み関数を参照してください。
*..1....+....2....+....3....+....4....+....5....+....6....+....7...+.... /FREE string = '040596'; date = %date(string:*MDY0); // date now contains d'1996-04-05' /END-FREE