Árvore de páginas

Versões comparadas

Chave

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

...

Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.

08. EXEMPLO

...

languagecpp
titleExemplo
linenumberstrue
collapsetrue

...

------

#INCLUDE "PROTHEUS.CH" 

...

User

...

Function

...

WMSTRD12()

...


Local

...

aAreaD12

...

:=

...

D12->(GetArea())

...


Local

...

nRecnoAnt

...

:=

...

PARAMIXB[1]

...

//

...

Recno

...

(D12)

...

posicionado

...

antes

...

da

...

troca

...


Local

...

nRecnoAtu

...

:=

...

PARAMIXB[2]

...

//

...

Recno

...

(D12)

...

posicionado

...

após

...

a

...

troca

...

If

...

nRecnoAnt

...

<>

...

nRecnoAtu
        D12->(DbGoTo(nRecnoAnt))

...


        RecLock("D12",.F.)

...


        D12->D12_XCPO

...

:=

...

"TESTE"

...


        D12→ (MsUnlock())

...


EndIf
RestArea(aAreaD12)

...

Return

------


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

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

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

</style>