Histórico da Página

01. DADOS GERAIS

Produto:

Solucoes_totvs

Solucao	TOTVS OMS

Solucoes_totvs_cross

SolucaoCross

Solucoes_totvs_parceiros

SolucaoParceiros

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Logística

Módulo:

SIGAOMS - Gestão de Distribuição

Função:

OMSA200 - Montagem de Carga

País:

Todos Países

Ticket:

-11516856

Requisito/Story/Issue (informe o requisito relacionado) :

DLOGWMSMSP-12194

02. DESCRIÇÃO

Este Ponto de Entrada permite manipular a tabela temporária de pedidosPedidos, 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 rotas
aArrayZona	Array	Array de zonas
aArraySetor	Array	Array de setores

Informações da Tabela Temporária

Campo	Formato	Observação
TRBPED→ PED_GERA	Character, Tam 1	Pedido selecionado para a carga: 'S', 'N'
TRBPED→ PED_MARCA	Character, Tam 2	GetMark() ou ' '
TRBPED→ PED_ROTA	DA8_COD
TRBPED→ PED_ZONA	DA7_PERCUR
TRBPED→ PED_SETOR	DA7_ROTA
TRBPED→ PED_SEQROT	DA9_SEQUEN
TRBPED→ PED_PEDIDO	C9_PEDIDO
TRBPED→ PED_ITEM	C9_ITEM
TRBPED→ PED_SEQLIB	C9_SEQUEN
TRBPED→ PED_CODPRO	B1_COD
TRBPED→ PED_DESPRO	B1_DESC
TRBPED→ PED_FILORI	FWSizeFilial()
TRBPED→ PED_FILCLI	FWSizeFilial()
TRBPED→ PED_CODCLI	A1_COD
TRBPED→ PED_LOJA	A1_LOJA
TRBPED→ PED_NOME	A1_NOME
TRBPED→ PED_ENDCLI	A1_END
TRBPED→ PED_BAIRRO	A1_BAIRRO
TRBPED→ PED_MUN	A1_MUN
TRBPED→ PED_EST	A1_EST
TRBPED→ PED_CEP	A1_CEP
TRBPED→ PED_CARGA	DAK_COD
TRBPED→ PED_SEQSET	DA7_SEQUEN
TRBPED→ PED_SEQORI	DA9_SEQUEN
TRBPED→ PED_ENDPAD	C9_ENDPAD
TRBPED→ PED_VALOR	DAK_VALOR
TRBPED→ PED_VOLUM	DAK_CAPVOL
TRBPED→ PED_QTDLIB	DAK_VALOR
TRBPED→ PED_REDESP	A4_COD	Caso haja DAI_REDESP
TRBPED→ PED_REDNOM	A4_NOME	Caso haja DAI_REDESP

Informações do Array aArrayRota

Ordem	Conteúdo	Formato
1	.T.	boolean
2	.F.	boolean
3	Código da Rota	Character, Tam 6
4	Descrição da Rota	Character, Tam 20
5	Campo Livre	Space(6) - Carga

Informações do Array aArrayZona

Ordem	Conteúdo	Formato
1	.T.	boolean
2	.F.	boolean
3	Código da Rota	Character, Tam 6
4	Código do Setor	Character, Tam 6
5	Descrição da Rota	Character, Tam 20
6	Campo Livre	Space(6) - Carga
7	Sequência da Rota	Character, Tam 6

Informações do Array aArraySetor

Ordem	Conteúdo	Formato
1	.T.	boolean
2	.F.	boolean
3	Código da Rota	Character, Tam 6
4	Código da Zona	Character, Tam 6
5	Código do Setor	Character, Tam 6
6	Descrição da Rota	Character, Tam 20
7	Campo Livre	Space(6) - Carga
8	Sequência da Rota	Character, Tam 6

05. RETORNO

...

Nome

Tipo

Descrição

aRetPE

Array

Array de três posições, contendo:

aRetCarga[1] - aArrayRota
aRetCarga[2] - aArrayZona
aRetCarga[3] - aArraySetor

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 de Montagem de Carga.

06. VERSÕES

Protheus 12.1.17 ou superiores.

07. OBSERVAÇÃO

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>

Templatedocumentos

html

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão Atual

Chave