なにこれ？
継ぎ足し継ぎ足しされた秘伝のソースから発掘した、古のコーディングスタイルをまとめる。
太古の叡智を以って若手の参入を妨げ、我々の雇用を守るのだ！
基礎編
名前は慣れよ
テーブル「TBL_T_LGNRRK」がログイン履歴テーブルで、
画面「D010」がログイン履歴参照ページで、
メソッド「pu_fnc_modoru_btn」が戻るボタンのクリックイベントだ！
慣れるまでは少し時間がかかるだろうか、やってりゃそのうち慣れるって！
慣れなくても調べりゃわかるだろ。
若手は読める名前じゃなきゃ読めないとか生意気抜かしよる…
仕事は習うより慣れろ！
処理はまとめよ
一連の処理は一つのクラス、一つのメソッドにまとめて記述せよ。
あちこちに処理があると何やってるのかわからなくなるからな！
ボタンクリックイベントにビジネスロジックもDBアクセスも全部書くんだよ！
何をやってるのか、このメソッドだけ見ればスミからスミまでよくわかるだろ！
神クラス？スゲーってことだろガハハハハ！
既存コードは神聖不可侵である
すでに本番稼働しているコードは、不具合を除き、すべて神聖不可侵である。
決して変更してはならない。このことを徹底せよ。
画面Bに、画面Aで実装している機能を盛り込みたい場合、画面Aに変更を加えることは罷りならん。
画面Aがバグったらどうしてくれんだよ！
同じ考えで、テーブルの変更も当然ダメだぞ。
カラム追加したい？ ダメに決まってるだろ！
どうしても追加したいなら、同じキーの別テーブルを新たに作れ！
複製せよ
他でやってる処理と同じ処理を実装したい？
でもボタンクリックイベントに全部書いてあるからメソッドに切り出して共通化する？
だから処理を散らかしたり既存コードを変更したりするんじゃねーよ！
どうすりゃいいかって？ そんなもん、コピペすりゃいいだろ。
すでに動いてるコードだから、バグらないしな！
コメントせよ
プログラムは難しいからな。一行一行何をやってるかちゃんとコメントするんだぞ。
メソッドコメントも目立つようにしっかり書けよ。
変更履歴もな！
どうだ、わかりやすいだろ！
'*********************
'* タイトル：足し算メソッド
'* メソッド名：pu_fnu_cal_tasu
'* 説明：足し算を計算します
'* 引数：
'* h_int_tsrr 足さられ数
'* h_int_ts 足す数
'* 戻り値：
'* true 計算成功
'* false エラー
'***********
'* 更新履歴：
'* 20221209 mowa 新規作成
'* 20221229 T.TANAKA バグがあったので修正
'* 20230102 島津豊久 コードレビュー指摘対応
'*********************
Public Function pu_fnu_cal_tasu(h_int_tsrr As Integer, h_int_ts As Integer, ByRef h_int_kkk As Integer) As Boolean
'20230102 島津豊久 コードレビュー指摘対応 del start
' Return h_int_tsrr + h_int_ts
'20230102 島津豊久 コードレビュー指摘対応 del end
'20230102 島津豊久 コードレビュー指摘対応 add start
' 計算結果一時格納用変数tmpを宣言する
Dim tmp As Integer
' 合計を格納する
tmp = h_int_tsrr + h_int_ts
' 計算結果一時格納用変数をh_int_kkkに格納する
' 20221229 T.TANAKA バグがあったので修正 add start
h_int_kkk = tmp
' 20221229 T.TANAKA バグがあったので修正 add end
' 正常終了する
Return true
'20230102 島津豊久 コードレビュー指摘対応 add end
End Function
おわり
力尽きたので今回は基礎編のみで終わる。