01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:Financeiro (SIGAFIN)
Função:

Faturas a pagar (FINA290)

País:Brasil

02. VISÃO GERAL

Ponto de entrada executado durante a gravação dos dados da fatura e antes da contabilização que permite a inclusão de dados complementares na fatura gerada.

03. PARÂMETROS

Não se aplica.

04. EXEMPLO


#INCLUDE "Protheus.ch"

User Function FA290()

	Local nPosCodBar    := aScan(aHeader,{|x| Alltrim(x[2])  == 'E2_CODBAR'  })
	Local nI            := 0
	Local cHistFat  	:= "GRAVACAO COMPLEMENTAR PE FA290"

	For nI := 1 To Len(aCols)

		If RecLock("SE2",.F.)
            
            If !Empty(nPosCodBar)
			    SE2->E2_CODBAR  := aCols[nI, nPosCodBar]
            EndIf
            
            SE2->E2_DATALIB	:= Date()
			SE2->E2_HIST	:= cHistFat

			SE2->(MsUnlock())

		EndIf

	Next nI

Return