Histórico da Página

...

Bloco de código

language	delphi
theme	Midnight
title	F430TXBX

#INCLUDE "PROTHEUS.CH"

User Function F430TXBX()
    Local aTitulo   := PARAMIXB
    Local nTxaMovBx := 5
    Local nRecno    := SE2->(Recno())
    
    If nRecno == 3 // Deve ser criado a regra para achar a taxa a ser usada na baixa do título. 
        nTxaMovBx := 5.6006
    ElseIf nRecno == 4
        nTxaMovBx := 5.1045
    ElseIf nRecno == 5
        nTxaMovBx := 4.065
    Else
        nTxaMovBx := 3.9567
    EndIf
    
    MsgAlert("O título: " + CRLF + CRLF + aTitulo[1]+aTitulo[2]+aTitulo[3]+aTitulo[4]+;
            aTitulo[5]+aTitulo[6]+aTitulo[7]+;
            CRLF + CRLF + "será baixado com a taxa: " + cValToChar(nTxaMovBx))



Return nTxaMovBx

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

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>

Árvore de páginas

Versões comparadas

Versão antiga 4

Nova versão 5

Chave