Имя: Пароль:
1C
 
Как узнать, есть ли субконто у счета.
0 Andreyyy
 
16.03.11
15:30
Типа в проведении:

Операция.Кредит.Счет = СчетРасчетовСПоставщиком;
Операция.Кредит.Контрагенты = Контрагент;
Операция.Кредит.Договоры = Договор;
Если ?УСчетаСчетЕстьСубконтоВидНоменклатуры? Тогда
   Операция.Кредит.ВидыНоменклатуры = ВидНоменклатуры;
КонецЕсли;

Спасибо.
1 zak555
 
16.03.11
15:31
КоличествоСубконто()
Синтаксис:
КоличествоСубконто()
Назначение:
Определяет количество субконто у текущего счета.
Возвращает: число - количество видов субконто у текущего счета.
2 Rie
 
16.03.11
15:31
(0) КоличествоСубконто(), ВидСубконто() помогут этому начинанию.
3 ДенисЧ
 
16.03.11
15:31
ВидСубконто(<?>,,)
Синтаксис:
ВидСубконто(<НомерСубконто>,<ВидСубконто>,<ТолькоОбороты>)
Назначение:
Устанавливает/возвращает вид субконто счета.
Возвращает: значение типа ''ВидСубконто''.
Параметры:
<НомерСубконто> - числовое выражение - порядковый номер субконто.
<ВидСубконто> - необязательный параметр. Значение типа ''ВидСубконто'', которое должно быть установлено.
<ТолькоОбороты> - необязательный параметр. Числовое значение: 1 или 0. Данный параметр снимает или устанавливает флаг ''Только обороты'' для данного субконто счета. Если параметр не используется, то флаг ''Только обороты'' не меняется.
4 zak555
 
16.03.11
15:31
+

ВидСубконто(<?>,,)
Синтаксис:
ВидСубконто(<НомерСубконто>,<ВидСубконто>,<ТолькоОбороты>)
Назначение:
Устанавливает/возвращает вид субконто счета.
Возвращает: значение типа ''ВидСубконто''.
Параметры:
<НомерСубконто> - числовое выражение - порядковый номер субконто.
<ВидСубконто> - необязательный параметр. Значение типа ''ВидСубконто'', которое должно быть установлено.
<ТолькоОбороты> - необязательный параметр. Числовое значение: 1 или 0. Данный параметр снимает или устанавливает флаг ''Только обороты'' для данного субконто счета. Если параметр не используется, то флаг ''Только обороты'' не меняется.
5 Andreyyy
 
16.03.11
15:33
Я так понял, только методом перебора.
6 ДенисЧ
 
16.03.11
15:34
(5) Телепатические методы введут в 1с 10.4. Дождись.
7 1Сергей
 
16.03.11
15:36
(5) ну да, три субконто перебрать, это ж пипец сколько мучится надо
8 zak555
 
16.03.11
15:36
(7) два
9 Andreyyy
 
16.03.11
15:37
(7) Привык уже к восьмерке, отсюда и капризы.
10 ДенисЧ
 
16.03.11
15:38
(9) 8ка сушит мозг...
11 zak555
 
16.03.11
15:38
(9) там иначе делается ? о_О
12 acsent
 
16.03.11
15:38
(9) Однобитный?
13 Креатив
 
16.03.11
15:41
(0)Напиши просто
Операция.Кредит.Субконто(ВидыСубконто.ВидыНоменклатуры, ВидНоменклатуры);
С точки зрения общей стилистики программирования это плохо, но 1с позволяет.
14 Andreyyy
 
16.03.11
15:44
(11)

ПланСчетовВидыСубконто.<Имя плана счетов> (ChartOfAccountsExtDimensionTypes.<Имя плана счетов>)
Найти (Find)
Синтаксис:

Найти(<Значение>, <Колонки>)
Параметры:

<Значение> (обязательный)

Тип: Произвольный. Искомое значение.
<Колонки> (необязательный)

Тип: Строка. Список имен колонок, в которых будет осуществляться поиск, разделенных запятыми.
Если параметр не указан, поиск осуществляется по всей табличной части.
Значение по умолчанию: Пустая строка
Возвращаемое значение:

Тип: Строка табличной части; Неопределено. Если значение не найдено, возвращает значение Неопределено
Описание:

Осуществляет поиск значения в указанных колонках табличной части.

Доступность:

Сервер, толстый клиент, внешнее соединение.
15 Andreyyy
 
16.03.11
15:46
(13) Спасибо, самое оно.
16 zak555
 
16.03.11
15:48
(14) см. в (13)
разве не тоже самое ?
17 TeddySlaf
 
16.03.11
16:17
я через Попытку-Ислючение делаю:

   Попытка
       Операция.Кредит.Контрагент= РаздУчета;
   Исключение
   КонецПопытки;    
   Попытка
       Операция.Кредит.ДоговорА  = пДоговорА;
   Исключение
   КонецПопытки;    
   Попытка
       Операция.Кредит.Арендатор = ПринятоОт;
   Исключение
   КонецПопытки;    
   Попытка
       Операция.Кредит.Услуга    = пУслуга;
   Исключение
   КонецПопытки;    
   Попытка    
       Операция.Кредит.ДвиженияДенежныхСредств = ДДС;
   Исключение
   КонецПопытки;    
18 Andreyyy
 
16.03.11
16:17
(16) Не с кем поговорить ?
Вопрос свой посмотри, он раньше ответа(13).
19 zak555
 
16.03.11
16:18
(17) ужас !

(18) я спроси : (13) и (14) разве не тоже самое ?
20 Andreyyy
 
16.03.11
16:18
(17) Да некрасиво как-то на мой взгляд конструкцию "Попытка Исключение" использовать в обработке проведения.
21 Andreyyy
 
16.03.11
16:19
(19) Ты в (11) посмотри на свой вопрос.
22 zak555
 
16.03.11
16:25
вообщем :

Операция.Кредит.Субконто(ВидыСубконто.ВидыНоменклатуры, ВидНоменклатуры);

аналогично

Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.ВидыНоменклатуры] = ВидНоменклатуры;


=)
23 Andreyyy
 
16.03.11
16:28
(22) Согласен !))
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн