(UTC)
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Следующая Тема ›
Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Горячая тема (более 10 ответов) РасшЖурнал2 для SQL (число прочтений - 4088 )
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
РасшЖурнал2 для SQL
13. Апреля 2007 :: 11:48
Печать  
Помогите прикрутить РасшЖурнал2 для SQL к обычному журналу документов.  Создал новую форму журнала. Но в него не попадают документы из указанного журнала
  
Наверх
 
IP записан
 
Valet
Full Member
***
Отсутствует



Сообщений: 141
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: РасшЖурнал2 для SQL
Ответ #1 - 13. Апреля 2007 :: 13:37
Печать  
Для того чтоб попадали документы, нужно указать Идентификатор журнала, на базе которого будет построен Расширенный и передать список видов документов которые отображать. Что-то вроде этого:

[code]
РасшЖурнал = СоздатьОбъект("РасшЖурнал2");
РасшЖурнал.ИдЖурнала = "Приходные";
РасшЖурнал.УникальныйИД = "Приходные";

Документы=СоздатьОбъект("СписокЗначений");
Документы.ДобавитьЗначение("ПриходнаяНакладная","Приходная накладная");
Документы.Пометка(1, 1);
РасшЖурнал.СписокДокументов = Документы;[/code]
  
/ Лень - двигатель прогресса. /
Наверх
ICQ  
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #2 - 13. Апреля 2007 :: 13:48
Печать  
Да я примерно так и сделал.

Процедура УстановитьФильтрПоВидам()
     Список = СоздатьОбъект("СписокЗначений");
     Список.ДобавитьЗначение("ТТН","ТТН");

     РасшЖурнал.СписокДокументов = Список;
     ТекстЗапроса = РасшЖурнал.Обновить();
КонецПроцедуры      // УстановитьФильтрПоВидам

Менял в примере РасшЖурнал2_Тест.ert  на Ид своего журнала. Тоже не сработал.  Только РасшЖурнал2_ТестОбщий.ert  отрабатывает.
  
Наверх
 
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #3 - 13. Апреля 2007 :: 16:21
Печать  
Странно. Вроде такая полезная штука, учитывая ограниченность 1С-ых журналов, а информации ни какой. Да и поддержка я так понимаю прекратилась.
  
Наверх
 
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #4 - 13. Апреля 2007 :: 17:33
Печать  
Работает только с общим журналом. При указании Ид существующего журнала, заголовки столбцов соответствуют тем что заданы в конфигураторе, а вот документы не выводяться. Использовать ДобавитьГрафу? Как-то коряво.
  
Наверх
 
IP записан
 
Valet
Full Member
***
Отсутствует



Сообщений: 141
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: РасшЖурнал2 для SQL
Ответ #5 - 13. Апреля 2007 :: 18:38
Печать  
lsm писал(а) 13. Апреля 2007 :: 17:33:
Работает только с общим журналом. При указании Ид существующего журнала, заголовки столбцов соответствуют тем что заданы в конфигураторе, а вот документы не выводяться. Использовать ДобавитьГрафу? Как-то коряво.


Посмотри что за запрос он выбирает
  
/ Лень - двигатель прогресса. /
Наверх
ICQ  
IP записан
 
Valet
Full Member
***
Отсутствует



Сообщений: 141
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: РасшЖурнал2 для SQL
Ответ #6 - 16. Апреля 2007 :: 03:59
Печать  
lsm писал(а) 13. Апреля 2007 :: 13:48:
Да я примерно так и сделал.

Процедура УстановитьФильтрПоВидам()
     Список = СоздатьОбъект("СписокЗначений");
     Список.ДобавитьЗначение("ТТН","ТТН");

     РасшЖурнал.СписокДокументов = Список;
     ТекстЗапроса = РасшЖурнал.Обновить();
КонецПроцедуры      // УстановитьФильтрПоВидам

Менял в примере РасшЖурнал2_Тест.ert  на Ид своего журнала. Тоже не сработал.  Только РасшЖурнал2_ТестОбщий.ert  отрабатывает.


Процедура УстановитьФильтрПоВидам()  запускается интерактивно по кнопке "Фильтр по видам" может она у тебя не отрабатывает. Все говорит о том что список с видами документов в классе у тебя пустой.
  
/ Лень - двигатель прогресса. /
Наверх
ICQ  
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #7 - 18. Апреля 2007 :: 13:26
Печать  
Вот какой текст запроса формируется

SELECT
  Жур.row_id as row_id,
  Жур.Date_Time_IDDoc as Позиция,

  CASE
  WHEN Жур.IsMark = 1 THEN 6
  WHEN Жур.Closed & 1 = 1 THEN 1
  ELSE 0 END as Картинка,

  Жур.IDDoc as [Документ $Документ],
  Жур.IDDocDef as Документ_вид,
   as ВидДокумента,
CAST(LEFT(Жур.DATE_TIME_IDDOC, 8) as DATETIME) as ДатаДок,
Жур.DOCNO as НомерДок,
СпрПокупатель.Descr as Покупатель,
СпрАдрес.Descr as Адрес,
СпрМенеджер.Descr as Менеджер,
$ДокВозвратИзОрганизацииТоваров.СуммаРозничная as [Сумма],
$ДокВозвратИзОрганизацииТоваров.СуммаНДС as [СуммаНДС],
$ДокВозвратИзОрганизацииТоваров.Всего as [Всего],
СпрАвтор.Descr as Автор,
СпрТипОперации.Descr as ТипОперации

FROM
     _1SJourn as Жур (NOLOCK)         

LEFT JOIN $Документ.ВозвратИзОрганизацииТоваров as ДокВозвратИзОрганизацииТоваров ON
    Жур.IDDoc = ДокВозвратИзОрганизацииТоваров.IDDoc

LEFT JOIN $Справочник.Контрагенты as СпрПокупатель
ON СпрПокупатель.ID = $ДокВозвратИзОрганизацииТоваров.Контрагент

LEFT JOIN $Справочник.Адреса as СпрАдрес
ON СпрАдрес.ID = $ДокВозвратИзОрганизацииТоваров.ПунктРазгрузки

LEFT JOIN $Справочник.Сотрудники as СпрМенеджер
ON СпрМенеджер.ID = $ДокВозвратИзОрганизацииТоваров.Менеджер

LEFT JOIN $Справочник.Пользователи as СпрАвтор
ON СпрАвтор.ID = Жур.$ОбщийРеквизит.Автор

LEFT JOIN $Справочник.ТипыОпераций as СпрТипОперации
ON СпрТипОперации.ID = Жур.$ОбщийРеквизит.ТипОперации
WHERE
   Жур.IDJournal = $ЖурналДокументов.Возврат AND
(Жур.DATE_TIME_IDDOC BETWEEN :НачДата AND :КонДата~)

ВидДокумента не передается в запрос
  
Наверх
 
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #8 - 18. Апреля 2007 :: 15:43
Печать  
Всё. Нет сил моих больше. Фильтровать через общий журнал по виду документа получается, а вот дополнительный журнал ни в какую не передается в запрос.
  
Наверх
 
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #9 - 18. Апреля 2007 :: 17:43
Печать  
Блин. Не обратил внимания что документ попал в дополнительные журналы. Включил в обычный журнал и всё заработало. Блин, а ларчик просто открывался.
  
Наверх
 
IP записан
 
Valet
Full Member
***
Отсутствует



Сообщений: 141
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: РасшЖурнал2 для SQL
Ответ #10 - 19. Апреля 2007 :: 05:22
Печать  
Если все нормально то в запросе должна присутствовать след. строка определяющая вид документа
Код
Выбрать все
CASE
WHEN Жур.IDDOCDEF = $ВидДокумента.Перемещение THEN 'Перемещение '
WHEN Жур.IDDOCDEF = $ВидДокумента.Накладная THEN 'Накладная '
END as ВидДокумента,


Мне кажется тебе надо обратить внимание на вот этот кусок

Код
Выбрать все
РасшЖурнал.СписокДоступныхДокументов.Выгрузить(Документы);
Для ъ = 1 По Документы.РазмерСписка() Цикл
	Документы.Пометка(ъ, 1);
КонецЦикла;


Вид журнала помоему влияет только на список документов представленных в нем и больше ничего.
Удачи.
  
/ Лень - двигатель прогресса. /
Наверх
ICQ  
IP записан
 
lsm
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 24
Зарегистрирован: 13. Апреля 2007
Re: РасшЖурнал2 для SQL
Ответ #11 - 20. Апреля 2007 :: 06:04
Печать  
Если журнал - обычный, то не надо никаких списков документов. Просто в ИдЖурнал передается идентификатор журнала.
Почему-то у меня не сохраняются настройки колонок и сортировок. Что такое УникальныйИд? Он используется при сохранении настроек.
  
Наверх
 
IP записан
 
Valet
Full Member
***
Отсутствует



Сообщений: 141
Местоположение: Москва
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: РасшЖурнал2 для SQL
Ответ #12 - 20. Апреля 2007 :: 08:07
Печать  
lsm писал(а) 20. Апреля 2007 :: 06:04:
Что такое УникальныйИд? Он используется при сохранении настроек.

По всей видимости просто действительно уникальный ид, который присваивается в обработке эмулирующей журнал. Думаю его можно назвать произвольно.
Но если обработка внешняя, то к идентификатору для сохранения настроек добавляется путь к ней.
  
/ Лень - двигатель прогресса. /
Наверх
ICQ  
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать
‹ Предыдущая Тема | Следующая Тема ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge