Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Jorge Jose de Souza

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 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
 Solidário
Local _nBaseFCP := 440.00 // Base 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}