pears.NetOwnerFavouritesAll

CREATE PROCEDURE "pears"."NetOwnerFavouritesAll"( IN "pWebUserID" CHAR(20) ) 
RESULT( "FavouriteID" CHAR(20),"FavouriteName" CHAR(100),"FavouriteDescription" long VARCHAR,"FavouriteType" CHAR(10),"ObjectId" CHAR(20),"ParentFavouriteID" CHAR(20),"IsNode" INTEGER ) 
BEGIN
  DECLARE "UserStaffID" CHAR(20);
  SET "UserStaffID" = (SELECT "staffid" FROM "iqxnetuser" WHERE "iqxnetuserid" = "pWebUserID");
  SELECT "FavouritesID" AS "FavouriteID",
    "NetFavouriteTitle"("FavouriteID") AS "ObjTitle",
    "Description" AS "ObjDescription",
    (CASE "Type"
    WHEN 'H' THEN 'Heading'
    WHEN 'C' THEN 'Company'
    WHEN 'E' THEN 'Contact'
    WHEN 'P' THEN 'Person'
    WHEN 'V' THEN 'Vacancy'
    WHEN 'L' THEN 'Placement' END) AS "ObjType",
    "ID" AS "ObjID",
    "isnull"("parent",'') AS "ParentID",
    (SELECT(IF "count"() > 0 THEN 1 ELSE 0 endif) FROM "favourites" AS "f" WHERE "FavouriteID" = "f"."parent") AS "IsNode"
    FROM "Favourites"
    WHERE "staffid" = "UserStaffID"
END /* DOC
03-11-2017 ET created procidure to return all items in favourites
*/
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerFavouritesAll" IS 
{CREATE PROCEDURE pears."NetOwnerFavouritesAll"(IN pWebUserID CHAR(20))
RESULT(FavouriteID CHAR(20),FavouriteName CHAR(100),FavouriteDescription long VARCHAR,FavouriteType CHAR(10),ObjectId CHAR(20),ParentFavouriteID CHAR(20),IsNode INTEGER)
BEGIN
    DECLARE UserStaffID CHAR(20);
    SET UserStaffID=(SELECT staffid FROM iqxnetuser WHERE iqxnetuserid=pWebUserID);
	SELECT 
    "FavouritesID" AS FavouriteID,
    NetFavouriteTitle(FavouriteID) AS ObjTitle,
    "Description" AS ObjDescription,
    (CASE TYPE
     WHEN 'H' THEN 'Heading'
     WHEN 'C' THEN 'Company'
     WHEN 'E' THEN 'Contact'
     WHEN 'P' THEN 'Person'
     WHEN 'V' THEN 'Vacancy'
     WHEN 'L' THEN 'Placement'
    END) AS ObjType,
    ID AS ObjID,
    isnull(parent,'') AS ParentID,
    (SELECT (IF COUNT(*) >0 THEN 1 ELSE 0 endif)FROM favourites f WHERE FavouriteID=f.parent) AS IsNode
    FROM "Favourites"
    WHERE "staffid" = "UserStaffID"
END
 
/* DOC
  03-11-2017 ET created procidure to return all items in favourites
*/
}