Salve salve....
Ponto de entrada A103CLAS- ( Compras - Documento de Entrada )
MATA103-A103CLAS - Permite manipular o Item do Acols.
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} A103CLAS
Permite manipular o Item do Acols.
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function A103CLAS()
Local cAliasSD1 := PARAMIXB[1]
Local nBaseIPI:= aScan(aHeader,{|x|Alltrim(x[2])=="D1_BASEIPI"})
Local nBaseICM:= aScan(aHeader,{|x|Alltrim(x[2])=="D1_BASEICM"})
Local nBasePis:= aScan(aHeader,{|x|Alltrim(x[2])=="D1_BASEPIS"})
Local nBaseCof:= aScan(aHeader,{|x|Alltrim(x[2])=="D1_BASECOF"})
Local aRet := {}
//Customização do usuário.
ACols[Len(ACols),nBaseICM] := 0
ACols[Len(ACols),nBasePis] := 0
// IPI - Não alterado
AADD(aRet, .F.)
// ICMS - Alterado
AADD(aRet, .T.)
// PIS - Alterado
AADD(aRet,.T.)
// COFINS - Não alterado
AADD(aRet, .F.)
Return aRet
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima