/* Suppose you have a user exit named STORE to which you want
** to pass salary values from Report Builder. To do so, you
** could write the following formula.
FUNCTION FOO RETURN BOOLEAN IS
IF :SAL >= 0 THEN
SRW.MESSAGE(100, 'FOUND A NEGATIVE SALARY. CHECK THE
WHEN SRW.UNKNOWN_USER_EXIT THEN
SRW.MESSAGE(200, 'STORE USER EXIT WAS UNKNOWN.
CHECK IF IT''S LINKED.');
WHEN SRW.USER_EXIT_FAILURE THEN
SRW.MESSAGE(200, 'STORE USER EXIT FAILED.
CHECK ITS CODE.');