Histórico da Página

#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 cMoeNac  := SuperGetMv('MV_JMOENAC',, '01' )
Local nCotDesp := 0

    Do Case
        // Quando é utilizado 2 moedas estrangeiras o ponto de entrada deverá retornar o fator entre elas.
        Case cMoeDesp != cMoeNac .And. cMoeFat != cMoeNac .And. cMoeDesp != cMoeFat
            If cMoeDesp == "02" .And. cMoeFat == "03"
                nCotDesp := 6/12
            ElseIf cMoeDesp == "03" .And. cMoeFat == "02"
                nCotDesp := 12/6
            EndIf
        Case cMoeDesp == "02" .Or. cMoeFat == "02"
            nCotDesp := 6
        Case cMoeDesp == "03" .Or. cMoeFat == "03"
            nCotDesp := 12
        Case cMoeDesp == "04" .Or. cMoeFat == "04"
            nCotDesp := 16
    End Case

Return nCotDesp 

1. Caso a moeda das despesas e da fatura forem diferente da moeda nacional, é necessário retornar o fator entre elas (conforme exemplo no ponto de entrada).

2. Nos relatório de faturamento imprime o valor da taxa da cotação padrão do sistema, para exibir o valor da taxa de cotação utilizada no ponto de entrada JURCOTDP, será preciso customizar.

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