SAP DOI + Excel = веселое программирование

Parazit

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

Ладно, я понял, что дельных советов я тут уже не получу. Всем спасибо.

Я этот глюк отношу на счет Мелкософта. Я еще раньше замечал, что моя выгрузка в Excel/Word на разных компах вела себя по разному именно в этом смысле, т.е. у одних оставались висеть задачи, у других нет. Да и еще раньше я замечал такую особенность при обычной работе с MS Office, т.е. без всяких выгрузок. В общем постепенно, с обновлением версий Windows и MS Office, все рассосалось.

trop

в крайнем случае, можно и на майкрософт все свалить

будем надеяться, что все рассосется

Пономарев Артем

Я код посмотрел. Вроде не должно такого быть (смотрел бегло, времени мало).
Однако почему бы не <я не знать русский языка> через стандартные интерфейсы, таки? Заодно бы и выяснили, у кого глюки. У майкрософта или у вас

Лично я, используя только стандарт, никогда с такой проблемой не сталкивался.

Pad0nak

так там, через стандарт все, классы обертки не в счет, они для удобства

Пономарев Артем

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

Pad0nak

ну тогда ты лучше свой код сбрось, я его и проверю

а так выйдет тот же копи паст из моих оберток :lol:

Пономарев Артем

Ок, для начала делаем так:

Code:

  IF CONTAINER IS INITIAL.
    CREATE OBJECT CONTAINER
              EXPORTING CONTAINER_NAME = 'CONTAINER'.

    CALL METHOD C_OI_CONTAINER_CONTROL_CREATOR=>GET_CONTAINER_CONTROL
                      IMPORTING CONTROL  =  CONTROL.

    CALL METHOD CONTROL->INIT_CONTROL
                        EXPORTING
                             R3_APPLICATION_NAME      = 'R/3'
                             INPLACE_ENABLED          = INPLACE
                             INPLACE_SCROLL_DOCUMENTS = 'X'
                             PARENT                   = CONTAINER
                             REGISTER_ON_CLOSE_EVENT  = 'X'
                             REGISTER_ON_CUSTOM_EVENT = 'X'
                             NO_FLUSH                 = 'X'.
  ENDIF.

Потом так:

Code:

  CALL METHOD BDS_INSTANCE->GET_WITH_URL
                      EXPORTING
                           CLASSNAME  = 'bla bla'
                           CLASSTYPE  = 'OT'
                           OBJECT_KEY = 'bla bla'
                      CHANGING
                           URIS       = IT_DOC_URIS
                           SIGNATURE  = IT_DOC_SIGNATURE
                      EXCEPTIONS
                           NOTHING_FOUND   = 1
                           ERROR_KPRO      = 2
                           INTERNAL_ERROR  = 3
                           PARAMETER_ERROR = 4
                           NOT_AUTHORIZED  = 5
                           NOT_ALLOWED     = 6.

Далее:

Code:

  READ TABLE IT_DOC_URIS INTO WA_DOC_URIS INDEX 1.
  ITEM_URL = WA_DOC_URIS-URI.

Открываем и интерфейсим:

Code:

  CALL METHOD CONTROL->GET_DOCUMENT_PROXY
             EXPORTING
                  DOCUMENT_TYPE      = 'bla bla'
                  REGISTER_CONTAINER = 'X'
             IMPORTING
                  DOCUMENT_PROXY     = DOCUMENT.

  CALL METHOD DOCUMENT->OPEN_DOCUMENT
              EXPORTING
                   OPEN_INPLACE   = 'X'
                   DOCUMENT_URL   = ITEM_URL.

  CALL METHOD DOCUMENT->HAS_SPREADSHEET_INTERFACE
              IMPORTING
                   IS_AVAILABLE = HAS.

  IF NOT HAS IS INITIAL.
    CALL METHOD DOCUMENT->GET_SPREADSHEET_INTERFACE
                IMPORTING
                     SHEET_INTERFACE = SSHEET.
  ENDIF.

Делаем что хотим а потом:

Code:

  IF NOT DOCUMENT IS INITIAL.
    CALL METHOD DOCUMENT->CLOSE_DOCUMENT.
    FREE DOCUMENT.
  ENDIF.
  IF NOT CONTROL IS INITIAL.
    CALL METHOD CONTROL->DESTROY_CONTROL.
    FREE CONTROL.
  ENDIF.
  IF NOT CONTAINER IS INITIAL.
    CALL METHOD CONTAINER->FREE.
  ENDIF.
  IF NOT SSHEET IS INITIAL.
    FREE SSHEET.
  ENDIF.

htk_s

Пономарев Артем написал:

Делаем что хотим а потом:

Code:

  IF NOT DOCUMENT IS INITIAL.
    CALL METHOD DOCUMENT->CLOSE_DOCUMENT.
    FREE DOCUMENT.
  ENDIF.
  IF NOT CONTROL IS INITIAL.
    CALL METHOD CONTROL->DESTROY_CONTROL.
    FREE CONTROL.
  ENDIF.
  IF NOT CONTAINER IS INITIAL.
    CALL METHOD CONTAINER->FREE.
  ENDIF.
  IF NOT SSHEET IS INITIAL.
    FREE SSHEET.
  ENDIF.

Сквозь пространство и время: "Спасибо, помогло!" :-)

Пономарев Артем

Просто праздник какой-то. Кто-то использует поиск. Вера в человечество восстановлена :mrgreen:

З.Ы.: Обилие одинаковых тем зашкаливает.

gomer4ik

Могучие ABAPеры, подскажите кто чем может,
выгружаю внутреннюю таблицу в excel через DOI.
В таблице с данными всё хорошо, в excel же выводится частично обрезано.
Через отладку не нашел в каком именно месте происходит "обрезание"

,
поэтому прошу подсказать в какую сторону смотреть?

Parazit

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

Могучие ABAPеры, подскажите кто чем может,
выгружаю внутреннюю таблицу в excel через DOI.
В таблице с данными всё хорошо, в excel же выводится частично обрезано.
Через отладку не нашел в каком именно месте происходит "обрезание"

,
поэтому прошу подсказать в какую сторону смотреть?

Что, сколько и где именно обрезает? Надеюсь про ограничения самого Excel вы в курсе...

gomer4ik

таблица передается вся, то есть все строки. Но в некоторых столбцах текст не полностью. Например во внутренней таблице есть поле TYPE P1000-STEXT(40 символов), в ексель же значение этого же поля ограничивается 19 символами. Вот и получается вместо "Слесарь по наладочным работам" какой-нибудь "Слесарь по наладочн".

А что за ограничения имелись ввиду? про ячейки вообще не в курсе, просветите?

gomer4ik

поигрался с размерностью данных, и всё получилось. Кто-нибудь может объяснить, почему система так себя ведет?

htk_s

Проблема не нова:
viewtopic.php?f=13&t=48158
viewtopic.php?f=13&t=22173&start=31

Вот тут объяснение от САП, что проблема фундаментальна и связана с юникодом:
http://www.sapnet.ru/viewtopic.php?t=3439

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

SAP DOI + Excel = веселое программирование

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