Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:

TOTVS Backoffice (Linha Protheus) - Fiscal (SIGAFIS)


02. DESCRIÇÃO

Este ponto de entrada altera o conteúdo dos registros M230 e M630, que contém os valores de diferimento de PIS e COFINS na geração do SPED-PIS/COFINS.

O Ponto de entrada é chamado na apuração da EFD-Contribuições.

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada:

Nome

Tipo

Descrição

PARAMIXBArray of Record

Array com dados de processamento com 2 elementos

[1] = Data Inicial;

[2] = Data Final;

Retorno:

Nome

Tipo

Descrição


Array of Record

Array onde a primeira posição contém o array abaixo para o M230:
01 - COD. CONTRIBUICAO (preenchido de acordo com a Tabela informada no campo 02 do registro M210)
02 - REG
03 - CNPJ
04 - VL_VENDA
05 - VL_NAO_RECEB
06 - VL_CONT_DIF
07 - VL_CRED_DIF
08 - COD_CRED
E a segunda posição contém outro array com a mesma estrutura para o M630.


04. EXEMPLO DE UTILIZAÇÃO


SPDPCD
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOPCONN.ch"

User Function SPDPCD()
	Local dDataIni 	:= PARAMIXB[1]
	Local dDataFim	:= PARAMIXB[2]
	Local aM230		:= {}
	Local aM630		:= {}
	Local lCondicao := .T.        	

	If lCondicao 	
		
		aAdd(aM230, {})		
		nPos := Len(aM230)		
		aAdd (aM230[nPos], "02")			   	//01 - COD. CONTRIBUICAO (preenchido de acordo com a Tabela informada no campo 02 do registro M210)		
		aAdd (aM230[nPos], .F.)			   		//02 - Pis calculado por Pauta (.T./.F.)		
		aAdd (aM230[nPos],1.65)					//03 - Alíquota ou Pauta		
		aAdd (aM230[nPos],"12345678901234")		//04 - CNPJ		
		aAdd (aM230[nPos],500)					//05 - VL_VENDA		
		aAdd (aM230[nPos],200)				    //06 - VL_NAO_RECEB		
		aAdd (aM230[nPos],200)				    //07 - VL_CONT_DIF		
		aAdd (aM230[nPos], "")				    //08 - VL_CRED_DIF		
		aAdd (aM230[nPos], "")				   	//09 - COD_CRED    		
		

		aAdd(aM630, {})		
		nPos := Len(aM630)		
		aAdd (aM630[nPos], "02")			   	//01 - COD. CONTRIBUICAO (preenchido de acordo com a Tabela informada no campo 02 do registro M610)		
		aAdd (aM630[nPos], .F.)			   		//02 - COFINS calculado por Pauta (.T./.F.)		
		aAdd (aM630[nPos],7.6)					//03 - Alíquota ou Pauta		
		aAdd (aM630[nPos],"12345678901234")		//04 - CNPJ		
		aAdd (aM630[nPos],500)					//05 - VL_VENDA		
		aAdd (aM630[nPos],200)				    //06 - VL_NAO_RECEB		
		aAdd (aM630[nPos],200)				    //07 - VL_CONT_DIF		
		aAdd (aM630[nPos], "")				    //08 - VL_CRED_DIF		
		aAdd (aM630[nPos], "")				   	//09 - COD_CRED	

	EndIf

Return {aM230,aM630}

05. DEMAIS INFORMAÇÕES

Trabalha em conjunto ao ponto de entrada SPDPCANT.