CD_EMPRACESSO - Empresa de Acesso Padrão

Tela de configuração: ADM010 — Parâmetros do Sistema Localização: Aba Acesso Padrão Tabela: PARMSISTEMA.CD_EMPRACESSO (INTEGER) Valor padrão: null (não preenchido)

Descrição

Define a Empresa que será utilizada como referência ao validar o Usuário de Acesso Padrão (CD_USUACESSO). O campo trabalha em conjunto com CD_USUACESSO para formar um par de acesso padrão ao sistema: ao informar ambos, o sistema valida se o usuário informado está liberado para a empresa informada na tabela USUARIOEMPRESA.

Campos envolvidos

Campo	Tabela	Tipo	Descrição
CD_EMPRACESSO	PARMSISTEMA	INTEGER	Código da empresa de acesso padrão
CD_USUACESSO	PARMSISTEMA	VARCHAR(5)	Código do usuário de acesso padrão
NM_EMPRESA	PARMSISTEMA (lookup)	VARCHAR	Nome da empresa (preenchido automaticamente)
CD_EMPRESA	EMPRESA	INTEGER	Tabela de validação (FK indireta)
CD_USUARIO / CD_EMPRESA	USUARIOEMPRESA	—	Tabela de vínculo usuário × empresa

Parâmetro relacionado

• CD_USUACESSO (configurado em ADM010 — Parâmetros do Sistema, mesma aba "Acesso Padrão")

Telas impactadas

Tela	Impacto
ADM010	Tela onde o parâmetro é configurado
Login / Acesso ao sistema	Utiliza o par CD_EMPRACESSO + CD_USUACESSO como credenciais de acesso padrão

Opções disponíveis

Este parâmetro é um campo de código de empresa (INTEGER), editável diretamente. Não possui opções fixas — o valor deve corresponder a um CD_EMPRESA válido cadastrado na tabela EMPRESA.

Preenchimento com empresa válida

O que faz	Detalhe
Validação automática	Ao digitar o código, o sistema consulta EMPRESA e preenche NM_EMPRESA
Habilita preenchimento de usuário	Com a empresa preenchida, o campo CD_USUACESSO fica liberado para preenchimento
Restrição de vínculo	O usuário informado em CD_USUACESSO deve estar vinculado a essa empresa em USUARIOEMPRESA

Simulação passo a passo

1. Acesse a tela ADM010 — Parâmetros do Sistema.
2. Abra a aba Acesso Padrão.
3. Digite o código da empresa no campo Acesso Padrão (exemplo: 1).
4. O sistema consulta a tabela EMPRESA e exibe o nome da empresa ao lado.
5. Digite o código do usuário no campo de usuário (exemplo: ADMIN).
6. O sistema valida se o usuário ADMIN está liberado para a empresa 1 em USUARIOEMPRESA.
7. Salve os parâmetros.

Resultado esperado: O parâmetro CD_EMPRACESSO fica gravado com o código da empresa escolhida, e o nome da empresa é exibido no campo de descrição. O usuário informado em CD_USUACESSO é validado contra essa empresa.

Campo em branco

O que faz	Detalhe
Limpa o usuário	Ao apagar o conteúdo de CD_EMPRACESSO, o sistema também limpa CD_USUACESSO automaticamente
Sem acesso padrão	Sem empresa definida, não há acesso padrão configurado

Simulação passo a passo

1. Acesse a aba Acesso Padrão na tela ADM010.
2. Apague o conteúdo do campo Acesso Padrão (deixe em branco).
3. O sistema limpa automaticamente o campo de usuário (CD_USUACESSO) e o nome da empresa.
4. Salve os parâmetros.

Resultado esperado: Ambos os campos (CD_EMPRACESSO e CD_USUACESSO) ficam vazios. Nenhum acesso padrão será aplicado.

Exceção / Importante: Não é possível informar um usuário (CD_USUACESSO) sem antes preencher a empresa (CD_EMPRACESSO). O sistema exibe a mensagem: "É Obrigatório informar a Empresa para a Validação do Usuário!". Da mesma forma, ao pressionar <F9> no campo de usuário sem empresa preenchida, o sistema exibe: "É Obrigatório informar a Empresa para utilizar a Lista de Usuários!".

Exceção / Importante: Se o código da empresa não existir na tabela EMPRESA, o sistema exibe: "A Empresa não está Cadastrada [ADM002]!" e rejeita o valor.

Exceção / Importante: Se o usuário existir mas não estiver vinculado à empresa informada, o sistema exibe: "Esta Empresa não está Liberada para este Usuário [ADM001]!".

Regra de validação (OnValidate)

Ao preencher CD_EMPRACESSO:
  → Consulta EMPRESA pelo CD_EMPRESA informado
  → Se encontrou: preenche NM_EMPRESA com o nome retornado
  → Se não encontrou: limpa NM_EMPRESA e exibe erro

Ao limpar CD_EMPRACESSO:
  → Limpa NM_EMPRESA
  → Limpa CD_USUACESSO (e NM_USUARIO indiretamente)

Restrição de integridade

O par (CD_USUACESSO, CD_EMPRACESSO) possui constraint de foreign key para USUARIOEMPRESA (CD_USUARIO, CD_EMPRESA), garantindo que apenas combinações válidas de usuário × empresa sejam gravadas.

RPARMSISTEMA_USUARIOEMPRESA:
  FOREIGN KEY (CD_USUACESSO, CD_EMPRACESSO)
  REFERENCES USUARIOEMPRESA (CD_USUARIO, CD_EMPRESA)

Procedures impactadas

Rotinas Delphi com referência direta ao campo

Rotina	Arquivo	Linha	Ação
tabPARMSISTEMACD_EMPRACESSOValidate	UdmADM010.pas	331	Valida existência da empresa e preenche NM_EMPRESA
tabPARMSISTEMACD_USUACESSOValidate	UdmADM010.pas	360	Exige CD_EMPRACESSO preenchido antes de validar o usuário
TfrmADM010.edtCD_USUARIOKeyDown	UADM010.pas	455	Exige empresa preenchida para abrir lista de usuários (<F9>)

Referências SQL diretas ao campo

Não foi encontrada referência direta ao campo CD_EMPRACESSO em Scripts/. As procedures que utilizam a tabela PARMSISTEMA acessam predominantemente TP_PLANOCONTABIL e outros campos, sem ler CD_EMPRACESSO.

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

As procedures abaixo utilizam a tabela PARMSISTEMA, mas não referenciam CD_EMPRACESSO diretamente:

• ARRUMA_MASCARACONTA, ATUALIZA_CONTACONTABIL, CALCULA_TEMPOPERMANENCIA, CONTABILIZA_CUPOMFISCAL, ENDERECOPESSOA_BI0, GERA_CONTACLIFOR, GERA_DARF, GERA_PLANOFILIAL, GERA_SPEDBLOCOL, GERA_SPEDCONTABIL, GERA_SPEDCONTABIL_0000, GERA_SPEDECF, GERA_SPEDECFBLOCOJ, GERA_SPEDECFBLOCOK155, GERA_SPEDECFBLOCOK355, GERA_SPEDECFBLOCOL210, GERA_SPEDECFBLOCOY, GRAVA_REGISTROSPED0500, IMPORTA_ARQUIVOMAGNETICO, INCLUI_IMPOSTONOTACTB

Sem impacto direto identificado no código.