Histórico da Página

...

Localizado após a busca de atividades para convocações na rotina WMSV001.

04. PARÂMETROS

...

06. VERSÕES

Protheus 12.1.17 e ou superiores.

07. OBSERVAÇÃO

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

08. EXEMPLO

...

------

#INCLUDE

...

"PROTHEUS.CH"

...

User

...

Function

...

WMSV001C()

...

Local nRecnoD12           :=

...

PARAMIXB[1]

...

D12→(dbGoTo(nRecnoD12))

...

//Exemplo

...

de

...

regra

...

//D12_STATUS

...

0=Estornada;1=Executada;2=Interrompida;3=Em

...

Execução;4=A

...

Executar
If   (D12->D12_RECHUM

...

!=

...

__cUserID)

...

   .And.

...

   (D12→D12_STATUS  = '2'

...

   .Or.

...

   D12→D12_STATUS  =  '4')

...

       RecLock("D12",.F.)

...

               D12→ D12_RECHUM := __cUserID
       D12→(MsUnlock())

...

 
EndIf

...

Return

...

.T.

------

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