Pratikum Pemrograman Basis Data | Pertemuan 4

Nama : Anggun Maylani

NPM : 19312154

Kelas : IF 19 D

Mata Kuliah : Pemrograman Basis Data

Universitas : https://teknokrat.ac.id/  

Fakultas : https://ftik.teknokrat.ac.id

DML dan SELECT

1. Buatlah Database dan Strukur Tabel

Membuat database :

create database PBD_AnggunMaylani 

Masuk ke dalam database :

use [PBD_AnggunMaylani] 

Membuat table pelanggan : 

create table pelanggan ( 

KodePelanggan char(5) primary key, 

NamaPelanggan varchar(25) not null, 

AlamatPelanggan varchar(50) not null ) 

Membuat table barang :

create table barang ( 

KodeBarang char(5) primary key, 

NamaBarang varchar(25) not null, 

HargaBarang int not null, 

StokBarang int not null, 

Satuan varchar(15) not null ) 

Membuat tabel kwitansi :

create table kwitansi ( 

NomorKwitansi char(5) primary key, 

TanggalKwitansi date not null, 

KodePelanggan char(5) not null foreign key references pelanggan(KodePelanggan) ) 

create table detail_kwitansi ( 

NomorKwitansi char(5) not null foreign key references kwitansi(NomorKwitansi), 

KodeBarang char(5) not null foreign key references barang(KodeBarang), 

jumlahjual int not null )

2. Tampilkan Relasi Antar Tabel

3. Menyimpan data ke dalam tabel pelanggan 

insert into pelanggan values 

('P0090','Dhani','Bandar Lampung'),

('P0091','Ahmad','Lampung Selatan'),

('P0092','Ali','Lampung Timur')

4. Ubah nama pelanggan

update pelanggan set NamaPelanggan = 'Doni' 

where NamaPelanggan = 'Dhani'

5. Mengubah data pelanggan

update pelanggan set NamaPelanggan = 'Adi', 

AlamatPelanggan = 'Bandar Lampung' where 

KodePelanggan = 'P0092'

6. Menghapus data pada tabel pelanggan 

delete from pelanggan where KodePelanggan = 'P0091'

7. Menyimpan data pada tabel pelanggan 

insert into pelanggan values (

'P0001','aditya','Bandar Lampung'), 

('P0002','nandi','Lampung Barat'), 

('P0003','indrajat','Lampung Selatan'),

('P0004','ali','Bandar Lampung'), 

('P0005','agung p','Lampung Selatan'), 

('P0006','dedi','Lampung Selatan'), 

('P0007','rhendy','Lampung Selatan'), 

('P0008','lulus','Lampung Timur'), 

('P0009','alipi','Bandar Lampung'), 

('P0010','indra','Bandar Lampung'), 

('P0011','wigo','Bandar Lampung'), 

('P0012','andika','Bandar Lampung'), 

('P0013','alfian','Bandar Lampung'), 

('P0014','fahmi','Lampung Barat'), 

('P0015','afrand','Bandar Lampung'), 

('P0016','ebi','Bandar Lampung'), 

('P0017','agung','Bandar Lampung'), 

('P0018','mahono','Bandar Lampung'), 

('P0019','yuda','Bandar Lampung'), 

('P0020','arsy','Lampung Timur'), 

('P0021','nurman','Lampung Selatan'), 

('P0022','yogi','Bandar Lampung'), 

('P0023','apriyani','Bandar Lampung'), 

('P0024','latiful','Bandar Lampung'), 

('P0025','bima','Lampung Barat'), 

('P0026','bagas','Bandar Lampung'), 

('P0027','aska','Bandar Lampung'), 

('P0028','alfian','Bandar Lampung'), 

('P0029','kevin','Bandar Lampung'), 

('P0030','jala','Lampung Timur'), 

('P0031','apry','Lampung Timur'), 

('P0032','grenci','Bandar Lampung'), 

('P0033','niko','Bandar Lampung'), 

('P0034','rindu','Lampung Barat')

8. Menyimpan data barang pada file csv 

BULK INSERT barang 

FROM 'E:\SEMESTER 4\PBD\19312154_AnggunMaylani_IF19D\DataBarang.csv' 

WITH ( 

FIRSTROW = 2, 

FIELDTERMINATOR = ';', 

ROWTERMINATOR = '\n' ) 

GO

Soal SELECT

1. Tampilkan seluruh data pada tabel pelanggan

select * from pelanggan

2.  Tampilkan seluruh data Nama dan Alamat pada tabel pelanggan

select NamaPelanggan, AlamatPelanggan from pelanggan

3. Tampilkan berasal dari alamat (kota) mana saja pelanggan yang ada di tabel pelanggan 

select distinct AlamatPelanggan from pelanggan

4. Tampilkan seluruh data pada tabel pelanggan yang beralamat di Bandar Lampung

select * from pelanggan where AlamatPelanggan = 'Bandar Lampung'

5. Tampilkan seluruh data pada tabel pelanggan yang tidak beralamat di bandar lampung

select * from pelanggan where AlamatPelanggan != 'Bandar Lampung'

6. Tampilkan seluruh data pada tabel pelanggan yang memiliki nama depan huruf ‘a’ 

select * from pelanggan where NamaPelanggan like 'a%'

7. Tampilkan seluruh data pada tabel pelanggan yang memiliki nama belakang dengan akhiran ‘i’ yang beralamat di Bandar Lampung 

select * from pelanggan where NamaPelanggan like '%i' and AlamatPelanggan = 'Bandar Lampung'

8. Tampilkan seluruh data pada tabel barang yang memiliki harga lebih dari 500.000 

select * from barang where HargaBarang > 500000

9. Tampilkan data berupa nama barang, harga, stok dan satuan pada tabel barang yang memilki nama depan huruf ‘H’ atau ’A’ yang memiliki harga lebih dari 3 juta dan memiliki satuan pcs

select NamaBarang, HargaBarang, StokBarang, Satuan from barang where NamaBarang like 'H%' or NamaBarang like 'A%' and HargaBarang > 3000000 and Satuan = 'pcs'

10. Tampilkan seluruh data pada tabel barang yang memiliki harga antara 500.00 sampai 1.500.000 yang diurutkan secara descending

select * from barang where HargaBarang between 500 and 1500000 order by HargaBarang desc