Árvore de páginas

Versões comparadas

Chave

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

...

Atributo

Tipo

Formato

Evolução

ObrigatórioEvolução
cod-estabel

Character

X(5)

EstabelecimentoSimems202.
cod-localVarCharX(3)LocalSimems202.

cod-bloco

Character

X(3)

blocoSimems202.

cod-coluna

Character

X(3)

colunaSimems202.
cod-nivel

Character

X(3)

nivelSimems202.
cod-rua

Character

X(3)

ruaSimems202.
dt-inventario

Date

99/99/9999

Dt InventarioSimems202.
num-seq-invent

Integer

>>>,>>9

Num InventSimems202.
dt-leitura

Date

99/99/9999

Dt leitura InventarioSimems202.
hr-leitura

Integer

>>>>>9

hora leituraSimems202.
id-box

decimal

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

Id EndereçoSimems202.
ind-sit-inv-end

Integer

>9

Situação InventarioSimems202.
ind-status-contagem

Integer

>9

Situação Contagem InventarioSimems202.
log-bloq-armaz

Logical

Sim/não

Endereço Bloqueado Inventário ArmazenamentoSimems202.
log-bloq-retir

Logical

Sim/não

Endereço Bloqueado Inventário retiradaSimems202.
num-ult-contagem

Integer

>>>,>>9

Num contagemSimems202.
usuario

VarChar

X(12)

UsuárioSimems202.







DEFINE TEMP-TABLE ttWmtt-num-inventario contagem NO-UNDO LIKE wm-inventario
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.

Método: createInventario

Descrição:
Cria Inventário e retorna a sequencia do inventário criado.

Parâmetros:

DEFINE INPUT PARAMETER pCodEstabel AS CHAR NO-UNDO.

DEFINE VARIABLE i-sequenc-ini LIKE wm-inventario-endereco.num-seq-invent DEFINE INPUT PARAMETER pCodLocal AS CHAR NO-UNDO.
DEFINE INPUT PARAMETER pDtInventario AS DATE VARIABLE i-sequenc-fim LIKE wm-inventario-endereco.num-seq-invent INITIAL 999999 NO-UNDO.
DEFINE OUTPUT PARAMETER pNumSeqInvent AS INTE 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:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pCodEstabelCharacter(3)XCódigo da DocapCodLocalCharacter(3)XCódigo LocalpDtInventarioDate99/99/9999XData InventáriopNumSeqInventInteger>9XSequencia do Inventário







Queries e Queries e Constraints Métodos

Definição das Queries (acesso ao banco de dados) e Contraints (regras de leitura)  utilizadas para buscar grupos de registros da base de dados.

...

Método:

openQueryMain

 

Descrição:

Disponibiliza todos os saldos.


MétodoMétodo:

OpenQueryEstabel

 

Descrição:

...

Constraints Associados:


Método: ReabreInventario beforeDestroy

 

Descrição:

Reabre a query principal.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método: findFirstMain

 

Descrição:

Posiciona a Tabela inventário no primeiro registroIF 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:  findLastMain  createEnderecoInventario

Descrição:

Posiciona a Tabela inventário no último registroCria registro na Tabela wm-inventario-endereco.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

Método:  findNextMain 

Descrição:

Posiciona a Tabela inventário no próximo registro.

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


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-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
RowErrorsTABLE

X
Temp-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:

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-boxDecimal
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

 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
piNumContageminteger
X

Número da contagem


Método

Método:  findPrevMain 

Descrição:

Posiciona a Tabela inventário no registro anterior.

Parâmetros:

...

Parâmetro

...

Tipo

...

Formato

...

I

...

O

...

IO

...

Descrição

Método:  getCharField 

Descrição:

...