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 | Exemplo |
linenumbers | true |
collapse | true |
...
------
User Function OMSCPL6A()
...
Local
...
cFilPed
...
:=
...
PARAMIXB[1]
...
//Filial
...
do
...
pedido
...
Local
...
cPedido
...
:=
...
PARAMIXB[2]
...
//Número
...
do
...
pedido
...
Local
...
cCarga
...
:=
...
PARAMIXB[3]
...
//Códido
...
da
...
carga
...
Local
...
cViagem
...
:=
...
PARAMIXB[4]
...
//Código
...
da
...
viagem
...
Local
...
cSeqInt
...
:=
...
PARAMIXB[5]
...
//Sequência
...
de
...
Integração
...
Local
...
lViagComp
...
:=
...
PARAMIXB[6]
...
//Indica
...
se
...
a
...
viagem
...
completa
...
será
...
estornada
...
Local
...
cItem
...
:=
...
PARAMIXB[7]
...
//Item
...
do
...
pedido
...
Local
...
cProduto
...
:=
...
PARAMIXB[8]
...
//Código
...
do
...
produto
...
Local
...
lEstPedSel:=
...
PARAMIXB[9]
...
//Indica
...
se
...
é
...
um
...
estorno
...
de
...
"pedidos
...
selecionados"
...
Local
...
aRet
...
:=
...
{}
...
Local
...
lRet
...
:=
...
.T.
...
Local
...
cFalha
...
:=
...
""
...
If
...
lEstPedSel
lRet :=
...
.F.
...
...
...
...
...
cFalha :=
...
"Forma
...
de
...
desatualização
...
de
...
pedidos
...
bloqueada
...
para
...
uso.
...
Utilize
...
a
...
opção
...
de
...
desatualizar
...
pedido
...
posicionado."
...
EndIf
If lRet .And.
...
lViagComp
...
.And.
...
!Empty(cCarga)
...
...
...
...
...
lRet :=
...
.F.
...
...
...
...
...
cFalha :=
...
"A
...
sequência
...
de
...
integração
...
possui
...
carga
...
gerada,
...
estorne
...
a
...
carga
...
manualmente."
...
EndIf
aRet := {lRet,cFalha}
...
Return
...
aRet
------
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> |