RPG Open - Documentation

RPG Open is a free, open source add-on library for the IBM i RPG IV programming language. It was created in the Fall of 2009 by Bob Cozzi, author of the book "The Modern RPG IV Language" and a consultant to IBM on the original RPG IV Language design.

Each subprocedure provided in this package is available by including the corresponding /INCLUDE member in the user's RPG IV program source and binding to the RPGOPEN binding directory. A great example of this is contained in the highlighted source lines below:

H DFTACTGRP(*NO) 
     H BNDDIR('RPGOPEN/RPGOPEN')

     Fcustmast  IF   E           K DISK    EXTFILE('WHSE/CUSTMAST')
     F                                     PREFIX('C.')
      /include rpgopen/qcpysrc,joblog
      /include rpgopen/qcpysrc,cvtcase
      /include rpgopen/qcpysrc,icomp
      /include rpgopen/qcpysrc,dates
      /include rpgopen/qcpysrc,concat
      D C               DS                  LikeRec(CUSTREC) Inz 
      D email           S             80A   Varying 
       /free
            read custmast;
            dow NOT %eof();
                email = cvtcase(c.email);  // Convert the email address to all lowercase characters
                sendmail(email : from : msgText);
              read custmast;
            enddo;
            *INLR = *ON;
      /end-free

The best way to get RPG OPEN is to download the ZIP file from RPGOpen.com. It includes all the source code, compiled and ready to go. If you prefer a source code only option, you can download each individual source member or view them online, again at RPGOpen.com. The documentation is included here, on ClassAnova.com. Search for the specific subprocedure name or bookmark this ClassAnova Group index page to get to the index of all RPG OPEN Subprocedures' documentation.

Return to RPGOpen.com