Lets start with a reasonably mixed RPGLE code example which is older style column based RPG400 for its variable definitions but then uplifts to RPGLE /FREE for its body code: Step1 – Run code through the Projex4i Code Moderniser. The Upgrade RPG Source command (UPGRPGSRC) will clean our code, converting it to fully /FREEFORMAT ILE

Read More

RPG EXAMPLE to read NUMERIC from ALPHAMERIC AKA: how to select only the number from an address in a field, or file data A little while ago, I wanted to extract out the numerics from a string of data: For example (a) if I feed in a phone number like “(540)-123 – 1234” but I just

Read More