Árvore de páginas

Documento de BO

Produto:

Datasul

Ocorrência:

Documentação de BO

Nome Físicoscbo/bosc035.p


RecordSet


Temp-Table principal utilizada para utilização dos métodos da BO e suas respectivas definições.

Wm-box-saldo

Atributo

Tipo

Formato

Descrição

Obr.

cod-estabel

Char

X(3)

Código do estabelecimento

Sim

cod-local

Char

X(3)

Código do local

Sim

id-box

Decimal

>>>>>>>>>9

Identificador único do box

Sim

cod-item

Char

X(16)

Código do item

Sim

cod-refer

Char

X(8)

Código da referência do item

Sim

cod-lote

Char

X(10)

Código do lote

Sim

dt-transacao

Date

99/99/9999

Data de transação

Sim

id-saldo

Decimal

>>>>>>>>>9

Identificador único do saldo

Sim

dt-atua-saldo

Date

99/99/9999

Data de atualização do saldo

Sim

id-docto

Decimal

>>>>>>>>>9

Identificador único do documento

Sim

num-seq-item

Integer

>>>>>9

Número da seqüencia do movimento

Sim

cod-embalagem

Char

X(10)

Código da embalagem

Sim

qtd-original

Decimal

>>>,>>>,>>9.9999

Quantidade do item original

Não

qtd-item

Decimal

>>>,>>>,>>9.9999

Quantidade do item

Não

qtd-item-bloq

Decimal

>>>,>>>,>>9.9999

Quantidade do item bloqueada

Não

ind-status-box

Integer

>9

Indicador da situação do box

Sim

ind-status-saldo

Integer

>9

Indicador da situação do saldo

Sim

id-movtoDecimal>>>>>>>>>9Identificador MovtoSim
qtd-pendenteDecimal>>>,>>>,>>9.9999Qtd PendenteSim
dat-ult-contagDate99/99/9999Última ContagemNão
log-balancdoLogicalSim/NãoBalanceadoSim
log-bloq-movto-cqLogicalSim/NãoBloqueio Movimento CQNão
idi-status-sdo-origemInteger>9Indicador Status Saldo OrigemNão
cdd-id-movto-origDecimal>>>>>>>>>9Identificador Movto OrigemNão
RowNuminteger

Não
r-rowidrowid

Não


Métodos Básicos


Métodos básicos de acesso ao banco de dados.



Método:

goToKey

 

Descrição:

Reposiciona o registro da tabela wm-box-saldo através de sua chave primária.


Requisitos:

Nenhum


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel

char

X(3)

X

 

 

Código do estabelecimento

pcod-local

char

X(3)

X

 

 

Código do local

pdt-transacao

date

99/99/9999

X

 

 

Data da transação

pid-saldo

decimal

>>>>>>>>>9

X

 

 

Indentificador único do saldo


Queries e Constraints


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:

OpenQueryBox

 

Descrição:

Busca os registros de um determinado Estabelecimento, Local e Box.


Constraints Associados:

SetConstraintBox



Método:

SetConstraintBox

 

Descrição:

Solicita informações para seleção de saldos de um determinado Estabelecimento, Local e Box.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcod-estabel

Char

X(3)

X

 

 

Código do estabelecimento

pcod-local

Char

X(3)

X

 

 

Código do local

pid-box

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box


Métodos Negócio


Métodos adicionais de atualização e acesso à base de dados.



Método: 

GetDesItem

 

Descrição

Método consiste na pesquisa da descrição do item, de acordo com o código do item informado.

 

Requisitos:

Nenhum


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

c-cod-item

Char

X(16)

X

 

 

Código do item

c-des-item

Char

X(60)

 

X

 

Descrição do item



Método: 

getNomEstabel

 

Descrição

Método consiste na pesquisa do nome do estabelecimento, de acordo com o  código de estabelecimento informado.

 

Requisitos:

Nenhum


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

c-cod-estabel

Char

X(3)

X

 

 

Código do estabelecimento

c-nom-estabel

Char

X(40)

 

X

 

Nome do estabelecimento



Método: 

getNomLocal

 

Descrição

Método consiste na pesquisa do nome do local, segundo código do local informado.

 

Requisitos:

Nenhum


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

c-cod-local

Char

X(3)

X

 

 

Código do local

c-nom-local

Char

X(40)

 

X

 

Nome do local



Método: 

getLocalizacaoItem

 

Descrição

Método consiste na pesquisa da localização do item, de acordo com Estabelecimento, Local e Id-box informados.

 

Requisitos:

Nenhum


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

c-cod-estabel

Char

X(3)

X

 

 

Código do estabelecimento

c-cod-local

Char

X(3)

X

 

 

Código do local

i-id-box

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

c-cod-bloco

Char

X(3)

 

X

 

Código do bloco

c-cod-rua

Char

X(3)

 

X

 

Código da rua

c-cod-nivel

Char

X(3)

 

X

 

Código do nível

c-cod-coluna

Char

X(3)

 

X

 

Código da coluna


 

Método: 

getOcupacaoBox

 

Descrição

Método consiste na consulta da ocupação de um determinado box.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumo NO-UNDO
                        FIELD cod-estabel                 LIKE wm-box-saldo.cod-estabel
                        FIELD cod-local                     LIKE wm-box-saldo.cod-local
                        FIELD cod-item                     LIKE wm-box-saldo.cod-item
                        FIELD cod-refer                     LIKE wm-box-saldo.cod-refer
                        FIELD cod-lote                      LIKE wm-box-saldo.cod-lote
                        FIELD dt-transacao               LIKE wm-box-saldo.dt-transacao
                        FIELD dt-validade-lote          LIKE wm-saldo-estoque.dt-validade-lote
                        FIELD ind-status-box             LIKE wm-box-saldo.ind-status-box
                        FIELD ind-status-saldo          LIKE wm-box-saldo.ind-status-saldo
                        FIELD cod-embalagem          LIKE wm-box-saldo.cod-embalagem
                        FIELD qtd-original                 LIKE wm-box-saldo.qtd-original
                        FIELD qtd-item                      LIKE wm-box-saldo.qtd-item
                        FIELD qtd-item-bloq             LIKE wm-box-saldo.qtd-item-bloq
                        FIELD qti-embalagem           LIKE wm-box-movto.qti-embalagem
                        FIELD cod-cliente                  LIKE wm-box-saldo.cod-cliente
                        &IF '{&bf_lote_avancado_liberado}' = 'yes' &THEN
                            FIELD log-bloq-movto-cq LIKE wm-box-saldo.log-bloq-movto-cq
                            FIELD desc-lote-estado     AS CHARACTER FORMAT "x(20)"
                        &ENDIF
                        FIELD RowNum                     AS INTEGER
                        FIELD r-RowId                       AS ROWID
                        INDEX w-res01 cod-item
                                                 cod-refer
                                                 cod-lote
                                                 dt-transacao
                                                 cod-embalagem
                                                 qtd-original
                                                 qtd-item
                                                 qtd-item-bloq
                                                 ind-status-saldo.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

ttResumo

Table


 

X

 

Tabela de resumo de ocupação



Método: 

getOcupacaoBox2

 

Descrição

Método consiste na consulta da ocupação de um determinado box.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoSaldo NO-UNDO
                       FIELD cod-estabel        LIKE wm-box-saldo.cod-estabel
                       FIELD cod-local            LIKE wm-box-saldo.cod-local
                       FIELD cod-item            LIKE wm-box-saldo.cod-item
                       FIELD cod-refer            LIKE wm-box-saldo.cod-refer
                       FIELD cod-lote              LIKE wm-box-saldo.cod-lote
                       FIELD ind-status-saldo LIKE wm-box-saldo.ind-status-saldo
                       FIELD cod-embalagem LIKE wm-box-saldo.cod-embalagem
                       FIELD qtd-original        LIKE wm-box-saldo.qtd-original
                       FIELD qtd-disponivel    LIKE wm-box-saldo.qtd-item
                       FIELD qtd-item             LIKE wm-box-saldo.qtd-item
                       FIELD qtd-item-bloq    LIKE wm-box-saldo.qtd-item-bloq
                       FIELD qti-embalagem  LIKE wm-box-movto.qti-embalagem
                       FIELD id-box                LIKE wm-box-saldo.id-box
                       FIELD r-rowid-movto  AS ROWID
                       FIELD RowNum           AS INTEGER
                       FIELD r-RowId             AS ROWID
                       INDEX w-res01 IS UNIQUE cod-item
                                                                  cod-refer
                                                                  cod-lote
                                                                  cod-embalagem
                                                                  ind-status-saldo.

DEFINE TEMP-TABLE ttResumoSaldoId NO-UNDO
                       FIELD cod-estabel         LIKE wm-box-saldo.cod-estabel
                       FIELD cod-local             LIKE wm-box-saldo.cod-local
                       FIELD cod-item             LIKE wm-box-saldo.cod-item
                       FIELD cod-refer             LIKE wm-box-saldo.cod-refer
                       FIELD cod-lote              LIKE wm-box-saldo.cod-lote
                       FIELD dt-transacao       LIKE wm-box-saldo.dt-transacao
                       FIELD dt-validade-lote LIKE wm-saldo-estoque.dt-validade-lote
                       FIELD ind-status-saldo LIKE wm-box-saldo.ind-status-saldo
                       FIELD cod-embalagem LIKE wm-box-saldo.cod-embalagem
                       FIELD qtd-original        LIKE wm-box-saldo.qtd-original
                       FIELD qtd-disponivel   LIKE wm-box-saldo.qtd-item
                       FIELD qtd-item            LIKE wm-box-saldo.qtd-item
                       FIELD qtd-item-bloq   LIKE wm-box-saldo.qtd-item-bloq
                       FIELD qti-embalagem LIKE wm-box-movto.qti-embalagem
                       FIELD cod-cliente        LIKE wm-box-saldo.cod-cliente
                       FIELD id-saldo             LIKE wm-box-saldo.id-saldo
                       FIELD id-box                LIKE wm-box-saldo.id-box
                       FIELD id-docto            LIKE wm-box-saldo.id-docto
                       FIELD r-rowid-movto  AS ROWID
                       FIELD RowNum           AS INTEGER
                       FIELD r-RowId             AS ROWID
                       INDEX w-res01 IS UNIQUE cod-item
                                                                  cod-refer
                                                                  cod-lote
                                                                  cod-embalagem
                                                                  ind-status-saldo
                                                                  id-saldo.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBoxIni

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

pdeIdBoxFim

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

piEndTipoInteger9X

Indica o tipo do endereço:

1 - Origem

2 - Destino 

ttResumoSaldo

Table


 

X

 

Tabela de resumo de ocupação

ttResumoSaldoId

Table


 

X

 

Tabela de saldos do resumo de ocupação


Método: 

getOcupacaoItem

 

Descrição

Método consiste na consulta da ocupação de um determinado item.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoItem NO-UNDO
                       FIELD id-box                    LIKE wm-box-saldo.id-box
                       FIELD ind-status-box       LIKE wm-box-saldo.ind-status-box
                       FIELD ind-status-saldo    LIKE wm-box-saldo.ind-status-saldo
                       FIELD cod-embalagem    LIKE wm-box-saldo.cod-embalagem
                       FIELD qtd-item                LIKE wm-box-saldo.qtd-item
                       FIELD qtd-item-alocad    LIKE wm-box-saldo.qtd-item-bloq
                       FIELD qtd-item-liberado LIKE wm-box-saldo.qtd-item-bloq
                       FIELD RowNum               AS INTEGER
                       FIELD r-RowId                 AS ROWID
                       INDEX w-res01 id-box
                                                cod-embalagem
                                                ind-status-saldo.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodClienteInte>>>>>>>>9X

Código do cliente

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código do refer

pcCodLote

Char

X(10)

X

 

 

Código do lote

pqtd-atualDec>>>,>>>,>>9.9999
X
Quantidade atual

ttResumoItem

Table


 

X

 

Tabela de resumo de ocupação do item



Método: 

getGeraDetalhe

 

Descrição

Método consiste na consulta de detalhes de um determinado item.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttDetalhe NO-UNDO
                        FIELD c-movto           AS CHARACTER LABEL "Movimento" FORMAT "X(13)"
                        FIELD id-docto          LIKE wm-docto.id-docto
                        FIELD num-docto      LIKE wm-docto.num-docto
                        FIELD num-seq-item LIKE wm-box-saldo.num-seq-item
                        FIELD dt-transacao    AS DATE LABEL "Dt Implanta╗Æo" FORMAT "99/99/9999"
                        FIELD qtd-item          LIKE wm-docto-itens.qtd-item
                        FIELD atualizado       AS LOGICAL FORMAT "Sim/NÆo" LABEL "Atualizado"
                        FIELD origem-docto AS CHARACTER LABEL "Origem Docto" FORMAT "x(25)"
                        FIELD cod-usuario    LIKE wm-tarefa-docto-itens.cod-usuario.



Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código da referência

pcCodLote

Char

X(10)

X

 

 

Código do lote

pcCodEmbalagem

Char

X(10)

X

 

 

Código da embalagem

piIndStatusSaldo

Integer

>9

X

 

 

Indicador do status do saldo

ttDetalhe

Table


 

X

 

Tabela de resumo de ocupação do item


Método: 

getGeraDetalheMovimentos


Descrição

Método consiste na consulta de detalhes dos movimentos de um determinado item.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttDetalhe NO-UNDO
                        FIELD c-movto           AS CHARACTER LABEL "Movimento" FORMAT "X(13)"
                        FIELD id-docto          LIKE wm-docto.id-docto
                        FIELD num-docto      LIKE wm-docto.num-docto
                        FIELD num-seq-item LIKE wm-box-saldo.num-seq-item
                        FIELD dt-transacao    AS DATE LABEL "Dt Implanta╗Æo" FORMAT "99/99/9999"
                        FIELD qtd-item          LIKE wm-docto-itens.qtd-item
                        FIELD atualizado       AS LOGICAL FORMAT "Sim/NÆo" LABEL "Atualizado"
                        FIELD origem-docto AS CHARACTER LABEL "Origem Docto" FORMAT "x(25)"
                        FIELD cod-usuario    LIKE wm-tarefa-docto-itens.cod-usuario.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código da referência

pcCodLote

Char

X(10)

X

 

 

Código do lote

pdtDtTransacaoDate99/99/9999X

Data de transação

pcCodEmbalagem

Char

X(10)

X

 

 

Código da embalagem

pdeQtdOriginalDecimal>>>,>>>,>>9.9999X

Quantidade original do item
pdeQtdItemDecimal>>>,>>>,>>9.9999X

Quantidade do item
pdeQtdItemBloqDecimal>>>,>>>,>>9.9999X

Quantidade Item bloqueada

piIndStatusSaldo

Integer

>9

X

 

 

Indicador do status do saldo

ttDetalhe

Table


 

X

 

Tabela de detalhe do item


Método: 

getGeraDetalheSaida


Descrição

Método Responsavel por Criar Registro dos Documentos Pendentes de Saida.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttDetalhe NO-UNDO
                        FIELD c-movto           AS CHARACTER LABEL "Movimento" FORMAT "X(13)"
                        FIELD id-docto          LIKE wm-docto.id-docto
                        FIELD num-docto      LIKE wm-docto.num-docto
                        FIELD num-seq-item LIKE wm-box-saldo.num-seq-item
                        FIELD dt-transacao    AS DATE LABEL "Dt Implanta╗Æo" FORMAT "99/99/9999"
                        FIELD qtd-item          LIKE wm-docto-itens.qtd-item
                        FIELD atualizado       AS LOGICAL FORMAT "Sim/NÆo" LABEL "Atualizado"
                        FIELD origem-docto AS CHARACTER LABEL "Origem Docto" FORMAT "x(25)"
                        FIELD cod-usuario    LIKE wm-tarefa-docto-itens.cod-usuario.



Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código da referência

pcCodLote

Char

X(10)

X

 

 

Código do lote

pcCodEmbalagem

Char

X(10)

X

 

 

Código da embalagem

piIndStatusSaldo

Integer

>9

X

 

 

Indicador do status do saldo

ttDetalhe

Table




Tabela de detalhe do item


Método: 

getGeraDetalheSaldoEndereco


Descrição

Método responsável em detalhar o saldo do endereço.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttDetalhe1 NO-UNDO LIKE wm-box-saldo
                        FIELD num-docto LIKE wm-docto.num-docto.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodClienteInteger >>>>>>>>9X

Código do cliente

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código da referência

pcCodLote

Char

X(10)

X

 

 

Código do lote

ttDetalhe1

Table




 X

Tabela de detalhe do item


Método: 

getMovtoBox


Descrição

Método responsável em listar os registros dos movimentos do box.


Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoMovto NO-UNDO
                        FIELD cod-estabel           LIKE wm-docto-itens.cod-estabel
                        FIELD cod-local               LIKE wm-docto-itens.cod-local
                        FIELD id-docto                LIKE wm-docto-itens.id-docto
                        FIELD num-seq-item       LIKE wm-docto-itens.num-seq-item
                        FIELD cod-item               LIKE wm-docto-itens.cod-item
                        FIELD cod-refer               LIKE wm-docto-itens.cod-refer
                        FIELD cod-lote                LIKE wm-docto-itens.cod-lote
                        FIELD dt-validade-lote    LIKE wm-docto-itens.dt-validade-lote
                        FIELD id-movto               LIKE wm-box-movto.id-movto
                        FIELD ind-tipo-movto     LIKE wm-box-movto.ind-tipo-movto
                        FIELD ind-status-movto  LIKE wm-box-movto.ind-status-movto
                        FIELD cod-embalagem    LIKE wm-box-movto.cod-embalagem
                        FIELD qtd-item                LIKE wm-box-movto.qtd-item
                        FIELD qti-embalagem     LIKE wm-box-movto.qti-embalagem
                        FIELD cod-cliente            LIKE wm-docto-itens.cod-cliente
                        FIELD RowNum               AS INTEGER
                        FIELD r-RowId                 AS ROWID
                        INDEX w-res01 IS UNIQUE cod-estabel
                                                                   cod-local
                                                                   id-docto
                                                                   num-seq-item
                                                                   id-movto
                                                                   ind-tipo-movto.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

ttResumoMovto

Table


 

X

 

Resumo dos movimentos


Método: 

getOcupacaoBoxConsulta


Descrição

Método responsável em listar os saldo dos box.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoConsulta NO-UNDO
                        FIELD cod-estabel                  LIKE wm-box-saldo.cod-estabel
                        FIELD cod-local                      LIKE wm-box-saldo.cod-local
                        FIELD cod-item                      LIKE wm-box-saldo.cod-item
                        FIELD cod-refer                      LIKE wm-box-saldo.cod-refer
                        FIELD cod-lote                       LIKE wm-box-saldo.cod-lote
                        FIELD dt-validade-lote           LIKE wm-saldo-estoque.dt-validade-lote
                        FIELD ind-status-box             LIKE wm-box-saldo.ind-status-box
                        FIELD ind-status-saldo          LIKE wm-box-saldo.ind-status-saldo
                        FIELD cod-embalagem          LIKE wm-box-saldo.cod-embalagem
                        FIELD qtd-item                      LIKE wm-box-saldo.qtd-item
                        FIELD qtd-item-liberado       LIKE wm-box-saldo.qtd-item
                        FIELD qtd-item-alocad          LIKE wm-box-saldo.qtd-item
                        FIELD qti-embalagem           LIKE wm-box-movto.qti-embalagem
                        FIELD cod-cliente                  LIKE wm-box-saldo.cod-cliente
                        &IF '{&bf_lote_avancado_liberado}' = 'yes' &THEN
                            FIELD log-bloq-movto-cq LIKE wm-box-saldo.log-bloq-movto-cq
                            FIELD desc-lote-estado     AS CHARACTER FORMAT "x(20)"
                        &ENDIF
                        FIELD RowNum                      AS INTEGER
                        FIELD r-RowId                        AS ROWID
                        INDEX w-res01 IS UNIQUE cod-item
                                                                   cod-refer
                                                                   cod-lote
                                                                   cod-embalagem
                                                                   ind-status-saldo
                                                                   cod-cliente.


Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pdeIdBox

Decimal

>>>>>>>>>9

X

 

 

Identificador único do box

ttResumoConsulta

Table


 

X

 

Resumo dos saldos nos box


Método: 

getOcupItem

 

Descrição

Método consiste na consulta da ocupação de um determinado item que está em Análise.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoOcupItem NO-UNDO
                        FIELD dt-transacao        LIKE wm-box-saldo.dt-transacao
                        FIELD id-box                  LIKE wm-box-saldo.id-box
                        FIELD ind-status-box     LIKE wm-box-saldo.ind-status-box
                        FIELD ind-status-saldo  LIKE wm-box-saldo.ind-status-saldo
                        FIELD qti-embalagem    LIKE wm-box-movto.qti-embalagem
                        FIELD cod-embalagem  LIKE wm-box-saldo.cod-embalagem
                        FIELD qtd-original         LIKE wm-box-saldo.qtd-original
                        FIELD qtd-item-bloq     LIKE wm-box-saldo.qtd-item-bloq
                        FIELD qtd-item              LIKE wm-box-saldo.qtd-item
                        FIELD qtd-item-rejeitar LIKE wm-box-saldo.qtd-item LABEL "Qtd Emb Rejeitar"
                        FIELD RowNum             AS INTEGER
                        FIELD r-RowId               AS ROWID
                        INDEX w-res01 IS UNIQUE dt-transacao
                                                                    id-box
                                                                    cod-embalagem
                                                                    qtd-item-bloq
                                                                    qtd-original
                                                                    qtd-item.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código do refer

pcCodLote

Char

X(10)

X

 

 

Código do lote

ttResumoOcupItem

Table


 

X

 

Tabela de resumo de ocupação do item


Método: 

getSaldoResEnd

 

Descrição

Método consiste na consulta do resumo dos endereços, listando as quantidades atual, liberada, destinada, comprometida, bloqueada e em análise.

 

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE ttResumoEnd NO-UNDO
                        FIELD cod-estabel                       LIKE wm-box-saldo.cod-estabel
                        FIELD cod-local                           LIKE wm-box-saldo.cod-local
                        FIELD cod-item                           LIKE wm-box-saldo.cod-item
                        FIELD cod-refer                           LIKE wm-box-saldo.cod-refer
                        FIELD cod-lote                            LIKE wm-box-saldo.cod-lote
                        FIELD cod-bloco                         LIKE wm-box.cod-bloco
                        FIELD cod-rua                             LIKE wm-box.cod-rua
                        FIELD cod-nivel                           LIKE wm-box.cod-nivel
                        FIELD cod-coluna                        LIKE wm-box.cod-coluna
                        FIELD ind-posicao-box                AS CHAR
                        FIELD id-box                                LIKE wm-box-saldo.id-box
                        FIELD qtd-atual                           LIKE wm-box-saldo.qtd-item
                        FIELD qtd-liberada                      LIKE wm-box-saldo.qtd-item
                        FIELD qtd-destinada                   LIKE wm-box-saldo.qtd-item
                        FIELD qtd-comprometida           LIKE wm-box-saldo.qtd-item
                        FIELD qtd-bloqueada                  LIKE wm-box-saldo.qtd-item
                        FIELD qtd-analise                        LIKE wm-box-saldo.qtd-item
                        FIELD log-bloq-retir                    LIKE wm-box.log-bloq-retir
                        FIELD log-bloq-armaz                 LIKE wm-box.log-bloq-armaz
                        FIELD ind-status-saldo                LIKE wm-box-saldo.ind-status-saldo
                        FIELD qtd-capacidade-peso        LIKE wm-box.qtd-capacidade-peso
                        FIELD qtd-capacidade-peso-util LIKE wm-box.qtd-capacidade-peso-util
                        FIELD qtd-capacidade-ua           LIKE wm-box.qtd-capacidade-ua
                        FIELD qtd-capacidade-ua-util     LIKE wm-box.qtd-capacidade-ua-util
                        FIELD RowNum                           AS INTEGER
                        FIELD r-RowId                             AS ROWID
                        INDEX w-res01 IS UNIQUE cod-estabel
                                                                   cod-local
                                                                   cod-item
                                                                   cod-refer
                                                                   cod-lote
                                                                   id-box.

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodClienteInteger >>>>>>>>9X

Código do cliente

ttResumoEnd

Table


 

X

 

Tabela de resumo do endereço

pqtd-atualDecimal>>>,>>>,>>9.9999
X
Quantidade atual do item
pqtd-destinadaDecimal>>>,>>>,>>9.9999
X
Quantidade destinada do item
pTot-aloc-pickingDecimal>>>,>>>,>>9.9999
X
Quantidade total alocada em picking
pqtd-liberadaDecimal>>>,>>>,>>9.9999
X
Quantidade liberada do item
pqtd-comprometidaDecimal>>>,>>>,>>9.9999
X
Quantidade comprometida do item
pqtd-analiseDecimal>>>,>>>,>>9.9999
X
Quantidade em analise do item


Método: 

getValVolume


Descrição

Método consiste em retornar o volume da embalagem do item.


Requisitos:

Nenhum

 

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodEmbalagemCharX(10)X

Código da embalagem
de-val-volumeDecimal>>>,>>>,>>9.9999
X
Volume da embalagem do item


Método: 

LocalizaMovtoCQ

Descrição

Método consiste em retornar o registro da tabela wm-box-saldo cujo status seja CQ Destinado ou CQ Armazenado.


Requisitos:

Nenhum

 

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pid-movto

Decimal

>>>>>>>>>9

X

 

 

Código do item

p-rw-saldoRowid

X
rowid do registro


Método: 

ReturnSumQtdLiberada

 

Descrição

Método consiste em retornar o total da quantidade liberada do Item


Requisitos:

Nenhum

 

Parâmetros:

Parâmetro

Tipo

Formato

I

O

IO

Descrição

pcCodEstabel

Char

X(3)

X

 

 

Código do estabelecimento

pcCodLocal

Char

X(3)

X

 

 

Código do local

pcCodClienteInteger >>>>>>>>9X

Código do cliente

pcCodItem

Char

X(16)

X

 

 

Código do item

pcCodRefer

Char

X(8)

X

 

 

Código do refer

pcCodLote

Char

X(10)

X

 

 

Código do lote

pqtd-liberada

Decimal

>>>,>>>,>>9.9999

 

X

 

Quantidade liberada do item