RPG Code Questions

1

More than 50 files in RPG?
How can i declare more than 50 files in RPG/400 program?

Answer Question   |  May 20, 2013  11:54 AM
AS 400, RPG, RPG Code
asked by:
70 pts.

How to display total of all the records that contain the same primary key in RPG4?
How to display total of all the records that contain the same primary key in RPG4? e.g…                                                             Transaction number :4458 product no:      name [...]

Answer Question   |  February 22, 2013  11:17 AM
RPG, RPG Code
asked by:
Keo
55 pts.

How to create Report on WRKOBJ’s output using a pf?
Hi gotta develop a pf which will show all the objects under all user’s library. Please suggest

Answer Question   |  October 15, 2012  8:21 AM
iSeries, iSeries AS/400, RPG, RPG Code
asked by:
270 pts.

SNDDST command
Hi , I am using SNDDST command in CL program through SNDDST am attaching the .CSV file.When m putting the subject line in that command , it is taking the name of that .CSV file as a subject line. Please refer the below command. SNDDST     TYPE(*DOC) TOINTNET((&PDES35)) DSTD                             (‘PO    +  REVERSES WEEKLY REPORT’) MSG                     [...]

Answer Question   |  July 4, 2012  4:14 PM
RPG Code
asked by:
35 pts.

RPGIV Coding Approach for 1 billion records
I have 1billion records in a PF.Key filed  is Date.I want to generate a report based on Key field.Which approach will be best for me (I mean shall i go with OVRDBF or any other approach)Please suggest.(RPGIV-Free Format-V5R4)

Answer Question   |  March 31, 2012  7:21 AM
OVRDBF, RPG Code, RPGIV, V5R4
asked by:
65 pts.

Indicator Off with RPG
How can we put all indicator off in single statement or in rpg code (It might be RPGIII Or IV)

Answer Question   |  March 31, 2012  7:14 AM
RPG Code, RPG indicators, RPGLE
asked by:
65 pts.

V4R4 upgrade to V6R1
Our current V4R4 box contains our data files and in-house written rpg, cl, service pgms, binded directories, etc. We have all our source code. We have no 3rd party software, all is in-house code. We are about to buy a used V6R1 box. I know there is some sort of costly 3 step migration for this. But I need to ask. Can [...]

Answer Question   |  March 31, 2012  8:43 AM
AS/400, AS400 V4R4 to V6R1, RPG Code, V4R4, V6R1
asked by:
40 pts.

Free format subdur minutes from a time
I am trying to search for the correct syntax for subtracting a minute from a time. I have a 6 numeric time field in HHMMSS format.  I am trying to use free format to subtract a minute.  Having trouble. Using: @atime=%dec((%time(@atime:*hms)- 1 *min) :6:0)                                    Getting compile error saying “The name or indicator minis not defined”  tried [...]

Answer Question   |  May 4, 2011  6:39 PM
Free form syntax, RPG, RPG Code, SUBDUR
asked by:
15 pts.

Sign out RPG users after certain amount of time
RPG Screen Timeouts. We need to sign-off our users automatically after a certain period of time.  I was wondering if anyone has the code to do this? Since we are using JDE world, it would be nice to have RPG III, but can also call an ILE program. Lenny

Answer Question   |  January 31, 2011  2:13 PM
AS/400, Connection timeout, RPG Code, RPG III
asked by:
45 pts.

Calling runtime errors in AS/400
Program A calls program B with invoice# ( 10S 0) as a parameter. Program B receives Invoice# as a incoming parameter ( Invoice# is a file field). But when program b is called i get a runtime error ” PGMB 400 decimal-data error in field (C G S D F)” Help me to fix this [...]

Answer Question   |  January 6, 2011  2:55 AM
AS/400, AS/400 Runtime Errors, RPG, RPG Code
asked by:
510 pts.

Writing one line of code in RPG: greater than ‘A’ and less than ‘Z’
How can I write one line of code in RPG Free something like if x >= ‘A’ and x <= ‘Z’ instead of x = ‘A’ or x = ‘B’, etc.

Answer Question   |  August 16, 2010  3:04 PM
iSeries, RPG Code, RPG ILE
asked by:
SKF
75 pts.

AS/400 unit testing
  Hi,   Im doing one application with coding of RPG and CL.Im new in this tech.I want to clarify one thig.Please cany any body tell me?   When can i start unit testing and when can i end the unit testing?Pleae give me example please?   What is mean by documentation?How can i write [...]

Answer Question   |  July 29, 2010  4:59 AM
AS/400, CL Commands, RPG, RPG Code
asked by:
45 pts.

Build a AS/400 calendar file
I need to build a calendar file with date ’010110′ and day of week ‘SU’ in rpg/400.  The client does not use the ILE envionment.  Can anyone provide the RPG code to create this file?  Thanks

Answer Question   |  July 12, 2010  5:42 PM
AS/400, AS/400 command functions, RPG Code
asked by:
5 pts.

Trimming leading zeros in as/400
Hi, I have a character input parameter of length 8. I have a customer number which may vary according to a query that user enters. This customer number is searched in an input file where the key field is numeric. I want to change this input parameter to numeric without any trailing zeros/blanks. Anyone who [...]

Answer Question   |  June 18, 2010  8:17 AM
AS/400 Fields, OS/400, RPG Code
asked by:
635 pts.

How to use edtcde &edtwrd in o spec?
Dear all, Actually I want to learn the use of edtcde and edtwrd keywords in O spec. how can i use these keywords suppose if  i have a field sellprice which consists 7 length with 2 decimal position i want to put $ sign for the values of this field in fixed and floating format [...]

Answer Question   |  October 5, 2009  4:24 PM
EDTCDE, EDTWRD, RPG, RPG Code
asked by:
6r
940 pts.

error in following rpg code?
Dear all, I am having problem while compiling follwing rpg code for calculation of square and cube of 2digit number.my display file compiles well but there is an error exfmt operation entry not valid.(error qrg 5199). RPG CODE is:  Columns . . . :    1  71            Edit                              JKJK1/F1  SEU==>                                                                   SQRPG  FMT FX …..FFilenameIPEAF……..L..I……..Device+……KExit++Entry+A….U         *************** Beginning [...]

Answer Question   |  September 2, 2011  5:12 AM
RPG, RPG Code, RPG compilation error
asked by:
6r
940 pts.

1