星期二, 10月 31, 2023

2001-07-20 如何於 batch(批次) 環境中 debug(除蟲) RPG 程式?


如何於 batch(批次) 環境中 debug(除蟲) RPG 程式?

如何於 batch(批次) 環境中 debug(除蟲) RPG 程式?

1. Submit 你的程式至批次環境中並確認該程式是被 Hold 著。
   有二種方式可讓被 Submit 的程式 Hold 著:

   Submit 程式前將 Job Queue hold 著,再Submit 程式或
   Submit 程式時使用 HOLD(*YES) 參數 。

2. 使用  WRKUSRJOB 指令,並使用選項 5 顯示你所要 debug 的 Job。

3. 記下該 Job 的  user name, job name and number 。

4. 使用 STRSRVJOB 指令,輸入前一步驟記下的 user name, job name 
   and number,啟動一個 service job。

5. 使用 STRDBG PGM(你的程式名稱) - 按 F12 跳出顯示原始檔畫面
  (此步驟尚不能設定除錯中斷點)。

6. 使用  WRKUSRJOB 或 WRKSBMJOB 指令,並使用選項 6 Release 步驟 1 
   所 submitted 的 job。

7. 接著會顯示一個畫面通知你的 Job 已經啟動,並要求你按 F10 功能鍵,
   在按 F10 功能鍵後,會進入 QCMD 指令行的畫面。

8. 輸入指令 DSPMODSRC 及 設定除錯中斷點(breakpoints)。

9. 按 F3 功能鍵離開 DSPMODSRC source display。

10. 按 F3 功能鍵離開 QCMD 指令行的畫面。

11. 接著 Job 開始執行至第一個除錯中斷點,接著除錯(debug)。

12. 在除錯(debug)後,下指令 ENDDBG結束除錯器,
    然後再下指令 ENDSRVJOB 結束 service job。
      




沒有留言: