Histórico da Página
...
Não se aplica.
08. EXEMPLO
...
language | cpp |
---|---|
title | Exemplo |
linenumbers | true |
collapse | true |
...
------
User Function OM200GEC()
...
Local
...
aArrayGera
...
:=
...
PARAMIXB[1]
...
//Array
...
de
...
pedidos
...
Local
...
cVeiculo
...
:=
...
PARAMIXB[2]
...
//Código
...
do
...
veículo
...
Local
...
cTransp
...
:=
...
PARAMIXB[3]
...
//Código
...
da
...
transportadora
...
Local
...
aPedidos
...
:=
...
{}
...
Local
...
aCargas
...
:=
...
{}
...
Local
...
nI
...
:=
...
0
...
Local
...
nQtdPedidos
...
:=
...
0
For nI :=
...
1
...
To
...
Len(aArrayGera)
...
//Percorre
...
o
...
array
...
para
...
realizar
...
as
...
quebras.
aAdd(aPedidos,aArrayGera[nI])
...
//Cria
...
novo
...
array
...
com
...
os
...
pedidos
...
que
...
formarão
...
uma
...
carga
nQtdPedidos++
...
If nQtdPedidos ==
...
3
...
.Or.
...
nI
...
==
...
Len(aArrayGera)
...
//Neste
...
exemplo
...
cada
...
carga
...
poderá
...
conter
...
no
...
máximo
...
3
...
pedidos
Aadd(aCargas,{aPedidos})
...
//Adiciona
...
os
...
pedidos
...
em
...
um
...
subnível
...
do
...
array
nQtdPedidos := 0 //Zera
...
os
...
agrupadores
...
para
...
definir
...
o
...
próximo
...
conjunto
...
de
...
pedidos
...
para
...
a
...
nova
...
carga
aPedidos :=
...
{}
...
EndIf
Next nI
Return aCargas
------
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> |