Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Fiscal


02. DESCRIÇÃO

Ponto de entrada utilizado para permitir a alteração do cálculo de IPI padrão do sistema, permitindo a manipulação da alíquota e da base de cálculo do IPI.


Importante

A utilização desse ponto de entrada é de responsabilidade exclusiva do cliente, pois terá impacto direto na escrituração das notas e dos livros fiscais.

Utilize com cautela!


03. Especificação

Parâmetros do ponto de entrada:

Nome

Tipo

Descrição

ParamIXB[1]NuméricoNúmero do Item
ParamIXB[2]CarácterCódigo do Produto
ParamIXB[3]CarácterCódigo da TES
ParamIXB[4]CarácterTipo de Participante (C = Cliente/F = Fornecedor)
ParamIXB[5]CarácterCódigo do Participante
ParamIXB[6]CarácterCódigo da Loja do Participante
ParamIXB[7]CarácterOperação da Nota Fiscal (E = Entrada/S = Saída)

Retorno:

O ponto de entrada deverá obrigatoriamente retornar um array de 3 posições:

NomeTipoDescrição
aRet[1]CarácterIndica se calcula ou não o IPI para o item. (S=Sim, N=Nao)
aRet[2]Carácter

Indica o percentual de alíquota para cálculo de IPI para o item.

Caso seja passado zerado, o sistema desconsiderará o retorno dessa posição, possibilitando que seja informado somente a base de cálculo.

aRet[3]Carácter

Indica o valor de base de cálculo que será considerada para cálculo de IPI para o item. 

Caso seja passado zerado, o sistema desconsiderará o retorno dessa posição, possibilitando que seja informado somente a alíquota


04. EXEMPLO DE UTILIZAÇÃO


PE MaCalcIPI
#INCLUDE "PROTHEUS.CH"

User Function MaCalcIPI()
    Local nItem      := PARAMIXB[1] //Número do Item
    Local cProduto   := PARAMIXB[2] //Código do Produto
    Local cTes       := PARAMIXB[3] //Código da TES
    Local cCliFor    := PARAMIXB[4] //Tipo de Participante (C = Cliente/F = Fornecedor)
    Local cCodCliFor := PARAMIXB[5] //Código do Participante
    Local cLoja      := PARAMIXB[6] //Código da Loja do Participante
    Local cOperNF    := PARAMIXB[7] //Operação da Nota Fiscal (E = Entrada/S = Saída)


	Local aRet     := {}

	Local cCalcIPI := "" // S=Calcula IPI; N=Não Calcula IPI.
	Local nAliqIPI := 0  // Retorna o percentual de alíquota do IPI.
	Local nBaseIPI := 0  // Retorna a base de cálculo do IPI.

	/*

	Faça seu cálculo aqui: À partir desse ponto de entrada, é possível acessar o aCols e o aHeader do Pedido.

	*/

	aAdd(aRet, cCalcIPI )
	aAdd(aRet, nAliqIPI )
	aAdd(aRet, nBaseIPI )

Return aRet



05. DEMAIS INFORMAÇÕES

Por meio desse Ponto de Entrada, também é possível acessar o aHeader[] e o aCols[] para tomada de decisões.

06. ASSUNTOS RELACIONADOS

     Não há.