CD_HISTENTLEITOR — Histórico de Entrada com Leitor

Tela de configuração: MEQ001 — Parâmetros de Estoque Localização: Aba Produção com Leitor Tabela: PARMESTOQUE.CD_HISTENTLEITOR Tipo: INTEGER (chave estrangeira para HISTORICO.CD_HISTORICO)

Visão geral

Define o histórico contábil/movimentação utilizado ao registrar uma entrada de estoque via leitor de código de barras na produção. O valor informado é aplicado como parâmetro do histórico ao chamar a procedure GERA_ESTOQUE durante o processamento de etiquetas.

Campos envolvidos

Campo	Tabela	Tipo	Descrição
CD_HISTENTLEITOR	PARMESTOQUE	DOM_INTEGER	Código do histórico para entrada com leitor
DS_HISTENTLEITOR	(campo calculado no dataset)	STRING	Descrição do histórico (preenchida automaticamente pela validação)

Telas impactadas

• MEQ001 — Tela de configuração do parâmetro (aba "Produção com Leitor").
• MEQ037 — Procedure Busca_Parametros lê P.CD_HISTENTLEITOR como CD_HISTORICO para uso em processamentos de leitor.
• PROCESSA_ETIQUETA — Script SQL que utiliza o valor para gerar estoque na entrada de etiquetas.

Opções disponíveis

Este parâmetro aceita qualquer código de histórico cadastrado na tabela HISTORICO, desde que atenda às validações abaixo.

Código de histórico válido (tipo Estoque e ativo)

O que faz	Detalhe
Editável	Campo de digitação livre com busca via <F9>
Exige	Histórico cadastrado em HISTORICO, com ST_ATIVO = 'S' e TP_HISTORICO = 'E' (Estoque)
Restrição	Rejeita históricos inativos ou de tipo diferente de Estoque

Simulação passo a passo

1. Acesse MEQ001 (Parâmetros de Estoque).
2. Navegue até a aba Produção com Leitor.
3. Localize o campo Entrada com Leitor (CD_HISTENTLEITOR).
4. Pressione <F9> para abrir a pesquisa de históricos.
5. Selecione um histórico ativo do tipo Estoque (a pesquisa filtra automaticamente por ST_ATIVO = 'S' e TP_HISTORICO = 'E').
6. O código do histórico é preenchido e a descrição é exibida automaticamente no campo DS_HISTENTLEITOR.
7. Salve os parâmetros.

Resultado esperado: O código do histórico fica gravado em PARMESTOQUE.CD_HISTENTLEITOR para a empresa. Ao processar etiquetas via leitor de código de barras, a entrada de estoque utiliza este histórico como referência contábil na chamada a GERA_ESTOQUE.

Excecao / Importante: Se o histórico estiver inativo (ST_ATIVO = 'N'), o sistema exibe a mensagem "O Histório não está Ativo [TCB003]!". Se o tipo não for Estoque (TP_HISTORICO <> 'E'), exibe "O Histório deve ser do Tipo Estoque [TCB003]!". Se o código não existir, exibe "O Histório não está Cadastrado [TCB003]!".

Campo vazio (sem histórico definido)

O que faz	Detalhe
Editável	Permite limpar o campo
Comportamento	DS_HISTENTLEITOR é limpo automaticamente
Impacto na produção	A procedure PROCESSA_ETIQUETA passará null como histórico ao gerar estoque

Simulação passo a passo

1. Acesse MEQ001 → aba Produção com Leitor.
2. Limpe o campo Entrada com Leitor.
3. Salve os parâmetros.

Resultado esperado: O campo fica vazio. Ao processar etiquetas, o histórico informado a GERA_ESTOQUE será null, e o sistema utilizará o comportamento padrão da procedure para histórico nulo.

Parâmetros relacionados

Todos configurados em MEQ001 — aba Produção com Leitor:

Parâmetro	Tabela	Descrição
CD_OPERENTLEITORENT	PARMESTOQUE	Operação de entrada no local de destino (leitor)
CD_OPERENTLEITORSAI	PARMESTOQUE	Operação de saída do local de origem (leitor)
CD_TIPOENTLEITORENT	PARMESTOQUE	Tipo de local de destino (entrada)
CD_TIPOENTLEITORSAI	PARMESTOQUE	Tipo de local de origem (saída)
CD_LOCENTLEITORENT	PARMESTOQUE	Local de destino (entrada)
CD_LOCENTLEITORSAI	PARMESTOQUE	Local de origem (saída)
CD_HISTSAILEITOR	PARMESTOQUE	Histórico para saída com leitor (paralelo a este parâmetro)

Procedures impactadas

Rotinas Delphi com referência direta ao campo

Rotina	Arquivo	Linha	Descrição
TdmMEQ001.tabPARMESTOQUECD_HISTENTLEITORValidate	UdmMEQ001.pas	987	Valida o código digitado: consulta HISTORICO, verifica ativo e tipo Estoque, preenche descrição
TfrmMEQ001.edtCD_HISTENTLEITORKeyDown	UMEQ001.pas	1319	Trata <F9> para pesquisa de históricos ativos do tipo Estoque
TfrmMEQ001.PaginasChange	UMEQ001.pas	887	Foca no campo edtCD_HISTENTLEITOR ao trocar para a aba

Referências SQL diretas ao campo

Procedure	Arquivo	Linha	Descrição
PROCESSA_ETIQUETA	PROCESSA_ETIQUETA.sql	60	Lê P.CD_HISTENTLEITOR de PARMESTOQUE e utiliza como parâmetro de histórico na chamada a GERA_ESTOQUE (linha 105)
Busca_Parametros (MEQ037)	UdmMEQ037.pas	277	Lê P.CD_HISTENTLEITOR renomeado como CD_HISTORICO para uso no módulo de leitor

Candidatas por uso da tabela PARMESTOQUE

Numerosas procedures fazem SELECT ... FROM PARMESTOQUE mas não citam o campo CD_HISTENTLEITOR diretamente. As duas referências SQL diretas confirmadas estão listadas acima (PROCESSA_ETIQUETA e Busca_Parametros em MEQ037).

Exemplo prático

Configure o histórico "Entrada Produção" (código 150) em PARMESTOQUE.CD_HISTENTLEITOR para a empresa. Ao ler uma etiqueta de código de barras de uma ordem de produção pelo leitor, o sistema:

1. Lê os parâmetros de PARMESTOQUE (incluindo CD_HISTENTLEITOR = 150).
2. Executa a saída do local de origem (Em Processo) usando CD_OPERENTLEITORSAI.
3. Executa a entrada no local de destino usando CD_OPERENTLEITORENT, passando o histórico 150 para GERA_ESTOQUE.

O histórico 150 será gravado no lançamento de estoque gerado, permitindo rastrear a movimentação como "Entrada via Leitor de Produção".