Histórico da Página
...
Este Ponto de Entrada permite manipular a tabela temporária de Pedidos, as informações de rotas, zonas e setores antes de abrir a tela para a montagem da carga (OMS200).
03. LOCALIZAÇÃO
Localizado antes de abrir a rotina de OMSA200 (Montagem de Carga (OMSA200).
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
TRBPED | Tabela Temporária | Contêm informações dos Pedidos selecionados para a geração da Carga |
aArrayRota | Array | Array de Rotasrotas |
aArrayZona | Array | Array de Zonaszonas |
aArraySetor | Array | Array de Setoressetores |
Informações da Tabela Temporária
...
Nome | Tipo | Descrição |
---|---|---|
aRetPE | Array | Array de três posições, contendo:
Estes três elementos devem estar no mesmo formato em que foram recebidos por parâmetro, contendo inclusive os campos adicionados pelo Ponto de Entrada e que serão apresentados na tela tela de Montagem de Carga. |
06. VERSÕES
...
Não se aplica.
08. EXEMPLO
...
------
#INCLUDE
...
"PROTHEUS.CH"
...
User
...
Function
...
OM200GR2()
...
Local aArrayRota :=
...
PARAMIXB[2]
...
Local aArrayZona :=
...
PARAMIXB[3]
...
Local aArraySetor :=
...
PARAMIXB[4]
...
aAdd(aArrayRota,{.T.,.F.,"000026","ROTA
...
A
...
NEGOCIAR",
...
Space(6)})
...
aAdd(aArrayZona,{.T.,.F.,"000026","000027","ROTA
...
A
...
NEGOCIAR",Space(6),
...
"000010"
...
})
...
aAdd(aArraySetor,{.T.,.F.,"000026","000027","000027","ROTA
...
A
...
NEGOCIAR",Space(6),
...
"000010"})
...
TRBPED→(DbSetOrder(1))
...
If TRBPED→(DbSeek(FwxFilial('SC5')+"000026"))
...
RecLock("TRBPED",.F.)
...
TRBPED→PED_ENDCLI
...
:=
...
"Endereço
...
de
...
teste"
...
TRBPED→(MsUnlock())
...
EndIf
RecLock("TRBPED",.T.)
...
TRBPED→PED_GERA
...
:=
...
"N"
...
TRBPED→PED_MARCA
...
:=
...
"
...
"
TRBPED→PED_ROTA
...
:=
...
"000026"
...
TRBPED→PED_ZONA
...
:=
...
"000027"
...
TRBPED→PED_SETOR
...
:=
...
"000027"
...
TRBPED→PED_SEQROT
...
:=
...
"000010"
...
TRBPED→PED_PEDIDO
...
:=
...
"000027"
...
TRBPED→PED_ITEM
...
:=
...
"01"
...
TRBPED→PED_SEQLIB
...
:=
...
"01"
...
TRBPED→PED_CODPRO
...
:=
...
"001"
...
TRBPED→PED_DESPRO
...
:=
...
"LAPIS"
...
TRBPED→PED_FILORI
...
:=
...
"01"
...
TRBPED→PED_FILCLI
...
:=
...
"
...
"
TRBPED→PED_CODCLI
...
:=
...
"000001"
...
TRBPED→PED_LOJA
...
:=
...
"01"
...
TRBPED→PED_NOME
...
:=
...
"CLIENTE
...
A"
...
TRBPED→PED_ENDCLI
...
:=
...
"AVENIDA
...
A"
...
TRBPED→PED_BAIRRO
...
:=
...
"BAIRRO
...
A"
...
TRBPED→PED_MUN
...
:=
...
"MUNICIPIO
...
A"
...
TRBPED→PED_EST
...
:=
...
"SC"
...
TRBPED→PED_CEP
...
:=
...
"99999999"
...
TRBPED→PED_CARGA
...
:=
...
"ZZZZZZ"
...
TRBPED→PED_SEQSET
...
:=
...
"000010"
...
TRBPED→PED_SEQORI
...
:=
...
"000010"
...
TRBPED→PED_ENDPAD
...
:=
...
"
...
"
TRBPED→PED_VALOR := 5
TRBPED→PED_VOLUM := 10
TRBPED→PED_QTDLIB := 5
TRBPED→(MsUnlock())
...
Return
...
{aArrayRota,aArrayZona,aArraySetor}
------
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> |