pears.rejectstate

CREATE FUNCTION "pears"."rejectstate"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  IN "sstatuscode" CHAR(1) ) 
RETURNS CHAR(1)
BEGIN
  DECLARE "rejcode" CHAR(1);
  SELECT "rejectstatus" INTO "rejcode" FROM "status"
    WHERE "status" = "sstatuscode" AND "type" = 'R';
  IF "isnull"("rejcode",'') = '' THEN
    SET "rejcode" = 'Y'
  END IF;
  RETURN("rejcode")
END