Sintoma

Programa específico necessita acessar os dados do Fabricante da tabela interna itab_zycet119

utilizada no programa da RE.

Solução

Declaração no include de compartilhamento do objeto itab_zycet119.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 05080 Data: 25/10/2007 Hora: 15:53:30

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 05080

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00003

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

----------------------------------------------------------------------------------------------------

Texto Rápido:

DECLARAÇÃO EM INCLUDE DE COMPARTILHAMENTO DE OBJETO DA RE

----------------------------------------------------------------------------------------------------

Palavras Chave:

RE, TABELA, INCLUDE, COMPARTILHAMENTO, OBJETO, COMMON PART

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCE105TOP

REPS /PWS/MZYCE105X01

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCE105TOP

...

DATA: BEGIN OF itab_zycet092_aux OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet092.

DATA:   mark(1)   TYPE c.

DATA: END OF itab_zycet092_aux.

DATA: BEGIN OF itab_ncm OCCURS 10,

        ncm  LIKE /pws/zycet118-ncm,

      END OF itab_ncm.

DATA: BEGIN OF itab_zycet066_aux OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet066.

DATA: END OF itab_zycet066_aux.

* >> Início da exclusão:

DATA: BEGIN OF itab_zycet119 OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet119.

DATA: END OF itab_zycet119.

* << Fim da exclusão

DATA: BEGIN OF itab_zycet119_aux OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet119.

DATA: END OF itab_zycet119_aux.

DATA: BEGIN OF itab_fabricante OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet119.

DATA: mark(1) TYPE c.

DATA: END OF itab_fabricante.

DATA: BEGIN OF itab_obs OCCURS 10,

        nrseqre   LIKE /pws/zycet078-nrseqre,

        codnrseq  LIKE /pws/zycet078-codnrseq,

...

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCE105X01

...

        INCLUDE STRUCTURE /pws/zycet003.

DATA: END OF itab_zycet003.

DATA: BEGIN OF itab_zycet066 OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet066.

DATA: END OF itab_zycet066.

DATA: BEGIN OF itab_zycet078 OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet078.

DATA: codnrseq_ant LIKE /pws/zycet078-codnrseq,

      retif        TYPE c.

DATA: END OF itab_zycet078.

* >> Início da inclusão:

DATA: BEGIN OF itab_zycet119 OCCURS 10.

        INCLUDE STRUCTURE /pws/zycet119.

DATA: END OF itab_zycet119.

* << Fim da inclusão

DATA: END OF COMMON PART.