Kamis, 26 April 2012

Mari Berhijab

Pernah ga sobat denger pertanyaan

“ngapain sih pake jilbab, masih muda

khan jadi ga keliatan cantiknya?”, atau

pernyataan “aku mau pake tapi jika

dah nikah nanti”, atau kalimat

sejenisnya yang menyatakan

keberatan berjilbab. Mungkin kalimat

di atas tidak menimpa diri kita, tetapi

temen deket atau kerabat. Semua

tahu dan sepakat, tidak ada

pertentangan bahwa berjilbab itu

wajib bagi wanita balig, yang mengaku

muslimah tidak ada alasan untuk

mencari-cari alibi menghindari

menutup aurat.


Allah Azza Wa Jalla yang menciptakan

manusia, paling Mengetahui perkara

yang mendatangkan maslahat

(perkara yang membawa pada

kebaikan) dibanding manusia itu

sendiri. Allah Maha Mengetahui, Maha

Kasih Sayang dan Maha Bijaksana

kepada hamba-hamba-Nya.

“Apakah Allah yang menciptakan itu

tidak mengetahui (yang kamu lahirkan

dan kamu rahasiakan), dan Dia Maha

Halus dan Maha Mengetahui?” (Qs Al

Mulk 14).


Menutup aurat itu sendiri juga

mengandung banyak kebaikan bagi

wanita, hanya saja banyak yang

menyelewengkan perintah ini

sehingga muncul aneka ragam alasan

untuk menolaknya. Masih segar dalam

ingatan masyarakat, tahun 90an

banyak statement sesat untuk

menolak berjilbab. Pelajar akan

dikatakan sulit mencari kerja jika

belajar pada sekolah yang

mewajibkan dirinya memakai jilbab.


Imbas dari rumor sesat ini akhirnya

berkembang pada khalayak luas

bahwasanya jilbab identik dengan

kekolotan dan kemunduran. Kini kita

hidup di era 2000an, era manusia

semakin cerdas dan kritis menilai

segala sesuatu, termasuk mengenai

jilbab, muncul kesadaran masyarakat

Indonesia untuk mengenakan jilbab.

Jika suatu waktu nanti akan ada yang

bertanya pada anda “Hei cantik

ngapain berjilbab?” jawabnya cukup

sederhana:


1. Sebagai bentuk ketaatan pada Allah

Sang Pemberi hidayah, sebagaimana

tercantum dalam surat An-Nur 31 dan

Al-Ahzab 59.


2. Sebagai bentuk ketaatan pada apa

yang dicontohkan Rasulullah dan istri-

istrinya dalam menjaga diri agar

terhindar dari fitnah, sebagaimana

yang termaktub dalam surat Al-Ahzab

53.


3. Sebagai identitas pembeda antara

muslimah dan non muslimah. Jika

wanita mengenakan jilbab, maka

semua manusia akan tahu jika dia

muslimah, tetapi jika wanita ditempat

umum tidak menutup aurat, agama

dan keimanannya masih diragukan.


4. Sebagai pelindung diri dari laki-laki

tidak baik. Jika wanita itu mengenakan

jilbab, sangat kecil kemungkinan untuk

diganggu atau dilecehkan, berbeda

dengan wanita yang mengenakan

pakaian seksi. Ketika wanita

mengenakan pakaian seksi ditempat

umum, ada sepucuk pesan dibalik

pesonanya, yang kurang lebih begini

“hei cowok, gangguin kita dunk!” ^_^


5. Sebagai pelindung kulit. Ketika siang

hari mengharuskan wanita beraktivitas

diluar rumah, sangat rentan kulitnya

cepat rusak dan terlihat tua sebelum

waktunya, padahal kulit sehat

merupakan dambaan setiap wanita,

pemakaian jilbab secara benar akan

melindungi dan menjaga kulit wanita

dari ganasnya sinar matahari. Bukan

hanya matahari, sebagian manusia

yang menempati bumi juga

mengalami musim dingin di banyak

negara. Bagi wanita, jilbab merupakan

pelindung ampuh dari dinginnya

cuaca.


6. Sebagai pengontrol. Jika wanita

tidak berjilbab, cenderung merasa

bebas dan tidak terikat dengan

pakaian yang dikenakannya. Berbeda

dengan wanita berjilbab, jika ingin

berbuat sesuatu yang melanggar

norma-norma agama, maka ia akan

berpikir matang, jilbab menjadi alat

pengontrol dan pengingatnya.


So, cantik, ngapain ga berjilbab jika

sudah tahu banyak manfaat dari

berjilbab? ^_^ (sumber: voa-

islam.com)


Published with Blogger-droid v2.0.4

Mari Berhijab

Pernah ga sobat denger pertanyaan

“ngapain sih pake jilbab, masih muda

khan jadi ga keliatan cantiknya?”, atau

pernyataan “aku mau pake tapi jika

dah nikah nanti”, atau kalimat

sejenisnya yang menyatakan

keberatan berjilbab. Mungkin kalimat

di atas tidak menimpa diri kita, tetapi

temen deket atau kerabat. Semua

tahu dan sepakat, tidak ada

pertentangan bahwa berjilbab itu

wajib bagi wanita balig, yang mengaku

muslimah tidak ada alasan untuk

mencari-cari alibi menghindari

menutup aurat.


Allah Azza Wa Jalla yang menciptakan

manusia, paling Mengetahui perkara

yang mendatangkan maslahat

(perkara yang membawa pada

kebaikan) dibanding manusia itu

sendiri. Allah Maha Mengetahui, Maha

Kasih Sayang dan Maha Bijaksana

kepada hamba-hamba-Nya.

“Apakah Allah yang menciptakan itu

tidak mengetahui (yang kamu lahirkan

dan kamu rahasiakan), dan Dia Maha

Halus dan Maha Mengetahui?” (Qs Al

Mulk 14).


Menutup aurat itu sendiri juga

mengandung banyak kebaikan bagi

wanita, hanya saja banyak yang

menyelewengkan perintah ini

sehingga muncul aneka ragam alasan

untuk menolaknya. Masih segar dalam

ingatan masyarakat, tahun 90an

banyak statement sesat untuk

menolak berjilbab. Pelajar akan

dikatakan sulit mencari kerja jika

belajar pada sekolah yang

mewajibkan dirinya memakai jilbab.


Imbas dari rumor sesat ini akhirnya

berkembang pada khalayak luas

bahwasanya jilbab identik dengan

kekolotan dan kemunduran. Kini kita

hidup di era 2000an, era manusia

semakin cerdas dan kritis menilai

segala sesuatu, termasuk mengenai

jilbab, muncul kesadaran masyarakat

Indonesia untuk mengenakan jilbab.

Jika suatu waktu nanti akan ada yang

bertanya pada anda “Hei cantik

ngapain berjilbab?” jawabnya cukup

sederhana:


1. Sebagai bentuk ketaatan pada Allah

Sang Pemberi hidayah, sebagaimana

tercantum dalam surat An-Nur 31 dan

Al-Ahzab 59.


2. Sebagai bentuk ketaatan pada apa

yang dicontohkan Rasulullah dan istri-

istrinya dalam menjaga diri agar

terhindar dari fitnah, sebagaimana

yang termaktub dalam surat Al-Ahzab

53.


3. Sebagai identitas pembeda antara

muslimah dan non muslimah. Jika

wanita mengenakan jilbab, maka

semua manusia akan tahu jika dia

muslimah, tetapi jika wanita ditempat

umum tidak menutup aurat, agama

dan keimanannya masih diragukan.


4. Sebagai pelindung diri dari laki-laki

tidak baik. Jika wanita itu mengenakan

jilbab, sangat kecil kemungkinan untuk

diganggu atau dilecehkan, berbeda

dengan wanita yang mengenakan

pakaian seksi. Ketika wanita

mengenakan pakaian seksi ditempat

umum, ada sepucuk pesan dibalik

pesonanya, yang kurang lebih begini

“hei cowok, gangguin kita dunk!” ^_^


5. Sebagai pelindung kulit. Ketika siang

hari mengharuskan wanita beraktivitas

diluar rumah, sangat rentan kulitnya

cepat rusak dan terlihat tua sebelum

waktunya, padahal kulit sehat

merupakan dambaan setiap wanita,

pemakaian jilbab secara benar akan

melindungi dan menjaga kulit wanita

dari ganasnya sinar matahari. Bukan

hanya matahari, sebagian manusia

yang menempati bumi juga

mengalami musim dingin di banyak

negara. Bagi wanita, jilbab merupakan

pelindung ampuh dari dinginnya

cuaca.


6. Sebagai pengontrol. Jika wanita

tidak berjilbab, cenderung merasa

bebas dan tidak terikat dengan

pakaian yang dikenakannya. Berbeda

dengan wanita berjilbab, jika ingin

berbuat sesuatu yang melanggar

norma-norma agama, maka ia akan

berpikir matang, jilbab menjadi alat

pengontrol dan pengingatnya.


So, cantik, ngapain ga berjilbab jika

sudah tahu banyak manfaat dari

berjilbab? ^_^ (sumber: voa-

islam.com)


Published with Blogger-droid v2.0.4

Senin, 23 April 2012

Praktikum SBD 9c

/*****************************************************************
    soal 9
******************************************************************/

--1 tampilkan namakaryawan dalam huruf besar, EmployeeSalary dalam satuan juta dengan format 2 angka di blkg koma tambahkan kata ' million' di blkanngya , alamat karyawan dalam huruf kecil, EmployeePhone dimana EmployeeSalary di < 1500000, dan alamat karyawan mengandung huruf a dan diakhiri oleh angka 45
create view v1 as(
    select upper(EmployeeName) as [Employee's Name] ,cast(cast(cast(EmployeeSalary as numeric)/1000000 as numeric(3,2)) as varchar(20))+' million' as  [Salary],lower(EmployeeAddress) as [Address],EmployeePhone
    from MsEmployee
    where EmployeeAddress like '%a%45'
    and EmployeeSalary < 1500000
)
select * from v1
drop view v1

--2
create view v2 as(
    select replace(EmployeeCode,'KK','Kyuch Employee ') as [Employee Code],EmployeeName,EmployeePhone
    from MsEmployee
    where right(EmployeeAddress,1)%2=0
    and EmployeeSalary between 1000000 and 1500000
)
select * from v2
drop view v2

--3  tampilkan kodetransaksi, inisial karyawan yang di dapat dari huruf pertama dari nama pertama karyawan dan huruf pertama dari nama terakhir karyawan dalam huruf besar, inisial pelanggan yang didapat dari dua huruf pertama dari depan dalam huruf besar, renttime dengan format dd/mm/yyyy dimana huruf terakhir dari nama pertama karyawan berakhiran huruf i, nama kedua dari karyawan berkahiran huruf i
create view v3 as(
    select TransactionCode,upper(left(EmployeeName,1)+substring(employeename,charindex(' ',employeename)+1,1)) as [Employee Initial],upper(substring(CustomerName,1,2)) as [Customer Initial],convert(varchar(20),RentTime,103) as 'Rent Date'
    from RentalHeader th,MsCustomer mp, MsEmployee mk
    where th.EmployeeCode=mk.EmployeeCode and th.CustomerCode=mp.CustomerCode
    and EmployeeName like '%i %i'
)
select * from v3
drop view v3

--4 tampilkan EmployeeCode, namakaryawan, nomor rumah dari alamat karyawan dimana karyawan tersebut pernah melakukan transaksi pada bulan januari dan nomor alamat karyawan habis dibagi 4 dan namakaryawan di awali oleh huruf V-Z
create view v4 as(
    select EmployeeCode,EmployeeName,reverse(left(reverse(EmployeeAddress),charindex('.',reverse(EmployeeAddress))-1)) as [Address Number]
    from MsEmployee
    where EmployeeCode in(
        select distinct EmployeeCode from RentalHeader
        where datename(month,RentTime)='January'
    )
    and cast(reverse(left(reverse(EmployeeAddress),charindex('.',reverse(EmployeeAddress))-1))as int)%4=0
    and EmployeeName like '[V-Z]%'
)
select * from v4
drop view v4

--5 tampilkan kodetransaksi,CustomerName,LicensePlate,CarName,biayatransaksi dimana transaksi peminjaman mobil dengan biaya tertinggi pada bulan january
create view v5 as(
    select th.TransactionCode,CustomerName,td.LicensePlate,CarName,max(biaya)as [Highest Transaction in January] from (
        select ceiling(cast(datediff(minute,RentTime,ReturnTime) as numeric)/60)*PricePerHour as biaya
        from RentalHeader th, RentalDetail td,MsCar mm, CarDetail mCarName
        where th.TransactionCode=td.TransactionCode and mm.LicensePlate=td.LicensePlate and mCarName.CarCode=mm.CarCode
        and datename(month,RentTime)='January'
    ) as a, MsCustomer mp,RentalHeader th, RentalDetail td,MsCar mm, CarDetail mCarName
    where th.CustomerCode=mp.CustomerCode and th.TransactionCode=td.TransactionCode and mm.LicensePlate=td.LicensePlate and mCarName.CarCode=mm.CarCode
    group by th.TransactionCode,CustomerName,RentTime,ReturnTime,PricePerHour,td.LicensePlate,CarName
    having max(biaya)=ceiling(cast(datediff(minute,RentTime,ReturnTime) as numeric)/60)*PricePerHour
)
select * from v5
drop view v5

--6 tampilkan LicensePlate, namamobil di dapat dari kata setelah spasi pertama, biaya perjam dengan menambahkan kata 'Rp. ' di depannya dan kata '.00' di belakangnya dimana mobil tersebut tidak pernah disewa dan CarName mobil adalah honda
create view v6 as(
    select m.LicensePlate,substring(CarName,charindex(' ',CarName)+1,len(CarName)) as [Car Type],'Rp. '+cast(PricePerHour as varchar(20))+'.00' as [Price Per Hour]
    from MsCar m,CarDetail mm
    where LicensePlate not in(
        select distinct LicensePlate from RentalDetail
    )
    and m.CarCode=mm.CarCode
    and CarName like 'Honda%'
)
select * from v6
drop view v6

--7 tampilkan LicensePlate,CarName,PricePerHour,kapasitas bensin yang didapat dari penjumlahan tiap digit dari LicensePlate * 10 dimana CarName mengandung huruf kedua  dari akhir
create view v7 as(
    select LicensePlate,CarName,PricePerHour, cast(((cast(substring(LicensePlate,2,1)as int)+cast(substring(LicensePlate,3,1)as int)+cast(substring(LicensePlate,4,1)as int)+cast(substring(LicensePlate,5,1)as int))*10) as varchar(20))+' liter' as [Fuel Capacity]
    from MsCar mm,CarDetail mCarName
    where mCarName.CarCode=mm.CarCode
    and CarName like '%'+substring(licenseplate,len(licenseplate)-1,1)+'%'
)
select * from v7
drop view v7

--8 tampilkan EmployeeCode,EmployeeName,EmployeeSalary,persentase komisi yang di dapatkan dari jumlah mobil yang dipinjam oleh pelanggan dan di layani oleh karyawan tersebut, komisi dalam ribuan di dapat dari persentase komisi*EmployeeSalary/100 dimana persentase komisi >2 dan komisi dalam satuan ribuan adalah bilangan ganjil
create view v8 as(
    select mk.EmployeeCode,EmployeeName,'Rp. '+cast(EmployeeSalary as varchar(20))+',00' as [Employee Salary],cast(count(LicensePlate) as varchar(20))+' %' as [Bonus Percentage],cast((cast((count(LicensePlate)*EmployeeSalary/100) as int)/1000)as varchar(20))+' thousand Rupiah' as [Bonus]
    from MsEmployee mk,RentalHeader th,RentalDetail td
    where mk.EmployeeCode=th.EmployeeCode and td.TransactionCode=th.TransactionCode
    group by mk.EmployeeCode,EmployeeName,EmployeeSalary
    having count(LicensePlate) >2 and (cast((count(LicensePlate)*EmployeeSalary/100) as int)/1000)%2=1
)
select * from v8
drop view v8

--9 tampilkan LicensePlate,namamobil di dapat dari kata sesudah spasi , jumlah peminjaman di dapat dari jumlah mobil yang pernah di sewa selama bulan januari dimana CarName mobil bukan suzuki dan digit pertama dari LicensePlate tidak sama dengan jumlah peminjaman
create view v9 as(
    select mm.LicensePlate,substring(CarName,charindex(' ',CarName)+1,len(CarName)) as [Car Name],cast(count(mm.LicensePlate)as varchar(20))+' time(s)' as [Rent Amount]
    from RentalDetail td,CarDetail mCarName,MsCar mm, RentalHeader th
    where mm.LicensePlate=td.LicensePlate and mCarName.CarCode=mm.CarCode and th.TransactionCode=td.TransactionCode
    and CarName not like 'Suzuki%'
    and datename(month,RentTime)='January'
    group by mm.LicensePlate,CarName
    having count(mm.LicensePlate)!=cast(substring(mm.LicensePlate,2,1)as int)
)
select * from v9
drop view v9


--10 tampilkan nama keluarga pelanggan yang di dapat dari kata terakhir, durasi peminjaman dalam hari, RentTime,ReturnTime dimana durasi peminjaman lebih dari 1 hari dan namapelanggan terdiri dari 2 kata dan menit pengembalian mobil lebih besar dari 30
create view v10 as(
    select reverse(left(reverse(CustomerName),charindex(' ',reverse(CustomerName))-1)) as [Last Name],cast(cast((ceiling(cast(datediff(minute,RentTime,ReturnTime) as numeric)/60)/24)as int) as varchar(20))+' Days' as [Duration],RentTime,ReturnTime
    from RentalHeader th,RentalDetail td,MsCustomer mp,MsEmployee mk
    where th.TransactionCode=td.TransactionCode and mp.CustomerCode=th.CustomerCode and mk.EmployeeCode=th.EmployeeCode
    and cast((ceiling(cast(datediff(minute,RentTime,ReturnTime) as numeric)/60)/24)as int) > 1
    and CustomerName like '% %'
    and CustomerName not like '% % %'
    and datename(minute,ReturnTime)>30
)
select * from v10
drop view v10

Praktikum SBD 8c


1.            Insertlah data di bawah ini:

MsEmployee
EmployeeCode
EmployeeName
EmployeeAddress
EmployeePhone
EmployeeSalary
KK001
Wejet Jetjet
Jl. Piggy no.8
0818056457
1300000
KK002
Bobby Aja
Jl. Malioboro no.4
0819964780
1200000
KK003
Sugiri Giri
Jl. suka suka no.958
08155555555
1700000
KK004
Yandi Acek
Jl. Bahagia no.456
08131145622
1800000
KK005
Rheza Aggi
Jl. Kemakmuran no.10
0816523781
1100000
KK006
Devina Depe
Jl. jalan no.45
0816523890
1300000
KK007
Amalia Ameng
Jl. Merdeka no.1945
0823564780
1500000
KK008
Dewi Kyuk
Jl. Hepi no.542
0856964780
1800000
KK009
Ivan Darma
Jl. Kambing no.31
0819999980
1900000
KK010
Fredy Kupred
Jl. Kerbau no.99
0819945680
1750000

MsCustomer
CustomerCode
CustomerName
CustomerAddress
CustomerPhone
KP001
Daniel Suipuit Suex
Jl. Sutomo no.57
081899656745
KP002
Ryan Iyan
Jl. Sutopo no.32
081199652023
KP003
Dion Dewaman
Jl. Kucing no.123
081356789821
KP004
Nopi Enpe
Jl. Lemot Bgt no.33
081567789834
KP005
Robertos Eres
Jl. Damai Banget no.128
081914678913

CarDetail
CarCode
CarName
PricePerHour
KM001
Honda Jazz
26000
KM002
Toyota Avanza
23000
KM003
Toyota Yaris
25000
KM004
Honda Freed
30000
KM005
Toyota Alphard
34000
KM006
Suzuki Swift
24000
KM007
Honda City
27000
KM008
Toyota Innova
28000
KM009
Suzuki APV
27000
KM010
Toyota Fortuner
30000
KM011
Toyota Rush
28000
KM012
Honda CR-V
31000
KM013
Honda Civic
28000

MsCar
LicensePlate
CarCode
B1111DK
KM006
B1234XX
KM001
B1285WE
KM002
B1763CV
KM011
B2548PQ
KM010
B4444WD
KM007
B5287VQ
KM013
B5555GK
KM008
B6666RP
KM009
B7777GG
KM003
B8888MB
KM010
B8889EW
KM005
B9101YY
KM002
B9342JK
KM004
B9654QW
KM012

RentalHeader
TransactionCode
EmployeeCode
CustomerCode
RentTime
TR001
KK002
KP001
2010-01-20 15:00:00.000
TR002
KK001
KP002
2010-01-21 13:31:00.000
TR003
KK003
KP003
2010-01-21 11:50:00.000
TR004
KK005
KP004
2010-01-23 16:10:00.000
TR005
KK004
KP005
2010-01-24 12:30:00.000

RentalDetail
TransactionCode
LicensePlate
ReturnTime
TR001
B1234XX
2010-01-22 16:42:00.000
TR001
B7777GG
2010-01-25 10:54:00.000
TR001
B9101YY
2010-01-23 18:16:00.000
TR001
B9342JK
2010-01-25 13:36:00.000
TR002
B1111DK
2010-01-22 10:45:00.000
TR002
B8889EW
2010-01-22 10:45:00.000
TR003
B1763CV
2010-01-23 14:08:00.000
TR003
B4444WD
2010-01-23 13:38:00.000
TR004
B1285WE
2010-01-25 16:33:00.000
TR004
B2548PQ
2010-01-25 11:03:00.000
TR004
B8888MB
2010-01-25 16:53:00.000
TR005
B5555GK
2010-01-25 13:22:00.000
TR005
B8889EW
2010-01-25 11:18:00.000

2.            Update CustomerName menjadi Ryan Jombang dimana CustomerName adalah Ryan Iyan
 (update)


3.            Update EmployeeSalary, tambahkan sebesar 50% dari gaji sebelumnya dimana digit terakhir dari EmployeeCode merupakan bilangan ganjil
(update,right)

4.            Update PricePerHour menjadi 24000 dimana LicensePlate adalah B9101YY
(update)


5.            Hapuslah data dari tabel CarDetail dimana CarName dari mobil adalah ‘Toyota’ dan CarName diakhiri dengan huruf ‘a’.
(delete,like)


6.            Hapuslah data dari tabel MsCar dimana hasil perkalian dari setiap digit LicensePlate * 10 lebih besar dari PricePerHour dan panjang karakter dari nama mobil yang di dapat dari kata setelah spasi pertama lebih besar dari 7.
(delete,cast,substring,len,charindex)


7.            Tambahkan kolom status pada tabel MsCar dan ubahlah status menjadi ‘Booked’ jika PricePerHour di antara 25000 sampai dengan 30000 dan ubahlan status menjadi ‘Available’ jika PricePerHour tidak di antara 25000 sampai dengan 30000.
(alter table,update,between)


8.            Tambahkan constraint pada tabel RentalHeader dimana 3 digit terakhir dari EmployeeCode harus angka dengan nama constraint ‘constraint’ data yang sudah ada tidak perlu di cek lagi, kemudian hapus constraint tersebut.
(alter table, isnumeric)


9.            Tambahkan constraint pada tabel MsEmployee dimana EmployeeAddress harus di awali dengan kata ‘Jl. ‘, lakukan pengecekan pada data yang sudah ada sebelumnya, kemudian hapus constraint tersebut.
(alter table,check,like)


10.        Hapuslah table RentalDetail(drop table) 


Jawab


/*****************************************************************
    soal 8
******************************************************************/
--1
insert into MsEmployee values('KK001','Wejet Jetjet','Jl. Piggy no.8','0818056457',1300000)
insert into MsEmployee values('KK002','Bobby Aja','Jl. Malioboro no.4','0819964780',1200000)
insert into MsEmployee values('KK003','Sugiri Giri','Jl. suka suka no.958','08155555555',1700000)
insert into MsEmployee values('KK004','Yandi Acek','Jl. Bahagia no.456','08131145622',1800000)
insert into MsEmployee values('KK005','Rheza Aggi','Jl. Kemakmuran no.10','0816523781',1100000)
insert into MsEmployee values('KK006','Devina Depe','Jl. jalan no.45','0816523890',1300000)
insert into MsEmployee values('KK007','Amalia Ameng','Jl. Merdeka no.1945','0823564780',1500000)
insert into MsEmployee values('KK008','Dewi Kyuk','Jl. Hepi no.542','0856964780',1800000)
insert into MsEmployee values('KK009','Ivan Darma','Jl. Kambing no.31','0819999980',1900000)
insert into MsEmployee values('KK010','Fredy Kupred','Jl. Kerbau no.99','0819945680',1750000)


insert into MsCustomer values('KP001','Daniel Suipuit Suex','Jl. Sutomo no.57','081899656745')
insert into MsCustomer values('KP002','Ryan Iyan','Jl. Sutopo no.32','081199652023')
insert into MsCustomer values('KP003','Dion Dewaman','Jl. Kucing no.123','081356789821')
insert into MsCustomer values('KP004','Nopi Enpe','Jl. Lemot Bgt no.33','081567789834')
insert into MsCustomer values('KP005','Robertos Eres','Jl. Damai Banget no.128','081914678913')



insert into CarDetail values('KM001','Honda Jazz',26000)
insert into CarDetail values('KM002','Toyota Avanza',23000)
insert into CarDetail values('KM003','Toyota Yaris',25000)
insert into CarDetail values('KM004','Honda Freed',30000)
insert into CarDetail values('KM005','Toyota Alphard',34000)
insert into CarDetail values('KM006','Suzuki Swift',24000)
insert into CarDetail values('KM007','Honda City',27000)
insert into CarDetail values('KM008','Toyota Innova',28000)
insert into CarDetail values('KM009','Suzuki APV',27000)
insert into CarDetail values('KM010','Toyota Fortuner',30000)
insert into CarDetail values('KM011','Toyota Rush',28000)
insert into CarDetail values('KM012','Honda CR-V',31000)
insert into CarDetail values('KM013','Honda Civic',28000)



insert into MsCar values('B1234XX','KM001')
insert into MsCar values('B9101YY','KM002')
insert into MsCar values('B7777GG','KM003')
insert into MsCar values('B9342JK','KM004')
insert into MsCar values('B8889EW','KM005')
insert into MsCar values('B1111DK','KM006')
insert into MsCar values('B4444WD','KM007')
insert into MsCar values('B5555GK','KM008')
insert into MsCar values('B6666RP','KM009')
insert into MsCar values('B8888MB','KM010')
insert into MsCar values('B1763CV','KM011')
insert into MsCar values('B9654QW','KM012')
insert into MsCar values('B5287VQ','KM013')
insert into MsCar values('B1285WE','KM002')
insert into MsCar values('B2548PQ','KM010')


insert into RentalHeader values('TR001','KK002','KP001','01/20/2010 15:00:00')
insert into RentalHeader values('TR002','KK001','KP002','01/21/2010 13:31:00')
insert into RentalHeader values('TR003','KK003','KP003','01/21/2010 11:50:00')
insert into RentalHeader values('TR004','KK005','KP004','01/23/2010 16:10:00')
insert into RentalHeader values('TR005','KK004','KP005','01/24/2010 12:30:00')


insert into RentalDetail values('TR001','B1234XX','01/22/2010 16:42:00')
insert into RentalDetail values('TR001','B9101YY','01/23/2010 18:16:00')
insert into RentalDetail values('TR001','B7777GG','01/25/2010 10:54:00')
insert into RentalDetail values('TR001','B9342JK','01/25/2010 13:36:00')
insert into RentalDetail values('TR002','B8889EW','01/22/2010 10:45:00')
insert into RentalDetail values('TR002','B1111DK','01/22/2010 10:45:00')

insert into RentalDetail values('TR003','B4444WD','01/23/2010 13:38:00')
insert into RentalDetail values('TR003','B1763CV','01/23/2010 14:08:00')

insert into RentalDetail values('TR004','B2548PQ','01/25/2010 11:03:00')
insert into RentalDetail values('TR004','B1285WE','01/25/2010 16:33:00')
insert into RentalDetail values('TR004','B8888MB','01/25/2010 16:53:00')

insert into RentalDetail values('TR005','B5555GK','01/25/2010 13:22:00')
insert into RentalDetail values('TR005','B8889EW','01/25/2010 11:18:00')

select * from MsEmployee
select * from MsCustomer
select * from CarDetail
select * from MsCar
select * from RentalHeader
select * from RentalDetail

--2 ubah nama pelanggan menjadi ryan jombang dimana namapelanggan Ryan Iyan
update MsCustomer set CustomerName='Ryan Jombang' where CustomerName='Ryan Iyan'
select * from MsCustomer

--3 tambahkan gaji karyawan sebesar 50% dimana digit terakhir dr kd karyawan merupakan bilangan ganjil
update MsEmployee set EmployeeSalary=(0.5*EmployeeSalary)+EmployeeSalary where right(EmployeeCode,1)%2=1
select * from MsEmployee

--4 ubahlah harga sewa mobil dengan no plat B9101YY menjadi 24000
update CarDetail set PricePerHour='24000' from MsCar m,CarDetail mm where m.CarCode=mm.CarCode and m.LicensePlate='B9101YY'
select * from CarDetail

--5 hapus data dari CarDetail dimana CarName dari mobil adalah toyota dan huruf terakhir dari CarName mobil adalah 'a'
delete from CarDetail where CarName like 'toyota%a'
select * from CarDetail

--6 hapus data dari MsCar dimana hasil perkalian dari LicensePlate mobil *10 > dari PricePerHour dan panjang karakter dari nama CarName mobil >7
delete MsCar from MsCar m join CarDetail mm on mm.CarCode=m.CarCode
where (cast(substring(LicensePlate,2,1) as int)*cast(substring(LicensePlate,3,1) as int)*cast(substring(LicensePlate,4,1) as int)*cast(substring(LicensePlate,5,1) as int))*10 > PricePerHour
and len(substring(CarName,charindex(' ',CarName)+1,len(CarName)))>7
select * from MsCar

--7 tambahkan column status pada MsCar dan ubah lah status menjadi 'Booked' dimana PricePerHour di antara 25000-30000 dan ubah lah status menjadi 'Available' dimana PricePerHour tidak di antara 25000-30000
alter table MsCar
add status varchar(20)
update MsCar set status='Booked' from MsCar m,CarDetail mm where m.CarCode=mm.CarCode and PricePerHour between 25000 and 30000
update MsCar set status='Avalable' from MsCar m,CarDetail mm where m.CarCode=mm.CarCode and PricePerHour  not between 25000 and 30000
select * from MsCar

--8 tambahkan constraint pada tabel RentalHeader dimana 3 digit terakhir dari EmployeeCode harus angka dengan nama constraint 'constraint' kemudian hapus constraint tersebut
alter table RentalHeader with nocheck
add constraint [constraint] check(isNumeric(right(EmployeeCode,3))=1)
alter table RentalHeader
drop constraint [constraint]
select * from RentalHeader

--9 tambahkan constraint pada tabel MsEmployee dimana EmployeeAddress harus di awali dengan kata 'Jl. ' dan data yang sudah ada harus di cek, kemudian hapus constraint tsb
alter table MsEmployee with check
add constraint [constraint1] check(EmployeeAddress like 'Jl. %')
alter table MsEmployee
drop constraint [constraint1]
select * from MsEmployee

--10 hapus lah table RentalDetail
drop table RentalDetail