rpgas400程序員培訓(xùn)手冊(cè)9(參考版)
2025-07-02 09:10本頁面
【正文】 __20 / 20。 注釋 注釋的重要性毋庸致疑，這里單指以下情況的注釋： 如果寫程序時(shí)，某些需求不是很明確，或自己對(duì)這個(gè)需求的理解不是很清晰， 或者是用戶特意要求某種情況之下不按常規(guī)方式處理，又或者是處理判斷在邏輯上 比較復(fù)雜比較繞，那么不妨把自己當(dāng)時(shí)的想法或客戶要求也寫在注釋中。比如說 ***************** **注釋 C IF XXXX C ENDIF ***************** 這種方式之下的ENDIF，就比較好找了吧。 這個(gè)規(guī)律現(xiàn)在還沒有總結(jié)出數(shù)字化的東西來，大部分情況下還是憑感覺，以后有時(shí) 間做做統(tǒng)計(jì)看看。我通常對(duì)代碼都是采用視覺上的分隔，因?yàn)槲矣X得這樣最直 觀。 這樣做的意義在于：維護(hù)修改代碼的便利性，COPY 代碼的便利性。比如說，某個(gè)字段，是子過程中需要使用到的關(guān)鍵的一 個(gè)字段，那我們就可以將其做為輸入字段，并在整個(gè)子過程的代碼中，盡量不要去 改它的值；再比如說，子過程的功能是計(jì)算出一個(gè)金額，那我們就可以把這個(gè)金額 字段做為輸出字段，在使用子過程之前將其清零。 把子過程盡量寫成類似于CALL 程序的感覺，也就是自已定一個(gè)輸入輸出接 口。 子過程的使用： 主程序最好只寫主流程，將具體處理交給各子過程；同時(shí)在調(diào)用子過程之前， 加注釋，說明這個(gè)子過程的處理功能。 定義臨時(shí)變量的位置： 在首次使用該臨時(shí)變量前定義，同時(shí)加漢字注釋，簡單說明這個(gè)臨時(shí)變量在什 么情況下，應(yīng)該賦什么樣的值。變量名的長度可以不做局限，當(dāng)然最好不要太長。 臨時(shí)變量的命名： 這個(gè)應(yīng)該算是最具有可規(guī)范性的了。 Submit Job (SBMJOB) Type choices, press Enter. Command to run . . . . . . . . . .. Job name . . . . . . . . . . . . *JOBD Name, *JOBD Job description . . . . . . . . *USRPRF Name, *USRPRF Library . . . . . . . . . . . Name, *LIBL, *CURLIB Job queue . . . . . . . . . . . *JOBD Name, *JOBD Library . . . . . . . . . . . Name, *LIBL, *CURLIB 如上所示，第一行Command to run 處，填寫需要提交后臺(tái)運(yùn)行的命令語句（通常是CALL 某個(gè)程序）； Job name 表示的，是顯示在屏幕上的，運(yùn)行的程序的名字，可以隨便寫，只是用來標(biāo)識(shí) 用的； Job description， 填寫對(duì)應(yīng)的JOBD（如果想將程序提交到指定的子系統(tǒng)下，那么此處 填寫子系統(tǒng)對(duì)應(yīng)的JOBD，Job queue 處填寫子系統(tǒng)對(duì)應(yīng)的JOBQ），如果不填，即表示默認(rèn) 為當(dāng)前用戶的JOBD，JOBQ 關(guān)于代碼風(fēng)格的幾點(diǎn)想法 絕大多數(shù)情況下，不做硬性要求，一切都以維護(hù)時(shí)程序的易讀性為主導(dǎo)。 普通程序的流程中，如果A 程序CALL 了B 程序，那么A 程序必須等待B 程序運(yùn) 行結(jié)束之后，才會(huì)繼續(xù)執(zhí)行CALL 之后的語句； 如果是使用SBMJOB 的話，那么A 程序就將B 程序提交到后臺(tái)去運(yùn)行，不等待B 程序結(jié)行完畢，直接繼續(xù)向下運(yùn)行。不過這個(gè)命令我沒實(shí)際用過。 RTVCLSRC 如果編譯CL 程序時(shí)，不是刻意帶*NONE 參數(shù)，那么一般來說CL 程序都可以使 用這個(gè)命令來反編譯。 在生成的文件中，字段WHFNAM，表示文件名，包括物理文件與邏輯文件。舉例來說，如果物理文件更 改過，那么物理文件與邏輯文件就都重新編譯過了，所以它們對(duì)應(yīng)的的所有的程序都要 重新編譯，通常物理文件與邏輯文件使用相同的記錄格式名（當(dāng)然，如果不同就算了） 這時(shí)就需要按記錄格式名來查找。然之后，就可以SQL 在這個(gè)生成的 文件中查找（生成的過程可能會(huì)有點(diǎn)慢，要耐心）。 DSPDBR 根據(jù)物理文件查其對(duì)應(yīng)的所有邏輯文件 DSPPGMREF 查找程序與PF、LF 的關(guān)系。 DETAIL 參數(shù)用“*SERVICE”，OBJTYPE 選項(xiàng)用“*PGM” 不過好象RPGLE 的程序用這個(gè)命令查不出來，要用DSPPGM 命令。 不過必須要有權(quán)限執(zhí)行CHGSYSLIBL 這個(gè)命令。(即B 程序不變) 把SPLF 變成MEMBER（源文件） 必須知道SPLF 名，以及生成SPLF 的JOB、USR、NUMBER 名 CRTSRCPF FILE(庫名/SRCPF) RCDLEN(212) IGCDTA(*YES) CHGPF FILE(庫名/SRCPF) CCSID(935) CRTPF FILE(庫名/PF) RCDLEN(200) IGCDTA(*YES) CPYSPLF FILE(SPLF 名) TOFILE(庫名/PF) + JOB(NUMBER 名 / USER 名 / JOB 名) SPLNBR(*LAST) CPYF FROMFILE(庫名/PF) TOFILE(庫名/SRCPF) + TOMBR(MBR0001) MBROPT(*ADD) FMTOPT(*CVTSRC) 最后，SRCPF 下的MBR001 就是SPLF 轉(zhuǎn)成的MEMBER 當(dāng)然，做為中間轉(zhuǎn)換的臨時(shí)文件，PF 文件會(huì)保留SPLF 的信息。 F13 表示接受當(dāng)前差異，F(xiàn)17 表示接受所有差異，F(xiàn)16 表示繼續(xù)查找下一處差異。 MRGSRC 比較兩個(gè)程序的差異。每條記 錄標(biāo)識(shí)一個(gè)字段。比如該 PF 文件共有多少個(gè)字段，每個(gè)字段的類型如何。 靈活運(yùn)用此命令，將會(huì)是很多自行編寫的工具的基礎(chǔ)之一。如果把輸 入設(shè)定為OUTFILE，那么每條記錄指明了一個(gè)鍵值字段。 這個(gè)命令可以使用*OUTFILE，將輸出變成一個(gè)文件。 DSPFD + LF 名，查看邏輯文件的鍵值，結(jié)合DSPDBR，可以找出一個(gè)PF 文件對(duì) 應(yīng)的所有LF 文件的鍵值。除了等一會(huì)， 一直等到它
試題試卷相關(guān)推薦
鄂ICP備17016276號(hào)-1