
	Version 4.2.6 for Mainframes	SEARCH INDEX CONTENTS \| PDF PAGE PDF BOOKS \| HOME UP PREV NEXT

— Statements —

IF SELECTION

Structured Mode Syntax

IF SELECTION [NOT UNIQUE [IN [FIELDS]]] operand1

[THEN] statement

[ELSE statement

]

END-IF

Reporting Mode Syntax

`IF` `SELECTION` [`NOT UNIQUE` [`IN` [`FIELDS`]]] `operand1`
	[`THEN`]	`statement`
		`DO` `statement` `DOEND`
	`ELSE`	`statement`
		`DO` `statement` `DOEND`

This document covers the following topics:

Function
Syntax Description
Example

For an explanation of the symbols used in the syntax diagram, see Syntax Symbols.

Related Statements: DECIDE FOR | DECIDE ON | IF

Belongs to Function Group: Processing of Logical Conditions

Function

The IF SELECTION statement is used to verify that in a sequence of alphanumeric fields one and only one contains a value.

Syntax Description

Operand Definition Table:

Operand	Possible Structure					Possible Formats													Referencing Permitted	Dynamic Definition
`operand1`		S	A			A	U								L	C			yes	no

Syntax Element Description:

`operand1`	Selection Field: As `operand1` you specify the fields which are to be checked. If you specify an attribute control variable (Format C), it is considered to contain a value if its status has been changed to `MODIFIED`. Note: To check if a specific attribute control variable has been assigned the status `MODIFIED`, use the `MODIFIED` option of, for example, an `IF` statement. This enables you to check that exactly one field was modified.
THEN `statement`	Statement(s) to be Executed: The statement(s) specified in the `THEN` clause will be executed if one of the following conditions is true: None of the fields specified in `operand1` contains a value. More than one of the fields specified in `operand1` contains a value. This statement is generally used to verify that a terminal user has entered only one function in response to a map displayed via an `INPUT` statement. Note: If no action is to be performed if one of the conditions is met, you specify the statement `IGNORE` in the `THEN` clause.
ELSE `statement`	In the `ELSE` clause, you specify the statement(s) to be executed if exactly one field contains a value.
END-IF	The Natural reserved word `END-IF` must be used to end the `IF SELECTION` statement.

Example

** Example 'IFSEL': IF SELECTION                                        
************************************************************************
DEFINE DATA LOCAL                                                       
1 #A (A1)                                                               
1 #B (A1)                                                               
END-DEFINE                                                              
*                                          
INPUT 'Select one function:' //            
   9X 'Function A:' #A                     
   9X 'Function B:' #B                     
*                                          
IF SELECTION NOT UNIQUE #A #B              
  REINPUT 'Please enter one function only.'
END-IF                                    
*                                          
IF #A NE ' '                               
  WRITE 'Function A selected.'             
END-IF                                     
IF #B NE ' '                               
  WRITE 'Function B selected.'             
END-IF                                     
*                                          
END

Output of Program IFSEL:

Select one function:                        
                                            
         Function A:           Function B:

After selecting and confirming function A:

Page      1                                                  05-01-17  11:04:07
                                                                               
Function A selected.

SEARCH INDEX CONTENTS | PDF PAGE PDF BOOKS | HOME UP PREV NEXT