Finalización de Porcedures para la Aplicación Web

Creador del Post: Javier Gómez Madrigal
Hora Inicio: 15:00 Hora Fin: 20:15
Horas Trabajadas: 5

Se terminó de hacer los procedures para la aplicación web de Bajada de Canción, Ordenar Canciones, Login Usuario, Insertar Usuario, Búsqueda por Patrón por Interprete, Consultar Cliente y Consultar Canción.

GO
CREATE PROCEDURE BAJADA_CANCION
(@ID_MOVCANCION INT,
@IP VARCHAR(50),
@POST_BY VARCHAR(30),
@POST_IN VARCHAR(30))
AS
BEGIN
BEGIN TRY
INSERT INTO MC_BAJADA
VALUES (@ID_MOVCANCION, CAST(getdate() as DATETIME), @IP, @POST_BY, @POST_IN, CAST(getdate() as DATE))
UPDATE MC_MOVIMIENTOCANCION
SET CANTIDADBAJADAS = CANTIDADBAJADAS + 1
WHERE ID = @ID_MOVCANCION
RETURN 1
END TRY
    BEGIN CATCH
RETURN @@ERROR*-1
    END CATCH;
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE ORDENAR_CANCIONES
AS
BEGIN
BEGIN TRY
SELECT TOP 10 C.ID, I.ID, C.NOMBRE, I.NOMBRE
FROM MC_CANCION AS C
INNER JOIN MC_INTERPRETE AS I ON I.ID = C.FK_INTERPRETE
WHERE (C.ACTIVO != 0)
ORDER BY C.CANTIDADVENDIDA DESC
RETURN 1
END TRY
    BEGIN CATCH
RETURN @@ERROR*-1
    END CATCH;
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE LOGIN_USUARIO
(@USERNAME VARCHAR(50),
@PASSWORD VARCHAR(30))
AS
BEGIN
BEGIN TRY
IF EXISTS (SELECT U.ID
FROM MC_MIEMBRO AS U
WHERE ((@USERNAME = U.CUENTA) AND (@PASSWORD = U.CLAVE) AND (U.ACTIVO = 1)))
RETURN 1
ELSE
RETURN -1
END TRY
    BEGIN CATCH
RETURN @@ERROR*-1
    END CATCH;
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE INSERTAR_USUARIO
(@NOMBRE VARCHAR(50),
@EMAIL VARCHAR(50),
@CUENTA VARCHAR(50),
@CLAVE VARCHAR(30),
@NUM_TARJETA VARCHAR(20),
@FECHA_EXP VARCHAR(20),
@POST_BY VARCHAR(20),
@POST_IN VARCHAR(20))
AS
BEGIN
DECLARE @TIEMPO DATE;
BEGIN TRY
IF EXISTS(SELECT M.NOMBRE FROM dbo.MC_MIEMBRO AS M WHERE M.NOMBRE = @NOMBRE)
RETURN -1;
ELSE
INSERT INTO MC_MIEMBRO
VALUES  (@NOMBRE, @EMAIL, @CUENTA, @CLAVE, 1000, 0, 1, @POST_BY, @POST_IN, CAST(getdate() as DATE))
SET @TIEMPO = CONVERT(DATE, @FECHA_EXP, 106)
INSERT INTO dbo.MC_MEDIOPAGO
VALUES (@NUM_TARJETA, @TIEMPO)
RETURN 1
END TRY
    BEGIN CATCH
RETURN @@ERROR*-1
    END CATCH;
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE BUSQUEDA_PATRON_INTERPRETE
(@PATRON VARCHAR(50))
AS
BEGIN
DECLARE @POSICION TABLE(POSICION INT IDENTITY(1,1), FK_CANCION INT)
INSERT INTO @POSICION
SELECT C.ID
FROM MC_CANCION AS C
WHERE (C.ACTIVO = 1)
ORDER BY C.CANTIDADVENDIDA DESC
    BEGIN TRY
SELECT N.ID, I.ID, N.NOMBRE, N.FECHAINGRESO, N.CANTIDADVENDIDA, I.NOMBRE, P.POSICION
FROM MC_CANCION AS N
INNER JOIN MC_INTERPRETE AS I ON I.ID = N.FK_INTERPRETE
INNER JOIN @POSICION AS P ON P.FK_CANCION = N.ID
WHERE ((I.NOMBRE LIKE '%'+@PATRON+'%') AND (N.ACTIVO = 1))
ORDER BY I.NOMBRE DESC
RETURN 1
END TRY
    BEGIN CATCH
RETURN @@ERROR*-1
    END CATCH;
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE CONSULTAR_CLIENTE
(@ID INT)
AS
BEGIN
SELECT *
FROM MC_MIEMBRO AS M
WHERE M.ID = @ID
END
GO


-----------------------------------------------------------------------------------------------------------------------
GO
CREATE PROCEDURE CONSULTAR_CANCION
(@ID INT)
AS
BEGIN
SELECT *
FROM MC_CANCION AS C
WHERE C.ID = @ID
END
GO


-----------------------------------------------------------------------------------------------------------------------