Текущее время: Вт, июл 22 2025, 00:06

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


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


ВНИМАНИЕ!

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



Начать новую тему Ответить на тему  [ Сообщений: 8 ] 
Автор Сообщение
 Заголовок сообщения: RFC Вызов
СообщениеДобавлено: Чт, мар 15 2007, 17:10 
Ассистент
Ассистент

Зарегистрирован:
Вс, ноя 12 2006, 23:53
Сообщения: 40
Откуда: Moscow
Уважаемые Гуру. Может кто-нибудь знает почему после RFC_READ_TABLE.Call в таблицу tblFields не заносятся данные?
Sub Macros()

Dim functionCtrl As Object 'Function Control (Sammelobjekt)
Dim sapConnection As Object 'Verbindungsobjekt
Dim theFunc As Object 'Function Objekt

Set functionCtrl = CreateObject("SAP.Functions")
Set sapConnection = functionCtrl.Connection

sapConnection.Client = "100"
sapConnection.User = ""
sapConnection.Password = ""
sapConnection.Language = "RU"


If sapConnection.Logon(0, False) <> True Then
MsgBox "Keine Verbindung zum R/3!"
Exit Sub
End If


Set RFC_READ_TABLE = functionCtrl.Add("RFC_READ_TABLE")

Set strExport1 = RFC_READ_TABLE.Exports("QUERY_TABLE")
Set strExport2 = RFC_READ_TABLE.Exports("DELIMITER")
Set tblOptions = RFC_READ_TABLE.Tables("OPTIONS")
Set tblData = RFC_READ_TABLE.Tables("DATA")
Set tblFields = RFC_READ_TABLE.Tables("FIELDS")

strExport1.Value = "LIKP"
strExport2.Value = ","

returnFunc = RFC_READ_TABLE.Call

If returnFunc = True Then
die_exception = RFC_READ_TABLE.Exception
End If


End Sub


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, мар 15 2007, 17:56 
Старший специалист
Старший специалист
Аватара пользователя

Зарегистрирован:
Пт, июл 01 2005, 13:23
Сообщения: 303
Откуда: Питер
Пол: Мужской
Вот это называется: "Партия не ищет лёгких путей!" Ведь можно же было написать так чтобвы всем всё было ясно. Нет ведь. Пусть те кто придут после долго мучаются...


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Пт, мар 16 2007, 00:41 
Ассистент
Ассистент

Зарегистрирован:
Вс, ноя 12 2006, 23:53
Сообщения: 40
Откуда: Moscow
Очень извиняюсь, что плохо описал проблему, вот:
Если вызывать RFC_READ_TABLE из SAP этими же параметрами, то таблица FIELDS заполнится описаниями полей, а при RFC вызове все обломно.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вт, апр 03 2007, 17:20 
Старший специалист
Старший специалист
Аватара пользователя

Зарегистрирован:
Сб, окт 16 2004, 11:27
Сообщения: 348
Откуда: Москау
Пол: Мужской
Long написал(а):
Очень извиняюсь, что плохо описал проблему, вот:
Если вызывать RFC_READ_TABLE из SAP этими же параметрами, то таблица FIELDS заполнится описаниями полей, а при RFC вызове все обломно.


Похоже, что у нас подобная проблема!

Попробую объяснить.

Создаем в SAP функциональный модуль с фозможностью удаленного вызова.

Code:
FUNCTION Z_RFC_TEST.
* exporting
* E_PARAM TYPE TEXT100


В качестве параметра экспорта - параметр типа CHAR, в котором в вызывающую систему передается какой-то текст.

Мы вот с каким моментом столкнулись.
Если в этот параметр явно передавать текст, т.е. в коде писать присвоение, типа:

Code:
E_PARAM = 'Text for external system'.


то вызывающая система прекрасно воспринимает этот текст.

Если же в этот параметр передавать значение переменной:

Code:
data: g_text(100).

g_text = 'Text for external system'.

E_PARAM = g_text.


или использовать это поле в качестве цели для селекта в таблицу БД:

Code:
select single BEZEI from ... into E_PARAM where...


то программа в вызывающей системы не может считать текст из параметра, точнее получает просто пробелы.

Спрашивается, в чем дело может быть?

_________________
Тот, у кого хватит храбрости и терпения всю жизнь вглядываться во мрак, первым увидит в нём проблеск света


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вт, апр 03 2007, 17:34 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Вт, авг 31 2004, 14:57
Сообщения: 5258
Откуда: Ростов невеликий
Пол: Мужской
Preatos написал:
Вот это называется: "Партия не ищет лёгких путей!" Ведь можно же было написать так чтобвы всем всё было ясно. Нет ведь. Пусть те кто придут после долго мучаются...

а я то думал, что извращался в своё время ...- всё заумное возвращается к убогому RFC_READ*.. - может поиск поможет? -


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Ср, апр 04 2007, 08:14 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, ноя 23 2005, 13:37
Сообщения: 1805
Откуда: ECC 6.0
Пол: Мужской
Старик написал:
Code:
data: g_text(100).
g_text = 'Text for external system'.
E_PARAM = g_text.


Вот в это я не верю.

А в случае с select'ом может не работать, потому что в табличке русский текст.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Ср, апр 04 2007, 09:03 
Старший специалист
Старший специалист
Аватара пользователя

Зарегистрирован:
Сб, окт 16 2004, 11:27
Сообщения: 348
Откуда: Москау
Пол: Мужской
sibrin написал:
Вот в это я не верю.

А в случае с select'ом может не работать, потому что в табличке русский текст.


Не верьте! Это я неверно здесь написал - неправильно проверяли!

А с остальным помогло следующее:
- обновили библиотечку (скачали новую);
- проконтролировали язык, на котором RFC-вызов выполняется, - действительно, реправильно его установили и забыли!

Спасибо!

_________________
Тот, у кого хватит храбрости и терпения всю жизнь вглядываться во мрак, первым увидит в нём проблеск света


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Ср, апр 04 2007, 10:18 
Младший специалист
Младший специалист

Зарегистрирован:
Пт, июн 02 2006, 09:59
Сообщения: 67
Пол: Мужской
Во избежание лишнего гемора уже года два использую
Code:
Set R3Functions = CreateObject("SAP.Functions.Unicode")
или
Code:
Set oBAPICtrl = CreateObject("SAP.BAPI.UNICODE.1")

Только вот месяц назад выяснилось, что в GUI 7.10 Functions.Unicode есть, а вот BAPI.UNICODE.1 почему-то нет


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

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


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

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


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

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