rpgle

0熱度

1回答

我想從rpgle程序返回字符串。 /free return 'this is simple text'; /end-free 可以任何請給我這個代碼片段。

3熱度

2回答

我有一個從PGMB（CL）和PGMC（CL）調用的PGMA（RPGLE）。 PGMB以2個參數呼叫PGMA，而PGMC以3個參數呼叫PGMA。我該如何在PGMA中處理這個問題。我嘗試了選項（* Nopass）作爲第三個參數（這是可選的），但是這僅僅適用於我猜測的過程。我不能將這個選項放入PGMA中的*條目的PLIST中。

1熱度

2回答

As400中的非常大的字段ISeries數據庫

我想將大的XML字符串（可能長於32K或64K）保存到AS400文件字段中。 DDS或SQL文件都可以。下面的SQL文件示例。 CREATE TABLE MYLIB/PRODUCT (PRODCODE DEC (5) NOT NULL WITH DEFAULT, PRODDESC CHAR (30) NOT NULL WITH DEFAULT, LONGDESC CLOB (70K) ALL

2熱度

1回答

免費角色扮演如何將％SUBST轉換爲TIMESTAMP？

我需要將一個子串移入時間戳字段。但是如果我編譯它，我會得到錯誤編號 RNF7416 - EVAL操作中表達式右側和左側的操作數類型不匹配。驗證碼： MONITOR; TSTPFIELD = %SUBST(NEWDS:01:26); ON-ERROR; TSTPFIELD = %TIMESTAMP(); ENDMON; 難道有人知道如何將％SUBST（NEWDS：01：

3熱度

2回答

如何以自由格式RPGLE在字符串中存儲字符的多個位置？

在標準RPGLE中，我的代碼如下所示。此聲明將數據中逗號的位置存儲在ComArr數組中。 C ',' Scan Data ComArr 我試過這樣做的自由格式。但是ComArr數組的所有索引都加載了逗號的第一個位置Data。這是因爲％Scan只返回一個位置，並將其保存到數組後最終將使用單個值加載整個數組。 ComArr = %Scan(',':Data) ; 是否有任何其他方法

0熱度

4回答

關於RTNPARM關鍵字和用例的示例

在閱讀關於RTNPARM關鍵字的IBM文檔之後，對我而言，我仍然不清楚如何處理它。有人可以給我一個小程序的例子嗎？如果速度更快，爲什麼IBM沒有將其隱含起來？

2熱度

1回答

用於AS/400的RPGILE編程的最佳IDE是什麼？你能使用Visual Studios IDE連接到400嗎？

用於AS/400 RPGILE編程的最佳IDE是什麼？你能使用Visual Studios IDE連接到400嗎？我是一個C＃程序員，他愛上了Visual Studios，也比那些一直在使用pdm編輯器工作多年的rpg編程人員的配給年輕許多。我的問題，有沒有一種方法可以在RPGILE /連接到視覺工作室的AS/400的代碼？我的後續問題 - 我應該使用另一個IDE嗎？親愛的上帝，我需要的只是

-3熱度

2回答

我是AS400的新手，我想知道如何在運行時輸入rpgle？

我想將溫度從華氏溫度轉換爲攝氏溫度。在運行時，它應該詢問華氏溫度，然後以攝氏度顯示相應的溫度。

0熱度

1回答

dealloc +％alloc（）vs％realloc（） - RPGLE

知道ptr <> *null,是那兩個代碼在功能上是相同的嗎？ dealloc(en) ptr; ptr = %alloc(500); 和 ptr = %realloc(ptr:500);

0熱度

1回答

iSeries db2存儲過程調用RPG程序運行時的字符集問題

我有一個像下面這樣的db2存儲過程。這個過程調用一個CL來調用一個RPG程序。 CREATE PROCEDURE bsm4obj/TXCL4055 ( INOUT POCNO CHAR (10), INOUT POCRN DEC (2 , 0), INOUT PSPNO CHAR (10), INOUT PMTAD CHAR (1),