ここから本文です

cobolの勉強しているものです。

kin********さん

2017/7/516:32:52

cobolの勉強しているものです。

先日、課題でYYMMDDを使って月日+うるう年の判定をやっているのですが、
難しくてよくわかりません。
出来れば詳しく教えていただくと嬉しい限りです。

閲覧数:
35
回答数:
1

違反報告

ベストアンサーに選ばれた回答

vwv********さん

2017/7/520:13:15

他の質問で似たような回答をしてますが、
WORKING-STRQGE SECTIONの中で、次の定義をしてください。

例「77 AA PIC 9(3).
「77 BB PIC 9(4).
どちらも、ZONE形式とかPACK形式は関係ありません。

YYMMDDが西暦であれば、そのYYだけをBBにMOVEしてください。

和歴であれば、YYを西暦に変換した結果をBBに入れてください。
1.YYが平成の年であればADD 88 TO YY GIVING BB.
1.YYが昭和の年であればADD 25 TO YY GIVING BB.

DIVIDE 4 INTO BB GIVING AA.
IF AA * 4 = BB 「閏年の処理」 ELSE 「平年の処理」となります。

YYMMDDを「YY」と「MM」と「DD」に分けて参照できますか?、できないのであれば補足してください、回答します。

  • 質問者

    kin********さん

    2017/7/521:58:05

    なるほど…
    でも、指定では
    01 HIDUKE.
    02 YY PIC X(2).
    02 MM PIC X(2).
    02 DD PIC X(2).
    01 IDX-1 PIC X(1).
    01 AA.
    02 B PIC X(24) value "31XX30313031303131313031"
    01 C.
    02 D PIC X(2) occurs 12.
    を使えと言われて…

  • その他の返信(2件)を表示

返信を取り消しますが
よろしいですか?

  • 取り消す
  • キャンセル

この回答は投票によってベストアンサーに選ばれました!

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる