Back to Contents

Functions

Summary:

See also: Variables, Data Types, Flow Control.

Definition

Purpose:

The FUNCTION statement defines a named program block containing a set of statements to be executed when the function is invoked.

Syntax:

FUNCTION function-name ( [ argument [,...] ] )
  [ define-statement | constant-statement ]
  { fgl-statement | sql-statement | return-statement } [...]
END FUNCTION

where return-statement is:

RETURN expression [,...]

Notes:

  1. The FUNCTION block both declares and defines a function.
  2. The function declaration specifies the identifier of the function and the identifiers of its formal arguments (if any).
  3. The FUNCTION block cannot appear within the MAIN block, in a REPORT block, or within another FUNCTION block.
  4. function-name is the identifier that you declare for this function and must be unique among all the names of functions or reports in the same program.
  5. argument is the name of a formal argument to this function. Its scope of reference is local to the function.
  6. The data type of each formal argument of the function must be specified by a DEFINE statement that immediately follows the argument list.
  7. The actual argument in a call to the function need not be of the declared data type of the formal argument. If data type conversion is not possible, a runtime error occurs.
  8. define-statement is used to define function arguments and local variables.
  9. Local variables are not visible in other program blocks.
  10. The identifiers of local variables must be unique among the variables that are declared in the same FUNCTION definition.
  11. Any global or module variable that has the same identifier as a local variable, however, is not visible within the scope of the local variable.
  12. constant-statement can be used to declare local constants.
  13. fgl-statement is any instruction supported by the language.
  14. sql-statement is any static SQL instruction supported by the language.
  15. expression is any expression supported by the language.
  16. A function that returns one or more values to the calling routine must include the return-statement.
  17. Values specified in RETURN must correspond in number and position, and must be of the same or of compatible data types, to the variables in the RETURNING clause of the CALL statement.
  18. If the function returns a single value, it can be invoked as an operand within a expression. Otherwise, you must invoke it with the CALL statement with a RETURNING clause.
  19. An error results if the list of returned values in the RETURN statement conflicts in number or in data type with the RETURNING clause of the CALL statement that invokes the function.
  20. Any GOTO or WHENEVER ERROR GOTO statement in a function must reference a statement label within the same FUNCTION block.
  21. A function can invoke itself recursively with a CALL statement.
  22. The END FUNCTION keywords mark the end of the FUNCTION program block.

Warnings:

  1. If no argument is specified, an empty argument list must still be supplied, enclosed between the parentheses.
  2. If the name is also the name of a built-in function, an error occurs at link time, even if the program does not reference the built-in function.

Examples

Example 1:

01 FUNCTION findCustomerNumber(name)
02   DEFINE name CHAR(50)
03   DEFINE num INTEGER
04   CONSTANT sqltxt = "SELECT cust_num FROM customer WHERE cust_name = ?"
05   PREPARE stmt FROM sqltxt
06   EXECUTE stmt INTO num USING name
07   IF SQLCA.SQLCODE = 100 THEN
08      LET num =-1
09   END IF
10   RETURN num
11 END FUNCTION