Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. DADOS GERAIS

Produto:

Solucoes_totvs_cross
SolucaoCrossTOTVS Backoffice

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoBackoffice

Módulo:

Modulos_cross_segmentos
ModulosCrossSegmentosTOTVS Backoffice (Linha Protheus) - Financeiro (SIGAFIN)

Função:

Gera Dados para a Dirf (FINA401)

País:

Brasil

02. DESCRIÇÃO

O Ponto de Entrada FA401CMP FA401GRV utilizado para gravar campos da tabela "SR4" - Itens DIRF/Informe Rendimento, referente aos tipos de rendimento "A" e "D".

02. PARÂMETROS

NomeTipoDescrição

ParamIxb[1] 

CaracterContém tabela temporária com informações do título principal.

ParamIxb[2] 

CaracterContém tabela temporária com informações do título de imposto.

...

Bloco de código
languagecpp
themeMidnight
firstline1
titleFA401CMP
linenumberstrue
#include "PROTHEUS.ch"
User Function FA401CMPFA401GRV()

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 

...