MA580F2V - Exclusão na Limpeza das Notas Fiscais de Saída

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	SIGAFAT - Faturamento
Função:	MATA580 - Limpeza de Arquivos do modulo de Faturamento

02. DESCRIÇÃO

Este ponto de entrada é executado no momento da exclusão das notas fiscais de saída na rotina de Limpeza Mensal, para permitir ou não a exclusão dos documentos processados.

03. SINTAXE

MA580F2V(F2_FILIAL, F2_CLIENTE, F2_LOJA, F2_DOC, F2_SERIE, F2_TIPO, F2_ESPECIE) --> lDeleta

04. PARÂMETROS

Nome	Tipo	Descrição
PARAMIXB[1]	Caractere	Filial
PARAMIXB[2]	Caractere	Cliente
PARAMIXB[3]	Caractere	Loja
PARAMIXB[4]	Caractere	Número
PARAMIXB[5]	Caractere	Série
PARAMIXB[6]	Caractere	Tipo
PARAMIXB[7]	Caractere	Espécie

05. RETORNO

Retorno	Tipo	Descrição	Obrigatório
lDeleta	Lógico	Indica se o registro processado será excluído, sendo: .T. - Exclui o documento processado .F. - Não exclui o documento processado	Sim

06. EXEMPLO

#INCLUDE 'PROTHEUS.CH'
#INCLUDE "FWMVCDEF.CH"

//***************************************************************
//Ponto de entrada MA580F2V antes de deletar o documento de saída
//#Par01    - F2_FILIAL do registro posicionado
//#Par02    - F2_CLIENTE do registro posicionado
//#Par03    - F2_LOJA do registro posicionado
//#Par04    - F2_DOC do registro posicionado
//#Par05    - F2_SERIE do registro posicionado
//#Par06    - F2_TIPO do registro posicionado
//#Par07    - F2_ESPECIE do registro posicionado
//*Return   - Informa se deleta o registro .T. ou não .F.
//***************************************************************

User Function MA580F2V()

    Local cFilSF2   := PARAMIXB[1] 
    Local cCliSF2   := PARAMIXB[2] 
    Local cLojSF2   := PARAMIXB[3] 
    Local cDocSF2   := PARAMIXB[4] 
    Local cSerSF2   := PARAMIXB[5] 
    Local cTipSF2   := PARAMIXB[6] 
    Local cEspSF2   := PARAMIXB[7] 
    Local lDeleta   := .T.         

    If cCliSF2 == "FAT001" .And. cTipSF2 == "D"
        lDeleta := .F.
    EndIf

Return lDeleta

Árvore de páginas