rpgle

0熱度

3回答

（）讓我通過說我對AS400和RPGLE以及CL編程極其新穎，我非常瞭解SQL，但是在使用AS400）這看起來應該很簡單。在年底，我們必須將我們的倉庫表更新爲新的當年。這是一個手動過程，去STRSQL和運行 update rco set ccfscy = '2017' where crsts = 'A' 這已經由同一個人做了近40年，現在他們都在今年退休。我的老闆希望這成爲一個CL程序，所

0熱度

2回答

在CLLE中重新定位文件

我試圖在CL中處理文件。 RCVF運行在一個循環中，我想重新定位文件以開始。我試過CLOF-> OVRDBF-> OPNDBF-> POSDBF（* START）。隨後的RCVF正在到達文件結尾。請告知我的錯誤。 PGM DCLF FILE(LGLLISTP) OPNID(LGL) DCL VAR(&FILENAME) TYPE(

0熱度

3回答

as400 RPGLE等待輸入

我有一個使用命令DSPLY打印數據的RPG程序。當我調用程序，我可以看到它出現幾毫秒，的印刷品，但它關閉的時候了。原生RPG中有一種方法可以讓程序等待輸入，而不是使用顯示文件嗎？

0熱度

1回答

RPGLE外部描述的數據結構

我在過去使用外部描述的數據結構來使用文件字段。現在，當我調試數據結構是空白。我無法回憶如果我錯過了任何事情。請協助。 H option(*nodebugio) cvtopt(*datetime) FEMPMSTP IF E K disk prefix(A_) D empDs E DS extname(EMPMSTP) prefix(A_) d

0熱度

2回答

如何傳遞數組數據結構作爲參數？

我想傳遞一個數組DS作爲參數，但編譯時，我得到一個「RNF5343數組有太多省略索引」錯誤。的陣列作爲 D PGM1 PI D ReceiveVar LikeDS(ResponseData) Dim(100) D ReceiveCount 10U 0 Const D PGM1 PR D ReceiveVar LikeDS(ResponseData

-1熱度

2回答

在DB2中，我需要根據主變量的值從一列中選擇行。

在DB2中，我需要根據主變量的值從一列中選擇行。 db列只能包含「D」或「P」。主機變量可以包含值'D'或'P'或'B'（所有行）。當主機變量是'D'時，我想只選擇帶有'D'的行。當主機變量是'P'時，我想只選擇帶'P'的行。當主機變量是'B'時，我想選擇所有行。我正在使用嵌入式SQL在RPG中執行此操作。在此先感謝

0熱度

1回答

RPG嵌入式SQL - 獲取和更新行

我想要在行和更新它們在RPG（免費）。使用舊風格的操作碼我會做的是： READE %KDS(KEY) FILE; processRecord(); UPDATE FILE; 問題來與SQL操作碼： EXEC SQL FETCH MYCURSOR INTO :VAR; processRecord(); ???? 使用EXEC SQL UPDATE FILE... SET... WH

2熱度

3回答

RPGLE程序/程序中的原型和接口

閱讀IBM文檔我對如何正確編寫程序/過程入口點感到有點困惑。尤其是閱讀這https://publib.boulder.ibm.com/iseries/v5r2/ic2924/books/c092508410.htm 我看到：與名稱相符的原型必須在源這裏http://www.ibm.com/support/knowledgecenter/ssw_ibm_i_72/rzasd/freeinter

2熱度

1回答

如何獲取活動服務入口點列表？

調試批處理時，必須STRDBG並設置「SBREAK」，有時候我的開發人員正在調試暴露爲web服務的RPGLE服務程序。有時這會導致網站「掛起」，直到斷點被釋放。是否有IBMi API檢索當前服務入口點（SBREAK）的列表？相關資源： IBMi Listing of APIs IBMi Debugging APIs Service-Entry-Points-Help-Simplify-CGI-

0熱度

1回答

RPG - 傳遞DS作爲參數傳遞給程序

我寫了一個字帖（/ COPY）程序具有該接口： DCL-PI *N VARCHAR(5000); FILE_NAME CHAR(10) CONST; DS_OLD VARCHAR(5000) CONST; DS_NEW VARCHAR(5000) CONST; END-PI; 此過程由本示例程序調用。 FILE_DS_ *是具有PFFILE定義的外部DS。 EX