Dasar PL/SQL

Tujuan pembelajaran

1. Menjelaskan pembagian kerja PL/SQL engine dan SQL engine.
2. Menulis anonymous block DECLARE, BEGIN, EXCEPTION, END dengan delimiter client yang tepat.
3. Menggunakan variabel, konstanta, assignment, %TYPE dan %ROWTYPE.
4. Membaca tepat satu baris melalui SELECT INTO serta membedakan kardinalitas nol dan banyak.
5. Menampilkan pesan diagnostik DBMS_OUTPUT tanpa menganggapnya commit.

Pokok bahasan / praktikum

Prasyarat: Selesaikan modul 02/03 atau jalankan setup bersama sekali pada schema latihan sendiri. Gunakan Oracle XE lokal melalui SQL Developer ATAU Oracle FreeSQL setelah login pada schema pribadi yang diizinkan; tidak harus memakai keduanya. Jangan menjalankan ulang CREATE TABLE/seed pada objek yang sudah ada. Selesaikan modul SQL sebelumnya; modul 10 juga memerlukan dasar blok modul 09.

Video pembelajaran

Video utama — fokus bab ini

Struktur anonymous block DECLARE–BEGIN–EXCEPTION–END dan DBMS_OUTPUT. Referensi tambahan memperluas variabel, konstanta, SELECT dan %TYPE/%ROWTYPE.

PL/SQL Block Structure | Anonymous Block | How to write Hello World Program in PL/SQL| TechnonTechTV
TechnonTechTV · Buka video utama di YouTube

Video tambahan sesuai subtopik

1. MASTER Oracle PLSQL in 30 Days or LESS!
   NIC IT ACADEMY

   Fokus: Variabel, konstanta, SELECT/DML dalam blok dan %TYPE/%ROWTYPE.

   Rentang yang disarankan: 00:29:08–01:42:38; lanjut control structure pada pertemuan10.

Batas cakupan dan panduan menonton: Video utama memakai Oracle11g untuk konsep blok. Pilih bagian fundamental pada referensi panjang, bukan seluruh kursus; langkah editor menyesuaikan XE/FreeSQL.

Video merupakan pendamping, bukan pengganti keseluruhan bab. Pemeriksaan relevansi memakai transkrip yang tersedia, deskripsi pembuat dan bab waktu; bukan klaim seluruh durasi telah ditonton. Versi/editor atau bahasa dapat berbeda. Praktikum tetap mengikuti SQL/PLSQL Oracle pada halaman dan pilihan XE atau FreeSQL login. Jika pemutar dibatasi oleh YouTube, gunakan tautan Buka video.

Praktikum Oracle XE atau FreeSQL

Gunakan FreeSQL dengan login atau SQL Developer yang terhubung ke XE. Baca panduan dua jalur praktikum. Jalankan kode sesuai urutan dan keterangan tiap langkah.

Output contoh adalah prediksi berdasarkan dataset, bukan bukti bahwa kode telah dijalankan pada akun Anda. Periksa koneksi, hak membuat objek, autocommit dan panel DBMS_OUTPUT. Slash pada baris sendiri adalah pemisah mode skrip klien tertentu, bukan statement PL/SQL.

Gunakan tabel pertemuan02 dan data pertemuan03 atau setup index sekali. Periksa keadaan data bila latihan sebelumnya pernah di-commit. Jangan menjalankan ulang CREATE TABLE/INSERT atau menghapus data secara buta.

BEGIN
  DBMS_OUTPUT.PUT_LINE('Blok PL/SQL berjalan');
END;
/

DECLARE
  v_jumlah PLS_INTEGER := 2;
  v_harga NUMBER(12,2) := 30000;
  c_diskon CONSTANT NUMBER := 0.10;
  v_total NUMBER(12,2);
BEGIN
  v_total := v_jumlah * v_harga;
  v_total := v_total * (1 - c_diskon);
  DBMS_OUTPUT.PUT_LINE('Jumlah = ' || v_jumlah);
  DBMS_OUTPUT.PUT_LINE('Total setelah diskon = ' || v_total);
END;
/

DECLARE
  v_id pelanggan_demo.id_pelanggan%TYPE := 1;
  v_nama pelanggan_demo.nama%TYPE;
  v_kota pelanggan_demo.kota%TYPE;
BEGIN
  SELECT nama, kota INTO v_nama, v_kota
  FROM pelanggan_demo WHERE id_pelanggan = v_id;
  DBMS_OUTPUT.PUT_LINE(v_nama || ' / ' || NVL(v_kota, 'Kota belum diisi'));
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    DBMS_OUTPUT.PUT_LINE('ID pelanggan tidak ditemukan');
  WHEN TOO_MANY_ROWS THEN
    DBMS_OUTPUT.PUT_LINE('Query melanggar kontrak satu baris');
END;
/

DECLARE
  r_produk produk_demo%ROWTYPE;
BEGIN
  SELECT * INTO r_produk FROM produk_demo WHERE id_produk = 11;
  DBMS_OUTPUT.PUT_LINE(r_produk.nama_produk || ' stok=' || r_produk.stok);
  DBMS_OUTPUT.PUT_LINE('Harga=' || r_produk.harga);
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    DBMS_OUTPUT.PUT_LINE('Produk tidak ditemukan');
END;
/

DECLARE
  v_nama pelanggan_demo.nama%TYPE;
BEGIN
  BEGIN
    SELECT nama INTO v_nama FROM pelanggan_demo WHERE 1 = 0;
  EXCEPTION
    WHEN NO_DATA_FOUND THEN
      DBMS_OUTPUT.PUT_LINE('Percobaan nol baris: NO_DATA_FOUND');
  END;
  BEGIN
    SELECT nama INTO v_nama FROM pelanggan_demo;
    DBMS_OUTPUT.PUT_LINE('Tabel ternyata hanya berisi satu baris');
  EXCEPTION
    WHEN NO_DATA_FOUND THEN
      DBMS_OUTPUT.PUT_LINE('Tabel kosong');
    WHEN TOO_MANY_ROWS THEN
      DBMS_OUTPUT.PUT_LINE('Percobaan banyak baris: TOO_MANY_ROWS');
  END;
  DBMS_OUTPUT.PUT_LINE('Blok luar tetap dilanjutkan');
END;
/

DECLARE
  v_banyak NUMBER;
  v_teks VARCHAR2(20) := '';
BEGIN
  SELECT COUNT(*) INTO v_banyak FROM penjualan_demo WHERE 1 = 0;
  DBMS_OUTPUT.PUT_LINE('COUNT kosong = ' || v_banyak);
  DBMS_OUTPUT.PUT_LINE('Teks kosong ditampilkan sebagai: ' || NVL(v_teks, 'NULL'));
END;
/

Tugas / latihan

1. Pada XE ATAU FreeSQL schema pribadi, buat anonymous block dengan variabel, konstanta dan assignment; lampirkan output aktual dan cara mengaktifkan output.
2. Gunakan %TYPE untuk mengambil satu pelanggan dan %ROWTYPE untuk satu produk; jelaskan syarat jumlah baris.
3. Uji SELECT INTO untuk tepat satu, nol dan banyak baris dalam subblok berhandler. Bandingkan dengan COUNT(*) tanpa GROUP BY pada himpunan kosong.

Pertanyaan analisis

1. Mengapa menyalin %TYPE tidak berarti semua aturan CHECK dan DEFAULT tabel telah menjadi aturan variabel?
2. Jelaskan jalur client, PL/SQL engine, SQL engine dan buffer DBMS_OUTPUT pada satu blok SELECT INTO.

Pengumpulan

Tugas boleh dikerjakan di Oracle XE lokal atau FreeSQL dengan login; cukup pilih salah satu. Kumpulkan satu laporan melalui LMS/kanal yang ditetapkan dosen. Cantumkan Nama, NPM, pertemuan dan lingkungan yang dipakai. Sertakan kode SQL/PLSQL sebagai teks, output aktual atau pesan error, serta jawaban analisis.

Jika FreeSQL menyediakan tautan berbagi yang dapat diakses dosen, tautan boleh ditambahkan sebagai bukti pendamping, bukan pengganti hasil eksekusi yang terdokumentasi. Jangan membagikan password, token atau koneksi pribadi.

Hasil yang belum dieksekusi diberi label “prediksi”. Screenshot ilustrasi browser bukan bukti praktikum Oracle.

Rubrik penilaian

• Ketepatan konsep dan rancangan: 20%
• Kebenaran query/program: 30%
• Pengujian normal, batas dan gagal: 20%
• Analisis serta penjelasan hasil: 20%
• Identitas dan kerapian laporan: 10%

Referensi resmi

• Oracle 19c — Architecture of PL/SQL
• Oracle 19c — Language Fundamentals
• Oracle 19c — SELECT INTO
• Oracle 19c — DBMS_OUTPUT

Panduan XE21c digunakan untuk konteks instalasi lokal; dokumentasi SQL/PLSQL untuk konsep bahasa. Versi FreeSQL/editor dapat berbeda, sehingga periksa fitur dan pesan aktual.