係長となるお– tag –

🧩今日の学び・EVALUATE変数は“値を＝で比較するだけ”という最もシンプルな分岐構文・TRUE版より複雑な条件は書けないが、読みやすさと安全性が段違い・「値で分類するときはTRUEではなくEVALUATE変数」を使うのがCOBOL流 ほれ、今日のコードだ。 E...

なるお）係長！全部読みきっちゃいましたよ！結構簡単でしたね！ 係長）結果、途中から俺が説明してただけな気がするが。 な）完全に気のせいですよ！ まったくもう係長ったら、俺の勇姿を忘れちゃったんですか？テキパキすぎる説明が係長の在りし日の姿以...

🧩今日の学び・IF OR は「どれかひとつでも空欄なら即アウト」の実務的バリデーション。・CNT-BLANKは“何個空いてるか”ではなく“空欄あったか”のフラグ扱いだと係長が喝。・次回は「AND条件」や「詳細バリデーション」へ踏み込み、入力検証の本質へ...

🧩今日の学び・INSPECTは“文字列をなめ回して処理する”ためのCOBOL専用の強力コマンド。・TALLYING／REPLACING／CONVERTINGの役割を係長の例えツッコミで一気に整理。・次回は「TRIM実装の本番処理」へ踏み込み、文字列前処理の実務力を上げていく...

🧩今日の学び・UNSTRINGとDELIMITED BY ALL "," でCSVの1行を正確に分割できることを理解。・連続カンマ＝空欄をどう扱うかを、係長の辛口ツッコミでしっかり腹落ち。・次回は「UNSTRING後のデータの扱い方」へ踏み込み、CSV処理の本丸に近づく。 ...

🧩今日の学び・COBOLの「まとめ書き」で複数変数を一度に初期化できる。・ゴミデータを残すと“売上バグって大金持ち”になる危険を学ぶ。・SPACESとZEROの使い分けが、COBOLマスターへの第一歩。 今日のコード PARSE-AND-VALIDATE. *> 初期化 MOV...

今日のコード WORKING-STORAGE SECTION. *> --- 終端・汎用ワーク --- 01 EOF-FLAG PIC X VALUE "N". 88 EOF-YES VALUE "Y". 88 EOF-NO VALUE "N". 01 LINE-NO PIC 9(7) VALUE ZERO. 01 WS-MSG PIC X(80). なるお）あれ？いけそうな予感。 WORKING-STOR...

今日のコード DATA DIVISION. FILE SECTION. FD INFILE. 01 IN-REC PIC X(512). FD OUTREP. 01 OUT-REC PIC X(132). FD ERRFILE. 01 ERR-REC PIC X(512). なるお）ふふ、DIVISIONば理解したぜ。SECTIONも理解したぜ。もう俺に迷うものはない！ 竹内まりや...

今日のコード ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT INFILE ASSIGN TO "orders.csv" ORGANIZATION IS LINE SEQUENTIAL. SELECT OUTREP ASSIGN TO "sales_report.txt" ORGANIZATION IS LINE SEQUENTIAL. SELECT ERRFILE ASSIG...