Histórico da Página
...
Atributo | Tipo | Formato | Evolução | Obrigatório | Evolução | |||
| cod-estabel | Character | X(5) | Estabelecimento | Sim | ems202. | |||
| cod-local | VarChar | X(3) | Local | Sim | ems202. | cod-bloco | Character | X(3) | bloco
| dt-inventario | Date | 99/99/9999 | Dt Inventario | Sim | ems202. | |||
| num-seq-invent | Integer | >>>,>>9 | Num Invent | Sim | ems202. | |||
| id-box | decimal | >>>>>>>>>>>9 | Id Endereço | Sim | ems202. | |||
codnum-seq-colunaitem | Character | X(3) | Integer | >>>>>>>>9 | Sequencia Itemcoluna | Sim | ems202. | |
cod- nivelitem | Character | X(316) | nivelItem | Sim | ems202. | |||
| cod-rua refer | Character | X(38) | ruaReferencia | Sim | ems202. | |||
| dtcod-inventario lote | Date | 99/99/9999 | Character | X(40) | LoteDt Inventario | Sim | ems202. | |
| numqtd-seq-inventsaldo | IntegerDecimal | >>>,>>>,>>>,>>9.9999 | Num Invent Qtd Saldo | Sim | ems202. | |||
| dtqtd-leitura apurada | Date | 99/99/9999 | Decimal | >>>,>>>,>>>,>>9.9999 | Qtd ApuradaDt leitura Inventario | Sim | ems202. | |
| hr-leitura ind-sit-inv-item | Integer | >>>>>9>9 | hora leituraSituação | Sim | ems202. | |||
| idcod-box cliente | decimalInteger | >>>>>>>>>>>9>9 | Id EndereçoCódigo Cliente | Sim | ems202. | |||
| inddt-sitvali-inv-end lote | Integer | >9 | Date | 99/99/9999 | Data Validade LoteSituação Inventario | Sim | ems202. | |
| indqtd-status-contagem final | Integer | >9 | Decimal | >>>,>>>,>>>,>>9.9999 | Qtd FinalSituação Contagem Inventario | Sim | ems202. | |
| logqtd-bloqsaldo-armaz peso | Logical | Sim/não | Decimal | >>>,>>>,>>>,>>9.9999 | Qtd Saldo PesoEndereço Bloqueado Inventário Armazenamento | Sim | ems202. | |
| logqtd-bloqapurada-retir peso | Logical | Sim/não | Decimal | >>>,>>>,>>>,>>9.9999 | Qtd Apurada PesoEndereço Bloqueado Inventário retirada | Sim | ems202. | |
| numqtd-ultfinal-contagem peso | IntegerDecimal | >>>,>>>,>>>,>>9.9999 | Qtd Final Peso | Sim | ems202. | |||
| log-atual-ce | Logical | Sim/não | Atualizado EstoqueNum contagem | Sim | ems202.usuario | |||
| cod-embalagem | VarChar | Xx(1210) | UsuárioEmbalagem | Sim | ems202. |
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.
/*--- 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-item.wm-inventario-etiqueta.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
|---|
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:
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:
Método: afterDestroy
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 | |||
| pIdBox | Decimal | X | Endereço Inventário | |||
| pNumContagem | Integer | 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 |
Método: createEnderecoInventario
Descrição:
...
pcodestabel | LIKE wm-inventario.cod- |
...
| estabel |
...
| X | ParâmetroEstabelecimento | |||||||||||||||||
| pcodlocal | LIKE wm- | 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 | |||||||||||||||
| pIdBox | Decimal | X | Endereço Inventário |
Método: createEnderecoInventarioColetor
Descrição:
...
| piNumSeqItem | wm-inventario- |
...
| item. |
...
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
| num-seq-item | X | Sequencia do Item | ||||
| piNumContagem | Integer | X | Número da contagem | |||
| piQtdApurada | wm-inventario-item.qtd-final | X | Quantidade Apurada | |||
| piPesoApurado | wm-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: 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-box | Decimal | X | Endereço Inventário |
Método: finalizaInventarioEndereco
Descrição:
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 itemFinaliza a contagem do inventario.
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 | Formato | I | O | IO | Descrição |
pcod-estabel | LIKE wm- |
pcodestabel
| inventario.cod-estabel | X | Estabelecimento |
| pcod-local | LIKE wm-inventario.cod-local | X | Local |
| pdt-inventario | LIKE wm-inventario.dt-inventario | X | Data Inventário |
| pnum-seq-invent | LIKE wm-inventario.num-seq-invent | X | Sequencia do Inventário |
| pid-box | LIKE wm-inventario-endereco.id-box | X |
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.
ID Box | ||||||
| pcod-item | LIKE wm-box-saldo.cod-item | X | Item | |||
| pcod-refer | LIKE wm-box-saldo.cod-refer | X | Referencia | |||
| pcod-lote | LIKE wm-box-saldo.cod-lote | X | lote | |||
| pcod-embalagem | LIKE wm-box-saldo.cod-embalagem | X | embalagem | |||
| pcod-cliente | LIKE wm-box-saldo.cod-cliente | X | cliente | |||
| pqtd-saldo | LIKE wm-box-saldo.qtd-item | X | Saldo | |||
| pqtd-peso | LIKE 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 |
| pError | Int | |||||
| pParam | Char |
Método: findFirstInventario desatualizaItemInventario
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
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-box | LIKE wm-inventario-endereco.id-box | X | ID Box | |||
| p-num-seq-item | LIKE wm-inventario-item.num-seq-item | X | Item | |||
| p-num-contagem | Integer | X | Referencia | |||
| p-qtd-apurada | Decimal | X | lote | |||
| p-qtd-apurada-peso | Decimal | X | Peso | |||
Método: encerraInventarioItem
Descrição:
Encerra item do inventário e sua etiqueta
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:
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-box | LIKE wm-inventario-endereco.id-box | X | ID Box | |||
| p-num-contagem | Integer | X | Referencia |
Método: finalizaInventarioItem
Descrição:
Zera as quantiades dos itens do box do inventárioWHERE {&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: findLastInventario
Descrição:
Posiciona no último registro da tabela conforme seleção feita:
...
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 | |||
| pidbox | LIKE wm-inventario-endereco.id-box | X | ID Box | |||
| pnumcontagem | Integer | X | Referencia |
Método: findFirstChave
Descrição:
Posiciona no primeiro registro da tabela conforme seleção feita:
WHERE = c-estabel
AND {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.numcod-seq-invent = i-sequenc estabel = c-cod-estabel
AND (( {&tablenameTableName}.indcod-sitlocal = c-inv-end = 1 AND l-nao-iniciado = YES)
OR ({&tablename}.ind-sit-inv-end = 2 AND l-em-processo = YES)
OR (cod-local
AND {&TableName}.dt-inventario = da-dt-inventario
AND {&TableName}.num-seq-invent = i-num-seq-invent
AND {&tablename}.indid-sitbox = de-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)) id-box
AND {&TableName}.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 findFirstEndereco
Descrição:
Posiciona no último registro da tabela : wm-inventario-endereco.
...
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
MétodoMétodo: findNextFaixa findNextInventario
Descrição:
Posiciona no próximo registro da tabela 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-id-box -ini
AND (({&tablename}.id-box <= de-box-fim NO-LOCK NO-ERROR.
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
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.
Parâmetros:
Método: findLastMain
Descrição:
Posiciona no último registro da tabela : wm-inventario-endereco.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
MétodoMétodo: findNextInventario findFirstMain
Descrição:
Posiciona no próximo primeiro registro da tabela conforme seleção feita:: wm-inventario-item.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: findLastChave
Descrição:
Posiciona no ultimo registro da tabela.
WHERE {&TableName}.cod-estabel = c-cod-estabel
AND {&TableName}.cod-local = c-cod-WHERE {&TableName}.cod-estabel = c-estabel
AND {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data dt-inventario
AND {&TableName}.num-seq-invent = i-num-seq-sequenc invent
AND (( {&tablename}.id-box = de-id-box
AND {&TableName}.num-seq-item = i-num-seq-item NO-LOCK NO-ERROR.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: findLastEndereco
Descrição:
Posiciona no último 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 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-ultseq-contagem = 1 AND l-segunda = YES)
OR ({&TableName}.num-ult-contagem >= 2 AND l-terceira = YES))
NO-ERROR.
Parâmetros:
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.
Parâmetros:
Parâmetro | Tipo | 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-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 num-seq-invent = i-num-seq-invent
AND {&TableNametablename}.dtid-inventario >box = dade-dataid-ini box
AND {&TableName}.dt-inventario <= da-data-fim
AND num-seq-item = i-num-seq-item NO-LOCK NO-ERROR.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: findNextEndereco
Descrição:
Posiciona no próximo registro da tabela.
WHERE {&TableName}.num-seq-invent >= i-sequenc-ini 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-sequencnum-seq-fim invent
AND {&tablename}.id-box > = de-id-box -ini
AND (({&tablename}.id-box <= de-box-fim NO-LOCK NO-ERROR.
Parâmetros:
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.
Parâmetros:
Parâmetro | Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: findPrevInventario 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étodo: findPrevChave
Descrição:
Posiciona no próximo registro da tabela.
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-data dt-inventario
AND {&TableName}.num-seq-invent = i-num-sequenc seq-invent
AND (( {&tablename}.ind-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.
Parâmetros:
NO-LOCK NO-ERROR.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
...
Método: findPrevMain
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
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-box
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
...
pcod-estabel
...
Método: getNumeroContagem
Descrição:
Este 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
...
Método: goToKeyFiltro
Descrição:
Posiciona a query considerando os parametros da constraintInventario.
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
...
Estabelecimento
...
Método: goToKey
Descrição:
Reposiciona registro com base no índice idx-invent-endereco1
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.
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
...
Estabelecimento
...
Método: OpenQueryEndereco
Descrição:
Abre a query principal 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}.cod-bloco >= c-bloco-ini
AND {&TableName}.cod-bloco <= c-bloco-fim
AND {&TableName}.cod-rua >= c-rua-ini
AND {&TableName}.cod-rua <= c-rua-fim
AND {&TableName}.cod-nivel >= c-nivel-ini
AND {&TableName}.cod-nivel <= c-nivel-fim
AND {&TableName}.cod-coluna >= c-coluna-ini
AND {&TableName}.cod-coluna <= c-coluna-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}.cod-bloco
BY {&TableName}.cod-rua
BY {&TableName}.cod-nivel
BY {&TableName}.cod-coluna
INDEXED-REPOSITION.
.
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
Método: OpenQueryFaixa
Descrição:
Abre a query Faixa conforme seleção executada:
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 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 {&TableName}.cod-local = c-local
AND {&TableName}.dt-inventario = da-data
AND {&TableName}.num-seq-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:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
Método: OpenQueryInventario
Descrição:
Abre a query principal conforme seleção executada:
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))
INDEXED-REPOSITION. retorna valor do campo num-seq-invent
retorna valor do campo id-box
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
...
pcod-estabel | LIKE wm-inventario.cod-estabel | X | Estabelecimento | |||
| pcod-local | LIKE wm-inventario.cod-local | X | Local | |||
| pdt-inventario | LIKE wm-inventario.dt-inventario | X | Data Inventário | |||
| pnum-seq-invent | LIKE wm-inventario.num-seq-invent | X | Sequencia do Inventário | |||
| pid-box | LIKE wm-inventario-endereco.id-box | X | ID Box |
Método: getLastSequence
Descrição:
Posiciona o buffer da tabela wm-inventario-item no último registro da tabela conforme parâmetros
Método: getRawField
Descrição:
Retorna o valor do campo Raw.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
pFieldName
Método: getRawField
Descrição:
Retorna o valor do campo RECID.
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 | |||
| pIdBox | Decimal | X | Box | |||
| pNumSeqItem | Integer | X | Sequencia do item |
Método: goToKey
Descrição:
Reposiciona registro com base no índice idx-invent-item1
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
...
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 | Local | |||
| pdt-inventario | LIKE 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-item | LIKE wm-inventario-item.num-seq-item | X | Sequencia do Item |
Método: retornaEndereco leituraInventarioItem
Descrição:
Retorna endereço conforme parâmetros passados.
Zera as contagens e atualiza a situação do item do inventário.
ParâmetrosParâ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. |
Método: retornaLocalizacaoBrowser
Descrição:
| num-seq-invent | X | Sequencia do Inventário | ||||
| piIdBox | Decimal | X | Box | |||
| piNumSeqItem | Integer | X | Sequencia do item | |||
| piNumContagem | Integer | X |
Método: linkToWmInventarioEndereco
Descrição:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: openQueryChave
Descrição:
Abre a query principal conforme seleção executada:
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}.num-seq-item = i-num-seq-item
NO-LOCK INDEXED-REPOSITIONRetorna Localização.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: openQueryEndereco
Descrição:
Abre a query principal conforme seleção executada:
WHERE
{&TableName}.cod-estabel = c-cod-estabel
...
Estabelecimento
...
AND
{&TableName}.cod-local = c-cod-local
...
Método: setConstraintEndereco
Descrição:
Atualiza as variáveis locais:
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
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 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 | |||
| pFieldValue | LOGICAL | X | Retorna o valor do campo |
Método: getRawField
Descrição:
Retorna o valor do campo Raw.
...
Bloco
...
Método: setConstraintFaixa
Descrição:
Atualiza as variáveis locais:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Estabelecimento
Método: setConstraintFaixa
Descrição:
pFieldName | CHARACTER | X | Campo da tabela wm-inventario | |||
| pFieldValue | RAW | X | Retorna 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 |
pFieldName | CHARACTER | X | Campo da tabela wm-inventario | |||
| pFieldValue | RECID | X | Retorna o valor do campo |
Método: openQueryMain
Descrição:
Abre a query principal.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: posicionaInventarioEndereco
Descrição:
Reabre a tabela Inventário Endereço conforme parâmetros passados:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Método: reabreInventarioItem
Descrição:
Reabre a tabela inventário-item.Atualiza as variáveis locais:
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-seq-invent | LIKE wm-inventario.num-seq-invent |
| X | Sequencia Inventário | ||
| p- |
| id- |
| box | LIKE wm-inventario-endereco.id-box | X | Id Box | |||
| p- |
| num-contagem | LIKE wm-inventario-endereco.num-ult-contagem |
| X |
Método: setContagemEndereco
Descrição:
| Numero da Ultima Contagem | ||||||
| RowErrors | RowErrors | X | Temp-Table RowErrors. |
Método: retornaDtValiLote
Descrição:
Retorna Data de Validade do LoteGrava a contagem do endereço.
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 |
| Inventário | ||||||
| pCodItem | LIKE Wm-inventario-item.cod-item | X | Item | |||
| pCodRefer | LIKE Wm-inventario-item.cod-refer | X |
| Referencia |
| pCodLote | LIKE Wm-inventario-item.cod-lote |
| X |
| Lote |
| pDtValiLote | LIKE Wm-inventario-item.dt-vali-lote |
| X |
| Data de Validade do Lote | ||||||
Método: setInventario setConstraintChave
Descrição:
Atualiza as variáveis que indica que o Inventário solicitado existelocais:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
| pCodEstabel | CHAR | X | Estabelecimento |
| pCodLocal | CHAR | X | Local |
| pDtInventario | Date | X | Data |
| pNumSeqInvent | Int | X | Sequencia |
| pIdBox | DEC | X | Box | |||
| pNumSeqItem | Int | X | Sequencia Item |
Método: setSituacaoContagemEndereco setConstraintEndereco
Descrição:
Atualiza situação do endereço do inventário.as variáveis locais:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
| pCodEstabel | CHAR | X | Estabelecimento |
| pCodLocal | CHAR | X | Local | |||
| pDtInventario | Date | X | Data | |||
| pNumSeqInvent | Int | X | Sequencia |
| pIdBox |
| DEC | X | Box |
Método: validaContagem Metodo: setConstraintSituacao
Descrição:
- Executa as validações na contagem do endereço.
Parâmetros:
...
Parâmetro
...
Tipo
...
Formato
...
I
...
O
...
IO
...
Descrição
Atualiza as variáveis locais:
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
| p-nao-iniciado | LOG | X | ||||
| p-em-processo | LOG | X | ||||
| p-concluido | LOG | X | ||||
| p-atualizado | LOG | X |
Método: validateLoteValidade
Descrição:
Valida a Data de Validade do Lote
...
p-cod-estabel
...
Endereço Inventário
...
Mé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 |
| pCodestabel | LIKE |
| Wm-inventario-item.cod-estabel | X | Estabelecimento |
| pCodlocal | LIKE |
| Wm-inventario-item.cod-local | X | Local |
| pCodCliente | LIKE |
| Wm-inventario-item. |
| cod- |
| cliente | X | Data |
| pCodItem | LIKE |
| Wm-inventario-item. |
| cod- |
| item | X | Sequencia |
| pCodRefer | LIKE Wm-inventario-item.cod-refer | X | Box |
| pCodLote | LIKE |
| Wm-inventario- |
| item. |
| cod- |
| lote | X |
| Contagem |
| pDtValiLote | LIKE Wm-inventario-item.dt-vali-lote | X | Usuário | |||
Método: validateRecordMétodo: validateRecord
Descrição:
Validações pertinentes ao DBO
Parameters: recebe Recebe o tipo de validação (Create, Delete, Update)Update)
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
| pType | CHAR | |||||
Método: verificaWMSItEstabLocal
Descrição:
Validações e atualizações do item e lote se estes compartilham box.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
Estabelecimento
Método: retornaEnderecoBox
Descrição:
c-cod-estab | like wm-inventario-item.cod-estabel | Estabelecimento | ||||
| c-cod-local | like wm-inventario-item.cod-local | Local | ||||
| c-cod-item | like wm-inventario-item.cod-item | Item |
Método: verificaItemInventario
Descrição:
Validações pertinentes a wm-Inventario-item
Cria inventário item conforme parâmetrosRetorna endereço conforme parâmetros passados.
Parâmetros:
Parâmetro | Tipo | Formato | I | O | IO | Descrição |
piCodEstabel |
like wm-inventario-item.cod-estabel |
Estabelecimento |
| piCodLocal |
| like wm-inventario-item.cod-local |
| Local |
| piDtInvent |
| like wm-inventario-item.dt- |
| invent |
| Data Inventário |
| piNumSeqInvent | like |
| wm-inventario-item.num-seq- |
| invent |
| Sequencia Inventário |
| piIdBox | like wm-inventario-item.id-box | Endereço | ||||
| piCodItem |
| like wm-inventario- |
| item. |
| cod-item | Item | |||||
| piCodRefer | like wm-inventario-item.cod-refer | Referencia | ||||
| piCodLote | like |
| wm-inventario- |
| item.cod- |
| lote |
| Lote | ||||
| piCodEmbalagem | LIKE wm-inventario- |
| item.cod- |
| embalagem |
| Embalagem |
| piDtValiLote | like |
| wm-inventario- |
| item. |
| dt-vali- |
| lote | Data Validade do Lote | ||||
| piCodCliente | like |
| wm-inventario- |
| item.cod- |
| cliente |
| Cliente |
| piNumSeqItem | like wm-inventario-item.num-seq-item | Sequencia do Item | ||||