RPGLE

No Source Showing

When I compile my RPGLE source I do it with the *source for dubugging. I just noticed this was happening. Now when I try to do a display object descrition i do not get where the source was compiled from. ANy Ideas why? I need this ASAP. Thanks Source file . . . . . . . . . . . . : ...

Physical File Without Key

Hi guys, Currently i'm using RPGLE language. If i have a Physical File that without key, How am i going to set my pointer. I can't CHAIN,SETLL and SETGT as well. In order to use them, u need have a key. Am i rite? Is there any idea to solve this matter? Thanks!!!!

Convert character field in decimal field.

hi, everybody i need a help for this: waval = 15A wnval = 15 2 i put in my source this eval wnval = %dec(waval:15:2) but when i run the program stop with error in this line. what i need to do, because i want this example: waval = 123456789012345 wnval = 123456789012345.00 but if i put...

RPGLE - Provide One-to-Many mapping

hi, I want to provide one-to-many mapping . consider 1 example, i have one-to-one mapping in Agent and Depot. bt i want, one Agent & Many Depot mapping. Means we can have one Agent with many Depot. using RPGLE or SQLRPGLE. I have one subfile where we can retrieve Agent, Agent name, and Depot...

CEERANO compiling

Does CEERANO in RPGLE have to be compiled with any options like a special Activation Group or a Bound Service Program?

Change AS/400 Library List for a Batch Job

HI, Is there a way by which we can override the Library List for a batch job, when the job is active?

What language "Next" from RPG(LE)

Hi everyone; I took a hiatus as a stay-at-home mom and am just back into the programming world. 13 years experience - 8 year break - back 1 year. Pure AS400 (can't say iSeries yet) do use RPGLE (thankfully) understand free - used to be MAPICS guru (can't say Infor either). Do any of you use...

SFLRCDNBR

I want to know the use of SFLRCDNBR Keyword used in Subfile . I also want any sample Code of how it is handled in the RPGLE Program?

Mixed record format Subfiles

I've been writing standard subfiles for a while now but I've seen some where, to me, it looks like the subfile has a mixed record format - i.e. a header and then a variable number of detail lines. (The fields are of different length and position in the header and detail lines). I'm writing an...

Rpgle paramters from a Cl

I have a rpgle program with parameters. I can watch the parameters change in the program. When I call the program from a Cl language the parameters come back blank.

How to add one Module to the existing Service Program

Hi, I want to add or append one new module called 'C' to the already existing service program(SRVPGM) For Example: I have one service program called SRVPGM consits of 2 Modules are A, B. Now i want to add one new Module called 'C' to SRVPGM. how can i do this ?

Pass-Through API

QPASTRPT- i can use this API to do Pass thru from one system to another, but i can't return any values back to the calling program thru this. is there any API for that ?

FTP in AS/400

I want to FTP some date from a PF in one system to another as400 box, Is thre an API which can help me out

Batch Program

How can I Execute a RPGLE program in Batch after the IPL is fully loaded

converting numeric field to a character field and show leading zeros

I am using %char to convert a numeric 9 pos field to character for use in a larger out put field. My code looks basically like eval labelout - "4J'+lpart+%char(lexpire)+%char(lserl) Where lexpire and lserl are used in the labelout field, I need the leading zeros to show. Right now, they are...

Using RPGLE indicators

How can use i use indicators for hide the fields and lables in the display file.

RPGLE Stored Proc to Reporting Services

Have SQLRPGLE program set-up to use cursor to return result set, want to use this to return table to MS Reporting Services get error message "low-order nibble of byte array offset 2451 is not valid. Byte Value OO. What does this mean and why not data back to client?

Bad performance in call command in RPGLE

We are facing a bad performance issue when RPGLE pgm A is calling RPG pgm B. Pgm A is reading a file as primary that contains 1000000 records and for every record calls pgm B that is doing 1 chain to a file and if it's sucessfully updates another file and then RETURN (not with SETON LR) to pgm A...

How do I populate an SQL table created on the fly in RPGLE?

I am writing a report program where I create a table that is then converted to an Excel spreadsheet using SQL2JXL. I am able to dynamically create a table with Execute Immediate but I have been unable to populate it. The problem is the table name is stored in a variable within the program and I...

Unable to over ride a PF member

Hi, I made a cl program and in it I over ride a pf member, clrpfm then call my rpgle program. I can't write on my member but instead it writes on the primary member and reads it. seems the member that is used is the the primary member and not the member that I over rides.