Histórico da Página
...
Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta no documento: Execblock / Customização.
08. EXEMPLO
...
| language | cpp |
|---|---|
| title | Exemplo |
| linenumbers | true |
| collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
OM200ORD()
...
Local
...
aRet
...
:=
...
PARAMIXB
...
/*
...
O
...
retorno
...
deve
...
ser
...
composto
...
de
...
um
...
array
...
contendo
...
itens
...
com
...
2
...
posições,
...
conforme
...
definição
...
abaixo:
...
Posição
...
1
...
=
...
Colunas/Campos
...
da
...
tabela
...
temporária
...
"TRBPED":
...
1.
...
Chekbox
...
(PED_MARCA)
...
2.
...
Indicador
...
para
...
geração
...
(PED_GERA)
...
3.
...
Rota
...
(PED_ROTA)
...
4.
...
Zona
...
(PED_ZONA)
...
5.
...
Setor
...
(PED_SETOR)
...
6.
...
Sequência
...
da
...
rota
...
(PED_SEQROT)
...
7.
...
Pedido
...
(PED_PEDIDO)
...
8.
...
Item
...
(PED_ITEM)
...
9.
...
Sequência
...
de
...
liberação
...
(PED_SEQLIB)
...
10.
...
Código
...
do
...
produto
...
(PED_CODPRO)
...
11.
...
Descrição
...
do
...
produto
...
(PED_DESPRO)
...
12.
...
Filial
...
origem
...
(PED_FILORI)
...
13.
...
Filial
...
do
...
cliente
...
(PED_FILCLI)
...
14.
...
Código
...
do
...
cliente
...
(PED_CODCLI)
...
15.
...
Loja
...
do
...
cliente
...
(PED_LOJA)
...
16.
...
Nome
...
do
...
cliente
...
(PED_NOME)
...
17.
...
Peso
...
(PED_PESO)
...
18.
...
Código
...
da
...
carga
...
(PED_CARGA)
...
19.
...
Sequência
...
de
...
liberação
...
do
...
produto
...
(PED_SEQSET)
...
20.
...
Sequência
...
da
...
rota
...
(PED_SEQORI)
...
21.
...
Valor
...
(PED_VALOR)
...
22.
...
Quantidade
...
de
...
volumes
...
(PED_VOLUM)
...
23.
...
Endereço
...
padrão
...
(PED_ENDPAD)
...
24.
...
Endereço
...
do
...
cliente
...
(PED_ENDCLI)
...
25.
...
Bairro
...
(PED_BAIRRO)
...
26.
...
Município
...
(PED_MUN)
...
27.
...
Estado
...
(PED_EST)
...
28.
...
CEP
...
(PED_CEP)
...
29.
...
Quantidade
...
liberada
...
(PED_QTDLIB)
...
30.
...
Transportadora
...
(TRANSP)
...
31.
...
Código
...
do
...
Redespachante
...
(PED_REDESP)
...
32.
...
Nome
...
do
...
Redespachante
...
(PED_REDNOM)
...
*
...
Observação:
...
Os
...
itens
...
31
...
e
...
32
...
serão
...
considerados
...
somente
...
caso
...
o
...
campo
...
DAI_REDESP
...
exista
...
na
...
tabela
...
DAI.
...
Posição
...
2
...
=
...
índices
...
disponíveis
...
na
...
tabela
...
temporária
...
"TRBPED"
...
de
...
Pedidos
...
de
...
Vendas
...
liberados.
...
1.
...
Se
...
o
...
parâmetro
...
aglutina
...
por
...
=
...
Itens
...
PED_FILORI,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB
...
Se
...
o
...
parâmetro
...
aglutina
...
por
...
=
...
Pedido
...
PED_FILORI,
...
PED_PEDIDO
...
2.
...
PED_ROTA,
...
PED_SEQORI,
...
PED_SEQSET,
...
PED_ZONA,
...
PED_SETOR,
...
PED_CEP,
...
PED_FILORI,
...
PED_PEDIDO
...
,PED_ITEM
...
3.
...
PED_ROTA,
...
PED_SEQROT
...
,PED_FILORI
...
,PED_PEDIDO
...
4.
...
PED_ROTA,
...
PED_ZONA,
...
PED_SETOR,
...
PED_FILORI,
...
PED_PEDIDO
...
5.
...
Se
...
parâmetro
...
MV_ALOCPER
...
=
...
"S"
...
e
...
parâmetro
...
aglutina
...
por
...
=
...
Itens
...
PED_ZONA,
...
PED_SETOR,
...
PED_FILORI,
...
PED_PEDIDO
...
Se
...
parâmetro
...
MV_ALOCPER
...
<>
...
"S"
...
e
...
parâmetro
...
aglutina
...
por
...
=
...
Itens
...
PED_ZONA,
...
PED_SETOR,
...
PED_FILORI,
...
PED_CODPRO,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB,
...
PED_CODCLI,
...
PED_LOJA
...
Senão
...
PED_ZONA,
...
PED_SETOR,
...
PED_FILORI,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB,
...
PED_CODCLI,
...
PED_LOJA
...
6.
...
Se
...
parâmetro
...
aglutina
...
por
...
=
...
Itens
...
PED_FILORI,
...
PED_CODPRO,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB,
...
PED_CODCLI,
...
PED_LOJA
...
Se
...
parâmetro
...
aglutina
...
por
...
=
...
Pedido
...
PED_FILORI,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB,
...
PED_CODCLI,
...
PED_LOJA,
...
PED_MARCA
...
7.
...
PED_CODCLI,
...
PED_LOJA
...
8.
...
PED_EST,
...
PED_MUN,
...
PED_CODCLI,
...
PED_LOJA,
...
PED_PEDIDO
...
*/
...
//Haverá
...
uma
...
ordenação
...
por
...
Rota
...
(3)
...
usando
...
o
...
índice
...
3
...
(PED_ROTA,
...
PED_SEQROT
...
,PED_FILORI
...
,PED_PEDIDO)
...
//e
...
outra
...
ordenação
...
por
...
setor
...
(5)
...
usando
...
o
...
índice
...
1
...
(PED_FILORI,
...
PED_PEDIDO,
...
PED_ITEM,
...
PED_SEQLIB
...
ou
...
PED_FILORI,
...
PED_PEDIDO).
...
aRet
...
:=
...
{{3,3},{5,1}}
...
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>
|
Import HTML Content
Visão Geral
Conteúdo das Ferramentas