Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: |
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.
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB | Array of Record | Array com dados de processamento com 2 elementos [1] = Data Inicial; [2] = Data Final; |
Nome | Tipo | Descrição |
---|---|---|
Array of Record | Array onde a primeira posição contém o array abaixo para o M230: |
#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} |
Trabalha em conjunto ao ponto de entrada SPDPCANT.