SET PAGE OFF
SET PRINT OFF
SET ECHO OFF
SET TERMOUT OFF
SET SERVEROUTPUT ON SIZE 1000000
SPOOL C:\temp\test.txt

DEFINE p_var NUMBER;
BEGIN
  p_var := 10;
  DBMS_OUTPUT.PUT_LINE('Value of p_var: ' || p_var);
END;

DECLARE
  TYPE t_numbers IS TABLE OF NUMBER INDEX BY PLS_INTEGER;
  v_numbers t_numbers;
BEGIN
  v_numbers(1) := 10;
  v_numbers(2) := 20;
  DBMS_OUTPUT.PUT_LINE('Sum: ' || (v_numbers(1) + v_numbers(2)));
END;

DECLARE
  v_counter NUMBER := 0;
BEGIN
  FOR i IN 1..100 LOOP
    v_counter := v_counter + 1;
  END LOOP;
  DBMS_OUTPUT.PUT_LINE('Counter: ' || v_counter);
END;

CREATE OR REPLACE TYPE t_person AS OBJECT (
  name VARCHAR2(100),
  age NUMBER
);
/
DECLARE
  v_person t_person := t_person('John', 30);
BEGIN
  DBMS_OUTPUT.PUT_LINE('Name: ' || v_person.name || ', Age: ' || v_person.age);
END;

DECLARE
  v_var1 NUMBER := 10;
  v_var2 NUMBER := 20;
BEGIN
  IF v_var1 > v_var2 THEN
    DBMS_OUTPUT.PUT_LINE('v_var1 is greater');
  ELSE
    DBMS_OUTPUT.PUT_LINE('v_var2 is greater');
  END IF;
END;