01. DADOS GERAIS

Linha de Produto:

Microsiga Protheus®

Segmento:

Backoffice

Módulo:

Financeiro

Função:

FINA401 - Gera Dados Para a Dirf

FINA403 - Gera Dirf Empresa Públicas


02. DESCRIÇÃO

O Ponto de Entrada FA401CMP  utilizado para gravar campos complementares do "SR4" - Itens DIRF/Informe Rendimento


Tabelas posicionadas:

No momento da chamada do ponto de entrada será posicionado na tabela.

03. PARÂMETROS

Não se aplica.

04. RETORNO

Não se aplica.


05. EXEMPLO DE UTILIZAÇÃO

#INCLUDE "totvs.ch"

/*/{Protheus.doc} User Function FA401CMP

    (Ponto de entrada utilizado para gravar campos complementares do "SR4" - Itens DIRF/Informe Rendimento )
    @author Cassio S. Dias
    @since 14/11/2023
    @version 12.1.2310
    @return Nil
    @see (https://tdn.totvs.com/x/qxkpM)
    /*/
User Function FA401CMP()

	//Posicionado na tabela "SR4 - Movimentos do caixinha"
	Local cAno :="2020"

//Gravando o campo país para os registros com ano superior ao ano de 2020
	if SR4->R4_ANO > cAno
		Reclock("SR4",.F.)
		SR4->R4_PAIS  := "105"
		MsUnlock()
	Endif

Return NIL