Histórico da Página
...
Este Ponto de Entrada permite efetuar uma validação antes do processamento da geração de cada carga na rotina OMSA215 (Montagem de Carga Para para Terceiros (OMSA215), sendo que esta validação ocorrerá para cada carga gerada de forma automática.
...
Localizado antes da geração de cada carga a ser gerada pela rotina Montagem rotina OMSA215 (Montagem de Carga Para para Terceiros (OMSA215).
04. PARÂMETROS
Nome | Tipo | Descrição | Obrigatório | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
aGera | Array | Array contendo as informações referente aos Pedidos que irão compor uma carga. Abaixo um detalhamento dos campos do Array:
| Sim |
...
Nome | Tipo | Descrição | Obrigatório |
---|---|---|---|
GeraCar | LógicoTrue / False. | .T. - executa o processamento da carga em questão. | Sim |
06. VERSÕES
Protheus 12.1.23 ou superiores.
07. OBSERVAÇÃO
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 |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
OM215PCA()
...
Local
...
aGera
...
:=
...
PARAMIXB[1]
...
//Array
...
pedidos
...
para
...
geração
...
carga
...
Local
...
lGeraCar
...
:=
...
.T.
...
Local
...
nI
...
:=
...
0
...
//Posições
...
ARRAY
...
aGera:
...
//1
...
-
...
Sequencia
...
//2
...
-
...
Em
...
Branco
...
(Nâo
...
utilizado)
...
//3
...
-
...
Em
...
Branco
...
(Nâo
...
utilizado)
...
//4
...
-
...
Em
...
Branco
...
(Nâo
...
utilizado)
...
//5
...
-
...
SC9.C9_PEDIDO
...
//6
...
-
...
SC9.C9_ITEM
...
//7
...
-
...
SC9.C9_CLIENTE
...
//8
...
-
...
SC9.C9_LOJA
...
//9
...
-
...
SC9.R_E_C_N_O_
...
//10
...
-
...
SA4.A4_ENDPAD,
...
//11
...
-
...
SC9.C9_FILIAL
...
//12
...
-
...
FILIAL
...
//13
...
-
...
Em
...
Branco
...
(Nâo
...
utilizado)
...
//14
...
-
...
Em
...
Branco
...
(Nâo
...
utilizado)
...
//15
...
-
...
Data
...
Atual
...
//16
...
-
...
Data
...
atual
...
//17
...
-
...
Nulo
...
(não
...
utilizado)
...
//18
...
-
...
Nulo
...
(não
...
utilizado)
...
For nI :=
...
1
...
To
...
Len(aGera)
...
//Percorre
...
o
...
array
...
para
...
validação
If aGera[nI,7]
...
==
...
'000001'
...
MsgAlert('Montagem
...
de
...
carga
...
bloqueada
...
para
...
cliente
...
000001.')
...
lGeraCar := .F.
Exit
EndIf
Next nI
Return lGeraCar
------
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> |