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

Часовой пояс: 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 часа


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

Сейчас этот форум просматривают: Ahrefs [Bot], Google [Bot]


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

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