PE FATTRAVSA1 - Trava/Destrava os registros da tabela SA1

CONTEÚDO

Dados Gerais
Descrição
Sintaxe
Parâmetros
Retorno
Exemplo

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	SIGAFAT - Faturamento
Função:	FATXFUN - Funções do Módulo Faturamento MATA450 - Liberação de Crédito MATA461- Documentos de Saída
Abrangências:	Microsiga Protheus 12
Versões:	Microsiga Protheus 12
Compatível Países:	Brasil
Sistemas Operacionais:	Todos
Compatível com as Bases de Dados:	Todos
Nível de Acesso:	Nível 1 (Acesso Clientes)
Idiomas:	Todos

02. DESCRIÇÃO

O ponto de entrada FATTRVSA1 permite controlar o travamento (Lock) dos registros da Tabela de Clientes (SA1) e a respectiva gravação dos campos Saldo de Pedido (A1_SALPED), Saldo Pedido Bloq.Credito (A1_SALPEDB), Saldo Pedidos Liberados (A1_SALPEDL). Este ponto de entrada é executado nas rotinas apresentadas a seguir:

Pedido de Vendas - MATA410
Liberação de Pedido de Venda - MATA440
Análise de Crédito do Pedido de Vendas - MATA450
Análise de Crédito de Cliente - MATA450A
Liberação de Crédito e Estoque - MATA456
Documentos de Saída - MATA461
Exclusão de Documentos de Saída - MATA521

Essa ação é possível tanto com as rotinas executadas por meio da interface com o usuário (Smartclient) ou por meio de rotina automática (Execauto).

Importante

Quando este Ponto de Entrada está habilitado, implementado e retorne o valor Falso (.F.), o preenchimento dos campos Saldo de Pedido (A1_SALPED), Saldo Pedido Bloq.Credito (A1_SALPEDB), Saldo Pedidos Liberados (A1_SALPEDL) deve ocorrer de maneira customizada para permitir o funcionamento correto da Análise de Crédito no Módulo de Faturamento.
Caso este Ponto de Entrada esteja habilitado, os dados dos campo Saldo de Pedido (A1_SALPED), Saldo Pedido Bloq.Credito (A1_SALPEDB), Saldo Pedidos Liberados (A1_SALPEDL) não serão atualizados mesmo após a execução da rotina de Refaz Acumulados (MATA215);
A execução deste Ponto de Entrada exige a atualização do sistema com os pacotes de atualização da Expedição Contínua dos Módulos Faturamento e Fiscal.
Este Ponto de Entrada trata somente os campos do Faturamento. Caso seja necessário controlar o travamento (Lock) dos registros da Tabela de Cliente (SA1) de campos de uso do Módulo Financeiro ou dados do Módulo de Compras, é necessário seguir a documentação apresentada a seguir:
- https://tdn.totvs.com/pages/releaseview.action?pageId=185737827
- https://centraldeatendimento.totvs.com/hc/pt-br/articles/360020401031-MP-FAT-MV-ATUSA1-

Para identificar a rotina que está executando o ponto de entrada, é sugerido o uso da função FunName() conforme o exemplo apresentado no tópico 06. EXEMPLO desta documentação.

03. SINTAXE

FATTRVSA1() ---> lRet

04. PARÂMETROS

Nome	Tipo	Descrição	Default	Obrigatório	Referência
aParamIXB	Vetor	Vetor com os dados do cliente que está posicionado na Tabela de Clientes (SA1), sendo: [ 01 ] - cFilial - Tipo: Caracter - Filial a que o cliente pertence conforme configuração de compartilhamento da Tabela de Clientes (SA1). [ 02 ] - cCod - Tipo: Caracter - Código do Cliente [ 03 ] - cLoja - Tipo: Caracter - Loja do Cliente	NA

05. RETORNO

Retorno	Tipo	Descrição	Obrigatório
lRet	Boolean	Verdadeiro (.T.) - O programa padrão irá realizar o travamento (Lock) do registro da Tabela de Clientes (SA1) e a sua respectiva gravação dos campos Saldo de Pedido (A1_SALPED), Saldo Pedido Bloq.Credito (A1_SALPEDB), Saldo Pedidos Liberados (A1_SALPEDL). Falso (.F.) - O programa padrão não irá realizar o travamento (Lock) do registro da Tabela de Clientes (SA1) e a sua respectiva gravação dos campos Saldo de Pedido (A1_SALPED), Saldo Pedido Bloq.Credito (A1_SALPEDB), Saldo Pedidos Liberados (A1_SALPEDL).	Sim

06. EXEMPLO

Exemplo:

#INCLUDE "PROTHEUS.CH"

User Function FATTRVSA1()

Local lRet         := .F.
Local cFilialSA1   := PARAMIXB[1]
Local cCodSA1      := PARAMIXB[2]
Local cLojaSA1     := PARAMIXB[2]
Local cRotName     := FunName()

lRet := MsgYesNo(       "FATTRVSA1 - Deseja realizar o travamento (Lock) do registro na tabela SA1:" + CRLF + ;
                        "|Filial: " + cFilialSA1 + CRLF +;
                        "|Cod: " + cCodSA1  + CRLF +;
                        "|Loja: " + cLojaSA1  + CRLF + ;
                        "|Rotina do Menu: " + cRotName )

Return lRet

Árvore de páginas