Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Linha Protheus
Segmento:Backoffice
Programa:FISA001
Módulo:Livros Fiscais - Sigafis

02. SITUAÇÃO/REQUISITO

Ponto de Entrada permite a alteração dos valores de ajuste da Contribuição Apurada Sobre Receita Bruta. Estes valores serão excluídos da tabela de CPRB consolidada (CKK) e deverá ser chamada sobre quando a apuração for processada de maneira consolidada.

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada

Nome

Tipo

Descrição

PARAMIXBArray of Record

Array com os dados de processamento com elementos 

[1] - Data De

[2] - Data Até

[3] - Filiais selecionadas para processamento

[4] - Filial de apuração

[5] - Gravação individualizada ( mv_par15 = .T. ou .F. )

Retorno

Nome

Tipo

Descrição


Array of Record

Posição 1 - Código da Informação Complementar

Posição 2 - Descritivo da Informação Complementar

Posição 3 - Registro a ser processado A110 / C110

Posição 01: Indicador de ajuste - 0 redução / 1- acréscimo

Posição 02: Valor do ajuste

Posição 03: Código do ajuste conforme tabela 4.3.8 da RFB

Posição 04: Número do Documento

Posição 05: Descrição do ajuste

Posição 06: Data da referência no formato DDMMAAA

Posição 07: Código da Receita - Relacionamento como o Registro P200

04. EXEMPLO DE UTILIZAÇÃO

O exemplo abaixo é exemplificativo para atualização dos registros da CPRB, sendo o seu comportamento e responsabilidade, determinado pelas regras de negócios definidas pelo cliente.


SPEDCP210
#include "totvs.ch"

User Function SPEDCP210()
	Local aRet := {}
	Local nPos := 0

	Aadd(aRet,{})
	nPos := Len(aRet)
	Aadd(aRet[nPos], "0"        )           // Indicador de ajuste - 0 Redução / 1- Acréscimo
	Aadd(aRet[nPos], 11.32      )           // Valor do ajuste
	Aadd(aRet[nPos],"06"        )           // Código do ajuste conforme tabela 4.3.8 da RFB
	Aadd(aRet[nPos],"0001"      )           // Número do Documento
	Aadd(aRet[nPos],"Descrição do ajuste de redução P210a") // Descrição do ajuste
	Aadd(aRet[nPos],"01062013"  )           // Data da referência no formato ddmmaaaa
	Aadd(aRet[nPos],"299101"    )           // Código da Receita

	Aadd(aRet,{})
	nPos := Len(aRet)
	Aadd(aRet[nPos], "0"        )           // Indicador de ajuste - 0 Redução / 1- Acréscimo
	Aadd(aRet[nPos], 11.32      )           // Valor do ajuste
	Aadd(aRet[nPos],"06"        )           // Código do ajuste conforme tabela 4.3.8 da RFB
	Aadd(aRet[nPos],"0001"      )           // Número do Documento
	Aadd(aRet[nPos],"Descrição do ajuste de redução P210b") // Descrição do ajuste
	Aadd(aRet[nPos],"01062013"  )           // Data da referência no formato ddmmaaaa
	Aadd(aRet[nPos],"299101"    )           // Código da Receita

	Aadd(aRet,{})
	nPos := Len(aRet)
	Aadd(aRet[nPos], "0"        )           // Indicador de ajuste - 0 Redução / 1- Acréscimo
	Aadd(aRet[nPos], 11.32      )           // Valor do ajuste
	Aadd(aRet[nPos],"06"        )           // Código do ajuste conforme tabela 4.3.8 da RFB
	Aadd(aRet[nPos],"0001"      )           // Número do Documento
	Aadd(aRet[nPos],"Descrição do ajuste de redução P210c") // Descrição do ajuste
	Aadd(aRet[nPos],"01062013"  )           // Data da referência no formato ddmmaaaa
	Aadd(aRet[nPos],"299101"    )           // Código da Receita

Return aRet

05. DEMAIS INFORMAÇÕES

  • Não há.

06. ASSUNTOS RELACIONADOS