Árvore de páginas

Versões comparadas

Chave

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

 Tempo aproximado para leitura: 05 min

1. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Jurídico
Módulo:Pré Faturamento de Serviços - SIGAPFS
Função:Lançamentos - JURA241


02. PONTO DE ENTRADA

Descrição:

Ponto de entrada após a gravação do lançamento para informar se deve ser gerado um registro na tabela Demais Docs. PIS COFINS (CF8) da natureza que possui apuração de PIS ou COFINS.

Observação:Caso nenhuma das naturezas do lançamento origem ou destino não possuir configuração de apuração de PIS ou COFINS o ponto de entrada não é executado.

Localização:

SIGAPFS - Atualizações - Financeiro - Lançamentos

Programa Fonte:

JURA241

Função:

J241Cmmt

Parâmetros:



Nome

Tipo

Descrição

cNaturezacaracter

Código da natureza utilizada no lançamento


Obs:  Apenas uma única natureza será considerada para avaliação do ponto de entrada e gravação do registo Demais Docs. PIS COFINS (CF8), sendo priorizada a Natureza de Origem (OHB_NATORI). Por exemplo: Caso a Natureza de Origem do lançamento estiver configurada com a apuração de PIS ou COFINS então o pondo de entrada será executado para avaliação da mesma assim desconsiderando a Natureza de Destino (OHB_NATDES).

Retorno:



Nome

Tipo

Descrição

Obrigatório

lGravaCF8lógico

Quando verdadeiro faz a gravação do registro na tabela Demais Docs. PIS COFINS (CF8)

Sim




03. EXEMPLO

#INCLUDE"PROTHEUS.CH"

//-------------------------------------------------------------------
/*/{Protheus.doc} J241EDF
Ponto de entrada para gravação da CF8 na inclusão do lançamento

@param PARAMIXB, array   , Parâmetros do ponto de entrada
           PARAMIXB[1], caracter, Código da natureza do lançamento

@author TOTVS
@since  05/11/2021
/*/
//-------------------------------------------------------------------
UserFunctionJ241EFD()
    Local lGravaCF8 := .F.
    Local cNatureza := ""

    IfValType(PARAMIXB) == "A"
        cNatureza := PARAMIXB[1]

        lGravaCF8 := cNatureza == "10.10.10.10"
    EndIf

Return (lGravaCF8)


Templatedocumentos


HTML
<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>