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
...
| language | cpp |
|---|---|
| title | Validação Padrão |
| linenumbers | true |
| collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
WMSCPEND()
...
Local
...
aAreaSB1
...
:=
...
SB1->(GetArea())
...
Local
...
cProdOrig
...
:=
...
PARAMIXB[1]
...
Local
...
cProdArmz
...
:=
...
PARAMIXB[2]
...
Local
...
lRet
...
:=
...
.T.
...
SB1→ (DbSetOrder(1))
...
//
...
Posiciona
...
no
...
cadastro
...
do
...
produto
...
a
...
ser
...
endereçado
SB1→ (MsSeek(xFilial('SB1')+cProdOrig,
...
.F.))
...
//
...
Guarda
...
o
...
tipo
...
e
...
grupo
...
de
...
estoque
...
do
...
produto
...
a
...
ser
...
endereçado
...
cTipoOrig
...
:=
...
SB1->B1_TIPO
...
cGrupoOrig
...
:=
...
SB1→B1_GRUPO
...
//
...
Posiciona
...
no
...
cadastro
...
produto
...
armazenado
...
no
...
endereço
SB1→ (MsSeek(xFilial('SB1')+cProdArmz,
...
.F.))
...
//
...
Retorno
...
positivo
...
caso
...
os
...
produtos
...
possuam
...
o
...
mesmo
...
tipo
...
e
...
grupo
...
de
...
estoque
...
lRet
...
:=
...
(cTipoOrig
...
==
...
SB1->B1_TIPO)
...
.And.
...
(cGrupoOrig
...
==
...
SB1→B1_GRUPO)
...
RestArea(aAreaSB1)
...
Return
...
lRet
------
| 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>
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas