Histórico da Página

#INCLUDE 'TOTVS.CH'
#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} F475NAT
Ponto de entrada executado para ajustar a natureza do movimento bancário efetivado durante o processo de importação de extratos bancários via Job.
ParamIxb[1] -  Código do movimento bancário, de acordo com a tabela definida no padrão de extratos modelo Febraban, para identificação e retorno do código da natureza financeira que se queira aplicar.
Valores possíveis
'102' = Encargos
'105' = Tarifas
'109' = CPMF
'110' = IOF 

@type       Function
@author     TOTVS
@since      087/12/2023
@return     Nil
/*/
User Function F475NAT()
    
	Local cCodOcor := Paramixb[1]
	Local cNatureza := ''

	//Aqui você realiza o retorno do código de natureza desejada
	Case cCodOcor == '102'	//Encargos
		cNatureza := '000001'
 	Case cCodOcor == '105'	//Tarifas
		cNatureza := '000002'
  	Case cCodOcor == '109'	//CPMF 
		cNatureza := '000003'
   	Case cCodOcor == '110'	//IOF
 		cNatureza := '000004'
	OtherWise 
 		cNatureza := '000000' 
 	EndCase

Return Nil