Histórico da Página

...

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

...

DEF TEMP-TABLE ttResumoMovto NO-UNDO
         FIELD cod-estabel       LIKE   LIKE wm-docto-itens.cod-estabel
         FIELD cod-local           LIKE   LIKE wm-docto-itens.cod-local
         FIELD id-docto             LIKE   LIKE wm-docto-itens.id-docto
         FIELD num-seq-item    LIKE  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

...

DEF TEMP-TABLE ttResumoMovto NO-UNDO
         FIELD cod-estabel       LIKE   LIKE wm-docto-itens.cod-estabel
         FIELD cod-local           LIKE   LIKE wm-docto-itens.cod-local
         FIELD id-docto             LIKE   LIKE wm-docto-itens.id-docto
         FIELD num-seq-item    LIKE  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 embalagem  LIKE wm-box-movto.cod-embalagem
         FIELD qtd-item              LIKE  LIKE wm-box-movto.qtd-item
         FIELD qti-embalagem   LIKE   LIKE wm-box-movto.qti-embalagem
         FIELD cod-cliente         LIKE   LIKE wm-docto-itens.cod-cliente
         FIELD RowNum             AS AS INTEGER
         FIELD r-RowId               AS AS ROWID
         INDEX w-res01 IS UNIQUE

...

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

...