create function "pears"."NetBlobPermitted"( in "pWebUserID" char(20),in "pBlobClass" char(1),in "pBlobID" char(20),in "pUpOrDown" char(1) )
returns integer
begin
if "pBlobClass" = 'G' and "pUpOrDown" = 'D' then
return 1
else
return 0
end if
end