pears.NetOwnerSettingsGetRightDefault

CREATE PROCEDURE "pears"."NetOwnerSettingsGetRightDefault"( IN "pWebUserID" CHAR(20) ) 
RESULT( "rightID" CHAR(255),"userClass" CHAR(255) ) 
BEGIN
  IF NOT "IQXNetHasPermission"("pWebUserID",'APIDESIGN') = 0 THEN
    SELECT "IQXNetRightID" AS "rightID","IQXNetUserClassID" AS "userClass" FROM "IQXNetRightDefault"
  ELSE
    SELECT '99:~Permission denied',''
  END IF
END
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerSettingsGetRightDefault" IS 
{CREATE PROCEDURE pears."NetOwnerSettingsGetRightDefault"( IN "pWebUserID" CHAR(20)) 
RESULT( "rightID" CHAR(255),"userClass" CHAR(255) ) 
BEGIN
    IF NOT "IQXNetHasPermission"("pWebUserID",'APIDESIGN') = 0 THEN
    	SELECT IQXNetRightID AS rightID, IQXNetUserClassID AS userClass FROM IQXNetRightDefault
    ELSE
        SELECT '99:~Permission denied', '';
    END IF;
END
}