Histórico da Página

...

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

08. EXEMPLO

...

...

------

#INCLUDE "PROTHEUS.CH"

...

#INCLUDE

...

"APVT100.CH"

...

User

...

Function

...

WV073GQL()

...

Local

...

lRet

...

:=

...

.T.

...

If

...

(lRet

...

:=

...

RecLock("SDB",.F.))

...

           //

...

Atualiza

...

campo

...

customizado

...

-

...

DB_DTVAILD

...

           If SDB->DB_QTDLID

...

>

...

0
                       SDB->DB_DTVALID

...

:=

...

U_WV073VLD()

...

           Else
                       SDB->DB_DTVALID

...

:=

...

CtoD("")

...

           EndIf
           SDB→ (MsUnlock())

...

EndIf

...

Return

...

lRet

------

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