Documento de BO

Objetivo

Faz a manutenção na tabela WM-ETIQUETA

Métodos

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:

OpenQueryAgrupador

Descrição:

Busca os registro das etiquetas associadas a um agrupador.

Constraints Associados:

SetConstraintBox

Método:

SetConstraintAgrupador

Descrição:

Solicita informações para seleção das etiquetas associadas ao agrupador.

Parâmetros:

Método:

OpenQueryAgrupadores

Descrição:

Busca os registro das etiquetas agrupadoras e agrupadoras própria.

Método:

OpenQueryCarga

Descrição:

Busca os registro das etiquetas pela carga.

Constraints Associados:

SetConstraintCarga

Método:

SetConstraintAgrupador

Descrição:

Solicita informações para seleção das etiquetas associadas a carga.

Parâmetros:

Método:

OpenQueryOP

Descrição:

Busca os registro das etiquetas pele estabelecimento da ordem e pelo numero da ordem de produção .

Constraints Associados:

SetConstraintOP

Método:

SetConstraintOP

Descrição:

Solicita informações para seleção das etiquetas associadas ao estabelecimento e ordem de produção.

Parâmetros:

Método:

associaAgrupCarga

Descrição:

O método consiste em associar um agrupador a uma carga. Só será possível a associação de uma etiqueta agrupadora, que já tenha sido reportada e que não esteja associada a nenhuma outra carga. Todas as etiquetas não-agrupadoras pertencentes à etiqueta agrupadora serão atualizadas com o usuário e o id-carga.

Parâmetros:

Método:

associaNovaCarga

Descrição:

O método consiste em associar um agrupador a uma nova  carga. Só será possível a associação de uma etiqueta agrupadora, que já tenha sido reportada. Todas as etiquetas não-agrupadoras pertencentes à etiqueta agrupadora serão atualizadas com o usuário e o id-carga.

Parâmetros:

Método:

associaNovaCarga

Descrição:

O método consiste em associar um agrupador a uma nova  carga. Só será possível a associação de uma etiqueta agrupadora, que já tenha sido reportada. Todas as etiquetas não-agrupadoras pertencentes à etiqueta agrupadora serão atualizadas com o usuário e o id-carga.

Parâmetros:

Método:

atualizaQtdEtiqueta

Descrição:

O método atualiza as quantidades que estão sendo retiradas no momento do picking.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerialQtd NO-UNDO
            FIELD id-etiqueta LIKE wm-etiqueta.id-etiqueta
            FIELD qtd-item-retirado LIKE wm-etiqueta.qtd-item-retirado.

Parâmetros:

Método:

desassociaAgrupCarga

Descrição:

O método consiste em desassociar um agrupador de uma carga. Só será possível a desassociação de uma etiqueta, caso a carga não tenha sido enviada pelo MP e não esteja a carga vinculada à um documento (NF).
Todas as etiquetas não-agrupadoras pertencentes à etiqueta agrupadora serão atualizadas com o usuário e o id-carga = 0.

Parâmetros:

Método:

desassociaEtiquetas

Descrição:

DESPALETIZAÇÃO (desmonta todo o pallet).

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE RowErrors NO-UNDO
        FIELD ErrorSequence      AS INTEGER
        FIELD ErrorNumber        AS INTEGER
        FIELD ErrorDescription    AS CHARACTER
        FIELD ErrorParameters   AS CHARACTER
        FIELD ErrorType            AS CHARACTER
        FIELD ErrorHelp            AS CHARACTER
        FIELD ErrorSubType      AS CHARACTER
    index seq ErrorSequence.

Parâmetros:

Método:

desassociaEtiquetasAgrup

Descrição:

Retira uma etiqueta não agrupa do pallet (despaletiza unitário).

Requisitos:

Definição de temp-table:

DEFINE TEMP-TABLE RowErrors NO-UNDO
        FIELD ErrorSequence      AS INTEGER
        FIELD ErrorNumber        AS INTEGER
        FIELD ErrorDescription    AS CHARACTER
        FIELD ErrorParameters   AS CHARACTER
        FIELD ErrorType            AS CHARACTER
        FIELD ErrorHelp            AS CHARACTER
        FIELD ErrorSubType      AS CHARACTER
    index seq ErrorSequence.

Parâmetros:

Método:

devolveQtdEtiqueta

Descrição:

O método devolve as quantidades que foram retiradas no momento do picking.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerialQtd NO-UNDO
            FIELD id-etiqueta LIKE wm-etiqueta.id-etiqueta
            FIELD qtd-item-retirado LIKE wm-etiqueta.qtd-item-retirado.

Parâmetros:

Método:

estornaEtiquetas

Descrição:

Se a etiqueta for de pallet, estorna ela da carga, se a etiqueta for de item, estorna ela do pallet.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerial NO-UNDO
       FIELD de-serial AS DECIMAL.

Parâmetros:

Método:

etiquetasAptasEstorno

Descrição:

O método consiste em retornar as etiquetas agrupadoras de itens que já foram lidos para estorno.

Este método será utilizado no momento em que se fizer estono de reporte de produção, onde será informada a quantidade a ser estornada. É informada a ordem de produção e o seu estabelecimento, e o método retorna todas as etiquetas agrupadoras aptas para estorno, com as suas respectivas quantidades. Os dados poderão ser tratados e apresentados da maneira que melhor atender às necessidades específicas.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

etiquetasAptasReporte

Descrição:

  O método consiste em retornar as etiquetas agrupadoras de itens que ainda não   foram reportadas. Este método será utilizado no momento de reporte de produção,   onde será informada a quantidade produzida até o momento. É informada a ordem   de produção e o seu estabelecimento, e o método retorna todas as etiquetas   agrupadoras, com as suas respectivas quantidades. Os dados poderão ser tratados   e apresentados da maneira que melhor atender às necessidades específicas.

  Obs.: Não há necessidade de retornarem todas as etiquetas dos itens porque a   etiqueta agrupadora tem todas as informações sobre o que está agrupando,   inclusive peso e quantidade total.

  Considerações: A ocorrência do atributo "ind-sit-estorno = 3" nas etiquetas   que retornarem na TT, indica que a mesma já esteve em outra situação reportada   à produção, e que, por algum motivo, foi estornada.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

etiquetasEstornadasRep

Descrição:

Após obter as informações sobre as etiquetas que podem serem estornadas do reporte de produção (pelo método etiquetasAptasEstorno) e efetuado o estorno, este método deve ser executado, retornando ao WMS quais das etiquetas foram   efetivamente estornadas, para que elas sejam atualizadas de forma a não   constarem em estorno de reporte futuro.  Essas etiquetas têm seu status   retornado para "não reportado".

 Obs.: Todas as etiquetas que pertencerem ao agrupador estornado, também receberão o status de estornado. 

 Importante:  As etiquetas recebidas na ttWm-etiqueta não são validadas   novamente. A utilização correta deste método é precedida pela execução   do método "etiquetasAptasEstorno", onde a integridade das etiquetas é garantida. 

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

etiquetasReportadas

Descrição:

Após obter as informações sobre as etiquetas que podem serem reportadas à produção (pelo método etiquetasAptasReporte) e efetuado o reporte,  este método deve ser executado, retornando ao WMS quais das etiquetas foram efetivamente reportadas, para que elas sejam atualizadas de forma a não constarem em reporte futuro. 

Obs.: Todas as etiquetas que pertencerem ao agrupador reportado, também receberão o status de reportadas. 

Importante:  As etiquetas recebidas na ttWm-etiqueta não são validadas novamente. 

A utilização correta deste método é precedida pela execução do método "etiquetasAptasReporte", onde a integridade das etiquetas é garantida. 

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

excluiInutilizadas

Descrição:

O método consiste em excluir da entidade todas as etiquetas que por algum motivo não foram utilizadas pelo sistema. Neste caso todas as etiquetas com ind-leitura-etiqueta = 3 (inutilizado) e todas as etiquetas não agrupadoras que não estejam vinculadas a um agrupador.

Método:

formacaoAgrupador

Descrição:

O método consiste em formar o pallet ou desfazer.

O parâmetro i-opção pode receber os seguintes valores: 1 - A etiqueta é associada ao agrupador,

2 - A etiqueta é desassociada do agrupar e 3 - Todas as etiquetas são desassociadas do agrupador.

Parâmetros:

Método:

geraAgrupEtiquetaLida

Descrição:

Gera etiqueta agrupadora de itens (itens com o status de lido). o método receberá uma Temp-Table com os seriais dos itens que serão agrupados por essa etiqueta agrupadora.
O atributo "id-agrupador" das etiquetas dos itens receberá o "id-etiqueta" da etiqueta agrupadora.

O método gera uma etiqueta de agrupador (ind-sit-agrupador = 2
/* AGRUPA ETIQUETAS */), e atualiza o id-agrupador das etiquetas passadas na TT.
A etiqueta é gerada com o status de lida (ind-leitura-etiqueta = 2 /* LIDA */), o que caracteriza o fechamento do pallet.
Os atributos de quantidade (item e peso) das etiquetas que serão agrupadas serão somados e o total gravado no registro da etiqueta agrupadora.
Os demais dados da etiqueta serão gerados com base em uma etiqueta de item pertencente ao agrupador gerado.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerial NO-UNDO
       FIELD de-serial AS DECIMAL.

Parâmetros:

Método:

geraEtiquetaAgrupador

Descrição:

Gera etiqueta agrupadora.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerial NO-UNDO
       FIELD de-serial AS DECIMAL.

Parâmetros:

Método:

geraEtiquetaItemUnico

Descrição:

Gera etiquetas de item que ocupa 100% do agrupador.
É gerada uma etiqueta que identifica o item e o agrupador ao mesmo tempo.

O método gera uma etiqueta de item/agrupador (ind-sit-agrupador = 3
/* AGRUPADOR PRÓPRIO*/), com id-agrupador igual ao id-etiqueta gerado.
Consiste os dados passados na ttWm-etiqueta, porque trata-se de um item normal, com a diferença que o agrupador é o próprio item.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

geraEtiquetaItemUnicoNaoLido

Descrição:

Gera etiquetas de item que ocupa 100% do agrupador (mantas, no caso Vipal).
É gerada uma etiqueta que identifica o item e o agrupador ao mesmo tempo.

O método gera uma etiqueta de item/agrupador (ind-sit-agrupador = 3
/* AGRUPADOR PRÓPRIO*/), com id-agrupador igual ao id-etiqueta gerado.
Consiste os dados passados na ttWm-etiqueta, porque trata-se de um item normal, com a diferença que o agrupador é o próprio item.

Este método foi gerado a partir do geraEtiquetaItemUnico, um vez que houve uma necessidade específica e não era interessante uma alteração nas transações já existentes do coletor. Gera a etiqueta "NÃO LIDA".

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

geraEtiquetas

Descrição:

A partir deste método é possível gerar uma ou mais etiquetas de itens.
Na ttWm-etiqueta é passado apenas 1 (um) registro contendo os dados que deverão serem utilizados no registro de etiquetas. Retorna uma temp-table contendo os seriais das etiquetas gerados. ind-sit-agrupador = 1 /* NÃO AGRUPA */

Obs.: o status "Lida" / "Não lida" é definido na ttWm-etiqueta.

ind-leitura-etiqueta = 1 - Não lido
2 - Lido
3 - Inutilizado
4 - Estornado.
ind-sit-agrupador = 1 - Não agrupa (caso de itens normais)
2 - Agrupados etiquetas (Pallets)
3 - Agrupador próprio (caso de itens que ocupam 100% do pallet).

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

DEF TEMP-TABLE ttSerial NO-UNDO
       FIELD de-serial AS DECIMAL.

Parâmetros:

Método:

geraSeqEtiqueta

Descrição:

O método consiste em gerar, apartir do BO de etiquetas, um novo número serial válido no BO de parâmetros.

Parâmetros:

Método:

getCarga

Descrição:

O método consiste em buscar a carga do documento.

Parâmetros:

Método:

getConteudoCarga

Descrição:

O método consiste em apresentar todas as etiquetas (não agrupa, agrupador etiquetas, agrupador próprio) vinculadas a uma determinada carga em específico.
É necessário na apresentação dos dados ficar atento ao nível que existe entre etiquetas agrupadoras e etiquetas não agrupadoras.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

getInfoAgrupador

Descrição:

O método consiste em retornar as etiquetas associadas ao agrupador.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

getInfoAgrupadores

Descrição:

Retornar todos os agrupadores que ainda não foram associados a uma carga

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

getInfoEtiqueta

Descrição:

O método consiste em obter as informações da etiqueta, através de um número
serial informado.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttWm-Etiqueta       NO-UNDO LIKE wm-etiqueta.

Parâmetros:

Método:

getTableEmbalagem

Descrição:

Metodo Auxiliar chamado pela procedure 'returnImpressaoEtiqueta'.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE tt-embalagem NO-UNDO
        FIELD CodItem AS CHARACTER FORMAT "X(16)":U
        FIELD CodRefer AS CHARACTER FORMAT "X(8)":U
        FIELD CodLote AS CHARACTER FORMAT "X(40)":U
        FIELD DtValidadeLote AS DATE
        FIELD NumSeqItem AS INTEGER
        FIELD CodEmbalagem AS CHARACTER FORMAT "X(010)":U
        FIELD cod-emb-pai AS CHARACTER FORMAT "X(010)":U
        FIELD logPai AS LOGICAL
        FIELD ControlaEtiqueta AS LOGICAL
        FIELD QtdItemEmbalagem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD QtdEmbalagem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD QtdItem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD CodLayoutItem AS INTEGER FORMAT "9999":U
        FIELD CodLayoutEmbalagem AS INTEGER FORMAT "9999":U
        FIELD CodBarrasItem AS CHARACTER FORMAT "X(100)":U
        FIELD CodBarrasEmbalagem AS CHARACTER FORMAT "X(100)":U

         FIELD id-movto AS DECIMAL  FORMAT ">>>>>>>>>9":U .

Parâmetros:

Método:

inutilizaEtiquetas

Descrição:

Quando for uma etiqueta de item, seja ele único por pallet ou que sofra agrupamento, seu status será trocado para "inutilizado".
Quando for uma etiqueta de agrupador, esta será inutilizada e os seriais que ela agrupava serão retornados, com o status de lido e o id-agrupador igual a zero.
O método consiste em informar um serial para ser inutilizado pelo sistema.
No caso de etiqueta que sofre agrupamento, somente é permitida sua inutilização caso não esteja vinculada a um agrupador.
No caso de etiqueta agrupadora, somente será permitida sua inutilização caso ela não esteja vinculada a uma carga. Se não estiver, todas as etiquetas que estavam agrupadas a ela terão o atributo "id-agrupador = 0" e seus seriais alimentados na temp-table passada por parâmetro.
Finalmente, se for uma etiqueta de agrupador único, somente será inutilizada se não estiver vinculada a nenhuma carga.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE ttSerial NO-UNDO
       FIELD de-serial AS DECIMAL.

Parâmetros:

Método:

leEtiquetas

Descrição:

Este método consiste na troca de status de leitura da etiqueta e na atualização da data de leitura. Consiste se a etiqueta é uma etiqueta de item, se já não pertence a um agrupador, se já não está lida.

Parâmetros:

Método:

leEtiquetasAgrupadorProprio

Descrição:

Este método consiste na troca de status de leitura da etiqueta e na atualização da data de leitura. Consiste se a etiqueta é uma etiqueta de item, se já não pertence a um agrupador, se já não está lida.

Parâmetros:

Método:

leEtiquetasAgrupadorProprio

Descrição:

Este método consiste na troca de status de leitura da etiqueta e na atualização da data de leitura. Consiste se a etiqueta é uma etiqueta de item, se já não pertence a um agrupador, se já não está lida.

Parâmetros:

Método:

returnImpressaoEtiqueta

Descrição:

Retorna tt-embalagem que sera utilizada pelo Data Collection.

Requisitos:

Definição de temp-table:

DEF TEMP-TABLE tt-embalagem NO-UNDO
        FIELD CodItem AS CHARACTER FORMAT "X(16)":U
        FIELD CodRefer AS CHARACTER FORMAT "X(8)":U
        FIELD CodLote AS CHARACTER FORMAT "X(40)":U
        FIELD DtValidadeLote AS DATE 
        FIELD NumSeqItem AS INTEGER 
        FIELD CodEmbalagem AS CHARACTER FORMAT "X(010)":U
        FIELD cod-emb-pai AS CHARACTER FORMAT "X(010)":U
        FIELD logPai AS LOGICAL
        FIELD ControlaEtiqueta AS LOGICAL
        FIELD QtdItemEmbalagem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD QtdEmbalagem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD QtdItem AS DECIMAL FORMAT "999,999,999,999.9999":U
        FIELD CodLayoutItem AS INTEGER FORMAT "9999":U
        FIELD CodLayoutEmbalagem AS INTEGER FORMAT "9999":U
        FIELD CodBarrasItem AS CHARACTER FORMAT "X(100)":U
        FIELD CodBarrasEmbalagem AS CHARACTER FORMAT "X(100)":U.

 DEFINE TEMP-TABLE RowErrors NO-UNDO
        FIELD ErrorSequence      AS INTEGER
        FIELD ErrorNumber        AS INTEGER
        FIELD ErrorDescription    AS CHARACTER
        FIELD ErrorParameters   AS CHARACTER
        FIELD ErrorType            AS CHARACTER
        FIELD ErrorHelp            AS CHARACTER
        FIELD ErrorSubType      AS CHARACTER
    index seq ErrorSequence.

Parâmetros:

Método:

validaAgrupCarga

Descrição:

O método consiste em validar se um determinado serial lido pode ou não ser agrupado a uma carga. Só será possível a associação de uma etiqueta que já tenha sido reportada e que não esteja associada a nenhuma outra carga.

Parâmetros:

Método:

validaEtiquetaMovto

Descrição:

O método tem por objetivo validar se um serial lido pertence a um determinado movimento do documento.

Parâmetros: