Histórico da Página

 Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

02. PONTO DE ENTRADA

03. EXEMPLO

#INCLUDE "RWMAKE.ch"
#INCLUDE "PROTHEUS.ch"

//-------------------------------------------------------------------
/*{Protheus.doc} J203NDes
Ponto de entrada informar a natureza de despesa específica na emissão da fatura

@param  PARAMIXB[1], caracter, Código do escritório da fatura emitida
@param  PARAMIXB[2], caracter, Código do fatura fatura emitida
@param  PARAMIXB[3], caracter, Código da natureza de despesa atual

@return cNatDesp   , caracter, Código da natureza de despesa a ser utilizada

@author TOTVS
@since  24/09/2021
@obs    Ponto de entrada executado somente se a fatura possuir valor de despesa
/*/
//-------------------------------------------------------------------
User Function J203NDes()
Local cEscrit   := PARAMIXB[1] // Código do escritório da fatura emitida
Local cFatura   := PARAMIXB[2] // Código do fatura fatura emitida
Local cNatAtu   := PARAMIXB[3] // Código da natureza de despesa atual
Local cNatDesp  := ""

    If cEscrit == "RJ" .And. cFatura == "102030" .And. cNatAtu = "NATUDESP"
        cNatDesp := "RJ-NAT-DES"
    EndIf

Return (cNatDesp)

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