RPG ILE %BIF (Built In Function) I always forget the differences between %EOF, %EQUAL and Not %Found when writing native file I/O in RPG ILE Programs.  Sometimes a file record is %found and sometimes its not. Even after all these years I still scratch my head about which one is which. I know, I know –

Read More

To convert a RPG DATEFIELD to this numeric 8,0 field with no ‘/’ or ‘-‘ do this: D USADate 8s 0 USADate = %dec(%char(DateField:*iso0):8:0); Or another even neater function is this: I prefer this %UNS built in function, since it does not require me to specify length and decimal position parameters. What is %UNS? %UNSH

Read More

When IBM introduced RPG IV (RPGLE) back in the mid 90’s, most of the RPG III opcodes were converted into built in functions. This makes for more readable code and efficient programming. The built in functions each do a particular function just like any opcode would have done. Since the built in functions are provided

Read More