我在ILE RPG中頗爲新穎。今天,我開始從我的作品中編寫出書。在本章的其中一章中,有一些使用子串函數%SUBSTR的示例。下面是代碼: DMOD S 5 INZ('VWXYZ')
DCON S 5 INZ('abcde')
DLENGTH S 5 0 INZ(2)
DSTART1 S 5 0 INZ(3)
我試圖刪除物理文件PFILE記錄它沒有密鑰的字段,但我不知道爲什麼,如果條款不工作報表,即使我有ID = 123 0001.00 fPFILE UF E DISK
0002.00 DID S 8P 0
0003.00 c read rec
0004.00 c eval ID=123
0005.00 c ID CHAIN P
我不確定我的代碼出了什麼問題,我正在嘗試創建一個while循環,它將使用在SQL中聲明的遊標來獲取字段(代碼)中的下一個字符。目標是通過循環獲取下一個匹配的字符。然後我想在循環結束時返回結果。目標是與代碼進行部分匹配,如果沒有完全匹配的話。我之前從未使用過遊標,所以我儘可能多地學習使用獲取和遊標。 EXEC SQL
SELECT field FROM file
WHERE fi