rpgle

0熱度

4回答

新手。我正在開發一個RPG程序，當我嘗試編譯它時，出現這個錯誤。這是RNF7023: The compiler cannot determine how the program can end。現在，通常我知道這個錯誤可以通過將*ON設置爲LR.來避免，但我仍然無法編譯它。我還想指出，我在我的代碼中有一個複製源部分。當我嘗試將它們註釋掉（*）時，RNF7023不會出現，但我的變量因此未定義。

0熱度

2回答

清除AS/400上的記錄

我必須刪除一些被認爲無用的記錄。有一個地址文件和一個訂單歷史文件。在擁有消費品的公司中，他們獲得了許多產品查詢或開始銷售，從未成爲銷售。每個查詢都會在地址文件中記錄客戶編號。訂單歷史記錄文件是相同的客戶列和後綴字段。這是從000開始，並在有新訂單時遞增。事實上大部分的業務都是經常性的模式。一個只有'000'記錄的客戶（可能有多個000），意味着他們從未買過任何我們希望從這些文件中清除它們的東

2熱度

1回答

RPGLE打印到命令窗口

希望有人能幫助我。我無法在命令窗口中看到RPGLE程序的DSPLY'一些文本'輸出。我正在使用IBM Websphere開發工作室客戶端來創建一個簡單的RPGLE程序。我可以在沒有錯誤的情況下編譯程序，但在運行CALL MYLIB/TESTRPG時無法看到顯示文本以查看它是否有效。這裏是我的程序代碼： /free dsply 'Hello World'; return;

1熱度

1回答

XML解析器檢測到錯誤代碼302

我正在使用XML-INTO操作碼解析Web服務請求。時不時地，我在日誌中 (RNX0351 - "The XML parser detected error code 302"). 爲302的幫助 302 The parser does not support the requested CCSID value or the first character of the XML docume

2熱度

1回答

當我顯示一個sfl窗口的幫助，主屏幕消失，在power7 v7r1m0 rpg ile程序

我在我的RPG程序中顯示一個sfl屏幕，在一個字段WPROV，我使用F4=Help，如果用戶鍵入F4 ，該程序顯示了一個sfl窗口的幫助，但該程序擦除舊的和主屏幕，我只能看到幫助sfl屏幕。如何在屏幕上放置主屏幕和sfl窗口幫助屏幕？另一件事我正在檢查我的RPG程序在屏幕中的字段，如果有錯誤我打開*IN71,*IN72，但我看不到屏幕上的消息錯誤，爲什麼？這裏是主屏幕： A*%%EC

0熱度

2回答

CL（IBM i系列）中退出庫對象的程序？

我有四個庫，每個庫都有不同的一組程序選擇。不幸的是，我不能用SQL刪除庫中未使用的程序，因爲我需要退出它們（所以它們不會留在我們的客戶端服務器上）。有沒有辦法爲此製作CL程序？我們的高級程序員說它不能完成，但我想在被迫手動退出2300個對象之前探索所有可能性。它最初是Aldon變更管理軟件中的一個功能，我確實有一個SQL查詢來選擇所需的對象。

1熱度

1回答

獲取文件記錄數量的非活躍子文件（S）

我有同樣顯示4子文件到該程序： COL1 COL2 COL3 SFLAA----------------------------| 1 9999 9999 9999 2 9999 9999 9999 3 9999 9999 9999 *More... SFLBB----------------------------|

1熱度

2回答

DB2/400 UDF中的區分大小寫？

我正在爲服務程序過程編寫一個SQL包裝器。該程序有效，但我創建的UDF行爲很奇怪。當我使用外部名稱關鍵字創建UDF時，它變得區分大小寫。這裏是我有的代碼： create function C1ANEWF.getSalesAuditStorePeriodLibrary (inStore decimal(5,0), inDate date) returns cha

2熱度

1回答

如何調用外部程序傳遞一個數組

時使用LIKE關鍵字，我有以下RPGLE程序： dmypgm pr extpgm('MYPGM') d myarr like(myarr) d somevar like(somevar) d myarr s 64a dim(100) d somevar s 65a /free callp mypgm(myarr: somev

1熱度

1回答

限制AS400中的輸出工作文件RPG

目前，我們需要限制這些臨時工作文件的輸出。原因是這些是巨大的主文件，並且需要永遠運行。如果我們沒有創建文件* NOMAX，那麼必須有人來回答更多擴展的消息，並且它包含作業隊列。目前，我們想要顯示數據被正確選擇。但我添加了這些計數字段，但它並未停止該程序。 FARCMASAC IF E DISK * Order Header file - Keyed by Company a