IT関連

AS400/IBMi OPNQRYFでJOINを使ってみる

投稿日:2019年4月22日 更新日:

前置き

私が思い出すための備忘録なので間違いがあるかもです。

逆にこういう使い方があるよというのがあれば教えてほしいです。

 

やりたいこと

SYOHINという商品マスタがあり、IDとしてDAI/CYU/RENという3つのフィールドをキーとして運用している。DAIは大カテゴリ、CYUは中カテゴリ、RENは連番だ。

その3つのキーでWRITEもUPDATEも並び替えも商品のカテゴリ分けもすべてやっているもんだから、並びもグチャグチャ、カテゴリ分けもグチャグチャ。

なので並び替えは別フィールドを設けてそちらでやろうとした。

RENの並びを替えたいので、DAI/CYU/並びという形にしたい。

カラムを追加してひたすら並び順にコードを登録していった。

 

しかし並び替えのフィールドはあくまで商品マスターの話であって、別のZAIKOという在庫マスターには無い。作ればいいだけなのだけど同期しなければならないし、正規化という意味ではなんか違うと思う。

そういうときに限って、在庫マスターを商品マスターと同じように、いい感じに並べて表示したいという要望がある。

在庫マスタを主にして、商品マスタをCHAINしても商品マスタにあるカラムで並び替えることはできない。

といって運用上、商品マスタを主にするわけにもいかない。

しかも論理ファイルを作ってJOINするわけにもいかない。なぜなら結合される側のカラムを論理ファイルのキーにすることは出来ないのだ。

 

 

あー面倒くさい!!

 

これSQLなら瞬殺なんだけどなぁ。

AS400はキーとか読み順とかマジで面倒くさい。

 

なので、色々調べてOPNQRYFをしてみた。

 

書いたコード

サンプルクソコードです。

OVRDBF FILE(ZAIKO) SHARE(*YES)
OVRDBF FILE(SYOHIN) SECURE(*YES)

OPNQRYF FILE((ZAIKO *FIRST *ONLY) +
(SYOHIN *FIRST *ONLY)) +
FORMAT(ZAIKO) +
QRYSLT(‘USE = 1’) +
KEYFLD((ZAIKO/DAI *ASCEND *N) +
(ZAIKO/CYU *ASCEND *N) +
(SYOHIN/NARABI *ASCEND *N) +
(ZAIKO/REN *ASCEND *N)) +
JFLD((ZAIKO/ZDAI SYOHIN/SDAI *EQ) +
(ZAIKO/ZCYU SYOHIN/SCYU *EQ) +
(ZAIKO/ZREN SYOHIN/SREN *EQ))

 

OVRDBFはよく解らない。OPNQRYFをやるときの儀式だと思ってる。

OPNQRYFのFILEはファイルの指定。2つJOINするときはこう書くみたい。

*FIRSTと*ONLYはメンバー絡みの指定だと思われ。

FORMATもよく解らない。

QRYSLTはSQL文のWHEREと同じ。USE=”1″が使っているものの意味なんで、こう指定している。

KEYFLDは並び順。DAI/CYU/並び/RENにしてみた。*ASCENDは昇順の意味。

JFLDがJOINのONに当たる部分。

 

使用してみて

しかしこれ、どっちのファイル名を指定すればいいんだ?

と思う前に、ZAIKOを指定すれば普通にRPGで読めた。しかも確かに並び順は替わっている。

なるほどこれは使える。

だが、もともとZAIKOを読むRPG内でSETLLとかREADEとかCHAINをしていたものが、使えなくなってしまった。というのはKEYが変わってしまったから。

やはり並び順だけ変えたいというのは難しいようだ。

 

一応なんとかやりくりして使えるようにしたけど、他にいい方法が無いか悩む。ちなみにOPNQRYFからF4でプロンプトを出せば引数や引数の意味は見つけやすいかもです。

 

他に何か進展したら追記します。

 

スポンサーリンク




スポンサーリンク




-IT関連
-, ,

執筆者:


comment

Your email address will not be published. Required fields are marked *

関連記事

XAMPPのShellを開けない。0xc0000142

Windows10パソコンにXAMPPを入れて、Shellを起動したら下記のようなエラーが出た。   アプリケーションエラー。0xc0000142。 解決法は、ググっても日本語では出てきやし …

AS400/IBMi IBMiへのデータ転送.FDFファイル

AS400のテーブルにアップロードするときDTTというツールを使う。   Data Transfer To AS400なので、DTTという。 逆にダウンロードはData Transfer F …

AS400/IBMi キー操作やファンクションキーまとめ

備忘録です。追記していきますので書きかけです。   ファンクションキーまとめ   半角カナの文字化け 半角カナが文字化けしているときがある。文字コードの変換のショートカットキーらし …

AS400/IBMi Laravel-Excelで文字化けするので文字コードを変換する

Laravel-Excelというのを見つけたので使ってみたのだが、いかんせんAS400だと色々と面倒くさい。   AS400はEBCDICという文字コードらしく、そこからODBCかPDOで引 …

AS400/IBMi QRYプログラムからSQL文を生成

あまり意味ないかもしれないけど、備忘録。 使用しているQRY/400の定義からSQL文を逆算して出力する方法。   まずSQLソースファイルを作る。逆算したSQL文を置く場所ですね。 CRT …

Adsense広告


文字で検索

人気記事

なぜだか人気記事

読んでほしい順に