I've inherited some 10+ year old code without benefit of the original programmer... can anyone explain the usefulness of this code segment, or at least reduce to something more sensible?
Display Module Source
C N31USERN CABNE *ALL' ' 3131--
Thanks in advance ;)
* RPG* AS400ProgrammingProgramming Languages-OtherMainframe Languages
The code is probably 20-40 years old. RPG is very column sensitive.. The last time I worked in RPG II was in 1980.
C (we will be doing a compare
N31USERN Operand 1 variable
CABNE - compare and branch if not equal
*ALL' ' compared to this is a literal not a variable
3131-- Tag or variable
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
Not exactly the question you had in mind?
Sign up for an EE membership and get your own personalized solution. With an EE membership, you can ask unlimited troubleshooting, research, or opinion questions.
https://www.ibm.com/support/knowledgecenter/SSPSQF_9.0.0/com.ibm.etools.iseries.langref.doc/evferlsh266.htm