How can a factor 2 on a CALL be changed?
I have the following code: C CALL ‘UTWIPT’ C PARM P0Part P1PART 20 C PARM P0Seq# P1SEQ# 3 0 C PARM P0Lot# P1LOT# 15 Before it excutes the value of P0SEQ# is 035… after the call I am getting different value… that is later causing a data dec error (such as hex F0F1). I didn’t [...]
Answer Question
| April 24, 2008 7:22 PM
Call, iSeries, RPG
I have the following code: C CALL ‘UTWIPT’ C PARM P0Part P1PART 20 C PARM P0Seq# P1SEQ# 3 0 C PARM P0Lot# P1LOT# 15 Before it excutes the value of P0SEQ# is 035… after the call I am getting different value… that is later causing a data dec error (such as hex F0F1). I didn’t [...]
AS/400 WRITE Op code writes then deletes
I have a program where the WRITE op code is not working. After the program runs, there should be records in a file, but instead the deleted records are increased. I have debugged the program and as soon as the WRITE statement is executed the number of deleted records is increased. I’ve never seen anything [...]
Answer Question
| April 24, 2008 4:33 PM
AS/400, OS/400, RPG
I have a program where the WRITE op code is not working. After the program runs, there should be records in a file, but instead the deleted records are increased. I have debugged the program and as soon as the WRITE statement is executed the number of deleted records is increased. I’ve never seen anything [...]
rpg sql concat
Our database was designed with separate fields for cc, yy, mm and dd. I’d like to know if and how these fields can be combined into one field then order by on that field. Is this possible? I would need to know the syntax also. If this is not possible, then is there a another [...]
Answer Question
| April 17, 2008 1:14 PM
Concatenate, Database, RPG, SQL
Our database was designed with separate fields for cc, yy, mm and dd. I’d like to know if and how these fields can be combined into one field then order by on that field. Is this possible? I would need to know the syntax also. If this is not possible, then is there a another [...]
System Date in COBOL/400
How to get the system date in the format of CCYYMMDD(*ISO) or MMDDCCYY(*USA) same like RPG400? Can anyone pls help?
Answer Question
| May 6, 2010 10:25 AM
AS/400, CCYYMMDD, COBOL, MMDDCCYY, RPG
How to get the system date in the format of CCYYMMDD(*ISO) or MMDDCCYY(*USA) same like RPG400? Can anyone pls help?
Service Program Parameters Written Directly to PF
I’m taking an old RPG program that does all the writing of records to a PF & converting it to a service program. This should reduce the processing of these records considerably (no more opening & closing the file for each record). I’ve created the service program & tested it, the only problem seems to [...]
Answer Question
| April 28, 2008 7:03 PM
PF/LF, RPG, Service program
I’m taking an old RPG program that does all the writing of records to a PF & converting it to a service program. This should reduce the processing of these records considerably (no more opening & closing the file for each record). I’ve created the service program & tested it, the only problem seems to [...]
Over and under Hex display/edit
Hi, I’m busy with a utility program on the i-Series (written in OPM RPG – which is still the standard where I am) and I need to be able to show some fields in hex mode for editing, like the DSPPFM command when you press F10 and F11. So I’m looking to display the hex [...]
Answer Question
| April 16, 2008 2:10 PM
AS/400, Conversion, Hex, iSeries, RPG
Hi, I’m busy with a utility program on the i-Series (written in OPM RPG – which is still the standard where I am) and I need to be able to show some fields in hex mode for editing, like the DSPPFM command when you press F10 and F11. So I’m looking to display the hex [...]
AS/400 what keyword is used on the RPG IV definition specification to rename a subfield in an externaly defined data structure
what keyword is used on the RPG IV definition specification to rename a subfield in an externaly defined data structure
Answer Question
| April 9, 2008 8:02 AM
AS/400, iSeries development, RPG
what keyword is used on the RPG IV definition specification to rename a subfield in an externaly defined data structure
CHAIN(E)
what is chain(e) please explane with example
Answer Question
| May 20, 2011 10:32 AM
CHAIN(E), RPG
what is chain(e) please explane with example
ALTPAGEUP/DOWN CF Indicator Question
I have (in DSPF) ALTPAGEUP/ALTPAGEDOWN as CF04 and CF05. Are you not able to use CF04 or CF05 elsewhere? example: screen1 subfile…F4/F5 = PageUp/Down screen2 F4=prompt F5=deliver the program doesn’t “seem” to recognize the F5 (or F4) on Screen2. There is another program that does this exact same thing and it works. Am I missing [...]
Answer Question
| April 9, 2010 6:24 PM
DDS, DSPF, RPG
I have (in DSPF) ALTPAGEUP/ALTPAGEDOWN as CF04 and CF05. Are you not able to use CF04 or CF05 elsewhere? example: screen1 subfile…F4/F5 = PageUp/Down screen2 F4=prompt F5=deliver the program doesn’t “seem” to recognize the F5 (or F4) on Screen2. There is another program that does this exact same thing and it works. Am I missing [...]
EUSRSPLA
in the RPG program DLTOLDSPLF, it is looking to copy EUSRSPLA from source code file QRPGSRC, does anyone know what library it is supposed to be in.
Answer Question
| March 18, 2008 6:55 PM
DLTOLDSPLF, EUSRSPLA, QRPGSRC, RPG
in the RPG program DLTOLDSPLF, it is looking to copy EUSRSPLA from source code file QRPGSRC, does anyone know what library it is supposed to be in.
How to fetch data from physical file using RRN value of a record ?
I want to fetch / read a record with given RRN value in rpg. How to read a record for which only RRN value is given, in RPG ?
Answer Question
| January 31, 2012 12:48 PM
CHAIN, RPG, RRN
I want to fetch / read a record with given RRN value in rpg. How to read a record for which only RRN value is given, in RPG ?
Verhoeff Algorithm in RPG Code
I’m trying to find the Verhoeff Algorithm in RPG code. I have found it in other languages but none in RPG. Does anyone have this formula in RPG? TIA
Answer Question
| March 7, 2008 7:18 PM
Algorithmic language, RPG
I’m trying to find the Verhoeff Algorithm in RPG code. I have found it in other languages but none in RPG. Does anyone have this formula in RPG? TIA
How to Calculate Lapse Time
Hi Everyone: Is there an easy way to calculate the lapse time between 2 timestamps? The SUBDUR returns either in HR/MI/or SECONDS. But I want the lapse time in HHMMSS. Can it be done without much coding? Thanks in advance.
Answer Question
| April 8, 2010 7:57 PM
Lapse Time Calculation, RPG, SUBDUR
Hi Everyone: Is there an easy way to calculate the lapse time between 2 timestamps? The SUBDUR returns either in HR/MI/or SECONDS. But I want the lapse time in HHMMSS. Can it be done without much coding? Thanks in advance.
WHAT IS THE NEED OF *NODEBUGIO WHILE DOING COMPILE A RPG PROGRAM
WHAT IS THE NEED OF USING *NODEBUGIO WHILE DOING COMPILE A RPG PROGRAM?
Answer Question
| February 26, 2008 4:55 AM
AS/400, NODEBUGIO, RPG
WHAT IS THE NEED OF USING *NODEBUGIO WHILE DOING COMPILE A RPG PROGRAM?
RPG with Dynamic SQL Problem – SQLCOD 501/312
I’m trying to do simple dynamic SQL in a program to select records for a subfile but it doesn’t seem to be working. sSql = ‘SELECT orderno FROM ordhdr ‘ ‘WHERE custno = :scSrchCust ‘; following this I have: exec SQL CLOSE @Orders; exec SQL Prepare Stmt from :sSQL; exec SQL Declare @Orders SCROLL CURSOR [...]
Answer Question
| February 25, 2008 12:21 PM
Dynamic SQL, RPG, SQL, SQLCOD
I’m trying to do simple dynamic SQL in a program to select records for a subfile but it doesn’t seem to be working. sSql = ‘SELECT orderno FROM ordhdr ‘ ‘WHERE custno = :scSrchCust ‘; following this I have: exec SQL CLOSE @Orders; exec SQL Prepare Stmt from :sSQL; exec SQL Declare @Orders SCROLL CURSOR [...]
Writing an MQ message
I have to write a program that sends some data from MQ. I will read a data file process it, and then instead of populating a file and FTP’ing the file to a server. I need to send the data via MQ. How do I write the message to MQ, how do I set up [...]
Answer Question
| February 14, 2008 3:50 PM
CLP, MQ, RPG
I have to write a program that sends some data from MQ. I will read a data file process it, and then instead of populating a file and FTP’ing the file to a server. I need to send the data via MQ. How do I write the message to MQ, how do I set up [...]
Multiple Sorts Without Using Multiple Function Keys
When doing WRKACTJOB, you can put the cursor over the column you wish to sort and then press F16. I have a subfile program with multiple sorts and presently the user has to press different function keys to sort. Can anyone give me an example of the code to use so my program will act [...]
Answer Question
| February 12, 2008 2:10 AM
RPG, RPGLE, Subfile
When doing WRKACTJOB, you can put the cursor over the column you wish to sort and then press F16. I have a subfile program with multiple sorts and presently the user has to press different function keys to sort. Can anyone give me an example of the code to use so my program will act [...]
SFL Application Help
I have a SFL that has drop/fold capability and application help through out. The problem is when the SFL is in drop mode and additional fields are being displayed, how do I associate help to those fields? I cannot use the HLPID keyword as it’s not allowed on the SFL record nor can I use [...]
Answer Question
| February 1, 2008 7:58 PM
iSeries, RPG, SFLCTL
I have a SFL that has drop/fold capability and application help through out. The problem is when the SFL is in drop mode and additional fields are being displayed, how do I associate help to those fields? I cannot use the HLPID keyword as it’s not allowed on the SFL record nor can I use [...]
Data Max M class 2 setup & RPG code sample
Looking for someone who has set up the new Data Max M class 2 ethernet printer on an as/400 that can provide the device/out queue description and a sample RPG output spec. We have old twinax Data Max printers and the code does not print.
Answer Question
| January 31, 2008 12:15 AM
AS/400 printing, Printing, RPG
Looking for someone who has set up the new Data Max M class 2 ethernet printer on an as/400 that can provide the device/out queue description and a sample RPG output spec. We have old twinax Data Max printers and the code does not print.
XML and RPG
I received an XML-document via mail, i detached it and placed it into the IFS. Then i wrote an RPG-program where i used the XML-INTO command to read the XML-document. But, when i run my program i always get the error “The XML parser detected error code 302″ I think there’s something wrong with the [...]
Answer Question
| February 19, 2008 8:30 AM
CCSID, RPG, XML
I received an XML-document via mail, i detached it and placed it into the IFS. Then i wrote an RPG-program where i used the XML-INTO command to read the XML-document. But, when i run my program i always get the error “The XML parser detected error code 302″ I think there’s something wrong with the [...]





