Pular para o conteúdo principal

TP_TEXTO — Tipo do Texto Digitado

Tela de configuração: ADM010 — Parâmetros do Sistema Localização: aba Configurações, campo Tipo do Texto Digitado Tabela: PARMSISTEMA.TP_TEXTO (CHAR(1), NOT NULL) Valor padrão: N (Normal)

Resumo​

Controla a formatação automática de caixa alta/baixa em campos textuais de cadastros de pessoas (nome, fantasia, endereço, bairro, complemento, etc.). A conversão é aplicada tanto em triggers de banco (ao gravar) quanto em rotinas Delphi (ao sair do campo ou em processamentos em lote).

Telas impactadas​

TelaNomeContexto de uso
TFA001Cadastro de PessoasLê TP_TEXTO ao iniciar e no botão de conversão de caixa (btCaseClick); formata ao sair do campo nome (edtNM_PESSOAExit)
TFA083Cadastro Rápido de PessoaLê TP_TEXTO ao iniciar
ADM010Parâmetros do SistemaTela de configuração do parâmetro

Campos envolvidos​

TabelaCampoDescrição
PESSOANM_PESSOANome / Razão Social
PESSOANM_FANTASIANome Fantasia
ENDERECOPESSOADS_ENDERECOLogradouro
ENDERECOPESSOADS_COMPLEMENTOComplemento
ENDERECOPESSOADS_BAIRROBairro
PESSOAFISICADS_LOCALTRABLocal de Trabalho
PESSOAFISICANM_MAENome da Mãe
PESSOAFISICANM_PAINome do Pai
PESSOAFISICANM_CONJUGENome do Cônjuge
PESSOAFISICADS_ENDERECOCONJEndereço do Cônjuge
PESSOAFISICADS_LOCALTRABCONJLocal Trabalho Cônjuge
REFERENCIAPESSOADS_REFERENCIADescrição da Referência
REFERENCIAPESSOADS_ENDERECOEndereço da Referência
REFERENCIAPESSOANM_REFERENCIANome da Referência

Opções disponíveis​

U — Maiúsculo​

O que fazDetalhe
Converte para maiúsculoTodos os campos listados acima são convertidos para CAIXA ALTA via FORMAT_CASE nas triggers e UpperCase() no Delphi
Não editávelA conversão é automática ao gravar o registro

Simulação passo a passo​

  1. Acesse ADM010 → Configurações e selecione Maiúsculo (U) no campo Tipo do Texto Digitado.
  2. Salve os parâmetros.
  3. Abra o cadastro de pessoas (TFA001) e cadastre uma pessoa com o nome "joão da silva".
  4. Ao sair do campo ou ao gravar, o nome será convertido automaticamente para "JOÃO DA SILVA".

Resultado esperado: Todos os nomes e endereços são gravados em CAIXA ALTA.


L — Minúsculo​

O que fazDetalhe
Converte para minúsculoTodos os campos listados são convertidos para caixa baixa via FORMAT_CASE nas triggers e LowerCase() no Delphi
Não editávelA conversão é automática ao gravar o registro

Simulação passo a passo​

  1. Acesse ADM010 → Configurações e selecione Minúsculo (L) no campo Tipo do Texto Digitado.
  2. Salve os parâmetros.
  3. Cadastre uma pessoa com o nome "JOÃO DA SILVA".
  4. Ao sair do campo ou ao gravar, o nome será convertido automaticamente para "joão da silva".

Resultado esperado: Todos os nomes e endereços são gravados em caixa baixa.


N — Normal (padrão)​

O que fazDetalhe
Aplica Caixa MistaO texto é processado pela função CaixaMista() (primeira letra maiúscula, restante minúscula)
Padrão do sistemaValor default ao instalar

Simulação passo a passo​

  1. Acesse ADM010 → Configurações e selecione Normal (N) no campo Tipo do Texto Digitado.
  2. Salve os parâmetros.
  3. Cadastre uma pessoa com o nome "joão da silva".
  4. Ao sair do campo nome ou ao gravar, o nome será formatado como "João Da Silva".

Resultado esperado: Nomes e endereços são gravados com a primeira letra de cada palavra em maiúsculo (Caixa Mista).


M — Misto​

O que fazDetalhe
Aplica Caixa MistaComportamento idêntico a N — o texto é processado pela função CaixaMista()
Reação ao sair do campoNo TFA001, ao sair do campo nome (edtNM_PESSOAExit), aplica CaixaMista() automaticamente

Exceção / Importante: A opção M aplica CaixaMista() no evento OnExit do campo nome no TFA001, enquanto N não dispara essa conversão ao sair do campo — apenas nas triggers de banco e no processamento em lote do btCaseClick. Ambas (N e M) geram o mesmo resultado final após a gravação.

Simulação passo a passo​

  1. Acesse ADM010 → Configurações e selecione Misto (M) no campo Tipo do Texto Digitado.
  2. Salve os parâmetros.
  3. Cadastre uma pessoa e digite o nome "joão da silva".
  4. Ao sair do campo nome (teclar <Tab> ou clicar em outro campo), o texto será convertido imediatamente para "João Da Silva".
  5. Ao gravar, a trigger de banco também aplicará FORMAT_CASE com o mesmo resultado.

Resultado esperado: Nomes e endereços são gravados em Caixa Mista, com conversão visual já ao sair do campo.


Regra geral​

  • A conversão é realizada em dois níveis: (1) banco de dados, via triggers BEFORE INSERT/UPDATE que chamam FORMAT_CASE(campo, V_TP_TEXTO); (2) aplicação Delphi, via rotinas do TFA001.
  • Alterar o parâmetro afeta novos registros e alterações futuras. Não retroage sobre dados já gravados, exceto se o usuário acionar manualmente o botão de conversão de caixa (btCaseClick) no TFA001.
  • O botão btCaseClick percorre todas as pessoas do dataset aberto e aplica a conversão em lote, podendo assim normalizar dados existentes.

Procedures impactadas​

Rotinas Delphi com referência direta ao campo​

RotinaArquivoDescrição
TfrmTFA001.iniciarsource/TFA001/UTFA001.pasLê TP_TEXTO ao abrir a tela de cadastro
TfrmTFA001.btCaseClicksource/TFA001/UTFA001.pasConverte nomes em lote conforme TP_TEXTO
TfrmTFA001.edtNM_PESSOAExitsource/TFA001/UTFA001.pasAplica CaixaMista() ao sair do campo nome quando TP_TEXTO = 'M'
TfrmTFA083.iniciarsource/TFA083/UTFA083.pasLê TP_TEXTO ao abrir o cadastro rápido

Triggers SQL com referência direta ao campo​

TriggerArquivoCampos formatados
PESSOA_BIScripts/PESSOA_BI.sqlNM_PESSOA, NM_FANTASIA
ENDERECOPESSOA_BI0Scripts/ENDERECOPESSOA_BI0.sqlDS_ENDERECO, DS_COMPLEMENTO, DS_BAIRRO
PESSOAFISICA_BI0Scripts/PESSOAFISICA_BI0.sqlDS_LOCALTRAB, DS_ENDERECO, NM_MAE, NM_PAI, NM_CONJUGE, DS_ENDERECOCONJ, DS_LOCALTRABCONJ
REFERENCIAPESSOA_BI0Scripts/REFERENCIAPESSOA_BI0.sqlDS_REFERENCIA, DS_ENDERECO, NM_REFERENCIA

Candidatas por uso da tabela (sem referência direta ao campo)​

As procedures abaixo utilizam a tabela PARMSISTEMA, mas não referenciam TP_TEXTO diretamente. Sem impacto funcional identificado para este parâmetro.

Procedure/ViewArquivo
ARRUMA_MASCARACONTAScripts/ARRUMA_MASCARACONTA.sql
ATUALIZA_CONTACONTABILScripts/ATUALIZA_CONTACONTABIL.sql
CALCULA_TEMPOPERMANENCIAScripts/CALCULA_TEMPOPERMANENCIA.sql
CONTABILIZA_CUPOMFISCALScripts/CONTABILIZA_CUPOMFISCAL.sql
GERA_CONTACLIFORScripts/GERA_CONTACLIFOR.sql
GERA_DARFScripts/GERA_DARF.sql
GERA_PLANOFILIALScripts/GERA_PLANOFILIAL.sql
GERA_SPEDBLOCOLScripts/GERA_SPEDBLOCOL.sql
GERA_SPEDCONTABILScripts/GERA_SPEDCONTABIL.sql
GERA_SPEDCONTABIL_0000Scripts/GERA_SPEDCONTABIL_0000.sql
GERA_SPEDECFScripts/GERA_SPEDECF.sql
GERA_SPEDECFBLOCOJScripts/GERA_SPEDECFBLOCOJ.sql
GERA_SPEDECFBLOCOK155Scripts/GERA_SPEDECFBLOCOK155.sql
GERA_SPEDECFBLOCOK355Scripts/GERA_SPEDECFBLOCOK355.sql
GERA_SPEDECFBLOCOL210Scripts/GERA_SPEDECFBLOCOL210.sql
GERA_SPEDECFBLOCOYScripts/GERA_SPEDECFBLOCOY.sql
GRAVA_REGISTROSPED0500Scripts/GRAVA_REGISTROSPED0500.sql
IMPORTA_ARQUIVOMAGNETICOScripts/IMPORTA_ARQUIVOMAGNETICO.sql
INCLUI_IMPOSTONOTACTBScripts/INCLUI_IMPOSTONOTACTB.sql
INSERE_ITEMNOTACCScripts/INSERE_ITEMNOTACC.sql

Tabela comparativa resumida​

ValorNomeComportamento
UMaiúsculoConverte tudo para CAIXA ALTA
LMinúsculoConverte tudo para caixa baixa
NNormalAplica Caixa Mista (padrão do sistema)
MMistoAplica Caixa Mista + conversão ao sair do campo nome no TFA001