COBOL整数日付#✎

[15] 1/1/1601が 1 の整数日付系。

[13] Federal Information Processing Standards Publication: programming language - intrinsic function module for COBOL - fipspub21-3.pdf, 12/4/2017, 3:49:55 PM, 1/16/2021, 10:06:54 AM https://nvlpubs.nist.gov/nistpubs/Legacy/FIPS/fipspub21-3.pdf#page=28

[14] グレゴリオ暦の1/1/1601が選ばれたのは、 整数日付 1 が DAY-OF-WEEK 1 たる月曜日に一致させるためでした。 >>13

[1] IBM Knowledge Center - CEECBLDY - 日付から COBOL 整数形式への変換 (1/9/2017, 7:34:39 AM) http://www.ibm.com/support/knowledgecenter/ja/SSQ2R2_9.5.0/com.ibm.etools.cbl.win.doc/topics/rpsrv03.htm

[2] IBM Knowledge Center - CEECBLDY - 日付から COBOL 整数形式への変換 (1/9/2017, 7:35:17 AM) http://www.ibm.com/support/knowledgecenter/ja/SSLTBW_2.2.0/com.ibm.zos.v2r2.ceea300/clccbld.htm

[3] IBM Knowledge Center - CEECBLDY - 日付から COBOL 整数形式への変換 (1/9/2017, 7:35:42 AM) http://www.ibm.com/support/knowledgecenter/ja/SSLTBW_2.2.0/com.ibm.zos.v2r2.ceea300/clccbld.htm

[8] 日付や時刻を取得するACCEPT文 (10/16/2017, 6:55:23 PM) http://itdoc.hitachi.co.jp/manuals/3000/30003D0820/GD080173.HTM

[9] IBM Knowledge Center (9/12/2019, 2:19:22 AM) https://www.ibm.com/support/knowledgecenter/ja/ssw_ibm_i_72/rzase/wwddt.htm

[10] COBOL (6/9/2005, 5:15:11 PM) http://www16.plala.or.jp/hiyokogumi/dic/a_accept.html

[11] 9桁文字列型日付を7桁数値型日付に変換するCOBOLソース例|せじ|note (9/12/2019, 2:27:38 AM) https://note.mu/sejiijes/n/n7a635144d09c

[12] サルでもわかるCOBOL入門 【ひよこグミ】 (6/9/2005, 5:13:56 PM) http://www16.plala.or.jp/hiyokogumi/5/580.html

[16] CEECBLDY - 日付から COBOL 整数形式への変換 - IBM Documentation, 7/6/2022, 5:06:22 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=services-ceecbldyconvert-date-cobol-integer-format

[17] CEESCEN - 世紀ウィンドウの設定 - IBM Documentation, 7/6/2022, 5:06:41 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=services-ceescenset-century-window

[19] CEEQCEN - 世紀ウィンドウの照会 - IBM Documentation, 7/6/2022, 5:07:28 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=services-ceeqcenquery-century-window

[18] CEESECS - タイム・スタンプから秒数への変換 - IBM Documentation, 7/6/2022, 5:07:04 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=services-ceesecsconvert-timestamp-seconds

[20] 日時サービス表 - IBM Documentation, 7/6/2022, 5:07:47 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=reference-date-time-services-tables

[21] CEEDAYS - 日付からリリアン形式への変換 - IBM Documentation, 7/6/2022, 5:10:13 AM https://www.ibm.com/docs/ja/zos/2.2.0?topic=services-ceedaysconvert-date-lilian-format

[22] Windows時間と元期が同じように見えて違うので注意。

メモ#✎

[23] Factchecking Musk’s Claim That Dead People Receive Social Security Checks | TIME, FATIMA HUSSEIN / AP, 3/6/2025, 5:53:42 AM https://time.com/7258453/trump-musk-social-security-dead-fraud-fact-check/

Over the past few days, President Donald Trump and billionaire adviser Elon Musk have said on social media and in press briefings that people who are 100, 200 and even 300 years old are improperly getting benefits—a “HUGE problem,” Musk wrote, as his Department of Government Efficiency digs into federal agencies to root out waste, fraud and abuse.

Part of the confusion comes from Social Security’s software system based on the COBOL programming language, which has a lack of date type. This means that some entries with missing or incomplete birthdates will default to a reference point of more than 150 years ago. The news organization WIRED first reported on the use of COBOL programming language at the Social Security Administration.

[24] Xユーザーの村松 一之さん: 「トランプ大統領の演説おもろい。「ソーシャルセキュリティのデータ上では、米国では150歳から160歳の人が149万人もいることになっており、彼らにお金が支給されている。米国はなんて健康な国だ。これまで、誰もこの状況をチェックしてこなかった。さらに1人は360歳と登録されている。米国の建国より100」 / X, 午前11:52 · 2025年3月5日, 3/6/2025, 5:40:48 AM https://x.com/gwYXhEqd7kjpwYu/status/1897118084496076836

[25] トランプ政権の情報はどこまで信用して良いものかわからないが、 「COBOL に日付型がないので誕生日が無いまたは不完全のとき160年以上前の a reference point が使われる」という説明もよくわからない。それだと百何十才の人が多数出現するだけではないのか。 それとも「150才から160才の人」というのはこの10年間ということではなくその間の1点に年齢が収まっているという意味なのか。 360才の人は別の原因ということか。

[26] この話 COBOL 関係ある?

[27] XユーザーのElon Muskさん: 「According to the Social Security database, these are the numbers of people in each age bucket with the death field set to FALSE! Maybe Twilight is real and there are a lot of vampires collecting Social Security 🤣🤣 https://t.co/ltb06VX98Z」 / X, 午後1:55 · 2025年2月17日, 3/6/2025, 5:40:48 AM https://x.com/elonmusk/status/1891350795452654076/photo/1

[28] >>27 の表を見ると a reference point は原因の1つであるとしても、すべてでも主要因でもなさそうな。