Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 9

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

Gravado em

comparado com

Nova versão 10

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

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
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 - 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 AgregadoLocal _nAliqSol := 19 // Alíquota 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

Alert("Passou pelo PE: M460SOLI -> nItem: " + AllTrim(Str(_nItem)) + " - nItemSC6: " + AllTrim(_cItemSC6))
Return {_nBaseSol,_nValSol,_nMargem,_nAliqSol,_nBaseFCP,_nAliqFCP,_nValFCP}