Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
Модераторы: m0p3e , edward_K , Модераторы
SergZol
Постоянный обитатель
Сообщения: 155 Зарегистрирован: 03 сен 2007, 19:06
Откуда: Россия,Казань
Сообщение
SergZol » 15 дек 2007, 15:28
Имею код, как запихнуть наименование в sCustomer?
if RunInterface('Z_KATPODR::GETANYPODR', pCustomer, 4) <> cmCancel
sCustomer:=katpodr.name;
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188 Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb
Сообщение
edward_K » 15 дек 2007, 22:17
а так что не катит?
if RunInterface('Z_KATPODR::GETANYPODR', pCustomer, 4) <> cmCancel
if getfirst katpodr where (( pcustomer == katpodr.nrec ))=0
scustomer :=katpodr.name
SergZol
Постоянный обитатель
Сообщения: 155 Зарегистрирован: 03 сен 2007, 19:06
Откуда: Россия,Казань
Сообщение
SergZol » 17 дек 2007, 12:25
Так работает, думал по проще можно.
При Выборе в интерфейсе яж уже нахожусь на нужной позиции, а приходится еще делать GetFirst
k_vit
Постоянный обитатель
Сообщения: 143 Зарегистрирован: 09 авг 2006, 16:40
Откуда: Россия, Тюмень, ОАО "Сибирский Научно-Аналитический Центр"
Сообщение
k_vit » 17 дек 2007, 13:13
SergZol
Так работает, думал по проще можно
Куда еще проще-то?
При Выборе в интерфейсе яж уже нахожусь на нужной позиции, а приходится еще делать GetFirst
Это в интерфейсе выбора вы находитесь на нужной позиции, а в своем интерфейсе нужно спозиционироваться
Алексей
Местный житель
Сообщения: 2898 Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область
Сообщение
Алексей » 17 дек 2007, 13:31
передать нрек подразделения, на которое спозиционируется интерфейс выбора.
SergZol
Постоянный обитатель
Сообщения: 155 Зарегистрирован: 03 сен 2007, 19:06
Откуда: Россия,Казань
Сообщение
SergZol » 17 дек 2007, 15:25
передать нрек подразделения, на которое спозиционируется интерфейс выбора.
Это как!
Алексей
Местный житель
Сообщения: 2898 Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область
Сообщение
Алексей » 18 дек 2007, 06:18
в переменную pCustomer положите нрек перед вызовом интерфейса