RPGLE Questions


DATAAREA
I have a variable that contains the name of a data area How can I access the data area? Without using CL

Answer Question   |  May 22, 2013  9:03 AM
AS 400, Data Area, RPGLE
asked by:
20 pts.

Windows Subfile
From a Subfile, can I make a “call” to a window subfile?

Answer Question   |  May 21, 2013  12:45 PM
AS/400, RPGLE, Subfile
asked by:
20 pts.

Trigger
Guys, we got a problem here…our file is associated with Insert and delete trigger. So will an SQL delete query execution trigger the job attached?

Answer Question   |  May 14, 2013  4:24 AM
AS/400, CLLE, DB2, RPGLE
asked by:
525 pts.

Trigger removed
How to know if some one had removed the trigger from the file? We have a situation like this so how to know who did that? Shall we get the data from journaling?

Answer Question   |  May 14, 2013  4:03 AM
AS/400, DB2, RPGLE
asked by:
525 pts.

About service program
I have a service program ‘A’ and that service program ‘A’ has been used in thousand (1000) programs. Now my doubt is I want to update the service program ‘A’ by adding one more module to the service program ‘A’ and I want to make the thousand programs (1000) to use the updated service program. [...]

Answer Question   |  May 10, 2013  5:33 AM
AS/400, RPGLE
asked by:
290 pts.

V7R1 RPGLE variable @JOBDATE1 losing value after a CALL statement
D @JobDate1 S D C EVAL @JobDate1 = %DATE(*DATE) ... 024800000000 C call(e) 'CNRWW832CT' 024900000000 C parm @@DIV @DIV 025000000000 C parm '*SEL' @MOD 025100000000 C parm @C1CODE 025200000000 C if @C1CODE ' ' 025300000000 C eval #C1CODE = @C1CODE 025400000000 C endif 025500000000 On 4/13/2013 we upgraded from v6r1 to v7r1 on a new [...]

Answer Question   |  May 6, 2013  12:17 AM
AS/400, RPGLE
asked by:
70 pts.

Trailing the blanks which come in the middle of a string
Could anyone please let me know how I can trail the blanks that come in the middle of a string? For example, a field contains a name like ‘hello hai’ I want to trim the blank which came in the middle of hello and hai. Please help me with a piece of sample code.

Answer Question   |  April 30, 2013  4:37 AM
AS/400, RPGLE
asked by:
290 pts.

Problem while using SSCANF funtion in RPGLE!
Hi, I am trying to check whether a string is numeric or not so for that I’m using SSCANF but every time its giving me return a 0 . Not sure what I’m doing wrong! Below is my code: I am always getting i=0 ideally it should be 1234 … Please suggest!

Answer Question   |  April 4, 2013  10:06 PM
AS/400, RPGLE
asked by:
420 pts.

Pointer not set for location referenced
I have a service PGM with 2 modules that are similar in functionality. One works and the other gives me the error in the title. Both load array data structures that are define using likeds. The problem I’m having is when I try and load the first array element. When I dump the PGM, it [...]

Answer Question   |  April 3, 2013  3:14 PM
PGM, RPGLE, RPGLE array
asked by:
5 pts.

Updating a physical file
Suppose I have a RPGLE Program P1 And P2 and a physical file PF1 . P1 using PF1 in update mode and p2 also using Pf1 in update mode. When P1 calls P2, it throws an error saying file locked. What can be done. I need to update pf1 in both the progs.

Answer Question   |  April 2, 2013  2:59 PM
Physical File, RPGLE, RPGLE files
asked by:
380 pts.

DISPLAYING HELP TEXT OF A PROGRAM IN AN INTERNET EXPLORER WINDOW VIA RPGLE
Hello all, I was wondering if anyone has had any experience in using Internet Explorer in conjunction with RPGLE programs. Now, I’m not looking to go out to any internet site, instead, my boss wants me to create something for our user community. While in an Interactive Program, if the user hits F1 for Help, [...]

Answer Question   |  March 27, 2013  11:40 AM
AS/400, Internet Explorer, PHP, RPGLE, techniques, TIPS, TRICKS
asked by:
685 pts.

SFL
I have a SFL. In which I have a option selection field. I have used reverse image indicator for it. But when I insert a wrong value in that field, then the entire column is highlighted instead of the option selection field for that particular record. What should I do?

Answer Question   |  March 27, 2013  7:11 AM
RPG, RPGLE, SFL
asked by:
380 pts.

IF loop
key1 chain file1 if %found(file1) elseif key1 chain file2 Can anyone let me know whether the above if loop is correct or not?

Answer Question   |  March 27, 2013  6:37 AM
AS/400, RPGLE
asked by:
290 pts.

Retrieving the name of a file from object links
We are receiving a Daily file containing Chassis information via FTP at a scheduled time in the early morning. I have written a process to automatically retrieve this file, CPYFRMIMPF to my Physical File, then process the data into our Chassis Master. Originally, I was told it would be a specific and constant name so [...]

Answer Question   |  March 20, 2013  11:55 AM
AS/400, CPYFRMIMPF, RPGLE
asked by:
685 pts.

About EVALR Opcode
Could anyone let me know what is an EVALR Opcode in AS/400? If possible, can anyone give me some sample code which is on EVALR Opcode?

Answer Question   |  March 19, 2013  9:16 AM
AS/400, RPGLE
asked by:
290 pts.

Write PF using RPGLE
HI … I tried to add a rec in my PF (sample1).. but my PGM run successfully .. but the rec haven’t added in my PF …. I shared my PGM here sample1 uf a e k disk usropn open sample1 eval empname=’Sathis’ eval empno=13 eval addr=’ramnad’ write rec close sample1 eval *inlr=*on Please help [...]

Answer Question   |  March 8, 2013  6:48 AM
RPGLE, RPGLE Program
asked by:
25 pts.

Retriving the source code
Can we retrieve the source code of an RPGLE object? If yes, please let me the procedure for it. Thanks in advance ravua

Answer Question   |  March 6, 2013  8:30 AM
AS/400, AS/400 commands, RPGLE
asked by:
430 pts.

QBatch subsystem Monitoring
Hi Guys, I have requirements, I need the Job details like( Job Number, name , user) of any job as soon as they entered in Qbatch Subsystem. Do we have any API or some commands to fetch that… The only solution i m thinking is of take the *Print of WRKACTJOB command for QBATCH every [...]

Answer Question   |  March 1, 2013  8:01 PM
AS/400, CLLE, iSeries, iSeries AS/400, QBATCH, RPGLE, Subsystems
asked by:
170 pts.

Using 2 different display sizes in a display file
I am trying to create a display file in which the subfile uses display size 27 132 and a window uses the display size of 24 80. I thought I could declare them both in the dspsiz as DSPSIZ(27 132 *DS4 - 24 80 *DS3) and use dspmod(*ds4) after the SFLPAG command and DSPMOD(*ds3) on [...]

Answer Question   |  March 1, 2013  2:24 AM
AS/400, RPG, RPGLE
asked by:
165 pts.

Reading XML file from RPGLE program by using XML-INTO opcode
How can I move data from XML to Data structure if data is more than 9999 in XML? The problem is I can declare the data structure with array max size 9999 where as using XML-INTO (ex: XML-INTO OrderList %XML(‘/home/orderlist.xml’) : ‘ doc=file case=any’) ). I can load first 9999 set of data but then [...]

Answer Question   |  February 28, 2013  9:53 AM
AS/400, RPGLE, XML
asked by:
170 pts.