Histórico da Página

#INCLUDE "PROTHEUS.CH"

User Function MaCalcPIS()
Local aRet     := {}
Local cCalcPIS := "S" // S=Calcula IPI; N=Não Calcula IPI.
Local nAliqPIS := 010  // Retorna o percentual de alíquota do IPI.
Local nBasePIS := 01000  // 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, cCalcPIS )
aAdd(aRet, nAliqPIS )
aAdd(aRet, nBasePIS )

Return aRet