Gera Dados para a Dirf (FINA401)
Brasil
| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | Gera Dados para a Dirf (FINA401) |
| País: | Brasil |
O Ponto de Entrada FA401GRV utilizado para gravar campos da tabela "SR4" - Itens DIRF/Informe Rendimento, referente aos tipos de rendimento "A"(Título principal) e "D"(Título de imposto).
| Nome | Tipo | Descrição |
|---|---|---|
ParamIxb[1] | Caracter | Contém tabela temporária com informações do título principal. |
ParamIxb[2] | Caracter | Contém tabela temporária com informações do título de imposto. |
03. EXEMPLO DE UTILIZAÇÃO
#include "PROTHEUS.ch"
User Function FA401GRV()
Local cTitNF as Character
Local cTitTX as Character
If ParamIxb <> Nil // Uso obrigatório para verificar que o ParamIxb terá conteúdo.
cTitNF := ParamIxb[1] // Título Principal
cTitTX := ParamIxb[2] // Título de Imposto
If !Empty(SRL->RL_PAIS)
Reclock("SR4", .F.)
SR4->R4_DTPGT := (cTitNF)->E2_BAIXA
SR4->(MsUnlock())
EndIf
Endif
Return |