PE - SPED0150 - SPEDFISCAL - Alterar informações do registro 0150

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Serviços
Módulo:	Fiscal
Programa:	SPEDFISCAL.PRW
Idiomas:	Todos

02. DESCRIÇÃO

Ponto de Entrada pode ser utilizado para alterar as informações dos registros 0150 gerados para o SPEDFISCAL e SPED Contribuições.

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada:

Nome	Tipo	Descrição
PARAMIXB	Array of Record	[1] = REG [2] = COD_PART [3] = NOME [4] = COD_PAIS [5] = CNPJ [6] = CPF [7] = IE [8] = COD_MUN [9] = SUFRAMA [10] = END [11] = NUM [12] = COMPL [13] = BAIRRO

Retorno:

Nome	Tipo	Descrição	Obrigatório
aRet	Array of Record	[1] = REG [2] = COD_PART [3] = NOME [4] = COD_PAIS [5] = CNPJ [6] = CPF [7] = IE [8] = COD_MUN [9] = SUFRAMA [10] = END [11] = NUM [12] = COMPL [13] = BAIRRO	Sim

Importante

aReg0150: Array com conteúdo do registro 0150 alterado pelo Ponto de Entrada (deve possuir a mesma estrutura do array recebido como parâmetros).

04. EXEMPLO DE UTILIZAÇÃO

O exemplo abaixo permite acrescentar ao filtro atualmente existente, na geração do registro 1900 EFD Contribuições, sendo o seu comportamento determinado pelas regras de negócios definidas pelo cliente, além de sua responsabilidade.

SPED0150

#include "protheus.ch"

User Function SPED0150()

	Local nPosName := 3
	Local aReg0150 := ParamIXB[1]  // Array de informações do 0150
	
	/*
	aReg0150:
		[1] = REG
		[2] = COD_PART
		[3] = NOME
		[4] = COD_PAIS
		[5] = CNPJ
		[6] = CPF
		[7] = IE
		[8] = COD_MUN
		[9] = SUFRAMA
		[10] = END
		[11] = NUM
		[12] = COMPL
		[13] = BAIRRO
	*/

	// alteração do nome
	aReg0150[nPosName] := "USO DO PONTO DE ENTRADA SPED0150"
	
Return aReg0150

05. DEMAIS INFORMAÇÕES

Não há.

06. ASSUNTOS RELACIONADOS