Exit Statement

Format

exit ʃreturn_valueʅ;

Description

The exit statement terminates a procedure or user-defined function before normal processing is expected to end. When the statement is executed, processing stops for the current procedure or function, and control is passed to the next procedure or function.

When utilized in a user-defined function, an optional argument, return_value, sets the function's return value before exiting the function. The type of the argument, either a numeric or string expression, must match the function's return type.

Example 1

function numeric FirstWoman()

do numeric ctr = 1 while ctr <= HH_MEMBERS

if SEX(ctr) = 2 then
FirstWoman = ctr;
exit; // exit the function, we've found our first woman!
endif;

enddo;

FirstWoman = 0; // no woman was found

end;

Example 2

function string QueryForString(string message)

while 1 do

string response = prompt(message);

if response = "" then
errmsg("You cannot enter a blank value");

else
exit response;

endif;

enddo;

end;

// ...

errmsg("The non-blank value is %s", QueryForString("Enter a non-blank value"));