IBM i備忘録11～バインドされたモジュール情報を検索したい。etc…

2019.01.30

◇Q101.バインドされたモジュール情報を検索したい。

◇A101.
ILEのプログラムの場合・・・・DSPPGM DETAIL(*MODULE)
サービスプログラムの場合・・・・DSPSRVPGM DETAIL(*MODULE)

◇Q102.エミュレータの画面でWindowsのショートカットでコピー＆ペーストを行いたい。

◇A102.
①エミュレータのツールバーでキーボードの設定をクリック
②キーボードファイル名を調べる。
③キーボードファイル（xxxx.kmp)に、以下を追加する。
C-KEY47=[edit-cut] C-KEY48=[edit-copy] C-KEY49=[edit-paste]

◇Q103.モジュールおよびサービスプログラムのバインド方法は？

◇A103.
＜モジュールの場合＞
①CRTRPGMOD(*MODULE)
②CRTPGM(*PGM)

＜サービスプログラムの場合＞
①CRTRPGMOD(*MODULE)
②CRTSRVPGM(*SRVPGM)
③CRTPGM(*PGM)
※モジュール(*MODULE)が変更された場合は、プログラム(*PGM)を再作成しなければいけない。
サービスプログラム(*SRVPGM)が変更された場合は、プログラム(*PGM)は再作成する必要はない。

◇Q104.実行中のジョブがバッチか対話型かを判定するする方法は？

◇A104.
RTVJOBA TYPE(xxxx)
0=バッチジョブ、1=対話型ジョブ

◇Q105.CHKOBJを実行時に検出できるエラーは？

◇A105.
CPF9801 オブジェクトが見つからない。
CPF9802 オブジェクトは認可されていない。
CPF9803 オブジェクトを割り振ることができない。
CPF9804 オブジェクトが損傷している。
CPF9805 オブジェクトが壊れている。
CPF9810 ライブラリーが見つからない。
CPF9815 メンバーが見つからない。
CPF9820 ライブラリーの使用は認可されていない。
CPF9821 プログラムの使用は認可されていない。
CPF9822 ファイルの使用は認可されていない。
CPF9830 ライブラリーを割り当てることはできない。
CPF9899 コマンド処理中にエラーが起こった。

◇Q106.AS/400からPCへ日付をファイル名として転送するには？

◇A106.

PGM                                                                   						
  DCL        VAR(&CMD)  TYPE(*CHAR) LEN(100)                           						
  DCL        VAR(&DATE) TYPE(*CHAR) LEN(6)                            						
  DCL        VAR(&PGM)  TYPE(*CHAR) LEN(16)                           						
                                                                      						
  STRPCO                                                              						
  MONMSG     MSGID(IWS4010)

PGM

DCL VAR(&CMD) TYPE(*CHAR) LEN(100)

DCL VAR(&DATE) TYPE(*CHAR) LEN(6)

DCL VAR(&PGM) TYPE(*CHAR) LEN(16)

STRPCO

MONMSG MSGID(IWS4010)

  /** PCOMMの場合 **/						
  STRPCCMD   PCCMD('PCSFT5.EXE "C:\#TEMP\AAP100R.TTO"') +             						
             PAUSE(*NO)						
                                                            						
  RTVSYSVAL  SYSVAL(QDATE) RTNVAR(&DATE)                              						
  CHGVAR     VAR(&PGM) VALUE('AAP100R' *CAT &DATE)                  						
  CHGVAR     VAR(&CMD) VALUE('C:\#TEMP\PGMCPY.BAT' *BCAT &PGM)        						
  STRPCCMD PCCMD(&CMD) PAUSE(*NO)						
ENDPGM

/** PCOMMの場合 **/

STRPCCMD PCCMD('PCSFT5.EXE "C:\#TEMP\AAP100R.TTO"') +

PAUSE(*NO)

RTVSYSVAL SYSVAL(QDATE) RTNVAR(&DATE)

CHGVAR VAR(&PGM) VALUE('AAP100R' *CAT &DATE)

CHGVAR VAR(&CMD) VALUE('C:\#TEMP\PGMCPY.BAT' *BCAT &PGM)

STRPCCMD PCCMD(&CMD) PAUSE(*NO)

ENDPGM

 /* バッチファイル */						
  ECHO ON						
  SET PGM=%1						
  COPY C:\#TEMP\AAP100R.TXT C:\#TEMP\%PGM%.TXT

/* バッチファイル */

ECHO ON

SET PGM=%1

COPY C:\#TEMP\AAP100R.TXT C:\#TEMP\%PGM%.TXT

◇Q107.プリンターのメッセージを特定ユーザーに出力するには？

◇A107.
①WRKDEVD MSGQ(ユーザープロファイルメッセージキュー)
②CHGUSRPRF USRPRF(xxxxx) DLVRY(*BREAK)

◇Q108.FTPでのパス指定方法は？

◇A108.
パス指定形式には、以下の２つの方法があります。
・ライブラリファイルシステム(NAMEFMT 0)
・IFSシステム(NAMEFMT 1)

パス指定形式を確認するには、
QUOTE SITE NAMEFMT
→250 NOW USING NAMING FORMAT “0”.
→250 NOW USING NAMING FORMAT “1”.

パス指定形式のデフォルトの設定方法
CHGFTPA LISTFMT(*DFT)　→LISTFMT 0
CHGFTPA LISTFMT(*UNIX)　→LISTFMT 1

パス指定形式の変更
・QUOTE SITE NAMEFMT 0
→250 NOW USING NAMING FORMAT “0”.
・QUOTE SITE NAMEFMT 1
→250 NOW USING NAMING FOAMT “1”.

◇Q109.メッセージキューの種類は？

◇A109.
①各ワークステーション毎に作成されます。
②メッセージキューの名前とワークステーションの名前は常に同じ新規のワークステーションが定義されると同一名を持つメッセージキューが自動作成される。
③サインオン時にメッセージキューは通知転送モードで接続される。
④サインオフするとメッセージキューは保留転送モードになる。

ユーザーメッセージキュー
①ユーザープロファイルを作成すると同時に同じ名前を持つユーザーメッセージキューが作成される。
②はじめに、サインオンしたユーザーにユーザーメッセージキューが通知転送モードで割り当てられる。

ジョブメッセージキュー
①実行中のジョブは、このメッセージキューを使ってメッセージのやりとりをできます。

◇Q110.ALCOBJのロック状態の意味は？

◇A110.
*EXCL（占有）
他のジョブはこのオブジェクトを一切使用することができません。

*EXCLRD（読み取り可占有）
他のジョブは読み取ることができます。
但し、他のジョブは*SHRRDであること。

*SHRUPD（更新共用）
他のジョブは読み取りおよび更新ができます。
但し、他のジョブは*SHARUPDまたは*SHRRDであること。

*SHRNUP（更新不可共用）
他のジョブは読み取ることができます。
但し、他のジョブは*SHRNUPまたは*SHRRDであること。

*SHRRD（読み取り共用）
他のジョブは読み取ることができます。
但し、他のジョブは*EXCL以外であること。

古い記事へ新しい記事へ