PE A103BLOQ - Bloquear Documento de Entrada por tolerância de recebimento sem pedido de compras

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	TOTVS Backoffice (Linha Protheus) - Compras (SIGACOM)
Função:	MATA103 - Documento de Entrada
País:	Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :

02. DESCRIÇÃO

O Ponto de Entrada A103BLOQ permite o bloqueio de documento de entrada por tolerância de recebimento, sem vincular o pedido de compra.

03. LOCALIZAÇÃO

O Ponto de Entrada A103BLOQ encontra-se na função A103TemBlq, responsável pela validação da tolerância de recebimento no momento da confirmação do Documento de Entrada.
O conceito do Ponto de Entrada A103BLOQ é, se o seu retorno for .T., bloquear o documento de entrada por Tolerância de Recebimento, sem precisar vincular o Pedido de Compra.
Para que gere alçada (SCR) para desbloqueio do documento de entrada bloqueado através do ponto de entrada, é necessário ter as configurações de bloqueio por tolerância:

Parâmetro MV_NFAPROV - Grupo de aprovação;
Parâmetro MV_TOLENT;
Cadastro de tolerância (COMA020).

04. PARAMETROS

Nome	Tipo	Descrição
PARAMIXB[1]	Array	É passado como parâmetro um array com uma dimensão

PARAMIXB[1] -> .T. = Indica que houve bloqueio por tolerância de recebimento.
PARAMIXB[1] -> .F. = Indica que não houve nenhum bloqueio por tolerância de recebimento.

05. RETORNO

Tipo	Descrição
Lógico	Se .T. Bloqueia o Documento de Entrada; Se .F. Não bloqueia o Documento de Entrada.

06. EXEMPLO DE UTILIZAÇÃO

ADVPL

#Include 'Protheus.ch'
 /*/{Protheus.doc} User Function A103BLOQ
   PE para bloquear Documento de Entrada por Tolerância
   sem PC.
   @type Function
   @since 07/11/2024
   @author user
/*/
User Function A103BLOQ()


Local PARAMIXB[1]  // Retorno lógico da função verificadora da tolerância de recebimento. Se .T. tem bloqueio se .F. não tem bloqueio
Local lValido := .T.  // Validações específicas


lValido:= FWAlertYesNo("Deseja prosseguir com a ação? Sim / Não", "ATENÇÃO A103BLOQ!")


Return lValido

Árvore de páginas