Á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

...

OMSCPL7C()

...


Local

...

cCodCarga

...

:=

...

PARAMIXB[1]

...

//Código

...

da

...

carga

...


Local

...

cRegId

...

:=

...

PARAMIXB[2]

...

//Código

...

da

...

regional

...


Local

...

cViagId

...

:=

...

PARAMIXB[3]

...

//Código

...

da

...

viagem

DK0→ (DbSetOrder(1))

...


DAK→ (DbSetOrder(1))

...

If DK0→ (DbSeek(xFilial('DK0')+cRegId+cViagId))

...


         If DAK→ (DbSeek(xFilial('DAK')+cCodCarga))

...


                 RecLock('DAK',.F.)

...


                 DAK→ DAK_DATA := DK0->DK0_XCPO

...

//Campo

...

customizado
                 DAK→ (MsUnlock())

...


         EndIf
EndIf

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>