Árvore de páginas

Ponto-de-Entrada: FINCDRET - Retorna códigos de retenção

Abrangências:Microsiga Protheus 10
Versões:Microsiga Protheus 10
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos


Descrição:

Retorna os códigos de retenção que devem ser tratados como código único de retenção conforme IN SRF 480. Este tratamento deve ser utilizado em Empresas Públicas.

Eventos

- Gravação de título a pagar.

- Alteração de título a pagar.

- Processamento da DIRF.

Programa Fonte:

FINA050, MATXATU, FINA401

Sintaxe

FINCDRET - Retorna códigos de retenção ( [ ] ) --> aCodRet

Parâmetros: não possui

Retorno:

NomeTipoDescrição
aCodRetArray Retorna um array com os códigos de retenção 


  • Lista alfabética com os códigos de retenção que devem ser tratados como código de retenção único. Conforme IN SRF 480 - aplicável a empresas públicas.

Exemplos

#INCLUDE "RWMAKE.CH"
#INCLUDE "PROTHEUS.CH"
User Function FINCDRET()
Local aCodRet := {"6147","9060","8739","8767","6175","8850","8863","6188","6190"}
Return aCodRet


  • Sem rótulos