Coleções Multidimensionais no Oracle PL/SQL:

As Coleções Multidimensionais no Oracle PL/SQL representam uma estrutura de dados complexa e poderosa, essencial para o desenvolvimento de aplicações de banco de dados sofisticadas. Este artigo técnico explorará em profundidade a arquitetura, implementação e otimização dessas estruturas.

1. O que são Coleções Multidimensionais?

Imagine uma planilha Excel. Você tem linhas e colunas, certo? Agora, imagine que cada célula dessa planilha pode conter outra planilha inteira. Isso é essencialmente o que uma coleção multidimensional faz no mundo da programação!

Em termos técnicos, uma coleção multidimensional no PL/SQL é uma estrutura de dados onde cada elemento é, por sua vez, outra coleção. Isso nos permite criar estruturas de dados complexas e hierárquicas dentro de um único objeto.

1.1 Por que usar Coleções Multidimensionais?

Organização Complexa de Dados: Ideal para representar estruturas hierárquicas ou matriciais.
Flexibilidade: Permite armazenar e acessar dados de maneiras sofisticadas.
Eficiência de Memória: Em certos casos, pode ser mais eficiente do que usar múltiplas tabelas relacionais.
Processamento In-Memory: Facilita operações complexas sem necessidade de múltiplos acessos ao banco de dados.

2. Tipos de Coleções Multidimensionais

No Oracle PL/SQL, podemos criar coleções multidimensionais usando os três tipos de coleções que já conhecemos:

VARRAYs de VARRAYs: Arrays de tamanho variável contendo outros arrays.
Nested Tables de Nested Tables: Tabelas aninhadas contendo outras tabelas aninhadas.
Associative Arrays de VARRAYs ou Nested Tables: Arrays associativos (index-by tables) contendo outros tipos de coleções.

Vamos explorar cada um desses tipos em detalhes.

3. VARRAY de VARRAYs: Um Exemplo Detalhado

Vamos criar um exemplo usando o schema HR do Oracle. Imaginaremos um cenário onde queremos armazenar as habilidades dos funcionários por departamento.

DECLARE
    -- Definindo um VARRAY para habilidades de um funcionário
    TYPE employee_skills_type IS VARRAY(5) OF VARCHAR2(50);
    
    -- Definindo um VARRAY de VARRAYs para habilidades por departamento
    TYPE department_skills_type IS VARRAY(10) OF employee_skills_type;
    
    -- Declarando a variável principal
    v_dept_skills department_skills_type := department_skills_type();
    
    -- Cursor para buscar departamentos
    CURSOR c_departments IS
        SELECT department_id, department_name
        FROM departments
        WHERE department_id IN (60, 90, 100)  -- IT, Executive, Finance
        ORDER BY department_id;
    
    -- Variável para armazenar habilidades temporariamente
    v_emp_skills employee_skills_type;

BEGIN
    -- Inicializando o VARRAY externo
    v_dept_skills.EXTEND(3);
    
    -- Preenchendo o VARRAY de VARRAYs
    FOR dept IN c_departments LOOP
        CASE dept.department_id
            WHEN 60 THEN  -- IT
                v_emp_skills := employee_skills_type('Java', 'SQL', 'PL/SQL', 'Python', 'Oracle');
            WHEN 90 THEN  -- Executive
                v_emp_skills := employee_skills_type('Leadership', 'Strategy', 'Finance', 'Communication');
            WHEN 100 THEN  -- Finance
                v_emp_skills := employee_skills_type('Accounting', 'Financial Analysis', 'Budgeting', 'Forecasting');
            ELSE
                v_emp_skills := employee_skills_type('General Skills');
        END CASE;
        
        v_dept_skills(dept.department_id / 30) := v_emp_skills;
        
        -- Exibindo as habilidades do departamento
        DBMS_OUTPUT.PUT_LINE('Departamento: ' || dept.department_name);
        FOR i IN 1..v_emp_skills.COUNT LOOP
            DBMS_OUTPUT.PUT_LINE('  Habilidade ' || i || ': ' || v_emp_skills(i));
        END LOOP;
        DBMS_OUTPUT.PUT_LINE('---');
    END LOOP;
    
    -- Acessando elementos específicos
    DBMS_OUTPUT.PUT_LINE('Habilidade específica:');
    DBMS_OUTPUT.PUT_LINE('Dept IT, Habilidade 3: ' || v_dept_skills(2)(3));  -- PL/SQL
    DBMS_OUTPUT.PUT_LINE('Dept Executive, Habilidade 2: ' || v_dept_skills(3)(2));  -- Strategy
END;
/

DECLARE

-- Definindo um VARRAY para habilidades de um funcionário

TYPE employee_skills_type IS VARRAY(5) OF VARCHAR2(50);

-- Definindo um VARRAY de VARRAYs para habilidades por departamento

TYPE department_skills_type IS VARRAY(10) OF employee_skills_type;

-- Declarando a variável principal

v_dept_skills department_skills_type := department_skills_type();

-- Cursor para buscar departamentos

CURSOR c_departments IS

SELECT department_id, department_name

FROM departments

WHERE department_id IN (60, 90, 100) -- IT, Executive, Finance

ORDER BY department_id;

-- Variável para armazenar habilidades temporariamente

v_emp_skills employee_skills_type;

BEGIN

-- Inicializando o VARRAY externo

v_dept_skills.EXTEND(3);

-- Preenchendo o VARRAY de VARRAYs

FOR dept IN c_departments LOOP

CASE dept.department_id

WHEN 60 THEN -- IT

v_emp_skills := employee_skills_type('Java', 'SQL', 'PL/SQL', 'Python', 'Oracle');

WHEN 90 THEN -- Executive

v_emp_skills := employee_skills_type('Leadership', 'Strategy', 'Finance', 'Communication');

WHEN 100 THEN -- Finance

v_emp_skills := employee_skills_type('Accounting', 'Financial Analysis', 'Budgeting', 'Forecasting');

ELSE

v_emp_skills := employee_skills_type('General Skills');

END CASE;

v_dept_skills(dept.department_id / 30) := v_emp_skills;

-- Exibindo as habilidades do departamento

DBMS_OUTPUT.PUT_LINE('Departamento: ' || dept.department_name);

FOR i IN 1..v_emp_skills.COUNT LOOP

DBMS_OUTPUT.PUT_LINE(' Habilidade ' || i || ': ' || v_emp_skills(i));

END LOOP;

DBMS_OUTPUT.PUT_LINE('---');

END LOOP;

-- Acessando elementos específicos

DBMS_OUTPUT.PUT_LINE('Habilidade específica:');

DBMS_OUTPUT.PUT_LINE('Dept IT, Habilidade 3: ' || v_dept_skills(2)(3)); -- PL/SQL

DBMS_OUTPUT.PUT_LINE('Dept Executive, Habilidade 2: ' || v_dept_skills(3)(2)); -- Strategy

END;

Análise Detalhada Passo a Passo:

Definição de Tipos Personalizados

TYPE employee_skills_type IS VARRAY(5) OF VARCHAR2(50);
TYPE department_skills_type IS VARRAY(10) OF employee_skills_type;

1 2	TYPE employee_skills_type IS VARRAY(5) OF VARCHAR2(50); TYPE department_skills_type IS VARRAY(10) OF employee_skills_type;

employee_skills_type: Um VARRAY que pode conter até 5 habilidades (strings) de um funcionário.
department_skills_type: Um VARRAY que pode conter até 10 employee_skills_type, efetivamente criando um VARRAY de VARRAYs.

Esta estrutura permite uma organização hierárquica dos dados, onde cada departamento pode ter múltiplas habilidades associadas.

Implementação Detalhada

Declaração de Variáveis Principais

v_dept_skills department_skills_type := department_skills_type();
v_emp_skills employee_skills_type;

1 2	v_dept_skills department_skills_type := department_skills_type(); v_emp_skills employee_skills_type;

v_dept_skills: A variável principal que armazenará todas as habilidades por departamento.
v_emp_skills: Uma variável temporária para manipular as habilidades de um departamento específico.

Cursor para Seleção de Departamentos

CURSOR c_departments IS
    SELECT department_id, department_name
    FROM departments
    WHERE department_id IN (60, 90, 100)
    ORDER BY department_id;

CURSOR c_departments IS

SELECT department_id, department_name

FROM departments

WHERE department_id IN (60, 90, 100)

ORDER BY department_id;

Este cursor é crucial para a seleção dos departamentos específicos (IT, Executive, Finance) que serão processados.

Lógica de Processamento

Inicialização do VARRAY Externo

v_dept_skills.EXTEND(3);

1	v_dept_skills.EXTEND(3);

Esta linha aloca espaço para 3 elementos no VARRAY externo, preparando-o para armazenar dados de três departamentos.

Loop Principal e Atribuição de Habilidades

FOR dept IN c_departments LOOP
    CASE dept.department_id
        WHEN 60 THEN  -- IT
            v_emp_skills := employee_skills_type('Java', 'SQL', 'PL/SQL', 'Python', 'Oracle');
        WHEN 90 THEN  -- Executive
            v_emp_skills := employee_skills_type('Leadership', 'Strategy', 'Finance', 'Communication');
        WHEN 100 THEN  -- Finance
            v_emp_skills := employee_skills_type('Accounting', 'Financial Analysis', 'Budgeting', 'Forecasting');
        ELSE
            v_emp_skills := employee_skills_type('General Skills');
    END CASE;
    
    v_dept_skills(dept.department_id / 30) := v_emp_skills;
    
    -- Código para exibição das habilidades...
END LOOP;

FOR dept IN c_departments LOOP

CASE dept.department_id

WHEN 60 THEN -- IT

v_emp_skills := employee_skills_type('Java', 'SQL', 'PL/SQL', 'Python', 'Oracle');

WHEN 90 THEN -- Executive

v_emp_skills := employee_skills_type('Leadership', 'Strategy', 'Finance', 'Communication');

WHEN 100 THEN -- Finance

v_emp_skills := employee_skills_type('Accounting', 'Financial Analysis', 'Budgeting', 'Forecasting');

ELSE

v_emp_skills := employee_skills_type('General Skills');

END CASE;

v_dept_skills(dept.department_id / 30) := v_emp_skills;

-- Código para exibição das habilidades...

END LOOP;

Este bloco é o coração da lógica:

Itera sobre os departamentos selecionados.
Usa um CASE statement para atribuir habilidades específicas a cada departamento.
Armazena o VARRAY de habilidades no VARRAY principal usando uma fórmula de indexação inteligente.

Fórmula de Indexação

v_dept_skills(dept.department_id / 30) := v_emp_skills;

1	v_dept_skills(dept.department_id / 30) := v_emp_skills;

Esta linha merece atenção especial:

A divisão dept.department_id / 30 é uma técnica inteligente para mapear os IDs dos departamentos (60, 90, 100) para os índices do VARRAY (2, 3, 4).
Esta abordagem permite um mapeamento eficiente entre os IDs de departamento e as posições no VARRAY.

Exibição e Acesso aos Dados

Exibição das Habilidades

Este loop interno itera sobre as habilidades de cada departamento, demonstrando como acessar elementos individuais de um VARRAY.

Acesso a Elementos Específicos

DBMS_OUTPUT.PUT_LINE('Dept IT, Habilidade 3: ' || v_dept_skills(2)(3));
DBMS_OUTPUT.PUT_LINE('Dept Executive, Habilidade 2: ' || v_dept_skills(3)(2));

1 2	DBMS_OUTPUT.PUT_LINE('Dept IT, Habilidade 3: ' \|\| v_dept_skills(2)(3)); DBMS_OUTPUT.PUT_LINE('Dept Executive, Habilidade 2: ' \|\| v_dept_skills(3)(2));

Estas linhas demonstram o acesso a elementos específicos do VARRAY de VARRAYs:

O primeiro parêntese acessa o VARRAY externo (departamento).
O segundo parêntese acessa o elemento dentro do VARRAY interno (habilidade específica).

Aqui está uma representação visual da estrutura VARRAY de VARRAYs usando apenas caracteres alfanuméricos:

v_dept_skills (VARRAY principal)
|
+--[1] (não usado)
|
+--[2] IT Department
|  |
|  +--[1] Java
|  +--[2] SQL
|  +--[3] PL/SQL
|  +--[4] Python
|  +--[5] Oracle
|
+--[3] Executive Department
|  |
|  +--[1] Leadership
|  +--[2] Strategy
|  +--[3] Finance
|  +--[4] Communication
|
+--[4] Finance Department
   |
   +--[1] Accounting
   +--[2] Financial Analysis
   +--[3] Budgeting
   +--[4] Forecasting

v_dept_skills (VARRAY principal)

+--[1] (não usado)

+--[2] IT Department

| |

| +--[1] Java

| +--[2] SQL

| +--[3] PL/SQL

| +--[4] Python

| +--[5] Oracle

+--[3] Executive Department

| |

| +--[1] Leadership

| +--[2] Strategy

| +--[3] Finance

| +--[4] Communication

+--[4] Finance Department

+--[1] Accounting

+--[2] Financial Analysis

+--[3] Budgeting

+--[4] Forecasting

Nesta representação:

Os números entre colchetes [n] representam os índices.
O VARRAY principal (v_dept_skills) contém os departamentos.
Cada departamento é um VARRAY interno contendo habilidades.

Então, para acessar “PL/SQL” no departamento de IT, usaríamos:

v_dept_skills(2)(3)
        |    |
        |    +-- 3º elemento (PL/SQL)
        +-- 2º elemento (IT Department)

v_dept_skills(2)(3)

| |

| +-- 3º elemento (PL/SQL)

+-- 2º elemento (IT Department)

Considerações Técnicas Avançadas

Eficiência de Armazenamento

VARRAYs são armazenados de forma eficiente no Oracle, tornando esta estrutura adequada para dados hierárquicos com um número conhecido de elementos.

Limitações e Alternativas

Para coleções muito grandes ou que requerem frequentes inserções/remoções, outras estruturas como Nested Tables podem ser mais apropriadas.

Aplicações Práticas

Esta estrutura é ideal para cenários como:

Catálogos de produtos com subcategorias
Estruturas organizacionais com múltiplos níveis
Configurações de sistemas em diferentes níveis hierárquicos

Considerações de Performance

Excelente para leitura rápida de dados estruturados
Pode ser menos eficiente para operações frequentes de atualização em grandes volumes de dados

Conclusão e Melhores Práticas

Planejamento Cuidadoso: Defina os limites dos VARRAYs com base em uma análise cuidadosa dos requisitos de dados.
Uso de Constantes: Considere usar constantes para os tamanhos dos VARRAYs para facilitar a manutenção.
Tratamento de Exceções: Implemente tratamento de exceções para lidar com casos de overflow ou underflow dos VARRAYs.
Documentação: Documente claramente a estrutura e o propósito dos VARRAYs aninhados para facilitar a manutenção futura.

Esta implementação de VARRAY de VARRAYs demonstra o poder e a flexibilidade do PL/SQL do Oracle para criar estruturas de dados complexas e eficientes, permitindo uma representação elegante de dados hierárquicos em aplicações de banco de dados.

4. Nested Tables de Nested Tables

Agora, vamos ver um exemplo usando Nested Tables de Nested Tables. Imagine que queremos armazenar o histórico de projetos por departamento.

DECLARE
    -- Definindo uma Nested Table para projetos
    TYPE project_list IS TABLE OF VARCHAR2(100);
    
    -- Definindo uma Nested Table de Nested Tables para projetos por departamento
    TYPE department_projects IS TABLE OF project_list;
    
    -- Declarando a variável principal
    v_dept_projects department_projects := department_projects();
    
    -- Cursor para departamentos
    CURSOR c_departments IS
        SELECT department_id, department_name
        FROM departments
        WHERE department_id IN (60, 90, 100)
        ORDER BY department_id;
    
    -- Variável temporária para lista de projetos
    v_projects project_list;

BEGIN
    -- Inicializando a Nested Table externa
    v_dept_projects.EXTEND(3);
    
    -- Preenchendo a Nested Table de Nested Tables
    FOR dept IN c_departments LOOP
        CASE dept.department_id
            WHEN 60 THEN  -- IT
                v_projects := project_list('Database Upgrade', 'Cloud Migration', 'Security Enhancement');
            WHEN 90 THEN  -- Executive
                v_projects := project_list('Strategic Planning', 'Merger Analysis', 'Board Presentation');
            WHEN 100 THEN  -- Finance
                v_projects := project_list('Annual Budget', 'Cost Reduction', 'Financial Reporting');
            ELSE
                v_projects := project_list('General Project');
        END CASE;
        
        v_dept_projects(dept.department_id / 30) := v_projects;
        
        -- Exibindo os projetos do departamento
        DBMS_OUTPUT.PUT_LINE('Departamento: ' || dept.department_name);
        FOR i IN 1..v_projects.COUNT LOOP
            DBMS_OUTPUT.PUT_LINE('  Projeto ' || i || ': ' || v_projects(i));
        END LOOP;
        DBMS_OUTPUT.PUT_LINE('---');
    END LOOP;
    
    -- Acessando um projeto específico
    DBMS_OUTPUT.PUT_LINE('Projeto específico:');
    DBMS_OUTPUT.PUT_LINE('Dept IT, Projeto 2: ' || v_dept_projects(2)(2));  -- Cloud Migration
END;
/

DECLARE

-- Definindo uma Nested Table para projetos

TYPE project_list IS TABLE OF VARCHAR2(100);

-- Definindo uma Nested Table de Nested Tables para projetos por departamento

TYPE department_projects IS TABLE OF project_list;

-- Declarando a variável principal

v_dept_projects department_projects := department_projects();

-- Cursor para departamentos

CURSOR c_departments IS

SELECT department_id, department_name

FROM departments

WHERE department_id IN (60, 90, 100)

ORDER BY department_id;

-- Variável temporária para lista de projetos

v_projects project_list;

BEGIN

-- Inicializando a Nested Table externa

v_dept_projects.EXTEND(3);

-- Preenchendo a Nested Table de Nested Tables

FOR dept IN c_departments LOOP

CASE dept.department_id

WHEN 60 THEN -- IT

v_projects := project_list('Database Upgrade', 'Cloud Migration', 'Security Enhancement');

WHEN 90 THEN -- Executive

v_projects := project_list('Strategic Planning', 'Merger Analysis', 'Board Presentation');

WHEN 100 THEN -- Finance

v_projects := project_list('Annual Budget', 'Cost Reduction', 'Financial Reporting');

ELSE

v_projects := project_list('General Project');

END CASE;

v_dept_projects(dept.department_id / 30) := v_projects;

-- Exibindo os projetos do departamento

DBMS_OUTPUT.PUT_LINE('Departamento: ' || dept.department_name);

FOR i IN 1..v_projects.COUNT LOOP

DBMS_OUTPUT.PUT_LINE(' Projeto ' || i || ': ' || v_projects(i));

END LOOP;

DBMS_OUTPUT.PUT_LINE('---');

END LOOP;

-- Acessando um projeto específico

DBMS_OUTPUT.PUT_LINE('Projeto específico:');

DBMS_OUTPUT.PUT_LINE('Dept IT, Projeto 2: ' || v_dept_projects(2)(2)); -- Cloud Migration

END;

4.1 Diferenças Chave entre VARRAYs e Nested Tables em Coleções Multidimensionais:

Tamanho: Nested Tables não têm um limite máximo predefinido, ao contrário dos VARRAYs.
Flexibilidade: Nested Tables permitem adicionar ou remover elementos mais facilmente.
Armazenamento: Nested Tables são armazenadas de forma diferente no banco de dados, o que pode afetar o desempenho em certos cenários.

5. Associative Arrays de VARRAYs ou Nested Tables

Por fim, vamos explorar um exemplo usando Associative Arrays (index-by tables) contendo VARRAYs. Este exemplo mostrará como armazenar salários mensais por ano para um funcionário.

DECLARE
    -- Definindo um VARRAY para salários mensais
    TYPE monthly_salary_type IS VARRAY(12) OF NUMBER;
    
    -- Definindo um Associative Array de VARRAYs para salários anuais
    TYPE annual_salary_type IS TABLE OF monthly_salary_type
        INDEX BY PLS_INTEGER;  -- Ano como índice
    
    -- Declarando a variável principal
    v_employee_salaries annual_salary_type;
    
    -- Variável para salário mensal
    v_monthly_salaries monthly_salary_type;
    
    -- Funcionário de exemplo
    v_employee_id NUMBER := 101;  -- Escolha um ID de funcionário existente
    
BEGIN
    -- Preenchendo o Associative Array com dados de exemplo
    FOR year IN 2020..2022 LOOP
        v_monthly_salaries := monthly_salary_type();
        v_monthly_salaries.EXTEND(12);
        
        FOR month IN 1..12 LOOP
            -- Simulando salários com um aumento mensal
            v_monthly_salaries(month) := 5000 + (year - 2020) * 1000 + month * 100;
        END LOOP;
        
        v_employee_salaries(year) := v_monthly_salaries;
    END LOOP;
    
    -- Exibindo os salários
    FOR year IN v_employee_salaries.FIRST..v_employee_salaries.LAST LOOP
        DBMS_OUTPUT.PUT_LINE('Ano: ' || year);
        FOR month IN 1..12 LOOP
            DBMS_OUTPUT.PUT_LINE('  Mês ' || LPAD(month, 2, '0') || ': $' || 
                                 TO_CHAR(v_employee_salaries(year)(month), '999,999.00'));
        END LOOP;
        DBMS_OUTPUT.PUT_LINE('---');
    END LOOP;
    
    -- Acessando um salário específico
    DBMS_OUTPUT.PUT_LINE('Salário específico:');
    DBMS_OUTPUT.PUT_LINE('Ano 2021, Mês 6: $' || 
                         TO_CHAR(v_employee_salaries(2021)(6), '999,999.00'));
END;
/

DECLARE

-- Definindo um VARRAY para salários mensais

TYPE monthly_salary_type IS VARRAY(12) OF NUMBER;

-- Definindo um Associative Array de VARRAYs para salários anuais

TYPE annual_salary_type IS TABLE OF monthly_salary_type

INDEX BY PLS_INTEGER; -- Ano como índice

-- Declarando a variável principal

v_employee_salaries annual_salary_type;

-- Variável para salário mensal

v_monthly_salaries monthly_salary_type;

-- Funcionário de exemplo

v_employee_id NUMBER := 101; -- Escolha um ID de funcionário existente

BEGIN

-- Preenchendo o Associative Array com dados de exemplo

FOR year IN 2020..2022 LOOP

v_monthly_salaries := monthly_salary_type();

v_monthly_salaries.EXTEND(12);

FOR month IN 1..12 LOOP

-- Simulando salários com um aumento mensal

v_monthly_salaries(month) := 5000 + (year - 2020) * 1000 + month * 100;

END LOOP;

v_employee_salaries(year) := v_monthly_salaries;

END LOOP;

-- Exibindo os salários

FOR year IN v_employee_salaries.FIRST..v_employee_salaries.LAST LOOP

DBMS_OUTPUT.PUT_LINE('Ano: ' || year);

FOR month IN 1..12 LOOP

DBMS_OUTPUT.PUT_LINE(' Mês ' || LPAD(month, 2, '0') || ': $' ||

TO_CHAR(v_employee_salaries(year)(month), '999,999.00'));

END LOOP;

DBMS_OUTPUT.PUT_LINE('---');

END LOOP;

-- Acessando um salário específico

DBMS_OUTPUT.PUT_LINE('Salário específico:');

DBMS_OUTPUT.PUT_LINE('Ano 2021, Mês 6: $' ||

TO_CHAR(v_employee_salaries(2021)(6), '999,999.00'));

END;

5.1 Vantagens dos Associative Arrays em Coleções Multidimensionais:

Flexibilidade de Índice: Permite usar anos como índices diretamente.
Eficiência: Geralmente mais eficientes para operações de busca.
Dinâmico: Fácil de adicionar novos anos sem pré-alocação.

6. Considerações Importantes

Complexidade vs. Utilidade: Coleções multidimensionais são poderosas, mas podem tornar o código mais complexo. Use-as quando a estrutura de dados realmente exigir essa complexidade.
Inicialização: Cada nível da coleção geralmente precisa ser inicializado separadamente.
Acesso a Elementos: Use múltiplos parênteses para acessar elementos em diferentes níveis (por exemplo, collection(1)(2)).
Performance: Para estruturas muito complexas ou grandes volumes de dados, considere o impacto na performance.
Manutenção: Documente bem a estrutura e o propósito de cada nível da coleção para facilitar a manutenção futura.

7. Melhores Práticas

Planeje com Antecedência: Pense cuidadosamente sobre a estrutura antes de implementar.
Use Tipos Nomeados: Crie tipos nomeados para suas coleções para melhorar a legibilidade e reutilização.
Considere Alternativas: Para estruturas muito complexas, às vezes tabelas temporárias ou tipos de objeto podem ser mais apropriados.
Teste Extensivamente: Coleções multidimensionais podem ser propensas a erros sutis. Teste todas as operações cuidadosamente.

8. Exercício Prático

Para consolidar seu aprendizado, tente criar uma coleção multidimensional que represente a estrutura organizacional da empresa:

Nível 1: Departamentos
Nível 2: Equipes dentro de cada departamento
Nível 3: Funcionários em cada equipe

Use uma combinação de VARRAYs e Nested Tables para implementar esta estrutura.

Conclusão

Coleções multidimensionais no Oracle PL/SQL são uma ferramenta poderosa para lidar com dados complexos e hierárquicos. Elas oferecem flexibilidade e eficiência, permitindo que você modele estruturas de dados sofisticadas diretamente em seu código PL/SQL.

Lembre-se, a chave para dominar coleções multidimensionais é a prática. Comece com exemplos simples e gradualmente aumente a complexidade. Com o tempo, você se tornará proficiente em criar e manipular estas estruturas poderosas, adicionando uma ferramenta valiosa ao seu arsenal de desenvolvimento Oracle.

Espero que esta explicação detalhada tenha esclarecido o conceito de coleções multidimensionais e fornecido insights práticos sobre como usá-las efetivamente em seus projetos Oracle PL/SQL. Continue praticando e explorando, e você descobrirá ainda mais maneiras de aproveitar o poder dessas estruturas de dados versáteis!

Resolução do Exercício Prático:

DECLARE
    -- Definindo um tipo para representar um funcionário
    TYPE employee_type IS RECORD (
        id NUMBER,
        name VARCHAR2(100),
        job_title VARCHAR2(100)
    );

    -- Definindo uma Nested Table para armazenar funcionários
    TYPE employee_list IS TABLE OF employee_type;

    -- Definindo um VARRAY para representar uma equipe
    TYPE team_type IS VARRAY(10) OF VARCHAR2(100);

    -- Definindo uma Nested Table para armazenar equipes e seus funcionários
    TYPE team_employees_type IS TABLE OF employee_list;

    -- Definindo um Record para representar um departamento
    TYPE department_type IS RECORD (
        id NUMBER,
        name VARCHAR2(100),
        teams team_type,
        team_employees team_employees_type
    );

    -- Definindo uma Nested Table para armazenar departamentos
    TYPE organization_type IS TABLE OF department_type;

    -- Declarando a variável principal que representará toda a organização
    v_organization organization_type := organization_type();

    -- Variáveis auxiliares
    v_dept department_type;
    v_employees employee_list;

BEGIN
    -- Inicializando a estrutura organizacional
    v_organization.EXTEND(3);  -- 3 departamentos

    -- Departamento de TI
    v_dept.id := 1;
    v_dept.name := 'Departamento de TI';
    v_dept.teams := team_type('Desenvolvimento', 'Infraestrutura', 'Suporte');
    v_dept.team_employees := team_employees_type();
    v_dept.team_employees.EXTEND(3);  -- 3 equipes

    -- Equipe de Desenvolvimento
    v_employees := employee_list();
    v_employees.EXTEND(3);
    v_employees(1) := employee_type(101, 'João Silva', 'Desenvolvedor Senior');
    v_employees(2) := employee_type(102, 'Maria Santos', 'Desenvolvedor Pleno');
    v_employees(3) := employee_type(103, 'Pedro Oliveira', 'Desenvolvedor Junior');
    v_dept.team_employees(1) := v_employees;

    -- Equipe de Infraestrutura
    v_employees := employee_list();
    v_employees.EXTEND(2);
    v_employees(1) := employee_type(104, 'Ana Rodrigues', 'Administrador de Sistemas');
    v_employees(2) := employee_type(105, 'Carlos Ferreira', 'Engenheiro de Redes');
    v_dept.team_employees(2) := v_employees;

    -- Equipe de Suporte
    v_employees := employee_list();
    v_employees.EXTEND(2);
    v_employees(1) := employee_type(106, 'Lucia Martins', 'Analista de Suporte');
    v_employees(2) := employee_type(107, 'Roberto Alves', 'Técnico de Suporte');
    v_dept.team_employees(3) := v_employees;

    v_organization(1) := v_dept;

    -- Departamento de Vendas (simplificado para brevidade)
    v_dept.id := 2;
    v_dept.name := 'Departamento de Vendas';
    v_dept.teams := team_type('Vendas Internas', 'Vendas Externas');
    v_dept.team_employees := team_employees_type();
    v_dept.team_employees.EXTEND(2);
    -- ... (adicionar funcionários como no exemplo anterior)
    v_organization(2) := v_dept;

    -- Departamento Financeiro (simplificado para brevidade)
    v_dept.id := 3;
    v_dept.name := 'Departamento Financeiro';
    v_dept.teams := team_type('Contabilidade', 'Controladoria');
    v_dept.team_employees := team_employees_type();
    v_dept.team_employees.EXTEND(2);
    -- ... (adicionar funcionários como no exemplo anterior)
    v_organization(3) := v_dept;

    -- Exibindo a estrutura organizacional
    FOR i IN 1..v_organization.COUNT LOOP
        DBMS_OUTPUT.PUT_LINE('Departamento: ' || v_organization(i).name);
        FOR j IN 1..v_organization(i).teams.COUNT LOOP
            DBMS_OUTPUT.PUT_LINE('  Equipe: ' || v_organization(i).teams(j));
            IF v_organization(i).team_employees(j) IS NOT NULL THEN
                FOR k IN 1..v_organization(i).team_employees(j).COUNT LOOP
                    DBMS_OUTPUT.PUT_LINE('    Funcionário: ' || 
                                         v_organization(i).team_employees(j)(k).name || 
                                         ' - ' || v_organization(i).team_employees(j)(k).job_title);
                END LOOP;
            END IF;
        END LOOP;
        DBMS_OUTPUT.PUT_LINE('---');
    END LOOP;
END;
/

100

101

102

103

104

105

DECLARE

-- Definindo um tipo para representar um funcionário

TYPE employee_type IS RECORD (

id NUMBER,

name VARCHAR2(100),

job_title VARCHAR2(100)

);

-- Definindo uma Nested Table para armazenar funcionários

TYPE employee_list IS TABLE OF employee_type;

-- Definindo um VARRAY para representar uma equipe

TYPE team_type IS VARRAY(10) OF VARCHAR2(100);

-- Definindo uma Nested Table para armazenar equipes e seus funcionários

TYPE team_employees_type IS TABLE OF employee_list;

-- Definindo um Record para representar um departamento

TYPE department_type IS RECORD (

id NUMBER,

name VARCHAR2(100),

teams team_type,

team_employees team_employees_type

);

-- Definindo uma Nested Table para armazenar departamentos

TYPE organization_type IS TABLE OF department_type;

-- Declarando a variável principal que representará toda a organização

v_organization organization_type := organization_type();

-- Variáveis auxiliares

v_dept department_type;

v_employees employee_list;

BEGIN

-- Inicializando a estrutura organizacional

v_organization.EXTEND(3); -- 3 departamentos

-- Departamento de TI

v_dept.id := 1;

v_dept.name := 'Departamento de TI';

v_dept.teams := team_type('Desenvolvimento', 'Infraestrutura', 'Suporte');

v_dept.team_employees := team_employees_type();

v_dept.team_employees.EXTEND(3); -- 3 equipes

-- Equipe de Desenvolvimento

v_employees := employee_list();

v_employees.EXTEND(3);

v_employees(1) := employee_type(101, 'João Silva', 'Desenvolvedor Senior');

v_employees(2) := employee_type(102, 'Maria Santos', 'Desenvolvedor Pleno');

v_employees(3) := employee_type(103, 'Pedro Oliveira', 'Desenvolvedor Junior');

v_dept.team_employees(1) := v_employees;

-- Equipe de Infraestrutura

v_employees := employee_list();

v_employees.EXTEND(2);

v_employees(1) := employee_type(104, 'Ana Rodrigues', 'Administrador de Sistemas');

v_employees(2) := employee_type(105, 'Carlos Ferreira', 'Engenheiro de Redes');

v_dept.team_employees(2) := v_employees;

-- Equipe de Suporte

v_employees := employee_list();

v_employees.EXTEND(2);

v_employees(1) := employee_type(106, 'Lucia Martins', 'Analista de Suporte');

v_employees(2) := employee_type(107, 'Roberto Alves', 'Técnico de Suporte');

v_dept.team_employees(3) := v_employees;

v_organization(1) := v_dept;

-- Departamento de Vendas (simplificado para brevidade)

v_dept.id := 2;

v_dept.name := 'Departamento de Vendas';

v_dept.teams := team_type('Vendas Internas', 'Vendas Externas');

v_dept.team_employees := team_employees_type();

v_dept.team_employees.EXTEND(2);

-- ... (adicionar funcionários como no exemplo anterior)

v_organization(2) := v_dept;

-- Departamento Financeiro (simplificado para brevidade)

v_dept.id := 3;

v_dept.name := 'Departamento Financeiro';

v_dept.teams := team_type('Contabilidade', 'Controladoria');

v_dept.team_employees := team_employees_type();

v_dept.team_employees.EXTEND(2);

-- ... (adicionar funcionários como no exemplo anterior)

v_organization(3) := v_dept;

-- Exibindo a estrutura organizacional

FOR i IN 1..v_organization.COUNT LOOP

DBMS_OUTPUT.PUT_LINE('Departamento: ' || v_organization(i).name);

FOR j IN 1..v_organization(i).teams.COUNT LOOP

DBMS_OUTPUT.PUT_LINE(' Equipe: ' || v_organization(i).teams(j));

IF v_organization(i).team_employees(j) IS NOT NULL THEN

FOR k IN 1..v_organization(i).team_employees(j).COUNT LOOP

DBMS_OUTPUT.PUT_LINE(' Funcionário: ' ||

v_organization(i).team_employees(j)(k).name ||

' - ' || v_organization(i).team_employees(j)(k).job_title);

END LOOP;

END IF;

END LOOP;

DBMS_OUTPUT.PUT_LINE('---');

END LOOP;

END;

Explicação da solução:

Estrutura de Dados:
- Usamos um RECORD para representar funcionários e departamentos.
- Utilizamos VARRAY para as equipes, limitando a 10 equipes por departamento.
- Empregamos Nested Tables para a lista de funcionários e para a estrutura organizacional geral.
Níveis da Estrutura:
- Nível 1 (Departamentos): Representado pela organization_type.
- Nível 2 (Equipes): Representado pelo team_type dentro de cada departamento.
- Nível 3 (Funcionários): Representado pelo employee_list para cada equipe.
Preenchimento de Dados:
- Criamos três departamentos.
- Para o Departamento de TI, detalhamos completamente sua estrutura.
- Para os outros departamentos, fornecemos uma estrutura básica que pode ser expandida.
Exibição dos Dados:
- Utilizamos loops aninhados para percorrer a estrutura e exibir todos os níveis.
Flexibilidade:
- Esta estrutura permite fácil adição ou remoção de departamentos, equipes e funcionários.
- Podemos acessar informações específicas usando a notação de múltiplos parênteses.

Esta solução demonstra como coleções multidimensionais podem ser usadas para modelar estruturas organizacionais complexas de forma eficiente em PL/SQL. Ela oferece flexibilidade para representar diferentes níveis hierárquicos e permite fácil manipulação e acesso aos dados em cada nível.

Para praticar mais, você pode tentar:

Adicionar mais departamentos e equipes.
Implementar funções para adicionar ou remover funcionários de equipes específicas.
Criar queries para buscar informações específicas, como “todos os desenvolvedores” ou “equipes com mais de 3 membros”.

Este exercício ajuda a consolidar o entendimento de como diferentes tipos de coleções podem ser combinados para criar estruturas de dados complexas e úteis em PL/SQL.

1. O que são Coleções Multidimensionais?

1.1 Por que usar Coleções Multidimensionais?

2. Tipos de Coleções Multidimensionais

3. VARRAY de VARRAYs: Um Exemplo Detalhado

Análise Detalhada Passo a Passo:

Definição de Tipos Personalizados

Implementação Detalhada

Cursor para Seleção de Departamentos

Lógica de Processamento

Inicialização do VARRAY Externo

Loop Principal e Atribuição de Habilidades

Fórmula de Indexação

Exibição e Acesso aos Dados

Exibição das Habilidades

Acesso a Elementos Específicos

Considerações Técnicas Avançadas

Eficiência de Armazenamento

Limitações e Alternativas

Aplicações Práticas

Considerações de Performance

Conclusão e Melhores Práticas

4. Nested Tables de Nested Tables

4.1 Diferenças Chave entre VARRAYs e Nested Tables em Coleções Multidimensionais:

5. Associative Arrays de VARRAYs ou Nested Tables

5.1 Vantagens dos Associative Arrays em Coleções Multidimensionais:

6. Considerações Importantes

7. Melhores Práticas

8. Exercício Prático

Conclusão

Related Posts