CREATE  PROCEDURE dbo.LopeTech_BookShop_GetModuleIdByControlTitle

 @PortalId int,
 @FriendlyName nvarchar(128),
 @ControlTitle nvarchar(100)
 
AS
SELECT *
FROM vw_Modules
WHERE  ((PortalId = @PortalId) or (PortalId is null and @PortalID is null))
 AND FriendlyName = @FriendlyName AND ControlTitle = @ControlTitle
 AND IsDeleted = 0

dim mModuleInfo As DotNetNuke.Entities.Modules.ModuleInfo
cartModuleId as integer

mModuleInfo = Modules.BookShop.ShoppingController.CartController.GetModuleId(PortalId, "BookShop", "Shopping Cart")
         CartModuleId = mModuleInfo.ModuleID