01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:


Função:MATA103 - Documento de Entrada
País:Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :


02. DESCRIÇÃO

O Ponto de Entrada permite alterar os dados dos itens carregados na classificação da Pré-nota.


03. LOCALIZAÇÃO

O Ponto é executado ao classificar uma nota.


04. PARAMETROS

Nome

Tipo

Descrição

cAliasSD1Array of Record

Alias do SD1


05. RETORNO

Caso utilize o ponto de entrada A103CLAS e realize alguma alteração nos IMPOSTOS (IPI / ICMS / PIS / COFINS), deve-se retornar um array de 4 posições informando qual imposto foi modificado via ponto de entrada.

Tipo

Descrição

Lógico

.T. - Alterou imposto

.F. - Não alterou imposto

Obs: Mesmo que altere apenas 1 imposto, deve-se retornar sempre as 4 posições no array. Caso não altere nenhum imposto, não há necessidade de retornar uma array;

Nome

Tipo

Descrição

Obrigatório

aRet

Array

1 - IPI

2 - ICMS

3 - PIS

4 - COFINS

Não

06. EXEMPLO DE UTILIZAÇÃO

#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} A103CLAS
PE para manipular os itens na classificação da nota.
@type     function
@author      
@since       15/10/2024
/*/
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 nValunt := aScan(aHeader,{|x|Alltrim(x[2])=="D1_VUNIT"})


Local aRet    := {}


//Customização do usuário alterando vlr unitário e vlr total
ACols[Len(ACols),nValunt] := 20.0


//Alterando vlr de impostos
// 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