Sunday, March 10, 2013
Membuat Function hitung IPK di SQL Server
Nah, ketemu lagi dengan saya mas ivan paling ganteng se-jagat raya.. hahaha..
kali ini saya akan share tentang cara membuat Fuction menghitung IPK mahasiswa dengan menggunakan DBMS Microsoft SQL Server. Berikut adalah sepenggal kodingannya. semoga bermaanfaat ^_^
-- Hitung Bobot
alter function fHitungBobot(@NA numeric(10,2))
returns numeric(10,2)
as
begin
declare @bobot numeric(10,2)
if(@NA<=44)
begin
set @bobot=0
end
else if(@NA<=54)
begin
set @bobot=1
end
else if(@NA<=59)
begin
set @bobot=2
end
else if(@NA<=64)
begin
set @bobot=2.5
end
else if(@NA<=74)
begin
set @bobot=3
end
else if(@NA<=79)
begin
set @bobot=3.5
end
else if(@NA<=100)
begin
set @bobot=4
end
return @bobot
end
-- Hitung Ipmk
alter function fHitungIPmk(@bobot numeric(10,2),@sks int)
returns numeric(10,2)
as
begin
declare @IPmk numeric(10,2)
set @IPmk=@bobot * @sks
return @IPmk
end
-- Hitung IPK
alter function fIPK(@tampung numeric(10,2), @bagi numeric(10,2))
returns numeric(10,2)
as
begin
declare @IPkum numeric(10,2)
set @IPkum=@tampung/@bagi
return @IPkum
end
-- Cetak
alter function fCetak(@nim varchar(11),@nama varchar(100),@IPkum numeric(10,2))
returns varchar(200)
as
begin
declare @cetak varchar(200)
set @cetak='NIM : ' + @nim + '
' + 'NAMA : ' + @nama + '
' + 'IPK : ' + convert(varchar,@IPkum)
return @cetak
end
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment