CE PLUS - Nota 003054

Módulo: DOC. EXPORTAÇÃO

Funcionalidade: Dados Adicionais

Data/Hora da Publicação: 07/02/2007 00:00:00

Data/Hora Última Alteração: 22/02/2011 10:17:09

Descrição da Nota: COMPARTILHAMENTO DE OBJETOS EM INCLUDE 'X' PROGRAMA DADOS ADICIONAIS

Sintoma

Necessidade de acessar objetos do programa /PWS/SAPMZYCE038(dados adicionais) para desenvolvimento

específico.

 

 

 

Solução

Incluídos objetos no include de compartilhamento do programa /PWS/SAPMZYCE038(dados adicionais) para

possibilitar desenvolvimento adicional para cliente: /PWS/ZYCEE047 e itab_zycet047.

 

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

DECLARAÇÃO DE COMMON PART NO INCLUDE X

Informações Complementares

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

Nota Número 03054 Data: 07/02/2007 Hora: 16:40:33

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

 

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

Nota Número              : 03054

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00026

Agrupamento              : 00151

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

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

02897  - 00001 - 6.0    - 00026  - DECLARAÇÃO DE COMMON PART NO INCLUDE X

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

COMPARTILHAMENTO DE OBJETOS EM INCLUDE 'X' PROGRAMA DADOS ADICIONAIS

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

Palavras Chave:

COMPARTILHAMENTO, COMMON PART, DADOS ADICIONAIS, X,

 

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

Objetos da nota:

REPS /PWS/MZYCE038TOP

REPS /PWS/MZYCE038X01

 

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

Modificações efetuadas em REPS /PWS/MZYCE038TOP

 

...

            lines(100) TYPE c,

      END OF itab_problema.

INCLUDE /pws/mzyce038x01.

DATA: s_check .

TABLES: /pws/zycee001,

        /pws/zycet049,

        /pws/zycee049,

        /pws/zycet046,

        /pws/zycet100,

        /pws/zycet047,

* >> Início da exclusão:

        /pws/zycee047,

* << Fim da exclusão

        /pws/zycet056,

        /pws/zycee056,

        /pws/zycet054,

        /pws/zycee054,

        /pws/zycet151,

        /pws/zycee151,

        /pws/zycet225,

        /pws/zycee225,

        /pws/zycet069,

        /pws/zycet135,

...

 

...

  ts_adic      TYPE TABSTRIP,

  tc_bl        TYPE TABLEVIEW USING SCREEN 0105,

  tc_rv        TYPE TABLEVIEW USING SCREEN 0101,

  tc_normas    TYPE TABLEVIEW USING SCREEN 0107,

  tc_pt        TYPE TABLEVIEW USING SCREEN 0109,

  tc_op        TYPE TABLEVIEW USING SCREEN 0112.

DATA: BEGIN OF itab_zycet049 OCCURS 0.

INCLUDE STRUCTURE /pws/zycet049.

DATA: mark,

END OF itab_zycet049.

* >> Início da exclusão:

DATA: BEGIN OF itab_zycet047 OCCURS 0.

       INCLUDE STRUCTURE /pws/zycet047.

       DATA: mark,

      END OF itab_zycet047.

* << Fim da exclusão

DATA: BEGIN OF itab_zycet047_aux OCCURS 0.

        INCLUDE STRUCTURE /pws/zycet047.

DATA: END OF itab_zycet047_aux.

DATA: BEGIN OF itab_zycet056 OCCURS 0.

INCLUDE STRUCTURE /pws/zycet056.

DATA: mark,

END OF itab_zycet056.

DATA: BEGIN OF itab_zycet225 OCCURS 0.

INCLUDE STRUCTURE /pws/zycet225.

DATA: mark,

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCE038X01

 

TABLES: /pws/zycee046,

* >> Início da exclusão:

        /pws/zycee100.

* << Fim da exclusão

* >> Início da inclusão:

        /pws/zycee100,

        /pws/zycee047.

* << Fim da inclusão

DATA: BEGIN OF COMMON PART c.

DATA: BEGIN OF itab_zycet002_102 OCCURS 20 .

        INCLUDE STRUCTURE /pws/zycet002.

DATA:   mark(1).

DATA:   icoblo  TYPE icons-text.

DATA:   icotp   TYPE icons-text.

DATA:   icoapr  TYPE icons-text.

DATA: END OF itab_zycet002_102.

DATA: BEGIN OF itab_zycet108 OCCURS 0.

        INCLUDE STRUCTURE /pws/zycet108.

DATA: mark.

DATA: END OF itab_zycet108.

* >> Início da inclusão:

DATA: BEGIN OF itab_zycet047 OCCURS 0.

       INCLUDE STRUCTURE /pws/zycet047.

       DATA: mark,

      END OF itab_zycet047.

* << Fim da inclusão

DATA: BEGIN OF wa_tabstrip,

      bt001,

      bt002,

      bt003,

      bt004,

      bt005,

      bt006,

      bt007,

      bt008,

      bt009,

...