01. DADOS GERAIS
Linha de Produto: | Linha Protheus |
---|---|
Segmento: | Serviços |
Módulo: | Fiscal |
02. DESCRIÇÃO
Ponto de Entrada retorna um array com informações da alteração do produto, caso o procedimento padrão não atenda o cliente para geração do registro 0205 - Alteração do Item gerado através da rotina SEFII - Sistema de Escrituração Fiscal de Pernambuco.
Neste Ponto de Entrada são passados os parâmetros de entrada para identificação do produto e ao final retornar as informações de alteração.
Importante!
As informações contidas neste registro são obtidas do histórico do produto, contidos da tabela AIF.
Para habilitar o histórico de produto, deve ser utilizado do parâmetro MV_HISTTAB
03. ESPECIFICAÇÃO
Parâmetros do ponto de Entrada:
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB | Array of Record | Array com dados de processamento com 4 elementos [1] = Data Inicial da geração do arquivo [2] = Data Final da geração do arquivo [3] = Código do Produto |
Retorno:
Nome | Tipo | Descrição |
---|---|---|
Array of Record | Retorna Array com as informações de alterações [1] = Descrição anterior do Item [2] = Data inicial de utilização da descrição do item [3] = Data final de utilização da descrição do item [4] = Código anterior do item Importante! Ao utilizar este Ponto de entrada, todas as posições devem ser preenchidas. Caso seja necessário retornar mais de uma alteração de um mesmo produto, deve-se retornar um array multidimensional com as informações da alteração do produto. Este array deve conter as mesmas informações descritas anteriormente. Para um melhor detalhamento, observe o exemplo 2. |
04. EXEMPLO DE UTILIZAÇÃO
Exemplo 1 - Array multidimensional - apenas uma alteração por produto
#include "totvs.ch" User Function SEF0205() Local dDataIni := PARAMIXB[1] Local dDataFin := PARAMIXB[2] Local cCodProd := PARAMIXB[3] Local aRet := {} If Alltrim(cCodProd) == "001" aAdd(aRet, "0005") //02 - Código anterior do item aAdd(aRet, "Descrição de alteração do produto") //03 - Descrição anterior do item aAdd(aRet, stod("20160101")) //04 - Data inicial de utilização do código anterior do item aAdd(aRet, stod("20161101")) //05 - Data final de utilização do código anterior do item Endif Return(aRet)
Exemplo 2 - Array multidimensional - N alterações por produto
#include "totvs.ch" User Function SEF0205() Local dDataIni := PARAMIXB[1] Local dDataFin := PARAMIXB[2] Local cCodProd := PARAMIXB[3] Local aRet := {} If Alltrim(cCodProd) == "001" aAdd(aRet, {"0005","Descricao de alteração do produto 1", stod("20160101"), stod("20160101")}) aAdd(aRet, {"0006","Descricao de alteração do produto 2", stod("20160101"), stod("20161101")}) EndIf Return(aRet)