Handling pointer while updating a key value in rpgle
[table] [tbody] [tr] [td class="votecell">     [/td] [td] my code goes like this femp uf e k disk dvar1 s 5p 0 c *loval setll emp c read emp c dow not %eof(emp) C eval ecode = ecode + 10 c eval var1=ecode c update recemp c var1 setgt emp c read emp c [...]

Answer Question   |  April 27, 2010  11:35 AM
AS/400, AS/400 administration, RPGLE

record lock handling in ILE RPG
Hi all, I’ve some questions regardings… whwn a pf is used in Updated mode in RPG 1. what could be conditions when records would be in lock 2. how can we avoid record lock Thanks

Answer Question   |  April 22, 2010  12:44 PM
AS/400, RPG, RPGLE

Hyperlink functionality on AS 400 Green Screen
I need to have “hyperlink” functionality on an AS 400 Green Screen. Is there anyway to do this. Is there any DDS keywords.

Answer Question   |  April 22, 2010  12:16 PM
AS/400, AS/400 - DDS, AS/400 green screen, Hyperlink, RPGLE

Barcode problems on IPDS laser printer connected to iSeries
I have an *AFPDS spool file with a vertical barcode. The program and printer file have not changed and were working correctly previously. Data still prints correctly on a network printer, but the barcode is printed in an incorrect position (overlaying other data) when printed on an HP LaserJet 1100 printer connected to a PC workstation with [...]

Answer Question   |  April 27, 2010  2:35 PM
AFPDS, barcodes, HP LaserJet, IPDS printer, iSeries printer output, PCOMM, Personal Communications, RPGLE

F4 prompt not displaying in window using RPGLE
Hi, I have added a pop-up window but can not get the F4 prompt to work. Can anyone help please. Thanx Mary

Answer Question   |  April 20, 2010  1:34 PM
AS/400, Prompt F4, RPGLE, RPGLE Program

debugging a program object on i-series
Hi anybody tell me if it is possible to debug a program object CLP/CLLE/RPG/RPGLE if i dont have the source with me.

Answer Question   |  April 16, 2010  12:30 PM
AS/400 debugging, iSeries, RPG, RPGLE

CONTINUITY IN RPGLE
HI FRIENDS, My problem is that I want to type a very lengthy IF statement.Afetr typing a part of the IF statement in TN5250 emulator on the first line and when I press enter,it is going to the next line.So please tell me how can I enter the remaining part of the IF statement? Thanks

Answer Question   |  April 12, 2010  1:40 AM
RPGLE, TN5250

Problem with *READ Trigger Program
Caller Program A Reads a record from File X. “After-Read-Trigger” kicks in and calls Program B. Program B changes the Read-Record’s fields as per the required logic (I can see the modified trigger-buffer in debug).

Answer Question   |  March 18, 2010  5:23 PM
RPG ILE, RPG IV, RPGILE, RPGLE

SUBFILES
Hai friends, I need to design a subfile such that when a user press 1 against a employee number,it should display the details of the selected employee.Pls help me.

Answer Question   |  March 16, 2010  5:12 PM
INDICATORS, RPGLE, Subfiles

What causes space offset error in RPGLE?
Can anyone tell me what this means? I’m getting this on a CHAIN to an externally described file in a called RPGLE program. Space offset X’00000000′ or X’000000000020A0AA’ is outside current limit for object JOBNAME USERID 123456. Internal failure in compiler or subroutine.

Answer Question   |  March 10, 2010  4:42 PM
RPGLE

Reading flat file defined as DBCS
Hi Experts, I have copied an xml file with chinese characters like this one <COMPANY_NAME>上海百维生物科技有限公司</COMPANY_NAME> into a flat file with structure below A          R $PDER                  A            $PDEF       0600O      upon copying the xml into the flat file using the command CPYFRMIMPF the chinese characters turned into garbage like this one <COMPANY_NAME>ÚÚ¢XÚÚÚÚÚÚÚÚÚÚ[strong]<[/strong]¬Yñ¡ÚÚéX¢aÚÚñ²ßjÚÚ%W|¾</COMPANY_NAME> There is an XML parser [...]

Answer Question   |  February 21, 2011  3:13 AM
AS/400 flat file, Data Types, DBCS, RPGLE

RPGLE DATE CALCULATIONS
I need to subtract 1 day from the system date and output it into a file in the format mmddyyyy. No separators. I cannot figure out how to use date functions like subdur w/o the field containing separaters on output. And I can’t figure out how to use a DS to redefine it so I [...]

Answer Question   |  March 11, 2010  3:26 AM
AS/400, RPGLE, RPGLE Date Calculation

How to read data from a stored procedure in RPGLE
How do I read data from a stored procedure?

Answer Question   |  March 2, 2010  1:30 PM
RPGLE, RPGLE Stored Procedures, Stored Procedures

Data area *LIBL/INSRLIST is not allocated for output.
The following is a snippet of the code. I get an error on the OUT op code as in the title.  * Next List Number                                   D                 DS                                  D Get_Next_List                  6S 0 DtaAra(INSRLIST) //  Create Header record              In *Lock Get_Next_List;         //  Ge                                       DoU Done  = @True;                    Chain(E) Get_Next_List INSRL100;      If %Found;                     // Inc    Get_Next_List [...]

Answer Question   |  February 26, 2010  9:31 PM
RPG, RPGLE, V5R4

Non Subfile Field Not Changing When Doing an EXFMT
This should be a simple thing to do but it is not working. I have an RPG program in which the user enters a warehouse code and presses enter. If the code is valid, it then populates a field in the record with the warehouse description. If the user changes the code to an invalid [...]

Answer Question   |  January 20, 2012  5:23 PM
RPG, RPG debugging, RPG ILE, RPG IV, RPG/400, RPGLE

How to use RPGLE function/program as a function in STRSQL
Hi All, I have an RPGLE program which takes as a input value and update it and return the updated value. I want to use this RPGLE program through SQL while executing SQL scripts.  I did not remember the procedure to use it, but I have used in the past.  Any of you have idea [...]

Answer Question   |  February 24, 2010  5:54 AM
RPGLE, RPGLE Stored Procedures, STRSQL

READE – RPGLE
When doing a.. SETLL (parm1:parm2:parm3) READE (parm1:parm2:parm3) IF %FOUND OCCASIONALLY IT COMES BACK AS FOUND WHEN THE RECORD IS CLEARLY NOT IN THE FILE. ANY IDEAS? THIS IS THE STRANGEST THING.

Answer Question   |  May 20, 2011  8:59 PM
READE, RPGLE, SETLL

SQLRPGLE – Result Set
I have an SQLRPGLE program [PGMA] containing the following: D ResultSet       DS                                 D                                     Qualified      D                                     Occurs( 9999 ) D  AAuUserId                   10 D  AAuValFr                      10     C/EXEC SQL                                              C+ CALL XXDLIB/PGMB (:##BegNo, :##EndNo, :##UserID)   C/END-EXEC                                              PGMB has the same DS structure defined as in PGMA and successfully populates the DS ResultSet in PGMB How do I get SQLRPGLE [...]

Answer Question   |  February 26, 2010  2:37 PM
AS400 Data Definitions, Data structures, Programming, RPGLE, SQLRPG, SQLRPGLE

Text Editor (Word Processor) on iSeries.
On our system we have limitless text for our Items. We developed a rudimentary text editor many years ago which is also used for creating letters (for emails/faxes etc) but ideally we would like to buy a decent ‘text editor’ that is native to the iSeries. Does anyone know of such a utility/product that we could integrate into [...]

Answer Question   |  February 8, 2010  12:48 PM
AS/400, iSeries, RPG IV, RPGLE

Subfiles in RPGLE using WDSC.
I have a subfile set up with a i/o field in the footer.  When I change the value of that feild in the footer from the screen the computer does not recognize the change.  First, can I have an i/o field in a footer.  If so what is the execution process?  I have tried writing the [...]

Answer Question   |  February 5, 2010  6:36 PM
AS/400, RPGLE, Subfile, WDSc