AS400 IT備忘録

AS400/IBMi CLでファイルを読む

投稿日:

RPGじゃなくてCLでファイルを読む方法。

ファイルを読んでその値を使ってCLコマンドを動かして、ループしてまたファイルを読んでを繰り返す。

SNDBRKMSGを使って、全端末にアラートを送るなど使えるかも。

 

PGM

DCLF FILE(ライブラリ/読むファイル)

READ: RCVF RCDFMT(読むファイルのレコード様式)

MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(END))

CLコマンドなど FILE(HOGELIB/&FIELD)

GOTO READ

END:

ENDPGM

DCLFが読むファイルの指定。

&FIELDがファイルのフィールド名にする。これが変数となり、読んで繰り返すたびに値が変わる。

CPF0864が読むレコードが無くなった場合の処理。ここではENDに飛んでプログラム終了させる。

 

例えばこんな感じ。

SNDBRKMSG MSG(‘端末を止めてください’) TOMSGQ(&WRKSTNID)

スポンサーリンク




スポンサーリンク




-AS400, IT備忘録

執筆者:


comment

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

関連記事

【WordPress】プラグインでディレクトリを作成できませんでしたと怒られる

ワードプレスをまっさらにして戻ってきたの投稿以来、ちょこちょこ投稿を重ねている。     そこで表でも作りたいなと思ったので、プラグインのTablePressでも入れようかと思った …

AS400/IBMi システム値の一覧表示

システム値を取得できればプログラム上何かに使えるかな思って調べてたら見つけたコマンド。   WRKSYSVAL WRKSYSVAL OUTPUT(出力先)   OUTPUT(出力先 …

AS400を 無料でWeb化 GUI化 オープン化 Linuxサーバ構築編 2/3

1/3でグダグダと説明してまいりましたが、構築作業の事前準備として2/3を設けました。   さっそく初めて行きます。   準備するもの Linux用Access_Client_So …

MacでプリンタドライバーCanonLBP8610を設定する

自分用の備忘録なので適当です。Windowsしか設定したことがなくハマったので残しておきます。   まずはメーカーのHPからドライバーをダウンロードする。   Windowsはイン …

WordPress 初期設定でパーマリンクを変えてもエラー404

ワードプレスも使い慣れてきたことだし、テーマ作成やらMVCの触りを勉強できそうだなと思って、dotinstallの動画で勉強してたんだ。 ちなみに私は開発環境XAMPPでの運用で、VirtualHos …