TP_PESSOAEMPRESTIMO - Tipo de Pessoa no Empréstimo

Tela de configuração: MEQ001 — Parâmetros de Estoque Localização: Aba &Requisição / Recebimento → campo "Requisição / Empréstimo" Tabela: PARMESTOQUE.TP_PESSOAEMPRESTIMO Tipo: CHAR(1) Componente: cmbTP_TIPOPESSOA (ComboBox) Valor padrão: Não definido (campo opcional)

Descrição

Define o tipo de pessoa (física/jurídica) permitida ao registrar operações de empréstimo de ferramentas na tela MEQ004. Ao informar o código da pessoa no empréstimo, o sistema valida se o tipo da pessoa cadastrada em TFA001 (PESSOA.TP_TIPOPESSOA) é compatível com o valor deste parâmetro. Se houver divergência e o parâmetro não for T (Todas), o sistema exibe a mensagem:

"A Pessoa Física / Jurídica não é do Tipo especificado no parâmetro [MEQ001]!"

Telas impactadas

Tela	Descrição	Impacto
MEQ004	Empréstimo de Ferramentaria	Valida o tipo da pessoa informada no empréstimo contra este parâmetro

Campos envolvidos

Campo	Tabela	Função
TP_PESSOAEMPRESTIMO	PARMESTOQUE	Parâmetro configurado (esta tela)
TP_TIPOPESSOA	TIPOPESSOA	Tipo da pessoa cadastrada (comparado contra o parâmetro)
CD_PESSOA	FERRAMENTARIA	Código da pessoa informada no empréstimo

Parâmetros relacionados

Parâmetro	Descrição	Configuração
CD_OPEREMPRESTIMO	Operação de estoque utilizada no empréstimo	MEQ001 — Aba &Requisição / Recebimento
CD_GRUPOEMPRESTIMO	Grupo de estoque associado ao empréstimo	MEQ001 — Aba &Requisição / Recebimento

Opções disponíveis

E — Empresa

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Empresa podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Empresa.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Empresa em TFA001.
6. O sistema aceita e preenche o nome da pessoa.

Resultado esperado: A pessoa é aceita sem erros. Se informar pessoa de outro tipo (Cliente, Fornecedor, etc.), o sistema exibe o erro "A Pessoa Física / Jurídica não é do Tipo especificado no parâmetro [MEQ001]!".

Excecao / Importante: Se o parâmetro estiver como T (Todas), qualquer tipo de pessoa é aceito, independentemente do cadastro.

---

C — Cliente

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Cliente podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Cliente.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Cliente em TFA001.
6. O sistema aceita e preenche o nome da pessoa.

Resultado esperado: Apenas pessoas do tipo Cliente são aceitas. Outros tipos geram erro de validação.

---

F — Fornecedor

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Fornecedor podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Fornecedor.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Fornecedor em TFA001.
6. O sistema aceita e preenche o nome da pessoa.

Resultado esperado: Apenas pessoas do tipo Fornecedor são aceitas. Outros tipos geram erro de validação.

---

A — Cliente e Fornecedor

O que faz	Detalhe
Restringe a busca de pessoas	Pessoas do tipo Cliente ou Fornecedor são aceitas
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Cliente e Fornecedor.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa do tipo Cliente — o sistema aceita.
6. Informe o código de uma pessoa do tipo Fornecedor — o sistema também aceita.

Resultado esperado: Pessoas dos tipos Cliente e Fornecedor são aceitas. Outros tipos geram erro de validação.

---

V — Vendedor

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Vendedor podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Vendedor.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Vendedor em TFA001.

Resultado esperado: Apenas pessoas do tipo Vendedor são aceitas.

---

O — Comprador

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Comprador podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Comprador.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Comprador em TFA001.

Resultado esperado: Apenas pessoas do tipo Comprador são aceitas.

---

M — Motorista

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Motorista podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Motorista.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Motorista em TFA001.

Resultado esperado: Apenas pessoas do tipo Motorista são aceitas.

---

P — Professor

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Professor podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Professor.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Professor em TFA001.

Resultado esperado: Apenas pessoas do tipo Professor são aceitas.

---

N — Funcionário

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Funcionário podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Funcionário.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Funcionário em TFA001.

Resultado esperado: Apenas pessoas do tipo Funcionário são aceitas.

---

U — Usuário

O que faz	Detalhe
Restringe a busca de pessoas	Somente pessoas do tipo Usuário podem ser informadas no empréstimo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Usuário.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de uma pessoa cadastrada como Usuário em TFA001.

Resultado esperado: Apenas pessoas do tipo Usuário são aceitas.

---

T — Todas (sem restrição)

O que faz	Detalhe
Remove a restrição de tipo	Qualquer pessoa cadastrada pode ser informada no empréstimo, independentemente do tipo
Editável	Sim

Simulação passo a passo

1. Acesse MEQ001 → aba &Requisição / Recebimento.
2. No campo Requisição / Empréstimo, selecione Todas.
3. Salve o parâmetro.
4. Acesse MEQ004 e abra um novo empréstimo.
5. No campo Pessoa, informe o código de qualquer pessoa (Cliente, Fornecedor, Funcionário, etc.).

Resultado esperado: Qualquer pessoa é aceita, sem validação de tipo. O sistema preenche o nome normalmente.

Excecao / Importante: Esta é a única opção que ignora a comparação com TP_TIPOPESSOA no código-fonte. Quando iTP_PESSOAEMPRESTIMO = 'T', a condição dmMEQ004.iTP_PESSOAEMPRESTIMO <> 'T' é falsa e a validação de tipo é pulada.

---

Tabela Comparativa Resumida

Valor	Descrição	Restrição
E	Empresa	Apenas tipo Empresa
C	Cliente	Apenas tipo Cliente
F	Fornecedor	Apenas tipo Fornecedor
A	Cliente e Fornecedor	Tipos Cliente ou Fornecedor
V	Vendedor	Apenas tipo Vendedor
O	Comprador	Apenas tipo Comprador
M	Motorista	Apenas tipo Motorista
P	Professor	Apenas tipo Professor
N	Funcionário	Apenas tipo Funcionário
U	Usuário	Apenas tipo Usuário
T	Todas	Sem restrição — qualquer pessoa

Procedures impactadas

Rotinas Delphi com referência direta ao campo

Rotina	Arquivo	Ação
Busca_Parametros	source/MEQ004/UdmMEQ004.pas	Lê TP_PESSOAEMPRESTIMO de PARMESTOQUE e armazena em iTP_PESSOAEMPRESTIMO
tabFERRAMENTARIACD_PESSOAValidate	source/MEQ004/UdmMEQ004.pas	Compara o TP_TIPOPESSOA da pessoa com iTP_PESSOAEMPRESTIMO; rejeita se divergente e parâmetro <> 'T'

Referências SQL diretas ao campo em Scripts/

Não foram encontradas referências diretas ao campo TP_PESSOAEMPRESTIMO em procedures SQL. O campo é utilizado exclusivamente pela aplicação Delphi (MEQ004) em tempo de validação.

Candidatas por uso da tabela PARMESTOQUE

Diversas procedures SQL utilizam a tabela PARMESTOQUE para leitura de outros parâmetros, mas nenhuma referencia diretamente o campo TP_PESSOAEMPRESTIMO em suas consultas. Exemplos incluem GERA_ESTOQUE, CANCELA_ESTOQUE, CONFIRMA_ORDEMSERVICO, entre outras. Não há impacto funcional direto dessas rotinas sobre este parâmetro.