Пользовательская схема статусов для EO

Uukrul

Создаем свои схемы статусов, скажем XXX и ZZZ, после этого скажем XXX (пользовательску схему) присваиваем типу единицы оборудования ну стандартно к примеру для типа M. После этого все созданные EO с типом M получают схему XXX, а для старых можно ее прицепить через редактирование... так вот можно ли в момент создания EO, задавать какая схема должна быть для новой EO, XXX или ZZZ. Ясно что стандартно нужно было сделать другой тип EO, но исторически уже так сложилось что все EO идут одного типа и теперь провести разбивку выходит очень накладно :roll:

а подходящего экзита чего-то не могу найти...

РМщик

Можно попробовать, например IEQM0003,
но там уже через ASSIGN :wink:

Uukrul

РМщик написал(а):

Можно попробовать, например IEQM0003,
но там уже через ASSIGN :wink:

Да это расширение я видел а тогда не подскажешь в какой структуре это можно сделать, а то я что-то нифига толкового не могу найти...

РМщик

Честно говоря сам не пробовал :oops:

но я проверил - при сохранении ЕО - попадаем в этот экзит,
а там статусную схему по номеру объекта можно
измения при помощи группы функций ISMPM_STATUS
:oops:

РМщик

Заинтересовался, и все-таки добился своего

Code:

DATA: STN LIKE  TJ30-STONR,
      OBJ LIKE JSTO-OBJNR.

OBJ = DATA_EQUI-OBJNR.

CLEAR STN.


CALL FUNCTION 'STATUS_OBJECT_DELETE'
  EXPORTING
    OBJNR = OBJ.

CALL FUNCTION 'STATUS_OBJECT_UPDATE'
  EXPORTING
       OBJNR = OBJ
      X_UPDATE_DIALOG = 'X'.

CALL FUNCTION 'STATUS_OBJECT_CREATE'
  EXPORTING
    OBJNR                        = OBJ
    OBTYP                        = 'IEQ'
    STSMA                        = '00000003' "Новая схема статусов
  IMPORTING
    OBJNR                        = OBJ
    STONR                        = STN
  EXCEPTIONS
    OBTYP_INVALID                = 1
    STATUS_OBJECT_ALREADY_EXISTS = 2
    STSMA_INVALID                = 3
    STSMA_OBTYP_INVALID          = 4.

CALL FUNCTION 'STATUS_OBJECT_UPDATE'
  EXPORTING
       OBJNR = OBJ
       X_UPDATE_DIALOG = 'X'.

Uukrul

РМщик написал(а):

Заинтересовался, и все-таки добился своего

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

РМщик

Да, можно, я проверил.

Причем даже если ЕО только создается, и ей еще не присвоен объект - всё равно срабатывает

Uukrul

РМщик написал(а):

Заинтересовался, и все-таки добился своего

Code:

CALL FUNCTION 'STATUS_OBJECT_UPDATE'
  EXPORTING
       OBJNR = OBJ
      X_UPDATE_DIALOG = 'X'.

А дык версия системы у тебя какая? Потому как в 4.6C такой вот функции нет... кстати а внутри у нее текст какой?

Uukrul

Ну в общем в 4.6C вроде как вполне хватает только удаления, потом создания и все... хотя из чего стоит ФМ апдейта было бы неплохо посмотреть...

РМщик

да, у меня 4.7 :oops:

но есть и 4.6,

Code:

FUNCTION status_object_update.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"  IMPORTING
*"     VALUE(OBJNR) LIKE  JSTO-OBJNR OPTIONAL
*"     VALUE(X_UPDATE_DIALOG) TYPE  XFELD OPTIONAL
*"  TABLES
*"      T_OBJNR STRUCTURE  JSTO_PRE OPTIONAL
*"----------------------------------------------------------------------

  IF NOT objnr IS INITIAL.
    APPEND objnr TO t_objnr.
  ENDIF.

  CHECK NOT t_objnr[] IS INITIAL.

  PERFORM fill_vb_tables_selective TABLES t_objnr.
  IF NOT  obj_del[]  IS INITIAL OR
     NOT jsto_ins[]  IS INITIAL OR
     NOT jsto_updt[] IS INITIAL OR
     NOT jest_ins[]  IS INITIAL OR
     NOT jest_updt[] IS INITIAL.


    IF x_update_dialog IS INITIAL.
      CALL FUNCTION 'STATUS_UPDATE' IN UPDATE TASK
        TABLES
          obj_del  = obj_del
          jsto_ins = jsto_ins
          jsto_upd = jsto_updt
          jest_ins = jest_ins
          jest_upd = jest_updt.

    ELSE.
      CALL FUNCTION 'STATUS_UPDATE'
        TABLES
          obj_del  = obj_del
          jsto_ins = jsto_ins
          jsto_upd = jsto_updt
          jest_ins = jest_ins
          jest_upd = jest_updt.

    ENDIF.
  ENDIF.

  LOOP AT t_objnr.
    DELETE TABLE gt_exclude_objnr WITH TABLE KEY
                                  objnr = t_objnr-objnr.
  ENDLOOP.

ENDFUNCTION.

FORM fill_vb_tables_selective
я посмотрел - есть и в 4.6, должно получиться, если чего не хватит - пиши, вышлю

РМщик

Так в итоге всё получилось, как хотел?

Uukrul

РМщик написал(а):

Так в итоге всё получилось, как хотел?

В итогде да, вот думаю добавить этот ФМ или заметочку оставить с проверкой версии типа если будет переход на 4.7 то свистнуть об этом...

PS: Еще вопросик по собственным экранам, короче добавил свою закладку с экраном 1000 из расширения ITOB0001 все красиво работает но закладка стала видна для всех EO, опять же надо ее показывать только для определенных EO, а вот где отключить вывод этого подэкрана для остальных не нашел.

РМщик

SM30 - ракурс V_TITOBPROF_SUB

Uukrul

РМщик написал(а):

SM30 - ракурс V_TITOBPROF_SUB

Дык проблема как раз в том что его отключить/включить нужно для одинакового типа ЕО, по внутренней логике работы программы, т.е. для одной ЕО данные нужно показать а для другой нет... в общем случае для ЕО анилизурестся пользовательская таблица и если там данные есть то они выводятся на этот допэкран а если нет, то хотелось бы закладку вообще не показывать... ну сейчас она с пустыми данными выводится... в общем не критично, но не очень эстетично

Uukrul

Блин еще одна проблема вылезла... стандартная BAPI_EQUI_CREATE нафиг не хочет заходить в этот экзит.

Пользовательская схема статусов для EO

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