Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus
Segmento:Varejo
Módulo:SigaLoja - Controle de Loja
Função:

GetImpPrd - Função responsável por retorna impostos calculados do produto. 

Parâmetros: 

aItens       > Array com Produtos e Filiais  (Obrigatorio)
aCampos  > Array de campos retorno da MATXFIS exemplo:"IT_VALICM" ou "NF_(Obrigatorio)
cCliente   > Codigo do cliente (opcional)
cLojaCli   > Loja do Cliente (opcional)

02. SITUAÇÃO/REQUISITO

Criar função para retornar o imposto (alíquota de ICMS) de um produto para consumidor final(Cliente padrão). Não será tratado alíquota de ISS nessa tarefa. 

03. SOLUÇÃO

Foi desenvolvido a função GetImpPrd() para o retorno dos impostos calculados dos produtos conforme parâmetros informados.


  • Exemplo da utilização da função GetImpPrd
#INCLUDE "Protheus.ch"
//--------------------------------------------------------
/*/{Protheus.doc} GetImpPrd
Função para retorna conforme parametro usando MATXFIS

@param 		aItens     -> Array com produtos e Filiais a serem consultados (Obrigatorio)
@param 		aCampos    -> Array de campos retorno da MATXFIS exemplo: "IT_VALICM" ou "NF_" (Obrigatorio)
@param 		cCliente   -> Codigo do cliente (opcional)
@param 		cLojaCli   -> Loja do Cliente (opcional)
@author  	Varejo
@version 	1.0
@since      23/07/2020
@return	    aRet    -> Retorna com a informação
/*/
//--------------------------------------------------------
User Function TESTEFUN()
Local aProdutos := {}
Local aCampos   := {}
Local aImp := {}
Local cEmpAnt := "T1"
Local cFilAnt := "D MG 01"
Local cCliente:= GetMv( "MV_CLIPAD" )  // Cliente padrao 
Local cLojaCli:= GetMv( "MV_LOJAPAD" )   // Loja padrao

RpcSetType(3)
RpcSetEnv(cEmpAnt, cFilAnt, , ,"LOJ" , "TESTEFUN")

Aadd(aProdutos ,{"LJTEST02","D RJ 02"})
Aadd(aProdutos ,{"FINFATHTLJANTAR","D MG 01"})

Aadd(aCampos,{"IT_ALIQICM"})
Aadd(aCampos,{"IT_VALICM"})
Aadd(aCampos,{"IT_BASEICM"})

aImp := GetImpPrd(aProdutos,aCampos,cCliente,cLojaCli) //Chamada da função

Return


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

Dúvidas Frequentes - Varejo

Guia da Integração RMI - Retail Integration Management