SELECT OWNER, TABLE_NAME
FROM ALL_TABLES
WHERE OWNER='SCOTT'| OWNER | TABLE_NAME |
|---|---|
| SCOTT | DEPT |
| SCOTT | EMP |
SELECT * FROM SCOTT.DEPT| DEPTNO | DNAME | LOC |
|---|---|---|
| 10 | ACCOUNTING | NEW YORK |
| 20 | RESEARCH | DALLAS |
| 30 | SALES | CHICAGO |
| 40 | OPERATIONS | BOSTON |
SELECT * FROM SCOTT.EMP| EMPNO | ENAME | JOB | MGR | HIREDATE | SAL | COMM | DEPTNO |
|---|---|---|---|---|---|---|---|
| 7839 | KING | PRESIDENT | - | 17-NOV-81 | 5000 | - | 10 |
| 7698 | BLAKE | MANAGER | 7839 | 01-MAY-81 | 2850 | - | 30 |
| 7782 | CLARK | MANAGER | 7839 | 09-JUN-81 | 2450 | - | 10 |
| 7566 | JONES | MANAGER | 7839 | 02-APR-81 | 2975 | - | 20 |
| 7788 | SCOTT | ANALYST | 7566 | 19-APR-87 | 3000 | - | 20 |
| 7902 | FORD | ANALYST | 7566 | 03-DEC-81 | 3000 | - | 20 |
| 7369 | SMITH | CLERK | 7902 | 17-DEC-80 | 800 | - | 20 |
| 7499 | ALLEN | SALESMAN | 7698 | 20-FEB-81 | 1600 | 300 | 30 |
| 7521 | WARD | SALESMAN | 7698 | 22-FEB-81 | 1250 | 500 | 30 |
| 7654 | MARTIN | SALESMAN | 7698 | 28-SEP-81 | 1250 | 1400 | 30 |
| 7844 | TURNER | SALESMAN | 7698 | 08-SEP-81 | 1500 | 0 | 30 |
| 7876 | ADAMS | CLERK | 7788 | 23-MAY-87 | 1100 | - | 20 |
| 7900 | JAMES | CLERK | 7698 | 03-DEC-81 | 950 | - | 30 |
| 7934 | MILLER | CLERK | 7782 | 23-JAN-82 | 1300 | - | 10 |
DECLARE
BEGIN
FOR i IN (SELECT * FROM SCOTT.EMP)
LOOP
DBMS_OUTPUT.PUT_LINE('EMPNO: '|| i.EMPNO ||', ENAME: '||i.ENAME||', JOB: '||i.JOB);
END LOOP;
END;Statement processed.
EMPNO: 7839, ENAME: KING, JOB: PRESIDENT
EMPNO: 7698, ENAME: BLAKE, JOB: MANAGER
EMPNO: 7782, ENAME: CLARK, JOB: MANAGER
EMPNO: 7566, ENAME: JONES, JOB: MANAGER
EMPNO: 7788, ENAME: SCOTT, JOB: ANALYST
EMPNO: 7902, ENAME: FORD, JOB: ANALYST
EMPNO: 7369, ENAME: SMITH, JOB: CLERK
EMPNO: 7499, ENAME: ALLEN, JOB: SALESMAN
EMPNO: 7521, ENAME: WARD, JOB: SALESMAN
EMPNO: 7654, ENAME: MARTIN, JOB: SALESMAN
EMPNO: 7844, ENAME: TURNER, JOB: SALESMAN
EMPNO: 7876, ENAME: ADAMS, JOB: CLERK
EMPNO: 7900, ENAME: JAMES, JOB: CLERK
EMPNO: 7934, ENAME: MILLER, JOB: CLERK
DECLARE
angkaAwal Number := 1;
angkaAkhir Number := 5;
BEGIN
FOR k IN angkaAwal .. angkaAkhir
LOOP
IF MOD(k, 2) = 0
THEN DBMS_OUTPUT.PUT_LINE('Angka '|| k ||' Bilangan Genap');
ELSIF MOD(k, 2) = 1
THEN DBMS_OUTPUT.PUT_LINE('Angka '|| k ||' Bilangan Ganjil');
END IF;
END LOOP;
END;Statement processed.
Angka 1 Bilangan Ganjil
Angka 2 Bilangan Genap
Angka 3 Bilangan Ganjil
Angka 4 Bilangan Genap
Angka 5 Bilangan Ganjil