validateloginpackagebody.sql

来自「Beginning VB.NET DatabasesAll_Code.rar」· SQL 代码 · 共 14 行

CREATE OR REPLACE PACKAGE BODY ValidateLoginPackage 
AS
   PROCEDURE usp_ValidateLogin (inLoginName IN CHAR, inPassword IN CHAR,
      results_cursor OUT CURSOR_TYPE)
   AS
   BEGIN
      OPEN results_cursor FOR
      SELECT RoleName, UserID, FirstName || ' ' || LastName AS UserName, Status
      FROM Users
      JOIN Roles ON Users.RoleID = Roles.RoleID
      WHERE UPPER(LoginName) = UPPER(inLoginName) AND Password = inPassword;
   END;
END;