Documento de BO

Objetivo

Faz a manutenção na tabela wm-inventario

DEFINE TEMP-TABLE ttWm-inventario NO-UNDO LIKE wm-inventario.

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 INPUT PARAMETER pCodLocal AS CHAR NO-UNDO.

DEFINE INPUT PARAMETER pDtInventario AS DATE NO-UNDO.

DEFINE OUTPUT PARAMETER pNumSeqInvent AS INTE NO-UNDO.

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é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: ReabreInventario

Descrição:

Reabre a query principal.

Parâmetros:

Método: findFirstMain

Descrição:

Posiciona a Tabela inventário no primeiro registro.

Parâmetros:

Método:  findLastMain 

Descrição:

Posiciona a Tabela inventário no último registro.

Parâmetros:

Método:  findNextMain 

Descrição:

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

Parâmetros:

Método:  findPrevMain 

Descrição:

Posiciona a Tabela inventário no registro anterior.

Parâmetros:

Método:  getCharField 

Descrição:

Retorna o valor do campo alfanumerico.

Parâmetros:

Método:  getDateField  

Descrição:

Retorna o valor do campo Date.

Parâmetros:

Método:  getDecField  

Descrição:

Retorna o valor do campo Decimal.

Parâmetros:

Método:  getIntField  

Descrição:

Retorna o valor do campo Decimal.

Parâmetros:

Método:  getFirstInventSitInvMenor  

Descrição:

Posiciona no primeiro inventário com situação menor 4 localizando atribui valores para os parâmetros:

pcod-estabel = wm-inventario.cod-estabel
pcod-local = wm-inventario.cod-local
pdt-inventario = wm-inventario.dt-inventario
pnum-seq-invent = wm-inventario.num-seq-invent.

Parâmetros:

Método:  getIndSitInventario  

Descrição:

Este metodo foi desenvolvido com o objetivo de retornar a Situacao do Inventario,

para programas que nao trabalhem com abertura de query (ex: relatorios),

nao sendo possivel reposicionar a query (goToKey) e utilizar o metodo getIntField.

Parâmetros:

Método:  getIndSitInventario  

Descrição:

Este metodo foi desenvolvido com o objetivo de retornar a Situacao do Inventario,

para programas que nao trabalhem com abertura de query (ex: relatorios),

nao sendo possivel reposicionar a query (goToKey) e utilizar o metodo getIntField.

Parâmetros:

Método:  getInventario  

Descrição:

Retorna temp-table com todos os inventarios não iniciados ou em processo.

Parâmetros:

Método:  getKey  

Descrição:

 Retorna valores dos campos do índice idx-inventario1

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

Parâmetros:

Método:  getLastInventario  

Descrição:

Posiciona no inventário com situação >= 3 e que já foi  executado o acerto no ERP.

Parâmetros:

Método:  getLastInventarioAberto  

Descrição:

Posiciona o inventário conforme parâmetros passados e retorna Data e sequencia do inventário localizado.

Parâmetros:

Método:  getLastInventario  

Descrição:

Posiciona no inventário com situação >= 3 e que já foi  executado o acerto no ERP.

Parâmetros:

Método:  getLastInventSitInvIgual  

Descrição:

Posiciona no inventário com situação = 4.

Parâmetros:

Método:  getLogField  

Descrição:

Retorna valor de campos do tipo lógico

Parâmetros:

Método:  getRawField  

Descrição:

Retorna o valor do campo Raw.

Parâmetros:

Método:  getRawField  

Descrição:

Retorna o valor do campo RECID.

Parâmetros:

Método:  goToKey  

Descrição:

Reposiciona registro com base no índice idx-inventario1

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

Parâmetros:

Método:  setConstraintFaixa  

Descrição:

Atualiza as informações das variáveis locais:

c-estabel-ini = pi-estabel-ini
c-estabel-fim = pi-estabel-fim
c-local-ini = pi-local-ini 
c-local-fim = pi-local-fim 
d-data-ini = pi-data-ini
d-data-fim = pi-data-fim.

Parâmetros:

Método:  validaNumeroContagem  

Descrição:

Validações da Contagem de Inventario

Parâmetros:

Método:  validateRecord  

Descrição:

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

Verifica ocorrência de erros.

Parâmetros: