Отследить статус заказов

kaol

Здравствуйте.

Нужно отследить статус заказов: открытые(не создана исходящая поставка), частично исполнены( VBUK-FKSTK=A), отгруженные (VBUK-FKSTK=C).
Пытаюсь реализовать в Query, не получасется отследить открытые заказы. Помогите подобрать критерии.
Может есть еще какие-либо идеи?

Спасибо заранее. Ольга

troy

Если вы анализируете статус заказа относительно поставки (цепочка "заказ - поставка - фактура"), то вам нужно поле LFSTK. Если вы анализируете статус заказа относительно фактуры (цепочка заказ - фактура), то вам нужно поле FKSAK.
А вообще, вполне вероятно, вам нужно поле GBSTK - обработана ли позиция в принципе (не важно, поставкой, фактурой или след.заказом).

Angie

VBUK-FKSTK - это статус стоит смотреть только для документов, релевантных для фактурирования. Если у вас фактурируется поставка, а "статус отгрузки" смотрите для заказе, то он будет пустым (не релевантно).

В вашем случае, как я понимаю, именно такой вариант и есть. Поэтому нужно смотреть поток на самом деле.
Мы у себя делали ФМ, который возвращал "статус" документа примерно так (статус = result):

Code:

    SELECT SINGLE * FROM vbuk WHERE vbeln EQ vbeln.
    IF sy-subrc EQ 0.
      IF vbuk-fkstk IS INITIAL.   "не релевантен для фактур
        IF vbuk-lfgsk IS INITIAL. "не релевантен для поставок
          result = vbuk-fksak.      "тогда результат из статуса фактуры по заказу
        ELSEIF vbuk-lfgsk NE 'C'. "не полностью поставлен
          result = vbuk-lfgsk.       "тогда результат из статуса поставки
        ELSE.                              "если полностью поставлен
          SELECT * FROM vbfa WHERE vbelv EQ vbeln
                               AND ( vbtyp_n EQ 'T' OR vbtyp_n EQ 'J' )
                               AND stufe = 0.         "ищем все поставки по документу
            SELECT SINGLE * FROM vbuk WHERE vbeln EQ  vbfa-vbeln. 
            IF sy-subrc EQ 0.
              IF ( vbuk-fkstk EQ 'C' ) OR ( vbuk-fkstk EQ '' ).     "если поставка полностью отфактурирована или не релевантна
                result = 'C'.   "тогда документ отфактурирован тоже
              ELSE.
                result = 'Z'.    "иначе результат = "промежуточные документы обработаны не полностью"
                EXIT.
              ENDIF.
            ENDIF.
          ENDSELECT.
        ENDIF.
      ELSE.
        result = vbuk-fkstk.  "если документ сам релевантен для фактуры 
                          "(скорее всего документ - это поставка), то вот и результат
      ENDIF.
    ELSE.
      result = 'X'.                "документа нет
    ENDIF.

kaol

Вопрос: Данный код добавляю в инфонабор как дополнительное поле?

kaol

Выводи мне следущее сообщение об ошибке: Field "VBELN" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement . У меня в инфо-наборе две таблицы VBUK и VBFA.
Формат задавала через Like-ссылка: VBUK-VBELN -система определила как С.

Angie

Как вам будет угодно. Доп. кодировку или доп. поле с кодировкой. Понятное дело, что надо адаптировать, но в целом, думаю, идея ясна.

Angie

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

Выводи мне следущее сообщение об ошибке: Field "VBELN" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement . У меня в инфо-наборе две таблицы VBUK и VBFA.
Формат задавала через Like-ссылка: VBUK-VBELN -система определила как С.

VBELN - это то, что вы используете в качестве номера сбытового заказа. А там уж сами смотрите.

kaol

вот меня и удивляет почему он не находит это поле в таблицах, тк оно везде там присутствует.

Angie

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

вот меня и удивляет почему он не находит это поле в таблицах, тк оно везде там присутствует.

kaol, без обид. А это ваш первый опыт в написании query, в целом, и в применении ABAP в нём, в частности? Если да, то в рамках форума тяжело объяснить, что там к чему. Сорри.

Angie

У вас базовая таблица какая? VBFA? Попробуйте тогда вместо VBELN использовать VBFA-VBELV. Должно прокатить.

kaol

Написание Query - нет. Применение APAP - да.
Базовая таблица VBUK

Angie

Тогда объявляйте доп. поле result как LIKE-ссылка на VBUK-FKSTK (или любое другое поле статуса из vbuk). А кодировка для этого поля должна выглядеть вот так (комментарии можете убрать):

Code:

      IF vbuk-fkstk IS INITIAL.   "не релевантен для фактур
        IF vbuk-lfgsk IS INITIAL. "не релевантен для поставок
          result = vbuk-fksak.      "тогда результат из статуса фактуры по заказу
        ELSEIF vbuk-lfgsk NE 'C'. "не полностью поставлен
          result = vbuk-lfgsk.       "тогда результат из статуса поставки
        ELSE.                              "если полностью поставлен
          SELECT * FROM vbfa WHERE vbelv EQ vbeln
                               AND ( vbtyp_n EQ 'T' OR vbtyp_n EQ 'J' )
                               AND stufe = 0.         "ищем все поставки по документу
            SELECT SINGLE * FROM vbuk WHERE vbeln EQ  vbfa-vbeln. 
            IF sy-subrc EQ 0.
              IF ( vbuk-fkstk EQ 'C' ) OR ( vbuk-fkstk EQ '' ).     "если поставка полностью отфактурирована или не релевантна
                result = 'C'.   "тогда документ отфактурирован тоже
              ELSE.
                result = 'Z'.    "иначе результат = "промежуточные документы обработаны не полностью"
                EXIT.
              ENDIF.
            ENDIF.
          ENDSELECT.
        ENDIF.
      ELSE.
        result = vbuk-fkstk.  "если документ сам релевантен для фактуры 
                          "(скорее всего документ - это поставка), то вот и результат
      ENDIF.

kaol

ругается : "RESULT" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement.

Может нужно определить тип этого поля?

Angie

Точно на RESULT ругается? Только что сделал у себя - всё ок.
Кроме

Code:

          SELECT * FROM vbfa WHERE vbelv EQ vbeln
                               AND ( vbtyp_n EQ 'T' OR vbtyp_n EQ 'J' )
                               AND stufe = 0.         

Поправьте здесь vbeln на vbuk-vbeln.

Jelena

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

ругается : "RESULT" is unknown. It is neither in one of the specified tables nor defined by a "DATA" statement.
Может нужно определить тип этого поля?

Вам дали только фрагмент кода, в котором отсутствует (как минимум) определение переменных. Вам нужно добавить вот это для того, чтобы пройти syntax check:

Code:

tables: vbuk, vbfa.
data: result type c,
      vbeln type vbeln.

Ну и, естественно, даже после этого еще нужно "дорабатывать напильником".

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

Отследить статус заказов

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