Comments on: How to give If condition in CL/400 program http://itknowledgeexchange.techtarget.com/itanswers/how-to-give-if-condition-in-cl400-program/ Mon, 20 May 2013 05:26:00 +0000 hourly 1 By: TomLiotta http://itknowledgeexchange.techtarget.com/itanswers/how-to-give-if-condition-in-cl400-program/#comment-113649 TomLiotta Sun, 25 Nov 2012 00:40:23 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-give-if-condition-in-cl400-program/#comment-113649 Using your style, it would look something like this:
 
IF COND(%SST(&ODOBNM 7 4) *LE %SST(&VAR1 7 4) *AND +
        %SST(&ODOBNM 7 4) *GE %SST(&VAR2 7 4))  THEN( DO )
 …code goes here
ENDDO
 
I might use a style that looks something like this:
 
if ( %sst( &ODOBNM 7 4 ) *le %sst( &VAR1 7 4 ) *and +
     %sst( &ODOBNM 7 4 ) *ge %sst( &VAR2 7 4 ))   do
 …code goes here
enddo
 
The compound COND() doesn’t have another “IF” statement in the middle of it. Also, the “AND” connective is written “*AND”. When the two conditions are combined, you also must be careful about balancing the parentheses. Finally, notice the “+” after the “*AND” to indicate the continuation onto a new source line.
 
It’s hard to predict how the code is going to look after I post this comment. We can work out details if necessary.
 
Tom

]]> By: 6r http://itknowledgeexchange.techtarget.com/itanswers/how-to-give-if-condition-in-cl400-program/#comment-113646 6r Sat, 24 Nov 2012 13:23:27 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-give-if-condition-in-cl400-program/#comment-113646 even if I want to use corrected condition like:-

IF COND(%SST(&ODOBNM 7 4) *LE %SST(&VAR1 7 4)) *AND IF COND(%SST(&ODOBNM 7 4) *GE %SST(&VAR2 7 4))
Then condition prompt is not enoough longer to give this command,I mean full condition can’t be typed because of lessser space in If condition prompt,any idea/suggestions,How o type this long condition in IF command in CL/400 PROGRAM.

Thanks

]]>