Текущее время: Чт, май 15 2025, 21:39

Часовой пояс: UTC + 3 часа


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


ВНИМАНИЕ!

Вопросы по SAP Query и Quick View - сюда



Начать новую тему Ответить на тему  [ Сообщений: 8 ] 
Автор Сообщение
 Заголовок сообщения: Не пойму в чем проблема...
СообщениеДобавлено: Пн, сен 05 2005, 11:33 
Гость
Есть две продуктивные системы и для каждой есть девелоперская.
В одной создана программа запуска отчета Bex его обновление и сохранение, все работает отлично. Копирую текст программы во вторую систему и при проверке ошибок в программе выдает сообщение : "<X1_4E238C5273BF11D28BB> and CURR_WORKBOOK_ID contain references, internal tables or strings. In the current statement, these must occur at the same offset position and they must be compatible"
и указывает на строку с кодом:
...
CALL METHOD OF EXCEL_APP 'RUN' EXPORTING
#1 = 'SAPBEX.XLA!SAPBEXReadWorkbook'
#2 = CURR_WORKBOOK_ID
.
...

в чем проблему...не пойму..(


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Вт, сен 06 2005, 16:21 
Гость
может я плохо объяснил,здесь должно передаваться параметром ИД рабочей книги которрую нужно открыть и почему то не получается.(


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, сен 08 2005, 10:12 
Гость
это снова я, а может это быть в разных версиях систем, и разных синтаксисах вызова методов?..может кто-то сталкивался?


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, сен 08 2005, 10:15 
Гость
Без всего кода трудно понять


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, сен 08 2005, 10:19 
Гость
вот весь код функции, где много восклицательных знаков там выскакивает ошибка




FUNCTION Z_IBS_BW_BEX_TO_FOLD_PL.
*"----------------------------------------------------------------------
*"*"Локальный интерфейс:
*" IMPORTING
*" REFERENCE(ISPREPLOADFOLDERS) DEFAULT 1
*" REFERENCE(PATH_TO_XLA)
*" REFERENCE(REPORT) TYPE CHAR3
*" EXCEPTIONS
*" EXCEL_VIEWER_NOT_INSTALL
*"----------------------------------------------------------------------

DATA: TMP_TABLE_1 TYPE ZIBSBWWBIDS OCCURS 0 WITH HEADER LINE.

TYPE-POOLS OLE2.
DATA:
EXCEL_APP TYPE OLE2_OBJECT,
CURR_WORKBOOK TYPE OLE2_OBJECT,
CURR_SHEET TYPE OLE2_OBJECT,
CURR_FILTER_CELL TYPE OLE2_OBJECT
.
DATA:
* CURR_PROJECT_ID TYPE I,
CURR_PROJECT_ID LIKE ZIBSBWPLFOLT-FILTERID,
* CURR_PROJECT_ID_STR TYPE STRING,
CURR_DIR TYPE STRING,
CURR_FILENAME TYPE STRING,

* PATH_TO_XLA TYPE STRING,
CURR_WORKBOOK_ID TYPE STRING,
CURR_FILTER_CELL_ROW TYPE I,
CURR_FILTER_CELL_COL TYPE I,
S LIKE ZIBSBWWBIDS-WB_DESC,
COUNTER TYPE I VALUE 0,
L_EXCEL_REOPEN_COUNTER TYPE I VALUE 0
.



CALL TRANSACTION 'RRMX' AND SKIP FIRST SCREEN.

DATA OLE_NEWBOOK TYPE OLE2_OBJECT.
CREATE OBJECT OLE_NEWBOOK 'EXCEL.SHEET'.
IF SY-SUBRC > 0. RAISE EXCEL_VIEWER_NOT_INSTALLED. ENDIF.
CALL METHOD OF OLE_NEWBOOK 'Application' = EXCEL_APP.
CALL METHOD OF OLE_NEWBOOK 'Close'.
FREE OBJECT OLE_NEWBOOK.


CALL METHOD OF EXCEL_APP 'Workbooks' = CURR_WORKBOOK.
CALL METHOD OF CURR_WORKBOOK 'Open'
EXPORTING #1 = PATH_TO_XLA.

SELECT
*
FROM
ZIBSBWWBIDS
INTO
TABLE TMP_TABLE_1
WHERE
IS_HIDDEN <> 'X' and
report = report
.

LOOP AT TMP_TABLE_1.

CURR_WORKBOOK_ID = TMP_TABLE_1-WB_ID.

* opening our report Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!!
CALL METHOD OF EXCEL_APP 'RUN' EXPORTING
#1 = 'SAPBEX.XLA!SAPBEXReadWorkbook' #2 = CURR_WORKBOOK_ID
.

CALL METHOD OF EXCEL_APP 'ActiveWorkbook' = CURR_WORKBOOK.

CALL METHOD OF EXCEL_APP 'ActiveSheet' = CURR_SHEET.
*refreshing query
CALL METHOD OF EXCEL_APP 'RUN' EXPORTING
#1 = 'add_util.xla!BEXRefresh'
.
* saving current workbook
CALL METHOD OF EXCEL_APP 'RUN' EXPORTING
#1 = 'add_util.xla!SaveCopyToDir'
#2 = CURR_WORKBOOK
#3 = CURR_DIR
#4 = CURR_FILENAME
.
CALL METHOD OF CURR_WORKBOOK 'Close' EXPORTING
#1 = 0
.
ENDLOOP.

CALL METHOD OF EXCEL_APP 'Quit'.

FREE OBJECT EXCEL_APP.
ENDFUNCTION.


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, сен 08 2005, 10:31 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
Определи CURR_WORKBOOK_ID как ZIBSBWWBIDS-WB_ID
или передавай TMP_TABLE_1-WB_ID вместо него в 'RUN'


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, сен 08 2005, 10:41 
Гость
ух ты..и правда, а почему нельзя определять как простую строку?
просто опять выскочила эта ошибка но уже ниже в вызове :

* saving current workbook
CALL METHOD OF EXCEL_APP 'RUN' EXPORTING
#1 = 'add_util.xla!SaveCopyToDir'
#2 = CURR_WORKBOOK
#3 = CURR_DIR
#4 = CURR_FILENAME


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:   Тема решена
СообщениеДобавлено: Чт, сен 08 2005, 14:37 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Чт, сен 09 2004, 07:32
Сообщения: 777
Откуда: Москва
Пол: Мужской
Может, Excel'ю кавычек не хватает при передаче параметра-строки? :roll:

_________________
"Прежде чем сделать что-то, подумай, к чему это может привести..."


Пометить тему как нерешенную
Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 8 ] 

Часовой пояс: UTC + 3 часа


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB