ＩＢＭ　ＡＳ４００とパソコンを愛するＳＥのブログ

IBM AS400に触れてから既に３５年以上
最初は、共通ユーザーで運用していました

ユーザーアカウントは、事業部ごとに１つずつ作り
ログオン（サインオン）した時に表示するメニューを選ぶため
それだけのために、ユーザーアカウントを使用していました

でも、それだけでは何らかのトラブルが発生した時
完全に追跡できません

そして、2005年に個人情報保護法が施行され
前職の企業は医療業界なので、特に厳しく管理運用することになりました

Windowsでも一人一人に固有のアカウントを振り出すことはできますが
事実上出来ない業務もあります

緊急対応をしなければならない場合、Windowsでログオンしてアプリを立ち上げて・・・
なんてことをしていると人の命が危うくなることもあります
なので、Windowsでは仕方なしに共通ユーザーを使用していました
（もちろん、営業やシステム部門、管理部門、経営部門では個人ごとのアカウント運用でした）

ところが、ＡＳ４００を使用する場合は
共通アカウントは厳禁とし、全職員に個別アカウントを振り出しました
これで、IBM i オペレーティングシステムは全てのログにユーザーアカウント名を書き出してくれます

システム部門要因は、複数のアカウントを使用できるようにしました
通常運用用のアカウントと、機密保護管理者権限を持つアカウントです
機密保護管理者とは、AS400の世界で言われる最高権限ユーザーで、WindowsではAdministratorと呼ばれます

医療業界のプライバシーマークを取得し、
システム部門だけですがＩＳＭＳも取得し
アカウント管理はますます厳密になりました

パスワードは、８桁以上で、英字・数字・記号の３種類を全て含ませ
世代管理は１４世代
有効期限は６０日

としていました

ムカついたのは、プライバシーマークの審査を受けている時に
審査員から［御社のパスワード要件はかなり厳しいですね。運用できているんでしょうか？］と言われ
［心の中で］要求事項に書いてあるからしてるんだど(# ﾟДﾟ)

まぁ、確かにとんでもなく厳しいみたいでした（笑）
前職で構築してきたシステムはセキュリティー面から個別アカウントにしたわけですが
そのおかげで、労務管理・勤怠管理・入退館管理などいろいろな場面で有効活用できました

お客様から問い合わせメール［ＡＳ４００でのアカウントの登録方法を教えてほしい］があり
営業担当がそのやり方を画面コピーを添えて答えていましたが
そのやり方が・・・確かに簡単にするにはそれが一番ですが

セキュリティーのセの字も無い・・状態でした
まぁ、業種が業種なだけにそこまで高度なアカウント管理は必要ないとは思いますが

でも、現職の会社でも
システム開発は共有アカウントを使用しています
なので、誰かがツールを使うと、その設定値が残ってて
大変鬱陶しい

だけど、今は下っ端なので、ブツブツ心の中で文句を言いながら使っています（笑）

本当、個別アカウントにすれば、かなり有効活用できそうな場面が沢山あるのに
それを面倒くさい・・・かな？　良く分からないのかな？
それだけの理由で使わないって、、、食わず嫌いもいいとこです

どうやって、システム責任者を教育していったら良いんだろう・・・
大きな課題ですねー(*^▽^*)






人気ブログランキング



" allowfullscreen>

前職では日付は８桁の文字として処理していました
現職では日付の年と月と日をそれぞれ４桁、２桁、２桁の数値として処理しています
前職の方が扱いやすかった………

でも、数値のほうがコンパイラにとっては良いのかも

RPG4では、日付型の変数も使えるようにはなっている
でも、今から新規開発するシステムでもない限り
文字列型や数値型の日付フィールドを日付型に変更するなんてことはしない
変更のための努力の結果得られるのは
開発者の達成感だけ（笑）

利用者は………何も恩恵が得られない（笑）
やるだけ無駄

こないだ、システム改修のためにプログラムソースを見た
その会社のシステム、ソースを見た限りなんだか変だ
AS/400のソースは一行ごとに更新日付が付されている
なので、それを見るとどこのロジックをいつ変更したかがだいたい見当がつく

でもその会社のシステムのプログラムソースを見たら
290408とか設定されているのがあった
おかしいな？このフィールドはYYMMDDのはずなのに
まさか欧米式にMMDDYYとかDDMMYYで入力されているのか？
もっと見ると、右2桁に31とか入力されているのを見つけてしまった

さっぱり理由がわからず、そこを担当するもう一人に聴いてみた
すると、驚くべき答えが………






人気ブログランキング



" allowfullscreen>

５月７日　連休明け
現場の方から、どうも数値が合わない・・・という連絡があった
現象を確認すると

四捨五入が上手く行っていないようだった

それは、もう読んで字のごとく（笑）
ある桁が、4以下なら切り捨て５以上なら切り上げをすること
ですが・・・落とし穴がありました。

たとえば、３．５を整数にしようとしたら、四捨五入すると　４になります。
３．８を四捨五入しても４、　４．２を四捨五入しても４ですね。
これを数学的に実現しようとすると、０．５を足して整数化すればよい・・・と考えました

実際に・・・
３．５＋０．５　＝　４．０　⇒　整数化すると　４
３．８＋０．５　＝　４．３　⇒　整数化すると　４
４．２＋０．５　＝　４．７　⇒　整数化すると　４
目論み通りですね

でも、落とし穴と言うのは、この演算方法は、マイナスの値には通用しないんです。
−３．５＋０．５　＝　−３．０　⇒　整数化すると　−３　本当は　−４であってほしい
−３．８＋０．５　＝　−３．３　⇒　整数化すると　−３　これも　−４であってほしい
こんな感じです

どうすればいいか？　答えは簡単なんですが・・・

本当は、四捨五入をするための拡張命令を使用すればよかったんですが・・・
それを知らなかったので、上記のようなしちめんどくさいことをしてしまい
結局、バグを出してしまいました。

ＲＰＧ４での具体的な命令はというと、　EVAL 命令に (H) を付けて
ＥＶＡＬ（Ｈ）　とすればよかったんです。
あ〜〜〜あ！

このバグによる被害は些少で済んだんですが
プログラム改修に１時間程度かかってしまいました
ほんとに、もう・・・恥ずかしい

穴があったら入りたい・・・
無くても穴を掘って埋まりたい（笑）
そんな感じでした

まぁ、一つ賢くなった
それで自分を慰めときます（笑）





人気ブログランキング



" allowfullscreen>

新人さんの来週の予定は、月曜日から金曜日まで小林さん研修
小林さんというのは、IBM Power(AS/400) のスペシャリストで
小林さん研修というのはソフトウェア開発以外の技術研修らしい

部の責任者が、他に参加したい人って聞いてきたので
恐る恐る手を上げたら、私も参加できることに

それはきっと、IBM Power(AS/400)のアーキテクチャーやOSの構造など
そんな私としては復習しておきたい事柄だと思い
ウキウキしていました。

夕方近く、その責任者から
［小林さん研修］は新人社員相手の研修だから
今回、Takiさんは参加しなくてもいいですよねって
見合わせになりました(笑)

まぁ、半分冗談で手を上げてみて
それが通っちゃったけど、実際に研修を受けて得るものは？
って考えると、それはあまり無いでしょうね

逆に、そんな時間を無為に過ごすのは給料泥棒の範疇になるから
これで良かったのかも（笑）





人気ブログランキング



" allowfullscreen>

引き継いだ顧客のシステム改修
課題がほとんど解決できてきて
残りは・・・難しい課題ばかり

木曜日の終業を迎えると・・・
残業せずにそそくさと帰宅

残業しない労務管理は良いんだけど
ノっている時に業務を中断すると
次の日にそこのレベルに戻るのに時間がかかる

人間には忘却曲線とかいうのがあって
おぼえた一時記憶は
エビングハウスの忘却曲線によると

４日後には２６％程度しか残っていないとか
一生懸命考えた思考なのでそこまで低下はしてないとはいえ
楽観的に考えて７５％（笑）とすると

元の状態に戻らない・・・ことに
明日は心してかからないと
数時間は無駄に過ごすことに

給料泥棒にはなりたくなーい（笑）





人気ブログランキング



" allowfullscreen>

今期中に、会計処理システムを再構築します


誰もが、簡単に、行える処理しステムにするため


法律改正などで、変更される可能性のある部分については、マスター化し
そのような改正に簡単に対応できるようにする

・特に消費税率の見直し
・定額減税
・インボイス制度の廃止
などなどに


大変やろなぁ（笑）
他人事みたいに言ってますが





人気ブログランキング



" allowfullscreen>

暦通りのお休み・・・
でも、５月４日（土）と５月５日（日）は元々お休み

２日間も損した気分（笑）

やっぱ、なかなか取れない４連休
これはこれでいいですねー

ただ、３日目の日曜日は教会に行かなきゃ
おまけに第一日曜日だから執事会という会議があるし

なので、今日は貴重な貴重なお休み
身体も心も休めないとねー

と、言う事で普段できない事をしたいなーって思いつつ
する事はというと

休日にまでプログラム作るんか〜いって声が聞こえてきそう

いやいや、普段とは異なる環境、異なる言語で、開発目的は全然別
ある程度まとまった時間でないと、細切れでは学習できないからー

何をするかは秘密！　いわゆる企業秘密ってやつだね
さぁ、できるだけ楽しむぞー(*^▽^*)





人気ブログランキング



" allowfullscreen>

今日もシステム改修作業に勤しんだ
だけど、他人の開発したコードはとても読みにくい

その所属する会社のコーディング手法に従っているから
その会社に所属するＳＥなら読みやすいのだろうが

例えば、サブルーチンの名前付け規則
ＳＢプラス４桁番号
具体手に言えば、ＳＢ３０００とかＳＢ３２００とか

番号にするんじゃねーよって心の中で叫んでいる
外部の人間にとってはさっぱりわからんじゃねーか！

せめて、ＳＢＩＮＳＣ０１ぐらいしてくれ・・・
ＳｕＢｒｏｕｔｉｎｅ　ｆｏｒ　ＩＮｐｕｔ　ｏｆ　ＳＣｒｅｅｎ　ｎｏ．０１の略・・・みたいな

すると、そうか・・・こうなんだってわかるから
・２桁はプロシージャの種類
・次の２桁は機能の種類
・その次の２桁は機能のカテゴリー
・最後の２桁は固有化のための番号

全編、この規則で命名されていれば
名前を見ただけでおおよその機能が推測できて
コードを分析する時に役に立つから

それが、
ＳＢ１４００とかＳＢ３０００、ＳＢ３１５０って

セッションを複数開きながら
小さなスクリーンの上に小さなウインドウを開いて目を凝らしながら・・・
辛い・・・

加えて、日付フィールドの桁数
西暦日付なら、ＹＹＹＹＭＭＤＤと８桁は必要
でも、画面上で入力する日付は６桁となっている

これはこれで仕方ないけど、
ユーザーに見えないデータベースのフィールドで
日付桁数を何で６桁のままにしてるんだろう？

コードで、入力された日付が
４９１２３１以下なら先頭に２０を追加して、２０ＹＹＭＭＤＤにし
それ以上なら、先頭に１９を追加して・・・

これが方々に散在し、余計読みにくくしてくれている

そういえば、前職で１９９９年から２０００年になる直前の半年
基幹システムの全てで日付フィールドを８桁にしたなぁ

１９９９年１２月３１日大晦日、システム部門の部屋に泊まり込みで
２０００年１月１日を迎えたなぁ
ってそんな思い出に浸りながら・・・じゃねえよ(笑)

ここは、なんで６桁のままで放置してるんだ？
プログラム本数なんて、１００本も無いのに・・・・

ただただ動けばいい
将来のシステム拡張なんて考えもしない
不埒なＳＥが、今改修作業に取り組んでいる私に

えげつないお土産を残してくれている
心の中で(つд⊂)ｴｰﾝ(つд⊂)ｴｰﾝと泣きながら
改修作業に勤しんでいる・・・

私がこのお客様のＳＥだったなら
徹底的に改修しまくるんだけどなぁ

この程度のシステムなら、１年程度で全てのシステムを１から構築してあげる（笑）
でも、そんな時間をかけていられないから
個別にプログラムを改修して行くだけ

来週もまた、この古い古いコードに悩まされるんだろうなぁ





人気ブログランキング



" allowfullscreen>

今日も新人教育が行われていました
ガラス張りの会議室なので丸見えです
マンツーマンで教育をしていました

お客さんのシステムで新たな用件があり
そのプログラムを改修するために
IBM のサブファイル というものを勉強し直さなくてはならなくなりました

当然、教えてくれる人はおらず、自己学習です
でも、唯一教えてくれそうな人、そのひとが
新人教育担当 SE です

まさか、新人教育を中断して私にサブファイルを教えてくれ
なんて言えるわけもなく自己学習を続けました

昼休み気分転換に外出し 帰ってきて部屋に向かいました
途中でトイレに向かう その SE とすれ違う時
『私も◯◯さんの個人教育を受けたいな』
って言って笑いを取りました（笑）


ですが、半分本気です（笑）
私より二十歳ほど年下ですが、教えを請うてもプライドが傷つくこともありません
だって、私はサブファイルについては素人ですから

ただ、サブファイルを利用したアプリケーション開発には3パターンあるという記事を見つけ
熟読しましたが、それである見解を得ました

前職で行ってきたアプリ開発手法が
3パターンのうち一番難しいけど汎用性の高い方法の
拡張版だったことに気付かされたからです（笑）

まぁ、結果オーライですね！






人気ブログランキング



" allowfullscreen>

今日は、ガラス張りの会議室で、ベテランＳＥが新人教育
ＲＰＧ４かな？ＲＰＧ３かな？　を教えているみたい！
マンツーマンでの教育、新人さんにとってはラッキーだよね

見ていると、とっても楽しそう
教育者の顔しか見えないけど(笑)

教育したいなー
教育されたいなー(笑)

ＩＢＭ　Ｐｏｗｅｒ（＝ＡＳ／４００）のキッティングや
ＯＳのセットアップなどもできるトップエンジニア

私もソフトウェアやユーザーシステムの構築などは出来たけど
ＯＳのインストールはしたことがないから・・・
その辺の教育をしてほしいなぁ（笑）

まぁ、還暦のおじいさんに今更ＯＳのセットアップが出来るようにしても
仕方ないって思われるよねー(;O;)






人気ブログランキング



" allowfullscreen>