Histórico da Página
...
Localizado antes da abertura da tela Sequência de Entrega, acessível pela rotina de Montagem de Carga, opção Seq. Ent.
04. PARÂMETROS
Nome | Tipo | Descrição |
|---|---|---|
aArrayCarga | Array | Contêm informações dos Pedidos selecionados para geração da Carga |
| aHeaders | Array | Contém o cabeçalho dos campos a serem apresentados no browse de Pedidos |
| bLine | Bloco de Código | Armazena a regra de preenchimento dos campos do browse de Pedidos |
| oLiberado | Objeto Imagem | Objeto imagem usado quando status da carga igual a 1. |
| oCalend | Objeto Imagem | Objeto imagem usado quando status da carga igual a 2. |
| oHorario | Objeto Imagem | Objeto imagem usado quando status da carga igual a 3. |
| oVeiculo | Objeto Imagem | Objeto imagem usado quando status da carga igual a 4. |
oPedMan | Objeto de dados | Objeto contendo os dados da tela de sequenciamento dos pedidos |
...
| Nome | Tipo | Descrição |
|---|---|---|
| aRetCarga | 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 Sequência de Entrega. |
06. VERSÕES
Protheus 12.1.17 ou superiores.
07. OBSERVAÇÃO
Não se aplica.
08. EXEMPLO
...
| language | cpp |
|---|---|
| title | Exemplo |
| linenumbers | true |
| collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
OM200AdC()
...
Local aRet := {}
Local aArray := PARAMIXB[1]
...
//--
...
Conteúdo
...
do
...
campo.
...
Local
...
aHeaders
...
:=
...
PARAMIXB[2]
...
//--
...
Cabeçalho
...
do
...
campo.
...
Local bLine :=
...
PARAMIXB[3]
...
//--
...
Condição
...
para
...
inserir
...
conteúdo
...
no
...
campo
...
.
//--
...
Objetos
...
de
...
Status.
...
Local
...
oLiberado
...
:=
...
PARAMIXB[4]
...
Local oCalend :=
...
PARAMIXB[5]
...
Local oHorario :=
...
PARAMIXB[6]
...
Local oVeiculo :=
...
PARAMIXB[7]
...
Local oPedMan :=
...
PARAMIXB[8]
...
Local oDown :=
...
LoadBitmap(
...
GetResources(),
...
"TRIDOWN"
...
)
...
Local oUp := LoadBitmap( GetResources(),
...
"TRIUP"
...
)
Local aAreaPE := GetArea()
...
Local
...
nX
...
:=
...
0
...
For
...
nX
...
:=
...
1
...
To
...
Len(aArray)
...
SA1->(DbSetOrder(1))
...
If SA1->(DbSeek(xFilial("SA1")+aArray[nX][6]+aArray[nX][7]))
...
AAdd(aArray[nX],Alltrim(
...
SA1→A1_INSCR))
...
AAdd(aArray[nX],Alltrim(
...
SA1→A1_CEP))
...
EndIF
Next nX
AAdd(aHeaders,
...
RetTitle("A1_INSCR"))
...
AAdd(aHeaders,
...
RetTitle("A1_CEP"))
...
bLine:={||{Iif(oPedMan:aArray[oPedMan:nAT,18]==1,oLiberado,;
...
Iif(oPedMan:aArray[oPedMan:nAT,18]==2,oVeiculo,;
...
Iif(oPedMan:aArray[oPedMan:nAT,18]==3,oHorario,;
...
Iif(oPedMan:aArray[oPedMan:nAT,18]==4,oCalend,oLiberado)))),;
...
oDown, oUp,;
oPedMan:aArray[oPedMan:nAT,1
...
],;
...
oPedMan:aArray[oPedMan:nAT,2
...
],;
...
oPedMan:aArray[oPedMan:nAT,5
...
],;
...
oPedMan:aArray[oPedMan:nAT,19],;
...
oPedMan:aArray[oPedMan:nAT,16],;
...
oPedMan:aArray[oPedMan:nAT,17],;
...
oPedMan:aArray[oPedMan:nAT,20],;
...
oPedMan:aArray[oPedMan:nAT,6
...
],;
...
oPedMan:aArray[oPedMan:nAT,7
...
],;
...
oPedMan:aArray[oPedMan:nAT,8
...
],;
...
oPedMan:aArray[oPedMan:nAT,9
...
],;
...
oPedMan:aArray[oPedMan:nAT,10],;
...
oPedMan:aArray[oPedMan:nAT,11],;
...
oPedMan:aArray[oPedMan:nAT,30],;
...
//
...
Referência para
...
exibição
...
da
...
Inscrição
...
Estadual.
...
Deve
...
se
...
iniciar
...
a
...
partir
...
do
...
30,
...
pois
...
o
...
array
...
padrão
...
possui
...
29
...
posições.
oPedMan:aArray[oPedMan:nAT,31]}}
...
//
...
Referência para
...
exibição
...
do
...
CEP
...
.
AAdd(aRet,
...
aArray)
...
AAdd(aRet,
...
aHeaders)
...
AAdd(aRet,
...
bLine)
...
RestArea(aAreaPE)
...
Return(aRet)
------
| Templatedocumentos |
|---|
| HTML |
|---|
Import HTML Content
Visão Geral
Conteúdo das Ferramentas