Kamis, 13 Januari 2011

Store Procedure


Store Procedure adalah kumpulan Pre-defined Transact-SQL yang digunakan untuk melakukan tugas/task khusus. Dalam Store Procedure dapat berisi beberapa statement dan setiap statement di kelompokan untuk satu object database.

Contoh DML SP :

Insert Data pelanggan

Create PROCEDURE [dbo].[SP_PelangganData]
      @pkodepelanggan nvarchar(10),
      @pnamapelanggan nvarchar(30),
      @ppiutang money
AS
BEGIN
      set @ppiutang = 0
      IF EXISTS (select kodepelanggan from pelanggan where kodepelanggan = @pkodepelanggan)
      Begin
            Select 'Data sudah ada, Insert Gagal'
      END
      ELSE
            Begin
                  Insert into SIPP.dbo.Pelanggan
                        (KodePelanggan, NamaPelanggan, Piutang)
                  VALUES
                        (@pkodepelanggan, @pnamapelanggan, @ppiutang)
                        SELECT 'Insert data Berhasil'
                  END
      END

Update Data pelanggan

CREATE PROCEDURE SP_UPDATEPELANGGAN
      @pkodepelanggan nvarchar(10),
      @pnamapelanggan nvarchar(30),
      @ppiutang money
AS
BEGIN
      set @ppiutang = 0
      IF EXISTS (select kodepelanggan from pelanggan where kodepelanggan = @pkodepelanggan)
      Begin
      UPDATE SIPP.dbo.Pelanggan
                        SET KodePelanggan = @pkodepelanggan, NamaPelanggan=@pnamapelanggan, Piutang=@ppiutang
                  WHERE kodepelanggan = @pkodepelanggan
                        SELECT 'UPDATE data Berhasil'
      END
      ELSE
            Begin
                  Select 'Data tidak ada, Update Gagal'
                  END
      END
GO

Delete Data pelanggan

CREATE PROCEDURE SP_DELETEPELANGGAN
      @pkodepelanggan nvarchar(10)
AS
BEGIN
      IF EXISTS (select kodepelanggan from pelanggan where kodepelanggan = @pkodepelanggan)
      Begin
            DELETE FROM SIPP.dbo.Pelanggan
            WHERE kodepelanggan = @pkodepelanggan
            Select 'DELETE berhasil'
      END
      ELSE
            Begin
                  Select 'Data tidak ada, DELETE Gagal'
                  END
      END
GO
 

Tidak ada komentar:

Posting Komentar