BD lab 1

1.
SET SERVEROUTPUT ON;

DECLARE
nume VARCHAR2(30) := 'Acroitoritei';
prenume nume%TYPE := 'Calin';
grupa INT := 3141;
data DATE := SYSDATE;

BEGIN
DBMS_OUTPUT.PUT_LINE ('Hello world!');
DBMS_OUTPUT.PUT_LINE (nume || ' ' || prenume || ' ' || grupa || ' ' || data);

END;

2.
SET SERVEROUTPUT ON;

DECLARE
a REAL := 3;
b REAL := 154;
rez REAL:= a + b;

BEGIN
DBMS_OUTPUT.PUT_LINE(rez);


END;

3.
SET SERVEROUTPUT ON;

DECLARE
v_nume Employees.last_name%TYPE;

BEGIN
SELECT last_name INTO v_nume FROM employees WHERE employee_id = 100;
DBMS_OUTPUT.PUT_LINE(v_nume);

END;

4.
SET SERVEROUTPUT ON;

DECLARE
v_sal Employees.salary%TYPE;

BEGIN
SELECT salary INTO v_sal FROM employees WHERE last_name LIKE 'Popp';
DBMS_OUTPUT.PUT_LINE(v_sal);

END;

5.
SET SERVEROUTPUT ON;

DECLARE
v_sal Employees.salary%TYPE;

BEGIN
SELECT salary INTO v_sal FROM employees WHERE last_name LIKE 'Popp';
DBMS_OUTPUT.PUT_LINE(v_sal);

v_sal := 666;
UPDATE employees SET salary  = v_sal WHERE last_name = 'Popp';
END;

6.
SET SERVEROUTPUT ON;

DECLARE
nr_emp INT;

BEGIN
SELECT COUNT(*) INTO nr_emp FROM employees WHERE department_id = 30;
DBMS_OUTPUT.PUT_LINE(nr_emp);

END;

7.
--deps_calin
SET SERVEROUTPUT ON;

DECLARE
max_dept_id INT;
dep_name VARCHAR(20) := 'Departament nou';
man_id INT := 33;
loc_id INT := 103;

BEGIN
SELECT MAX(department_id) INTO max_dept_id FROM departments;
DBMS_OUTPUT.PUT_LINE(max_dept_id);
INSERT INTO deps_calin VALUES(max_dept_id + 1 , dep_name, man_id, loc_id);

END;