Гость
Форумы / [игнор отключен] [закрыт для гостей] / найти всё где фигурирует контрагент. / 6 сообщений из 6, страница 1 из 1
17.09.2015, 14:08
    #39053902
andron81
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
добрый день всем.

Собственно вопрос в теме.
Есть контрагент .
то есть как мне найти документы , справочники где фигурирует данный контрагент (шапка , табличная часть) А исходя из полученной информации будем думать дальше, что с ним делать дальше.
...
Рейтинг: 0 / 0
17.09.2015, 14:12
    #39053914
andron81
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
andron81,

УПП 8.2
...
Рейтинг: 0 / 0
17.09.2015, 14:30
    #39053940
javapecker
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
andron81,
НайтиПоСсылкам
...
Рейтинг: 0 / 0
17.09.2015, 14:39
    #39053954
Zerro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
шапки
Если ЕстьТабЧастьДокумента(_ИмяТЧ, МетаданныеДокумента) Тогда //проверяем есть нет такая ТЧ в доке

табличные части

Для каждого _Стр Из _ТЗПоТЧ Цикл

_НовСтрока = _ТЧ.Добавить();
Для каждого _Реквизит Из МетаданныеДокумента.ТабличныеЧасти[_ИмяТЧ].Реквизиты Цикл

_НовСтрока[_Реквизит.Имя] = _Стр[_Реквизит.Имя];

КонецЦикла;

КонецЦикла;


Функция ЕстьТабЧастьДокумента(ИмяТабЧасти, МетаданныеДокумента) Экспорт

Если МетаданныеДокумента.ТабличныеЧасти.Найти(ИмяТабЧасти) = Неопределено Тогда
Возврат Ложь;
Иначе
Возврат Истина;
КонецЕсли;

КонецФункции // ЕстьТабЧастьДокумента()
...
Рейтинг: 0 / 0
17.09.2015, 14:44
    #39053963
andron81
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
Zerroшапки
Если ЕстьТабЧастьДокумента(_ИмяТЧ, МетаданныеДокумента) Тогда //проверяем есть нет такая ТЧ в доке

табличные части

Для каждого _Стр Из _ТЗПоТЧ Цикл

_НовСтрока = _ТЧ.Добавить();
Для каждого _Реквизит Из МетаданныеДокумента.ТабличныеЧасти[_ИмяТЧ].Реквизиты Цикл

_НовСтрока[_Реквизит.Имя] = _Стр[_Реквизит.Имя];

КонецЦикла;

КонецЦикла;


Функция ЕстьТабЧастьДокумента(ИмяТабЧасти, МетаданныеДокумента) Экспорт

Если МетаданныеДокумента.ТабличныеЧасти.Найти(ИмяТабЧасти) = Неопределено Тогда
Возврат Ложь;
Иначе
Возврат Истина;
КонецЕсли;

КонецФункции // ЕстьТабЧастьДокумента()

а почему не проще как у javapecker ?
...
Рейтинг: 0 / 0
17.09.2015, 14:48
    #39053972
Zerro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
найти всё где фигурирует контрагент.
andron81Zerroшапки
Если ЕстьТабЧастьДокумента(_ИмяТЧ, МетаданныеДокумента) Тогда //проверяем есть нет такая ТЧ в доке

табличные части

Для каждого _Стр Из _ТЗПоТЧ Цикл

_НовСтрока = _ТЧ.Добавить();
Для каждого _Реквизит Из МетаданныеДокумента.ТабличныеЧасти[_ИмяТЧ].Реквизиты Цикл

_НовСтрока[_Реквизит.Имя] = _Стр[_Реквизит.Имя];

КонецЦикла;

КонецЦикла;


Функция ЕстьТабЧастьДокумента(ИмяТабЧасти, МетаданныеДокумента) Экспорт

Если МетаданныеДокумента.ТабличныеЧасти.Найти(ИмяТабЧасти) = Неопределено Тогда
Возврат Ложь;
Иначе
Возврат Истина;
КонецЕсли;

КонецФункции // ЕстьТабЧастьДокумента()

а почему не проще как у javapecker ?
не знаю..не мой код. переписывал немного вот и вспомнил.
1с ещё делает так вроде - запрос ко всем полям - и проверка есть или нет..не помню точно
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / найти всё где фигурирует контрагент. / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]