Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

blocoInteger

Atributo

Tipo

Formato

Evolução

ObrigatórioEvolução
cod-estabel

Character

X(5)

EstabelecimentoSimems202.
cod-localVarCharX(3)LocalSimems202.

cod-bloco

Character

X(3)

dt-inventario

Date

99/99/9999

Dt InventarioSimems202.
num-seq-invent

Integer

>>>,>>9

Num InventSimems202.
id-box

decimal

>>>>>>>>>>>9

Id EndereçoSimems202.

codnum-seq-colunaitem

Character

X(3)

Integer

>>>>>>>>9

Sequencia ItemcolunaSimems202.

cod-

nivel

item

Character

X(316)

nivelItemSimems202.
cod-rua refer

Character

X(38)

ruaReferenciaSimems202.
dtcod-inventario lote

Date

99/99/9999

Character

X(40)

LoteDt InventarioSimems202.
numqtd-seq-inventsaldo

Decimal

>>>,>>>,>>>,>>9.9999Num Invent

Qtd Saldo

Simems202.
dtqtd-leitura apurada

Date

99/99/9999

Decimal

>>>,>>>,>>>,>>9.9999Qtd ApuradaDt leitura InventarioSimems202.
hr-leitura ind-sit-inv-item

Integer

>>>>>9>9

hora leituraSituaçãoSimems202.
idcod-box cliente

decimalInteger

>>>>>>>>>>>9>9

Id EndereçoCódigo ClienteSimems202.
inddt-sitvali-inv-end lote

Integer

>9

Date

99/99/9999

Data Validade LoteSituação InventarioSimems202.
indqtd-status-contagem final

Integer

>9

Decimal

>>>,>>>,>>>,>>9.9999Qtd FinalSituação Contagem InventarioSimems202.
logqtd-bloqsaldo-armaz peso

Logical

Sim/não

Decimal

>>>,>>>,>>>,>>9.9999Qtd Saldo PesoEndereço Bloqueado Inventário ArmazenamentoSimems202.
logqtd-bloqapurada-retir peso

Logical

Sim/não

Decimal

>>>,>>>,>>>,>>9.9999Qtd Apurada PesoEndereço Bloqueado Inventário retiradaSimems202.
numqtd-ultfinal-contagem peso

IntegerDecimal

>>>,>>>,>>>,>>9.9999Qtd Final PesoSimems202.
log-atual-ce

Logical

Sim/não

Atualizado EstoqueNum contagemSimems202.usuario
cod-embalagemVarCharXx(1210)UsuárioEmbalagemSimems202.

DEFINE TEMP-TABLE tt-num-contagem NO-UNDO
FIELD num-contagem AS INTEGER.

DEFINE VARIABLE c-estabel-ini AS CHARACTER FORMAT "x(3)" NO-UNDO.
DEFINE VARIABLE c-estabel-fim AS CHARACTER FORMAT "x(3)" NO-UNDO.
DEFINE VARIABLE c-local-ini AS CHARACTER FORMAT "x(3)" NO-UNDO.
DEFINE VARIABLE c-local-fim AS CHARACTER FORMAT "x(3)" NO-UNDO.
DEFINE VARIABLE d-data-ini AS DATE FORMAT "99/99/9999" NO-UNDO.
DEFINE VARIABLE d-data-fim AS DATE FORMAT "99/99/9999" NO-UNDO.

DEFINE VARIABLE i-sequenc-ini LIKE wm-inventario-endereco.num-seq-invent NO-UNDO.
DEFINE VARIABLE i-sequenc-fim LIKE wm-inventario-endereco.num-seq-invent INITIAL 999999 NO-UNDO.
DEFINE VARIABLE de-box-ini LIKE wm-inventario-endereco.id-box NO-UNDO.
DEFINE VARIABLE de-box-fim LIKE wm-inventario-endereco.id-box INITIAL 9999999999 NO-UNDO.

Método: afterDeleteRecord

Descrição:
Elimina tabelas relacionadas:

  • wm-inventario-item.
  • wm-inventario-etiqueta.

Parâmetros:








/*--- Definição de buffer que será utilizado pelo método goToKey ---*/
DEFINE BUFFER bf{&TableName} FOR {&TableName}.

def buffer b-wm-inventario for wm-inventario.
def buffer b-wm-inventario-endereco for wm-inventario-endereco.
def buffer b-wm-inventario-item for wm-inventario-item.
def buffer b-wm-box-saldo-etiqueta for wm-box-saldo-etiqueta.
def buffer bf-wm-item for wm-item.

def var c-cod-estabel as char no-undo.
def var c-cod-local as char no-undo.
def var da-dt-inventario as date no-undo.
def var i-num-seq-invent as inte no-undo.
def var de-id-box as deci no-undo.
def var i-num-seq-item as inte no-undo.
def var l-log-compart-box-item as logical no-undo.
def var l-log-compart-box-lote as logical no-undo.
def var hProxy as handle no-undo.
DEF VAR l-em-processo AS LOGICAL INITIAL YES NO-UNDO.
DEF VAR l-nao-iniciado AS LOGICAL INITIAL YES NO-UNDO.
DEF VAR l-concluido AS LOGICAL INITIAL YES NO-UNDO.
DEF VAR l-atualizado AS LOGICAL INITIAL YES NO-UNDO.



Método: afterDeleteRecord

Descrição:
Elimina tabelas relacionadas:

  • wm-inventario-etiqueta.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

Queries e Constraints Métodos

...








Método:

...

openQueryMain

 afterDestroy

Descrição:

Método:

OpenQueryEstabel

 

Descrição:

Abre a Query posicionando o registro "wm-inventario" conforme parâmetros:

WHERE {&TableName}.cod-estabel >= c-estabel-ini

AND {&TableName}.cod-estabel <= c-estabel-fim
AND {&TableName}.cod-local >= c-local-ini
AND {&TableName}.cod-local <= c-local-fim
AND {&TableName}.dt-inventario >= d-data-ini
AND {&TableName}.dt-inventario <= d-data-fim
BY {&TableName}.cod-estabel INDEXED-REPOSITION.

Constraints Associados:

Método: beforeDestroy

 

Descrição:

IF VALID-HANDLE (hDBO-inventario-item)
AND hDBO-inventario-item:TYPE = "PROCEDURE":U
AND hDBO-inventario-item:FILE-NAME = "scbo/bosc119.p":U THEN DO:
RUN destroy in hDBO-inventario-item.
DELETE OBJECT hDBO-inventario-item NO-ERROR.
END.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método: createEnderecoInventario

Descrição:

Cria registro na Tabela wm-inventario-endereco.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Elimina os Handle criados.


Método: atualizaContagem

Descrição:

Atualiza e retorna o número da última contagem.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
pcodlocal LIKE wm-inventario.cod-local 
X

Local
pdtinventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
 pnumseqinvent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pIdBoxDecimal
X

Endereço Inventário
pNumContagemInteger

X
Contagem


Método: atualizaItemInventario

Descrição:

Cria registro na Tabela wm-inventario-endereco.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
pcodlocal LIKE wm-inventario.cod-local 
X

Local
pdtinventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
 pnumseqinvent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pIdBoxDecimal
X

Endereço Inventário
piNumSeqItemwm-inventario-item.num-seq-item
X

Sequencia do Item
piNumContagemInteger
X

Número da contagem
piQtdApuradawm-inventario-item.qtd-final 
X

Quantidade Apurada
piPesoApuradowm-inventario-item.qtd-final-peso
X

Peso Apurado








Método:  atualizaSituacaoInventario 

Descrição:

Atualiza a situação do inventário.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  atualizaSituacaoInventEndereco 

Descrição:

Atualiza a situação do endereço do inventário

...

pcodestabel

...

Método:  createEnderecoInventarioColetor 

Descrição:

Cria registro na Tabela wm-inventario-endereco.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

 LIKE wm-inventario.cod-estabelXEstabelecimentopcodlocal LIKE wm-inventario.cod-local XLocalpdtinventario LIKE wm-inventario.dt-inventario XData Inventário pnumseqinvent  LIKE wm-inventario.num-seq-invent XSequencia do InventáriopIdBoxDecimalXEndereço InventárioRowErrorsTABLE XTemp-Table de erro.

Método:  encerraInventarioEndereco 

Descrição:

  • Altera o estado do endereço de "em processo" para "concluido"
  • Altera status da contagem atual para concluido.

Executa a scbo/bosc119.p PERSISTENT SET h-bosc119 para encerrar os itens do inventário: RUN encerraInventarioItem.

Parâmetros:









Método:  atualizaSituacaoInventItem

Descrição:

Atualiza situação do item do inventário.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  calculaQtdSaldo

Descrição:

Atualiza o Saldo do item.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  createItemInventario

Descrição:

Valida e cria registro na tabela wm-inventario-item.

Parâmetros:

Parâmetro

Tipo

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-cod

pcod-estabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
p
pcod-
cod-
local LIKE wm-inventario.cod-local 
X

Local
p
pdt-
dt-
inventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
p
pnum-
num
seq-
invent
invent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
p-
pid-boxLIKE wm-inventario-endereco.id-box
Decimal

X

Endereço Inventário

Método:  finalizaInventarioEndereco 

Descrição:

Finaliza a contagem do inventario.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

...

pcodestabel

...



ID Box

pcod-itemLIKE wm-box-saldo.cod-item   
X

Item
pcod-referLIKE wm-box-saldo.cod-refer 
X

Referencia
pcod-loteLIKE wm-box-saldo.cod-lote
X

lote
pcod-embalagemLIKE wm-box-saldo.cod-embalagem
X

embalagem
pcod-clienteLIKE wm-box-saldo.cod-cliente
X

cliente
pqtd-saldoLIKE wm-box-saldo.qtd-item
X

Saldo
pqtd-pesoLIKE wm-inventario-item.qtd-saldo-peso
X

Peso



X



Método: createRowErrorsManual

Descrição:

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pErrorInt




pParamChar





Método: desatualizaItemInventario

Descrição:

Desatualiza item do inventário.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-cod-estabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
p-cod-local LIKE wm-inventario.cod-local 
X

Local
p-dt-inventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
p-num-invent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
p-id-boxLIKE wm-inventario-endereco.id-box
X

ID Box

p-num-seq-itemLIKE wm-inventario-item.num-seq-item   
X

Item
p-num-contagemInteger
X

Referencia
p-qtd-apuradaDecimal
X

lote
p-qtd-apurada-pesoDecimal
X

Peso







Método: encerraInventarioItem

Descrição:

Encerra item do inventário e sua etiqueta.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-cod-estabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
p-cod-local LIKE wm-inventario.cod-local 
X

Local
p-dt-inventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
p-num-invent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
p-id-boxLIKE wm-inventario-endereco.id-box
X

ID Box

p-num-contagemInteger
X

Referencia

Método: finalizaInventarioItem

Descrição:

Zera as quantiades dos itens do box do inventário.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
pcodlocal LIKE wm-inventario.cod-local 
X

Local
pdtinvent LIKE wm-inventario.dt-inventario 
X

Data Inventário
pnumseqinvent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pidboxLIKE wm-inventario-endereco.id-box
X

ID Box

pnumcontagemInteger
X

Referencia


Método: findFirstChave

Descrição:

Posiciona no primeiro registro da tabela

Método:  findFirstFaixa 

Descrição:

Posiciona na primeira faixa conforme seleção feita.

WHERE {&TableName}.cod-estabel >= c-estabel-ini
AND {&TableName}.cod-estabel <= c-estabel-fim
AND {&TableName}.cod-local >= c-local-ini
AND {&TableName}.cod-local <= c-local-fim
AND {&TableName}.dt-inventario >= da-data-ini
AND {&TableName}.dt-inventario <= da-data-fim
AND {&TableName}.num-seq-invent >= i-sequenc-ini
AND {&TableName}.num-seq-invent <= i-sequenc-fim
AND {&tablename}.id-box >= de-box-ini
AND {&tablename}.id-box <= de-box-fim NO-LOCK NO-ERROR.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método:  findFirstInventario 

Descrição:

Posiciona no primeiro Inventário localizado conforme seleção feita.

WHERE {&TableName}.cod-estabel = c-estabel
AND {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.num-seq-invent = i-sequenc
AND (({&tablename}.ind-sit-inv-end = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end = 2 AND l-em-processo = YES)
OR ({&tablename}.ind-sit-inv-end = 3 AND l-concluido = YES)
OR ({&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES)) NO-ERROR.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método: findFirstMain

Descrição:

Posiciona no primeiro registro da tabela :  wm-inventario-endereco.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método: findLastFaixa

Descrição:

Posiciona no último registro da tabela :  wm-inventario-endereco conforme seleção feita:

WHERE {&TableName}.cod-estabel > = c-cod-estabel -ini
AND {&TableName}.cod-estabel <local = c-estabelcod-fim local
AND {&TableName}.coddt-local >inventario = cda-localdt-ini inventario
AND {&TableName}.cod-local <= c-local-fim
AND {&TableName}.dt-inventario >= da-data-ini num-seq-invent = i-num-seq-invent
AND {&TableNametablename}.dtid-inventario <box = dade-dataid-fim box
AND {&TableName}.num-seq-invent >item = i-sequenc-ini
AND {&TableName}.num-seq-invent <= i-sequenc-fim
AND {&tablename}.id-box >= de-box-ini
AND {&tablename}.id-box <= de-box-fim item NO-LOCK NO-ERROR.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findLastInventario findFirstEndereco

Descrição:

Posiciona no último registro da tabela :  wm-inventario-endereco.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  findNextInventario  

Descrição:

Posiciona no próximo registro da tabela conforme seleção feita:

WHERE {&TableName}.cod-estabel = c-cod-estabel
AND {&TableName}.cod-local = c-cod-local
AND {&TableName}.dt-inventario = da-dt-data inventario
AND {&TableName}.num-seq-invent = i-sequenc -num-seq-invent
AND {&tablename}.id-box = de-id-box
AND (({&tablename}.ind-sit-inv-end item = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end item = 2 AND l-em-processo = YES )
OR ({&tablename}.ind-sit-inv-end item = 3 AND l-concluido = YES )
OR ({&tablename}.ind-sit-inv-end item = 4 AND l-atualizado = YES))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES)) )) NO-LOCK NO-ERROR.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findLastMain findFirstMain

Descrição:

Posiciona no último primeiro registro da tabela :  wm-inventario-enderecoitem.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findNextFaixa findLastChave

Descrição:

Posiciona no próximo ultimo registro da tabela conforme seleção feita:.

WHERE {&TableName}.cod-estabel > = c-cod-estabel -ini
AND {&TableName}.cod-estabel <= c-estabel-fim
AND {&TableName}.cod-local > = c-local-ini
AND {&TableName}.cod-local <= c-local -fim
AND {&TableName}.dt-inventario > = da-data-ini
AND {&TableName}.dt-inventario <= da-data-fim
AND {&TableName}.num-seq-invent > = i-sequenc-ini
AND {&TableName}.num-seq-invent <= i-sequenc-fim
AND {&tablename}.id-box > = de-id-box -ini
AND {&tablenameTableName}.id-box <= de-box-fim num-seq-item = i-num-seq-item NO-LOCK NO-ERROR.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findLastMain findLastEndereco

Descrição:

Posiciona no último registro da tabela :  wm-inventario-endereco.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método:  findNextInventario  

Descrição:

Posiciona no próximo registro da tabela conforme seleção feita:

WHERE {&TableName}.cod-estabel = c-cod-estabel
AND {&TableName}.cod-local = c-cod-local
AND {&TableName}.dt-inventario = da-data dt-inventario
AND {&TableName}.num-seq-invent = i-sequenc -num-seq-invent
AND {&tablename}.id-box = de-id-box
AND (({&tablename}.ind-sit-inv-end item = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end item = 2 AND l-em-processo = YES )
OR ({&tablename}.ind-sit-inv-end item = 3 AND l-concluido = YES )
OR ({&tablename}.ind-sit-inv-end item = 4 AND l-atualizado = YES ))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES))
NO-LOCK NO-ERROR.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findNextMain findLastMain

Descrição:

Posiciona no próximo último registro da tabela :  wm-inventario-enderecoitem.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findPrevFaixa findNextChave

Descrição:

Posiciona no próximo registro anterior  da tabela.

WHERE {&TableName}.cod-estabel > = c-estabel-ini
AND {&TableName}.cod-estabel <= c-estabel -fim
AND {&TableName}.cod-local > = c-local-ini
AND {&TableName}.cod-local <= c-local -fim
AND {&TableName}.dt-inventario > = da-data-ini
AND {&TableName}.dt-inventario <= da-data-fim
AND {&TableName}.num-seq-invent > = i-sequenc-ini
AND {&TableName}.num-seq-invent <= i-sequenc-fim
AND {&tablename}.id-box > = de-id-box -ini
AND {&tablenameTableName}.id-box <= de-box-fim num-seq-item = i-num-seq-item NO-LOCK NO-ERROR.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findPrevInventario findNextEndereco

Descrição:

Posiciona no próximo registro anterior da tabela :  wm-inventario-endereco.

WHERE {&TableName}.cod-estabel = c-cod-estabel
AND {&TableName}.cod-local = c-cod-local
AND {&TableName}.dt-inventario = da-data dt-inventario
AND {&TableName}.num-seq-invent = i-sequenc -num-seq-invent
AND {&tablename}.id-box = de-id-box
AND (({&tablename}.ind-sit-inv-end item = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end item = 2 AND l-em-processo = YES )
OR ({&tablename}.ind-sit-inv-end item = 3 AND l-concluido = YES )
OR ({&tablename}.ind-sit-inv-end item = 4 AND l-atualizado = YES ))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES)) NO-ERROR.NO-LOCK NO-ERROR.

ParâmetrosParâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método: findPrevMain findNextMain

Descrição:

Posiciona no próximo registro anterior da tabela :  wm-inventario-endereco.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









MétodoMétodo:  getDecField   findPrevChave

Descrição:

Retorna o valor do campo DecimalPosiciona no próximo registro da tabela.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTERXCampo da tabela wm-inventariopFieldValueDECIMALXRetorna o valor do campo

Método:  getIntField  

Descrição:

Retorna o valor do campo Decimal.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição









Método: findPrevEndereco

Descrição:

Posiciona no próximo registro da tabela.

WHERE {&TableName}.cod-estabel = c-cod-estabel
AND {&TableName}.cod-local = c-cod-local
AND {&TableName}.dt-inventario = da-dt-inventario
AND {&TableName}.num-seq-invent = i-num-seq-invent
AND {&tablename}.id-box = de-id-box
AND (({&tablename}.ind-sit-inv-item = 1 AND l-nao-iniciado)
OR ({&tablename}.ind-sit-inv-item = 2 AND l-em-processo )
OR ({&tablename}.ind-sit-inv-item = 3 AND l-concluido )
OR ({&tablename}.ind-sit-inv-item = 4 AND l-atualizado )) NO-LOCK NO-ERROR

...

pFieldName

...

Método:  getDescEstabel  

Descrição:

Retorna a descrição do estabelecimento passado como parãmetro.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

 charXEstabelecimentopDescEstabel charXLocal








Método: findPrevMain

Descrição:

Posiciona no próximo registro da tabela.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  getDecField  Método:  getDescLocal  

Descrição:

Retorna a descrição do local passado como parãmetroo valor do campo Decimal.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

pFieldName

char
CHARACTER
X
EstabelecimentopCodLocalcharXLocalpDescLocalcharXDescrição


Campo da tabela wm-inventario
pFieldValueDECIMAL

X
Retorna o valor do campo


Método:  getIntField  Método:  getKey  

Descrição:

Retorna valores dos campos do índice idx-invent-endereco1
Parameters:
retorna valor do campo cod-estabel
retorna valor do campo cod-local
retorna valor do campo dt-inventario
retorna valor do campo num-seq-invent
retorna valor do campo id-boxo valor do campo Decimal.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTER
X

Campo da tabela wm-inventario
pFieldValueINTEGER

X
Retorna o valor do campo


Método:  getDescEstabel  

Descrição:

Retorna a descrição do estabelecimento passado como parãmetro.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel

 LIKE wm-inventario.cod-estabel

pcodestabel

 char
X

Estabelecimento
pcod-local LIKE wm-inventario.cod-local 
pDescEstabel char

X
Local
pdt-inventario LIKE wm-inventario.dt-inventario XData Inventáriopnum-seq-invent  LIKE wm-inventario.num-seq-invent XSequencia do Inventáriopid-boxLIKE wm-inventario-endereco.id-boxXID Box

Método:  getNumeroContagem  

Descrição:


Método:  getDescLocal  

Descrição:

Retorna a descrição do local passado como parãmetro.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcodestabel

char
X

Estabelecimento
pCodLocalchar
X

Local
pDescLocalchar

X
Descrição


Método:  getKey  

Descrição:

Retorna valores dos campos do índice idx-invent-endereco1
Parameters:
retorna valor do campo cod-estabel
retorna valor do campo cod-local
retorna valor do campo dt-inventario
retorna valor do campo num-seq-invent
retorna valor do campo id-boxEste metodo foi desenvolvido com o objetivo de retornar o número da contagem.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodEstabel

pcod-estabel

 LIKE wm-inventario.cod-estabel

X
Estabelecimento
pCodLocal
pcod-local LIKE wm-inventario.cod-local 

X
Local
pDtInventario
pdt-inventario LIKE wm-inventario.dt-inventario 

X
Data Inventário
 pNumSeqInvent
pnum-seq-invent  LIKE wm-inventario.num-seq-invent 

X
Sequencia do Inventário
 tt-num-contagem tt-num-contagemXTemp-Table  tt-num-contagem
pid-boxLIKE wm-inventario-endereco.id-box

X
ID Box


Método:  getLastSequenceMétodo:  goToKeyFiltro  

Descrição:

Posiciona a query considerando os parametros da constraintInventarioo buffer da tabela wm-inventario-item no último registro da tabela conforme parâmetros.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel 

pCodEstabel

LIKE
 LIKE wm-inventario.cod-estabel
X

Estabelecimento
pcod-local 
pCodLocal
LIKE
 LIKE wm-inventario.cod-
local
local 
X

Local
pdt-inventario
pDtInventario
LIKE
 LIKE wm-inventario.dt-
inventario
inventario 
X

Data Inventário
pnum-seq-invent 
 pNumSeqInvent LIKE
LIKE
wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pid-box LIKE wm-inventario-endereco.id-box
pIdBoxDecimal
X
Id Box


Box
pNumSeqItemInteger

X
Sequencia do item


Método:  goToKey  

Descrição:

Reposiciona registro com base no índice idxíndice idx-invent-endereco1item1
Parameters:
recebe valor do campo cod-estabel
recebe valor do campo cod-local
recebe valor do campo dt-inventario
recebe valor do campo num-seq-invent
recebe valor do campo id-box.

recebe valor do campo num-seq-item

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pcod-local LIKE wm-inventario.cod-local
X

Local
pdt-inventarioLIKE wm-inventario.dt-inventario
X

Data Inventário
pnum-seq-invent LIKE wm-inventario.num-seq-invent 
X

Sequencia Inventário
pid-box LIKE wm-inventario-endereco.id-box
X

Id Box
pnum-seq-itemLIKE wm-inventario-item.num-seq-item
X

Sequencia do Item


Método:  OpenQueryEndereco    leituraInventarioItem

Descrição:

Abre a query principal conforme seleção feita.

Zera as contagens e atualiza a situação do item do inventário.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

piCodEstabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
piCodLocal LIKE wm-inventario.cod-local 
X

Local
piDtInventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
piNumSeqInvent LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
piIdBoxDecimal
X

Box
piNumSeqItemInteger
X

Sequencia do item
piNumContagemInteger
X



Método:  OpenQueryFaixa  

Descrição:

Abre a query Faixa conforme seleção executada:

WHERE
WHERE {&TableName}.cod-estabel = c-estabel
AND {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.num-seq-invent = i-sequenc
AND {&TableName}.cod-bloco estabel >= c-blocoestabel-ini AND
AND {&TableName}.cod-bloco estabel <= c-blocoestabel-fim AND
AND {&TableName}.cod-rua local >= c-rualocal-ini AND
AND {&TableName}.cod-rua local <= c-rualocal-fim AND
AND {&TableName}.coddt-nivel inventario >= cda-niveldata-ini AND
AND {&TableName}.coddt-nivel inventario <= cda-niveldata-fim AND
AND {&TableName}.codnum-seq-coluna invent >= ci-colunasequenc-ini AND
AND {&TableName}.codnum-seq-coluna invent <= ci-colunasequenc-fim AND
AND {&tablename}.ind-sit-inv-end id-box >= ide-sit-invbox-end-ini AND
AND {&tablename}.ind-sit-inv-end id-box <= ide-sitbox-invfim NO-endLOCK INDEXED-REPOSITION.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  OpenQueryIdEndereco  

Descrição:

Abre a query principal conforme seleção executada:

WHERE {fim
AND {&TableName}.num-ult-contagem >= i-num-contagem-ini - 1 /* Diminui '1' porque a contagem vai de 0 a 2 */cod-estabel = c-estabel
AND {&TableName}.num-ult-contagem <= i-num-contagem-fim - 1
AND (({&tablename}.ind-sit-inv-end = 1 AND l-nao-iniciado = YES)
OR (cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.num-seq-invent = i-sequenc
AND {&tablename}.ind-sit-inv-end = 2 AND l-em-processo = YES)
OR (id-box >= de-box-ini
AND {&tablename}.id-box <= de-box-fim
AND {&tablename}.ind-sit-inv-end = 3 AND l-concluido = YES)
OR (>= i-sit-inv-end-ini
AND {&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND ((<= i-sit-inv-end-fim
AND {&TableName}.num-ult-contagem >= i-num-contagem-ini - 1 /* Diminui '1' porque a contagem vai de 0 AND l-primeira = YES)
OR (a 2 */
AND {&TableName}.num-ult-contagem <= i-num-contagem-fim - 1 AND l-segunda = YES)
OR
AND (({&TableNametablename}.numind-sit-ultinv-contagem >end = 2 1 AND l-terceira nao-iniciado = YES) )
BY OR ({&TableNametablename}.cod-bloco
BY {&TableName}.cod-rua
BY {&TableName}.cod-nivel
BY ind-sit-inv-end = 2 AND l-em-processo = YES)
OR ({&tablename}.ind-sit-inv-end = 3 AND l-concluido = YES)
OR ({&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND (({&TableName}.codnum-coluna
INDEXED-REPOSITION..ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES))
BY {&tablename}.id-box
INDEXED-REPOSITION.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  OpenQueryFaixa    OpenQueryInventario  

Descrição:

Abre a query Faixa principal conforme seleção executada:

WHERE
{&TableName}.cod-estabel > = c-estabel -ini
AND
{&TableName}.cod-estabel <local = c-estabel-fim local
AND
{&TableName}.cod-local >= c-local-ini AND
{&TableName}.cod-local <= c-local-fim AND
{&TableName}.dt-inventario >dt-inventario = da-data -ini AND
{&TableName}.dt-inventario <= da-data-fim AND
{&TableName}.num-seq-invent > = i-sequenc -ini
AND
(({&TableNametablename}.numind-sit-seqinv-invent <= i-sequenc-fim AND
end = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.id-box >= de-box-ini AND
ind-sit-inv-end = 2 AND l-em-processo = YES)
OR ({&tablename}.id-box <= de-box-fim NO-LOCK INDEXED-REPOSITION.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método:  OpenQueryIdEndereco  

Descrição:

Abre a query principal conforme seleção executada:

WHERE {&TableName}.cod-estabel = c-estabel
AND ind-sit-inv-end = 3 AND l-concluido = YES)
OR ({&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND (({&TableName}.codnum-ult-local contagem = c-local
AND 0 AND l-primeira = YES)
OR ({&TableName}.dtnum-ult-inventario contagem = da-data
AND 1 AND l-segunda = YES)
OR ({&TableName}.num-seqult-invent = i-sequenc
AND {&tablename}.id-box >= de-box-ini
AND {&tablename}.id-box <= de-box-fim
AND {&tablename}.ind-sit-inv-end >= i-sit-inv-end-ini
AND {&tablename}.ind-sit-inv-end <= i-sit-inv-end-fim
AND {&TableName}.num-ult-contagem >= i-num-contagem-ini - 1 /* Diminui '1' porque a contagem vai de 0 a 2 */
AND {&TableName}.num-ult-contagem <= i-num-contagem-fim - 1
AND (({&tablename}.ind-sit-inv-end = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end = 2 AND l-em-processo = YES)
OR ({&tablename}.ind-sit-inv-end = 3 AND l-concluido = YES)
OR ({&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES))
BY {&tablename}.id-box
INDEXED-REPOSITION.

Parâmetros:

contagem >= 2 AND l-terceira = YES))
INDEXED-REPOSITION.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  getLogField  

Descrição:

Retorna valor de campos do tipo lógico

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTER
X

Campo da tabela wm-inventario
pFieldValueLOGICAL

X
Retorna o valor do campo


Método:  getRawField  

Descrição:

Retorna o valor do campo Raw.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTER
X

Campo da tabela wm-inventario
pFieldValueRAW

X
Retorna o valor do campo


Método:  getRawField  

Descrição:

Retorna o valor do campo RECID.

Parâmetros:

Parâmetro

Parâmetro

Tipo

Formato

I

O

IO

Descrição

Método:  OpenQueryInventario  

Descrição:

Abre a query principal conforme seleção executada:

pFieldName

CHARACTER
X

Campo da tabela wm-inventario
pFieldValueRECID

X
Retorna o valor do campo


Método:  openQueryMain  

Descrição:

Abre a query principalWHERE {&TableName}.cod-estabel = c-estabel
AND {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.num-seq-invent = i-sequenc
AND (({&tablename}.ind-sit-inv-end = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end = 2 AND l-em-processo = YES)
OR ({&tablename}.ind-sit-inv-end = 3 AND l-concluido = YES)
OR ({&tablename}.ind-sit-inv-end = 4 AND l-atualizado = YES))
AND (({&TableName}.num-ult-contagem = 0 AND l-primeira = YES)
OR ({&TableName}.num-ult-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES))
INDEXED-REPOSITION.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição









Método:  getLogField    reabreInventarioEndereco  

Descrição:Retorna valor de campos do tipo lógico

Reabre  a tabela Inventário Endereço conforme parâmetros passados:

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTERXCampo da tabela wm-inventariopFieldValueLOGICALXRetorna o valor do campo

Método:  getRawField  

Descrição:

Formato

I

O

IO

Descrição

pcod-estabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pcod-local LIKE wm-inventario.cod-local
X

Local
pdt-inventarioLIKE wm-inventario.dt-inventario
X

Data Inventário
pnum-seq-invent LIKE wm-inventario.num-seq-invent 
X

Sequencia Inventário
pid-box LIKE wm-inventario-endereco.id-box
X

Id Box


Método:  retornaEndereco  

Descrição:

Retorna endereço conforme parâmetros passadosRetorna o valor do campo Raw.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pFieldName

CHARACTERXCampo da tabela wm-inventariopFieldValueRAWXRetorna o valor do campo

Método:  getRawField  

Descrição:

Retorna o valor do campo RECID.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Descrição

pcod-estabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pcod-local LIKE wm-inventario.cod-local
X

Local
pdt-inventarioLIKE wm-inventario.dt-inventario
X

Data Inventário
pnum-seq-invent LIKE wm-inventario.num-seq-invent 
X

Sequencia Inventário
p-id-box-atualLIKE wm-inventario-endereco.id-box
X

Id Box
p-contagemLIKE wm-inventario-endereco.num-ult-contagem
X

Numero da Ultima Contagem
p-cod-usuarioLIKE usuario-scm.usuario 
X

Usuário
p-id-box-contarLIKE wm-inventario-endereco.id-box

X
Id box Contagem
RowErrorsRowErrors

X
Temp-Table RowErrors.


Método:  retornaLocalizacaoBrowser  

Descrição:

Retorna Localização.

...

pFieldName

...

Método:  openQueryMain  

Descrição:

Abre a query principal.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método:  reabreInventarioEndereco  

Descrição:

Reabre  a tabela Inventário Endereço conforme parâmetros passados:

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pcod-local LIKE wm-inventario.cod-local
X

Localpdt-inventario
pid-boxLIKE wm-inventario-endereco.id-box
X

Id Box
pcod-blocoLIKE wm-inventario-endereco.cod-bloco

X
Bloco
pcod-ruaLIKE wm-inventario-endereco.cod-rua.dt-inventario

X
Data InventárioRua
pnumpcod-seq-invent nivelLIKE wm-inventario-endereco.num-seqcod-invent nivel

X
Sequencia InventárioNível
pidpcod-box colunaLIKE wm-inventario-endereco.idcod-boxcoluna

X
Id BoxColuna








Método:  retornaEndereco    setConstraintEndereco  

Descrição:Retorna endereço conforme parâmetros passados.

Atualiza as variáveis locais:


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel LIKE wm-inventario.cod-estabelX

Estabelecimento

pcod-local LIKE wm-inventario.cod-localXLocalpdt-inventarioLIKE wm-inventario.dt-inventarioXData Inventáriopnum-seq-invent LIKE wm-inventario.num-seq-invent XSequencia Inventáriop-id-box-atualLIKE wm-inventario-endereco.id-boxXId Boxp-contagemLIKE wm-inventario-endereco.num-ult-contagemXNumero da Ultima Contagemp-cod-usuarioLIKE usuario-scm.usuario XUsuáriop-id-box-contarLIKE wm-inventario-endereco.id-boxXId box ContagemRowErrorsRowErrorsXTemp-Table RowErrors.

Método:  retornaLocalizacaoBrowser  

Descrição:

IO

Descrição

p-bloco-iniCHAR
X

Bloco

p-bloco-fim CHAR
X

Bloco
p-rua-ini CHAR
X

rua
p-rua-fimCHAR
X

rua
p-nivel-iniCHAR
X

Nível
p-nivel-fimCHAR
X

Nível
p-coluna-ini CHAR
X

Coluna
p-coluna-fim CHAR
X

Coluna
 p-box-iniDEC
X

Box
p-box-fimDEC
X

Box
p-sit-inv-end-iniINT
X

Situação Endereço
p-sit-inv-end-fim INT
X

Situação Endereço
p-num-contagem-iniINT
X

Contagem
p-num-contagem-fimINT
X

Contagem


Método:  setConstraintFaixa  

Descrição:

Atualiza as variáveis locais:Retorna Localização.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel LIKE wm-inventario.cod-estabel
p-estabel-iniCHAR
X

Estabelecimento

p-estabel-fim CHAR
X

Estabelecimento
pcod-local 
p-local-iniCHAR
X

Local
p-local-fimCHAR
LIKE wm-inventario.cod-local

X

Local
pid-boxLIKE wm-inventario-endereco.id-boxXId Boxpcod-blocoLIKE wm-inventario-endereco.cod-blocoXBlocopcod-ruaLIKE wm-inventario-endereco.cod-ruaXRuapcod-nivelLIKE wm-inventario-endereco.cod-nivelXNívelpcod-colunaLIKE wm-inventario-endereco.cod-colunaXColuna
p-data-iniDate

X

Data
p-data-fimDate

X

Data
p-sequenc-iniInt
X

Sequencia
p-sequenc-fim Int
X

Sequencia
 p-box-iniDEC
X

Box
p-box-fimDEC
X

Box








Método:  setConstraintFaixa  Método:  setConstraintEndereco  

Descrição:

Atualiza as variáveis locais:

...

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-bloco-iniCHARX

Bloco

p-bloco-fim CHARXBlocop-rua-ini CHARXruap-rua-fimCHARXruap-nivel-iniCHARXNívelp-nivel-fimCHARXNívelp-coluna-ini CHARXColunap-coluna-fim CHARXColuna p-box-iniDECXBoxp-box-fimDECXBoxp-sit-inv-end-iniINTXSituação Endereçop-sit-inv-end-fim INTXSituação Endereçop-num-contagem-iniINTXContagemp-num-contagem-fimINTXContagem

Método:  setConstraintFaixa  

Descrição:

O

IO

Descrição

p-estabelCHAR
X

Estabelecimento

p-localCHAR
X

Local
p-dataDate
X

Data
p-sequencInt
X

Sequencia
p-nao-iniciadoLOG
X

Sequencia
p-em-processoLOG
X

Box
p-concluidoLOG
X

Box
p-atualizadoLOG




p-primeiraLOG




p-segundaLOG




p-terceiraLOG





Método:  setContagemEndereco  

Descrição:

Grava a contagem do endereço.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodestabelCHAR
X

Estabelecimento

pCodlocalCHAR
X

Local
pdtInventarioDate
X

Data
pNumseqInventInt
X

Sequencia
pIdboxDec
X

Box
pNumContagemInt
X

Contagem
pUsuarioCHAR
X

Usuário








Método:  setInventario  

Descrição:

Atualiza as variáveis que indica que o Inventário solicitado existeAtualiza as variáveis locais:


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-estabel-iniCHAR
X

Estabelecimento

p-estabel-fim localCHAR
X

EstabelecimentoLocal
p-local-inidataCHARDate
X

LocalData
p-local-fimsequencCHARInt
X

LocalSequencia
p-data-iniDateinventLOG

X


Método:  setSituacaoContagemEndereco  

Descrição:

Atualiza situação do endereço do inventário.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodestabelCHAR
X
Data


Estabelecimento

pCodlocalCHAR
p-data-fimDate

X
Datap-sequenc-ini


Local
pDtInventarioDate
Int

X
Sequenciap-sequenc-fim 


Data
pNumSeqInventInt
X

Sequencia
 p-box-iniDEC
pIdBoxDec
X

Box
p-box-fimDEC
pSituacaoInt
X
Box


Situação


MétodoMétodo:  setConstraintFaixa    validaContagem 

Descrição:Atualiza as variáveis locais:

  • Executa as validações na contagem do endereço.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-cod-estabel

CHAR
 LIKE wm-inventario.cod-estabel
X

Estabelecimento
p-cod-local
CHAR
 LIKE wm-inventario.cod-local 
X

Local
p
-dataDate
-dt-inventario LIKE wm-inventario.dt-inventario 
X

Data Inventário
p-
sequencInt
num-invent LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
p-
nao
id-
iniciado
box
LOG
Decimal
X
Sequencia


Endereço Inventário

p-
em
cod-
processo
usuarioLIKE usuario-scm.usuario 
LOG

X
Box


Usuario
p-concluido
RowErrors
LOG
RowErrors

X
Boxp-atualizadoLOGp-primeiraLOGp-segundaLOGp-terceiraLOG

Método:  setContagemEndereco  

Descrição:


Temp-table RowErrors.


todo:  retornaEnderecoBox  

Descrição:

Validar Registro wm-endereco-inventario
Retorna pExisteEnd = NO quando houver errosGrava a contagem do endereço.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodestabelCHAR
pcodestabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pCodlocal
pcodlocal LIKE wm-inventario.cod-local
CHAR

X

Local
pdtInventarioDate
pdtinventarioLIKE wm-inventario.dt-inventario
X

Data Inventário
pNumseqInventInt
pnumseqinvent LIKE wm-inventario.num-seq-invent 
X

Sequencia Inventário
pIdbox
PNumContagem
Dec
Integer
X
BoxpNumContagem



pidboxLIKE wm-inventario-endereco.id-box
Int

X
Contagem


Id Box
pUsuario
pExisteEnd
CHAR
Log

X
Usuário



Método:  setInventario  todo:  validateRecord  

Descrição:Atualiza as variáveis que indica que o Inventário solicitado existe:

Validações pertinentes ao DBO
Parameters: recebe o tipo de validação (Create, Delete, Update).

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p-estabel
pType CHAR
X

Estabelecimento

p-localCHARXLocalp-dataDateXDatap-sequencIntXSequenciap-inventLOGX








Método:  setSituacaoContagemEndereco  todo:  retornaEnderecoBox  

Descrição:

Atualiza situação do endereço do inventárioRetorna endereço conforme parâmetros passados.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodestabelCHAR
pcod-estabel LIKE wm-inventario.cod-estabel
X

Estabelecimento

pCodlocalCHARXLocalpDtInventarioDateXDatapNumSeqInventIntXSequenciapIdBoxDecXBoxpSituacaoIntXSituação

Método:  validaContagem 

Descrição:

...

pcod-local LIKE wm-inventario.cod-local
X

Local
pdt-inventarioLIKE wm-inventario.dt-inventario
X

Data Inventário
pnum-seq-invent LIKE wm-inventario.num-seq-invent 
X

Sequencia Inventário
pid-boxLIKE wm-inventario-endereco.id-box

X
Id Box
pcod-blocoLIKE wm-inventario-endereco.cod-bloco

X
Bloco
pcod-ruaLIKE wm-inventario-endereco.cod-rua

X
Rua
pcod-nivelLIKE wm-inventario-endereco.cod-nivel

X
Nível
pcod-colunaLIKE wm-inventario-endereco.cod-coluna

X
Coluna
pposicaoInteger

X
Posição







Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

p

pcod-

cod-

estabel

 LIKE wm-inventario.cod-estabel
X

Estabelecimento
p-cod
pcod-local LIKE wm-inventario.cod-local 
X

Local
p
pdt-
dt-
inventario LIKE wm-inventario.dt-inventario 
X

Data
Inventáriop-num-invent LIKE wm-inventario.num-seq-invent XSequencia do Inventáriop-id-boxDecimalXEndereço
Inventário
p-cod-usuarioLIKE usuario-scm.usuario XUsuarioRowErrorsRowErrorsXTemp-table RowErrors.

todo:  retornaEnderecoBox  

Descrição:

Validar Registro wm-endereco-inventario
Retorna pExisteEnd = NO quando houver erros.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

...

Estabelecimento

...

todo:  validateRecord  

Descrição:

Validações pertinentes ao DBO
Parameters: recebe o tipo de validação (Create, Delete, Update).

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

...

Estabelecimento

todo:  retornaEnderecoBox  

Descrição:

...

pnum-seq-invent  LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pid-boxLIKE wm-inventario-endereco.id-box
X

ID Box

pcod-itemLIKE wm-box-saldo.cod-item   
X

Item
pcod-referLIKE wm-box-saldo.cod-refer 
X

Referencia
pcod-loteLIKE wm-box-saldo.cod-lote
X

lote
pcod-embalagemLIKE wm-box-saldo.cod-embalagem
X

embalagem
pcod-clienteLIKE wm-box-saldo.cod-cliente
X

cliente
pqtd-saldoLIKE wm-box-saldo.qtd-item
X

Saldo
pqtd-pesoLIKE wm-inventario-item.qtd-saldo-peso
X

Peso



X



Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod

p-cod-

estabel 

estabel

LIKE
 LIKE wm-inventario.cod-estabel
X

Estabelecimento
pcod
p-cod-
local 
local
LIKE
 LIKE wm-inventario.cod-
local
local 
X

Local
pdt
p-dt-inventario
LIKE
 LIKE wm-inventario.dt-
inventario
inventario 
X

Data Inventário
pnum
p-
seq
num-invent 
LIKE
 LIKE wm-inventario.num-seq-invent 
X

Sequencia do Inventário
pid
p-id-boxLIKE wm-inventario-endereco.id-box
X
Id


ID Box

pcod-bloco
p-num-seq-itemLIKE wm-inventario-
endereco
item.
cod-bloco
num-seq-item   
X
Bloco


Item
pcod
p-num-
rua
contagemInteger
LIKE wm-inventario-endereco.cod-rua

X
Rua


Referencia
pcod
p-qtd-
nivel
apuradaDecimal
LIKE wm-inventario-endereco.cod-nivel

X
Nível


lote
pcod-colunaLIKE wm-inventario-endereco.cod-colunaXColunapposicaoIntegerXPosição
p-qtd-apurada-pesoDecimal
X

Peso