×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Adam,
The "oreq" starts a new comparison set. Which is why I like to use /free so that I can easily group these for readability if nothing else. As in:
/free
IF (cfco = '9' AND cfacct = '1919)
OR cfacct = '2020';
Whatever
ENDIF;
/end-free
Then anyone (even my Visual Basic boss!) can see that ever '2020' account will be selected, not just company '9' records.
Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Adam West
Sent: Friday, October 03, 2008 8:38 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: code question
HI I have a question on this code.
cfco ifeq '9'
cfacct andeq '1919''
cfacct oreq '2020'
.... do whatever
endif
is there a problem here in that will it take any company 9 acct (besides the 1919 and 2020)?
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/rpg400-l.
midrange.com
