RPG

This FREE site is dedicated to all professional programmers trying to write clear structured code, network their pc's and, in some cases, deal with web site issues. We have free source code, free samples, free tips and techniques, free utilities, free sample test questions and answers, free downloads, free books and manuals, free examples. You do...
Read more »

April 2010 IBM Rational Developer for i (renamed in 2008 from WDSc), has been withdrawn from market and is replaced by the Rational Developer for Power Systems Software – RPG and COBOL Development Tools for IBM i. The latest release of Rational Developer for Power includes all of the features of Rational Developer for i (RDi...
Read more »

RPG-ILE - RPG-IV Quiz offered in 2007 to co's and agencies for technical testing of their RPG programmer job applicants. If you have been in an interview recently and were asked a question that you thought was good and worth mentioning to others, here, to be aware of, offer it to us in...
Read more »

In February of 2010 I asked my friend Ken Killian to update the RPG program RPG-ILE subfile pgm (1) to FREE FORMAT. (the DSPF and etc. are at "RPG-ILE subfile pgm (1)") Now, things are even better. the EVAL opcode is no longer needed. MOVE is not needed. ...
Read more »

valuable for discovering old objects that have never been used, or not in the last X years - etc. As the administrator of the system, the QSECOFR, this was a handy utility for finding and removing old objects off the hard disk. PRTOBJT (PRTOBJText) enhanced from Nov.'91 Midrange...
Read more »

I got this code and pieced it together from IBM's book RPG USERS GUIDE, book 26 in 1991 and, in about 1994 I enhanced it to toggle more columns. Later, 1998 I expanded it to the wider ILE format and changed a few of the if's and do's to show the new,...
Read more »

Using IBM's WDSC/Rdi, ("WebSphere Development Studio Client") you can use your Task View Window to mark places that you need to update code. This is a very handy Feature! You create create a "Task" as a reminder, or you can mark a line of code that you want to re-visit and complete code....
Read more »

I have mentioned Visual Explain before, but thought I would show more details… Recently, I had several people ask me for more details on the power of "Visual Explain" I *think* this option has been around since V4R4… J I have used it since 2000… J J J Here is the IBM-Link: publib.boulder.ibm.com/infocenter/.../topics/tvisualexpln.html This only "Scratches the surface", but it...
Read more »

What a Lifelong DB2 Fanatic Sees in MySQL Published: February 3, 2010 by Susan Gantner In my mind, you can't beat our database. It's not only integrated into the operating system, it's also incredibly flexible. You can use SQL to create and access data just like databases on other systems but you can also use the...
Read more »

In RPG, there is a subtle but important difference between the VARYING keyword that is used to assign a variable-length attribute to a character field and the OPTIONS(*VARSIZE) keyword that is used to permit a variable of any length to be passed as a parameter to a subprocedure or program. Often these two different...
Read more »

Activation Groups Creating RPG programs out of modules, is a two-step process:  This includes  CRTRPGMOD (Create RPG Module) and then CRTPGM (Create Program).   For single-module programs, these steps can be ...
Read more »

Binding ( or Linking ) "service programs" (*SRVPGM). The CRTPGM command is used to combine one or more *MODULEs into a *PGM, while CRTSRVPGM is used to combine one or more *MODULEs into a *SRVPGM. Both of these commands, are part of the "binder" or linker of OS/400. ...
Read more »

SubProcedures can return a value like a function, and they support recursion. A program with a subprocedure will not run in the default activation group, so include an H-spec to force it to run in a named activation group. ex: QILE H dftactgrp(*no) actgrp('QILE') F*-------- := -...
Read more »

The MOVEA (move with array) operation code may not be supported in Free Format, but that doesn't stop Bob Cozzi, or us, from making it work anyway - in his Jan 12th, "Tuesday Tip" Cozzi takes a page from his upcoming book on free-format programming and illustrates two alternatives to MOVEA in free-format RPG...
Read more »

free-format RPG: The only two lines of code that must start in a specific position are the compiler directives /FREE and /END-FREE, which begin in column 7. The lines in between can use any columns between 8 and 80, allowing you to logically indent your code, finally! Each statement ends with a semicolon. ...
Read more »