本日日付を出力する

■ 本日日付を出力する
ＤＡＴＥｘを使うとＳＯＲＴＯＵＴに本日の日付を出力することができます。（DFSORT REL14以上）
EX)
  //SORT  EXEC SORT
  //SYSPRINT DD SYSOUT=*
  //SORTIN   DD *
  11111111111111111111
  22222222222222222222
  /*
  //SORTOUT  DD SYSOUT=*
  //SYSIN    DD *
  OPTION COPY
  OUTFIL FNAMES=SORTOUT,
    OUTREC=(1,10,C ' ',DATE1(/),C ' ',DATE2(-),C ' ',DATE3(/),C ' ',42X)
  /*
出力に、入力の１～１０バイトをセット、西暦8桁を／で編集してセット、西暦の年月をーで編集してセット、ジュリアンデートを／で編集してセット

SYSOUT
1111111111 2023/10/26 2023-10 2023/299
2222222222 2023/10/26 2023-10 2023/299
DATExは以下のとおりです。

・DATE1（キャラクタ）： YYYYMMDD

・DATE2（キャラクタ）： YYYYMM

・DATE3（キャラクタ）： YYYYDDD（ジュリアン）

・DATE1(c)（キャラクタ(cは編集文字)）： YYYY/MM/DD

・DATE2(c)（キャラクタ(cは編集文字)）： YYYY/MM

・DATE3(c)（キャラクタ(cは編集文字)）： YYYY/DDD（ジュリアン）

・DATE1P（パック）： YYYYMMDD

・DATE2P（パック）： YYYYMM

・DATE3P（パック）： YYYYDDD（ジュリアン）
BEFORE PAGE

TOP PAGE

＼クーポンで→2,370円／【楽天1位】折りたたみ傘メンズ自動開閉メンズ大きめ晴雨兼用超撥水ワンタッチ傘撥水加工折りたたみ傘耐強風超撥水二重構造頑丈な12本骨ビッグサイズ傘カバー収納ポーチ付男女兼用 /ビジネス/通勤父の日送料無料
価格：2,570円（税込、送料無料) (2023/10/28時点)
楽天で購入

Copyright©2002- FUKU All rights reserved.

・DATE1（キャラクタ）	： YYYYMMDD
・DATE2（キャラクタ）	： YYYYMM
・DATE3（キャラクタ）	： YYYYDDD（ジュリアン）
・DATE1(c)（キャラクタ(cは編集文字)）	： YYYY/MM/DD
・DATE2(c)（キャラクタ(cは編集文字)）	： YYYY/MM
・DATE3(c)（キャラクタ(cは編集文字)）	： YYYY/DDD（ジュリアン）
・DATE1P（パック）	： YYYYMMDD
・DATE2P（パック）	： YYYYMM
・DATE3P（パック）	： YYYYDDD（ジュリアン）