IT関連 AS400/IBMi SQLRPGの書き方 フリーフォームRPG
書き方といって偉そうに投稿できるものではありませんが、文献が少ないと思うのでご参考になれば幸いです。
尚、これは自分の備忘録なので、間違いがあればご容赦を。
SQLRPGをなぜ使ったのか
例えば在庫照会のプログラムを作るとします。
商品...
AS400
IT関連 IT関連 AS400/IBMi VirtualBoxとVagrantでMac開発環境を構築する2
前回の続きです。
前回はIBMiのデータベースからデータを引っ張れることを確認しただけ。
続いてGitリポジトリにあるLaravelのソースコードを取得して動くところまで。
実質環境構築はこれで完成する。
前...
IT関連 AS400/IBMi VirtualBoxとVagrantでMac開発環境を構築する
自宅でテレワークするのに、いちいち会社のPCにリモートして仕事をするのが奇妙なのでMac内に開発環境を作ろうと思います。
その備忘録です。
巷ではDockerが主流というか、現時点で使っていないやつは無能以下のゴミ扱いらしいです...
IT関連 AS400/IBMi クライアントアクセスのキーボード設定
クライアントアクセスのキーボード設定の備忘録です。
「編集」→「設定」→「キーボード」→「編集(C)」で設定する画面のことです。
これですね。枠の中に割り当てたい機能を入力します。基本はそのまま単独、Shift以下は押し...
IT関連 AS400/IBMi SQLで通し番号をつける
SQLで１つカラムを設けてレコードごとに１～通し番号をつけたいと思った。
理由は、ループの中でモーダルウインドウを開くボタンを作る時、対象のIDとボタンのdata-targetを合わせてあげないといけない時に使いたい。
...
IT関連 AS400/IBMi 8桁の日付を6桁で比較する
すみません、これは自分の備忘録です。
ゴミなので無視してください。
DDS
入出力 STR（６桁）
C仕様書
初期値にZ-ADD 20000000 STRWRK 80
これでSTRWRKの中は、20000...
IT関連 AS400/IBMi ポップウインドウの種類 WINDOW WDWBORDER
個人的な備忘録なので間違いがあればご容赦ください。
WINDOW(Ａ Ｂ Ｃ Ｄ）
Ａは枠の左上、始まりを示す縦位置
Ｂは枠の左上、始まりを示す横位置
ＣはＡを起点に縦に何マス枠を確保するのか
ＤはＢを起点に横...
IT関連 AS400/IBMi クライアントアクセスwsファイルのアイコンを元に戻したい
いまだにお世話になっているクライアントアクセス大先生。
IBMはACSを推奨しているけど全台数ACSに直すのは大変なので二の足を踏んでいる我が社です。
クライアントアクセスを起動するファイルの拡張子はws。
アイコ...
IT関連 AS400/IBMi ACSで開くようになったwsファイルを戻す
先日ACSのバージョンを確認したところ1.1.8.5というのが出ていたのでアップすることにした。
面倒くさいことにボタン１つでアップデートできるものではなくアンインストールしないといけないみたい。
（私が知らないだけかも...
IT関連 AS400/IBMi Laravelでユーザーの使用ログを取る
ユーザーにデータベースの内容を照会するシステムを作ってきたけど、ログを取らないと、誰がどんなメニューを使ったのか、このメニューは誰か使ってくれているのかが解らないので、ログを取るようにしたい。
手順は、
ログ用のテーブルを作...
IT関連 AS400/IBMi キーボード 半角・（なかてん）の出し方
いままで知らなかった。
全角モードでキーボードの右下の「？」キーを押すと「・」が出る。
その変換できる状態でファンクションキーの「F8」を押せばよい。
IT関連 AS400/IBMi ユーザーがバツで消して立ち上がらない件
ユーザーがエミュレーターを×で落としたり、本来閉じておくタイミングで閉じてないなどで異常終了してしまうことが多々あります。
そうなると端末が立ち上がらなくなるので、ユーザーからシステムへ電話がかかってくる。
正直面倒です...
IT関連 AS400/IBMi RunSQLScriptsでSELECTしかさせない
RunSQLScriptsでINSERTやUPDATEやDELETEをさせない、すなわちSELECTしかさせない方法。
本当はこれが調べたいわけではないのだが、一応の理解として備忘録にしておきます。
SQLを書く...
IT関連 AS400/IBMi ACS RunSQLScriptsでラベルをCOLHDGにする
COLHDG（カラムヘディング）というのは、聞いた話ではAS400にのみある概念らしいですね。
AS400から入った私にとってはそれが普通だと思っていました。
通常SQLではASで別名をつけない限りはカラム名でしか表示し...
IT関連 AS400/IBMi どのライブラリにあるのか判らないファイルを探す
DSPFDのライブラリ指定を*ALLにすればいい。
全てのライブラリから探してくれる。
CREATE VIEWでビューを作ったが、ビュー名にライブラリを指定しなかったため、どこにファイルが作られたか判らなくなった。
...
IT関連 AS400/IBMi ACS RunSQLScriptsで日本語が表示されない
ACSは相変わらず使っていないけど、RunSqlScriptsは使っています。
iナビゲーターのときもSQLは使っていたけど、やっぱりSQLは便利ですね。
SQLがあれば何でもできますが、UPDATEやDELETE時はWHERE...
IT関連 AS400/IBMi 作ったトリガーの一覧を取得する
トリガーを作ったのはいいけど、どんなトリガーを作ったのか解らなくなり管理できなくなっては困るので、その見方。
ちなみに、作ったトリガーはファイルを消す(DROP)すると消えます。実際に消えました。
印刷で取得
で印刷さ...
IT関連 AS400/IBMi 物理ファイルとテーブル INTEGER系で違和感
SQLを使って物理ファイルではなくテーブルとしてファイルを作る。
その中でINT系で違和感があったので試した実験。
INT系なら何でもいいと思うが、今回はSMALLINTでカラムを作り、ここにSQLを使ってINSERT ...
IT関連 AS400/IBMi CREATE TABLEで作られるカラム
物理ファイルをDDSで作るのではなく、SQLのCREATE TABLEで作る。
ひたすら物理ファイル畑でやってきた人にとっては、なんとなく怪しい匂いが香る。
なので実験してみることにしました。
作ったファイルは、
...
IT関連 AS400/IBMi 文字列の並び順AAA～999まで
ＩＴの世界では同じだと思いますが、３桁の文字列はどういう並び順になるのか調べました。
物理ファイルに３桁のカラムを１つ用意してテスト文字列を登録する。
登場人物は、
000
999
ZZZ
A...
IT関連 AS400/IBMi フリーフォームRPGの書き方備忘録
私の備忘録です。順次追加していきます。
何も知らない初心者なので間違いがあればご指摘いただければ幸いです。
尚、RPGIVとRPGLEは厳密には違うようですが、ここではRPGLEに統一しておきます。
登場人物はRPG(II...
IT関連 AS400/IBMi RDi 入力や削除ができないおかしい
LPEXエディタを使っていてRPGIVやフリーフォームを使っている中で、いつからか入力がおかしくなったことについて直し方。
その症状は入力ができなかったり削除ができなかったり。
しかも1桁目～8桁目くらいだけで、その他は...
IT関連 AS400/IBMi アクティブジョブを取得するSQL WRKACTJOB
現在開いているJOBをSQLで取得しようと思った。
要するにWRKACTJOBで表示するのと同じ内容がほしい。
理由はWeb画面にユーザーのジョブを一覧で表示して、気に入らない奴を気分次第でENDJOBできる核ミサイルボ...
IT関連 AS400/IBMi MacにACSをインストールする
新しいMacを買ってもらったので本格的にACSを入れてみる。
もちろんACSではなくClientAccessの方がいいのだが、MacはACSしか無いのでそれを選択する。
インストールする
前にテストで入れたとき間違...
IT関連 AS400/IBMi SQLで取得できる特殊レジスター
備忘録です。
CURRENT_DATAとかそういうやつ。SQLで取得できたら便利なので調べてみる。
IBMのサイトを見ればこういうのを、特殊レジスターと言うみたい。
データベースマネージャーによってアプリケーション...