TOTVS Automação Fiscal

Árvore de páginas

Função

TAF050ClassTrib


Sintaxe

TAF050ClassTrib( cCodFil, @cErr)


Descrição

Função que recebe o código da filial do TAF e retorna a Classificação Tributária do cadastro de complemento de empresas (evento S-1000).

Compatível PaísesTodos
Sistemas OperacionaisTodos
Bases de DadosTodos
Nível de AcessoNível 1 ( Acesso Clientes )
IdiomasTodos
VersãoP12.1.25 +

Parâmetros

NomeTipoDescriçãoDefaultObrigatórioReferência
cCodFilCaracteresCódigo da Filial do TAF (campo C1E_CODFIL)""X
cErrCaracteres

Caso a filial passada não exista ou esteja em branco, serão retornadas as mensagens:

[C1EERR001]  O parâmetro cCodFil é obrigatório.
[C1EERR002]  O valor passado na variável cCodFil (#1) não foi localizado.
[C1EERR003]  O ID encontrado (#1) não corresponde a um código válido da tabela 08 do eSocial (tabela TAF C8D).

""
X


Retorno

NomeTipoDescrição
cClassTribCaracteresCódigo da Classificação Tributária (Tabela 08 do eSocial - TAFA219 - C8D)


Programa

TAFA050.PRW


Exemplo

Exemplo de uso com Classificação Tributária válida:


Static Function GetClasTrib()
 Local cFilTaf := "T1D MG 01"
 Local cErr := ""
 Local cClasTrib := ""

 cClasTrib := TAF050ClassTrib(cFilTaf,@cErr)

 Conout("Class. Trib.: " + cClasTrib)

 If !Empty(cErr)
   Conout("Erro: " + cErr)
 EndIf 

Return cClasTrib


Exemplo de Saída:

Class. Trib.: 99



Exemplo de saída com Classificação Tributária em branco:

Class. Trib.:



Exemplo de saída com cCodFil Inválido:

Class. Trib.:

Erro: [C1EERR002] O valor passado na variável cCodFil (XYZ) não foi localizado.



Exemplo de saída com cCodFil em branco:

Class. Trib.:

Erro: [C1EERR001] O parâmetro cCodFil é obrigatório.



Exemplo de saída com Classificação Tributária inválida:

Class. Trib.:

Erro: [C1EERR003]  O ID encontrado (XYZ) não corresponde a um código válido da tabela 08 do eSocial (tabela TAF C8D).