Árvore de páginas

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

PARAMIXBArray 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

SEF0205
#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

SEF0205
#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) 


05. DEMAIS INFORMAÇÕES

FIS0024_SEFII