Счётчик инстанций

AL13SH

Приветствую!
идея вот в чём: хочу организовать работу с разными инстанциями класса дифференцированно т.е. для каждой инстанции разные параметры и разные наборы методов
подскажите пример какой - нибудь?

Parazit

AL13SH написал(а):

Приветствую!
идея вот в чём: хочу организовать работу с разными инстанциями класса дифференцированно т.е. для каждой инстанции разные параметры и разные наборы методов
подскажите пример какой - нибудь?

Тогда это уже разные классы!
Вообще-то ничего непонятно, в чём задача, что нужно разработать?

LAT

AL13SH написал(а):

хочу организовать работу с разными инстанциями класса дифференцированно т.е. для каждой инстанции разные параметры и разные наборы методов
подскажите пример какой - нибудь?

Вопрос сформулирован как-то странно и, подозреваю, некорректно. Вы хотите: 1) чтобы какая-то часть атрибутов и методов для разных инстанций совпадала, а какая-то - нет? Или: 2) чтобы одни и те же методы могли вызываться с разными наборами параметров? Или: 3) сделать javascript-подобное наследование? 4) Или именно то, что написали?
ЗЫ. Кстати, название темы "Счётчик истанций" лично у меня как-то совершенно не вяжется с вопросом.

AL13SH

Задачу уже практически решил.

что именно непонятно в постановке?

есть класс наследник от глобального класса. инстанция этого класса обладает неким набором параметров, которые я хочу выставлять дифференцировано в зависимости от конкретных нужд. Но! сколько именно инстанций будет я не знаю. Поэтому не могу прописать

Code:

PUBLIC SECTION.
DATA:
mo_1 TYPE REF ..
mo_2 TYPE REF....

и т.д.

Количество инстанций зависит от конкретных практических задач, выполняемых этим ПО.

Вопрос: как динамически вести количество инстанций?

На данный момент решаю так:
- создал таблицу со структурой: counter/объект типизированный как целевой класс\
- определил статический метод create в котором создаю объект с требуемыми атрибутами и кладу его в таблицу(предварительно считав количество объектов в ней и выставив соответствующий counter)
- когда требуется обратиться к этому объекту то считываю его из таблицы по counter

Areal

Посмотрите классы CL_OBJECT_MAP и CL_OBJECT_COLLECTION, возможно то что нужно.

Paul_80

Просто не совсем понятна была терминология.

Согласитесь, "разный набор методов" и "разные значения параметров" - это немного различающиеся понятия.

Для создания нескольких инстанций одного класса можно вызывать конструктор этого класса,
для создания набора инстанций разных классов, но иерархически приводимых к одному классу-родителю, как правило, используется фабрика классов. Хранение набора инстанций - таблица, массив, список и т.п., вариантов масса. Но следует учитывать, что элементы массива инстанций классов должны быть одного типа.

Вот, очень полезная статья о шаблонах проектирования.

Besa

AL13SH, не забудьте что Ваш код придется кому то сопровождать

сорри за оффтоп.

AL13SH

Решил так: используем переменные для передачи параметров конструктора VIewer, создаём несколько инстанций
его класса(каждому подэкрану по инстанции) кладём их в табличку, при необходимрсти считываем отуда по Counter
основной экран

Code:

PROCESS BEFORE OUTPUT.
  MODULE status_0111.

  CALL SUBSCREEN sub_maindata
       INCLUDING sy-repid '0112'.

  CALL SUBSCREEN sub_history
       INCLUDING sy-repid '0113'.

  CALL SUBSCREEN sub_chat
       INCLUDING sy-repid '0114'.
*
PROCESS AFTER INPUT.

  CALL SUBSCREEN sub_maindata.
  CALL SUBSCREEN sub_history.
  CALL SUBSCREEN sub_chat.

  MODULE user_command_0111.

ПБОха 112 подэкрана

Code:

MODULE status_0112 OUTPUT.

  go_application->fill_doc( ).
  go_application->fill_req( ).

  go_application->set_comment( ).
  LOOP AT SCREEN.
    CASE <gs_signdoc>-signreq_type.
      WHEN   '01'.
        CASE screen-group2.
          WHEN '001'.
            screen-active = 0.
            MODIFY SCREEN.
          WHEN OTHERS.
        ENDCASE.

      WHEN '02' OR '03' OR '04' OR '09' OR '99'.

      WHEN OTHERS.
        CASE screen-group1.
          WHEN '001'.
            screen-active = 0.
            MODIFY SCREEN.
          WHEN OTHERS.
        ENDCASE.
    ENDCASE.
  ENDLOOP.

  CLEAR wa_viewer.
  CASE <gs_signdoc>-signreq_type.
    WHEN   '01'.
      lcl_viewer=>mv_viewer_cont = '1'.
      gv_ddstruct = 'ZHR_S_SIGNDOC_RQ'.
      gv_way = 'GO_APPLICATION->MT_REQ'.
      lcl_viewer=>create(
        EXPORTING
          iv_dynpro1 = '0111'
          iv_cont1  = 'INFO_SIGNDOC' ).

      READ TABLE lcl_viewer=>mt_inst_counter INTO lcl_viewer=>ms_inst_counter
        WITH TABLE KEY count = lcl_viewer=>mv_viewer_cont.
      wa_viewer = lcl_viewer=>ms_inst_counter-object.

      wa_viewer->setup_alv( i_has_top = abap_false ).

    WHEN '04' OR '05' OR '06' OR '07' OR '08'.
      lcl_viewer=>mv_viewer_cont = '1'.
      gv_ddstruct = 'ZHR_S_SIGNDOC_PR'.
      gv_way = 'GO_APPLICATION->MT_PROJ'.
      lcl_viewer=>create(
        EXPORTING
          iv_dynpro1 = '0111'
          iv_cont1  = 'INFO_SIGNDOC' ).

      READ TABLE lcl_viewer=>mt_inst_counter INTO lcl_viewer=>ms_inst_counter
        WITH TABLE KEY count = lcl_viewer=>mv_viewer_cont.
      wa_viewer = lcl_viewer=>ms_inst_counter-object.

      wa_viewer->setup_alv( i_has_top = abap_false ).

    WHEN OTHERS.
  ENDCASE.
ENDMODULE. 

ПБОха 113

Code:

MODULE STATUS_0113 OUTPUT.

*  SET PF-STATUS 'xxxxxxxx'.
*  SET TITLEBAR 'xxx'.
" Создаем окно с историей изменений зароса
    IF go_application->mo_history IS NOT BOUND.
      CREATE OBJECT go_application->mo_history.
    ENDIF.
    go_application->mo_history->set_history_list( ).

CLEAR wa_viewer.

    lcl_viewer=>mv_viewer_cont = '2'.
    gv_ddstruct = 'ZHR_T_HS_SIGNDOC'.
    gv_way = 'GO_APPLICATION->MO_HISTORY->MT_OUTTAB'.
    lcl_viewer=>create(
      EXPORTING
        iv_dynpro1 = '0111'
        iv_cont1  = 'HISTORY_CONT' ).

    READ TABLE lcl_viewer=>mt_inst_counter INTO lcl_viewer=>ms_inst_counter
      WITH TABLE KEY count = lcl_viewer=>mv_viewer_cont.
    wa_viewer = lcl_viewer=>ms_inst_counter-object.

    wa_viewer->setup_alv( i_has_top = abap_false ).
ENDMODULE.                 " STATUS_0113  OUTPUT

волшебный метод

Code:

 METHOD create.
    DATA:
          lo_viewer TYPE REF TO lcl_viewer.

    CREATE OBJECT lo_viewer
      EXPORTING
        iv_dynpro = iv_dynpro1
        iv_cont   = iv_cont1.

    lcl_viewer=>ms_inst_counter-count = mv_viewer_cont.
    lcl_viewer=>ms_inst_counter-object = lo_viewer.
    APPEND lcl_viewer=>ms_inst_counter TO lcl_viewer=>mt_inst_counter.


  ENDMETHOD.                    "create

Правила форума

Счётчик инстанций

Кто сейчас на конференции