Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Usuário desconhecido (felipe.valcanaia)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Joao Victor Pellegrini De Oliveira

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
M460SOLI - Calcula base de retenção ICMS e valor de ICMS Solidário
M460SOLI - Calcula base de retenção ICMS e valor de ICMS Solidário

Ponto-de-Entrada: M460SOLI - Calcula base de retenção ICMS e valor de ICMS Solidário


Abrangências:Microsiga Protheus 10
Versões:Microsiga Protheus 10
, Microsiga Protheus
- 11 - 12
Compatível Países:Brasil
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil)


Descrição:
Este ponto de entrada tem a finalidade de calcular a base de retenção de ICMS e o valor do ICMS solidário.
Programa Fonte
MATA461.PRX
Sintaxe

M460SOLI - Calcula base de retenção ICMS e valor de ICMS Solidário ( [ _nItem ], [ _cItemSC6 ] ) --> aRet

Parâmetros:



Nome

Tipo

Descrição

Default

Obrigatório

Referência

_nItem

Numérico

Item do aCols.










_cItemSC6

Caracter

Item do Pedido de Venda (C6_ITEM)










_nMargem

Numérico

Margem de Valor Agregado










_nAliqSol

Numérico

Alíquota Solidário










Retorno
aRet
    (array_of_record)
  • Este PE deverá retornar um Array contendo:

  • 1 - Base de retenção de ICMS
    2 - Valor do ICMS solidário
  • 3 - Margem de Valor Agregado
  • 4 - Alíquota Solidário

  • 5 - Base do FECP-ST
    6 - Aliquota do FECP-ST
    7 - Valor do FECP-ST


    Se este PE não retornar o array com a estrutura descrita acima, o programa ignorará o PE e o sistema fará os devidos cálculos.
Exemplos :


Bloco de código
User Function M460SOLI()

Local _nItem 
:= ParamIxb[1]
 //Item do
aColsLocal
aCols
Local _cItemSC6
 := ParamIxb[2]
 //Item do Pedido de Venda (C6_ITEM)
Local _nBaseSol
 := 440.00
 //Base de retencao ICMS Solidario
Local _nValSol := 7.20 //Valor do ICMS Solidario
Local _nMargem := 39 // Margem de Valor Agregado
Local _nAliqSol := 19 // Alíquota Solidário
Local _nBaseFCP := 440.00 // Base
de retencao ICMS SolidarioLocal _nValSol := 7.20 //Valor do ICMS SolidarioAlert
 do FCP-ST
Local _nAliqFCP := 2 // Aliquota do FCP-ST
Local _nValFCP := 8.80 // Valor do FCP-ST

//Atencao: O FCP-ST compõe o valor do ICMS-ST. Portanto seu valor deve ser somado ao valor "final" de ICMS-ST.
Alert("Passou pelo PE: M460SOLI -> nItem: " + AllTrim(Str(_nItem)) + " - nItemSC6: " + AllTrim(_cItemSC6))
Return {_nBaseSol,_nValSol,_nMargem,_nAliqSol,_nBaseFCP,_nAliqFCP,_nValFCP}