Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

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

Emissão de Pré-Faturas - JURA201

Emissão de Faturas - JURA203


02. PONTO DE ENTRADA

Descrição:

Ponto de entrada para atribuir uma cotação específica no faturamento das despesas.

Localização:

Atualizações >> Movimentações >> Emissão de Fatura

Programa Fonte:

JURA201 e JURA203

Função:

JA201DCaso e J203HSumDP

Ponto de Entrada:JURCOTDP
Parâmetros:

Nome

Tipo

Descrição

Obrigatório

PARAMIXBarray

Array com 4 posições

NomeTipoDescrição
PARAMIXB[1]caractereCódigo da despesa
PARAMIXB[2]caractereMoeda da despesa
PARAMIXB[3]caractereMoeda do Faturamento
PARAMIXB[4]caractere

"1" = Emissão de Pré-fatura

"2" = emissão é de Fatura

Sim



Retorno:

Nome

Tipo

Descrição

Obrigatório

nRetorno

Numérico

Deve retornar o valor da cotação para uso no faturamento da despesa.

Se o valor do retorno da for igual a 0 será aplicada a cotação com a regra padrão do sistema que considera o parâmetro MV_JCONVDS.

Sim




03. EXEMPLO

#INCLUDE "PROTHEUS.CH"

//-------------------------------------------------------------------
/*/{Protheus.doc} JURCOTDP
Ponto de entrada para informar uma cotação específica no faturamento
das despesas.

@param PARAMIXB, array    , Parâmetros do ponto de entradas
    PARAMIXB[1], caracter , Código da despesa
    PARAMIXB[2], caracter , Moeda da despesa
    PARAMIXB[3], caracter , Moeda do Faturamento
    PARAMIXB[4], caracter , Se o conteúdo for igual a "1" é Emissão de Pré-fatura,
                           mas se o conteúdo for igual a "2" a emissão é de Fatura.

@return nCotDesp, numérico, Deve retornar o valor da cotação para uso no faturamento da despesa.
                            Se o valor do retorno da for igual a 0 será aplicada a cotação com
                            a regra padrão do sistema que considera o parâmetro MV_JCONVDS.

@author TOTVS
@since  21/08/2024
@Obs    Ponto de entrada executado na emissão de Pré-Fatura e Fatura.
/*/
//-------------------------------------------------------------------
User Function JURCOTDP()
Local cMoeDesp := PARAMIXB[2]
Local cMoeFat  := PARAMIXB[3]
Local nCotDesp := 0

    Do Case
        Case cMoeDesp == "02" .Or. cMoeFat == "02"
            nCotDesp := 5
        Case cMoeDesp == "03" .Or. cMoeFat == "03"
            nCotDesp := 6
        Case cMoeDesp == "04" .Or. cMoeFat == "04"
            nCotDesp := 8
    End Case

Return nCotDesp


<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>