RPG (Report Program Generator) | Forum profile

you could change the logic, to do a SETLL do a READE, and process the records until the READE returns an error,,

Try this : CODE D SELECT1 S 500A VARYING D INZ('SELECT EMPNO, EMPNAME FROM EMP + D ORDER BY EMPNAME + D WHERE EMPNAME > = ') C EVAL SELECT1 += POSITIONTONAME...

D Cell1 s 10A varying D Cell2 s 10A varying /free //Excel cell names must be used in formulas Cell1 = hssf_cellname(2:4);//get name for row 2 col 4 (E3) Cell2 = hssf_cellname(2:5);//get name for row 2 col 5 (F3) //Place formula for "Cell1 * Cell2" in col 12 of curr row //Do not include the '=' prior to the formula hssf_...

Check out this web site http://www.easy400.net/

ta-da,, you are correct..

what you do is a copyfile. The example below copies file kytrucks from the jimlib to a file called kytruck2 in the jimlib the FMTOPT ( of *nochk ), says copy I will be responsilbe for the data. You should also use the the replace option of (*replace). enter cpyf and press Command 4, for a prompt screen,, complete the first screen, then press command 10, and page down a few times to see the ...

You have to use dynamic sql to do so. i.e. in RPG IV CODE C Eval Stm = 'INSERT INTO FLLDSUPWP ( + C WPFILE, WPRECD, WPDATE, WPUSER, WPPGM ) + C SELECT ' + àFILE + ', COUNT(*), ' + C ISO_DATE + ', ' + USRNAM + ', ' + C PGMNAM +...

Nevermind I have it now. SQL to change the Primary code to Y if it is the lowest cost............ UPDATE OAKEJ/FLPJ PJ SET PJPRMP = 'Y' ,PJCHGD = '1091113' ,PJCHGT = '1202' ,PJCHGU = 'OAKEJ' ,PJCHGP = 'SQL'...

Did the program at any time in the past call the Fruits program? If so, you need to refresh the cross-reference. We have it scheduled to run once a week. -- Francis I'd like to change the world, but I can't find the source code.