Name the Indicators - Tip3
Page 1 of 1
Name the Indicators - Tip3
Assign the results of logical expressions to indicators
From the very start of RPG IV the following has been valid syntax:
*IN90 = *IN80 or *IN81 or *IN82 ;
Which simply means: Set indicator 90 to true if any of indicators 80, 81,or 82 are true.
It looks even better when we name the indicators:
*In(errorFound) = *In(invalidAccount) or *In(invalidProduct) or . . .
This ability is not restricted to indicator expressions. For example the following is perfectly valid:
d overdueBalance_40...
d c 40
/Free
// Set print control indicator 40 if payment overdue
*In(overdueBalance_40) = ( %Date() > dueDate );
From the very start of RPG IV the following has been valid syntax:
*IN90 = *IN80 or *IN81 or *IN82 ;
Which simply means: Set indicator 90 to true if any of indicators 80, 81,or 82 are true.
It looks even better when we name the indicators:
*In(errorFound) = *In(invalidAccount) or *In(invalidProduct) or . . .
This ability is not restricted to indicator expressions. For example the following is perfectly valid:
d overdueBalance_40...
d c 40
/Free
// Set print control indicator 40 if payment overdue
*In(overdueBalance_40) = ( %Date() > dueDate );
Similar topics
» indicators in rpg/400
» Name the Indicators - Tip1
» Name the Indicators - Tip2
» Name the Indicators - Tip4
» Level Break Indicators
» Name the Indicators - Tip1
» Name the Indicators - Tip2
» Name the Indicators - Tip4
» Level Break Indicators
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum