|
Как внести проводку, новой позиции! | ☑ | ||
---|---|---|---|---|
0
Ленулькин
14.08.13
✎
10:45
|
Есть новая позиция (Сыр) как ее внести в проводку чтобы он падал на счет 41.01 а он автоматически падает на счет 004.01. Подскажите как мне внести проводку? Спасибо
//*************08.06 ЭтотОбъект.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.НеЗачитывать; ЭтотОбъект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.НайтиПоКоду("62.01"); ЭтотОбъект.Склад = Справочники.Склады.НайтиПоКоду("00001"); ЭтотОбъект.Организация = Справочники.Организации.НайтиПоКоду("00003"); Выборка = Справочники.ДоговорыКонтрагентов.Выбрать(, ЭтотОбъект.Контрагент.Ссылка); ЭтотОбъект.ВалютаДокумента = Справочники.Валюты.НайтиПоКоду("643"); Пока Выборка.Следующий()=Истина Цикл Если Выборка.Организация<>Справочники.Организации.НайтиПоКоду("00003") Тогда Продолжить; КонецЕсли; Если выборка.ПометкаУдаления<>Истина Тогда ЭтотОбъект.ДоговорКонтрагента = Выборка.Ссылка; КонецЕсли; КонецЦикла; Для каждого ТС из Товары Цикл Если (ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("01829")) <> Истина) Тогда ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("004.01"); иначе ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("41.04"); КонецЕсли; ТС.СчетДоходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.01.1"); ТС.СчетУчетаНДСПоРеализации = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.03"); ТС.СчетРасходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.02.1"); ТС.Субконто = ТС.Номенклатура.НоменклатурнаяГруппа; если (тс.ЦенаПоступления>тс.цена) или (тс.ЦенаПоступления=0) тогда // тс.ЦенаПоступления=тс.Цена; конецесли; КонецЦикла; //*************08.06 Код у сыров (02026) Помогите пожалуйта нужно срочно!( |
|||
1
Maxus43
14.08.13
✎
10:47
|
ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("004.01");
сама туда ложишь |
|||
2
Maxus43
14.08.13
✎
10:47
|
про код вообще - я помолчу лучше
|
|||
3
Ленулькин
14.08.13
✎
10:52
|
Я не поняла что ложить????
У меня при обмене в реализации выходит либо 41.01 на коде (01829), если я добаляю код (02026), то (01829) падает на счет 004.01 а мне нужно чтобы они оба падали на счет 41.01 Объясните пожалуйста если Вы знаете? |
|||
4
Maxus43
14.08.13
✎
10:54
|
Положи Сыр с кодом 02026 в группу справочника с кодом 01829
|
|||
5
Ленулькин
14.08.13
✎
10:55
|
Нет так нельзя, в коде 01829 у меня масло, я не могу их смешивать! Еще как нибудь возможно?
|
|||
6
Wobland
14.08.13
✎
10:57
|
это что, система учёта критична к тому, в какой группе находится номенклатура?
|
|||
7
Ленулькин
14.08.13
✎
10:57
|
Для нашего бухгалтера критично!
|
|||
8
Wobland
14.08.13
✎
10:59
|
(7) да поровну на вашего бухгалтера. если сменить родителя, всё поломается или нет?
|
|||
9
hhhh
14.08.13
✎
11:00
|
(7) Если (ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("01829")) <> Истина)
И ТС.Номенклатура <> Справочники.Номенклатура.НайтиПоКоду("02026") Тогда ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("004.01"); иначе ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("41.04"); КонецЕсли; |
|||
10
Ленулькин
14.08.13
✎
11:01
|
Положила я сыр в эту группу, сделала обмен, только все равно он падает на счет 004.01. Не помогло((((
|
|||
11
palpetrovich
14.08.13
✎
11:01
|
(9) :)
|
|||
12
hhhh
14.08.13
✎
11:01
|
(8) в типовой БП то же самое. Группы в справочнике ПРОДУКЦИЯ, ТОВАРЫ, УСЛУГИ и т.д.
|
|||
13
acsent
14.08.13
✎
11:02
|
в бп счета задаются через регистр
|
|||
14
salvator
14.08.13
✎
11:03
|
Положите сыр на место!
|
|||
15
Ленулькин
14.08.13
✎
11:04
|
Сыр даво уже на месте
|
|||
16
Ленулькин
14.08.13
✎
11:09
|
Для каждого ТС из Товары Цикл
Если (ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("01829")) <> Истина) И ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("02026") )Тогда ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("004.01"); иначе ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("41.04"); КонецЕсли; ТС.СчетДоходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.01.1"); ТС.СчетУчетаНДСПоРеализации = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.03"); ТС.СчетРасходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.02.1"); ТС.Субконто = ТС.Номенклатура.НоменклатурнаяГруппа; если (тс.ЦенаПоступления>тс.цена) или (тс.ЦенаПоступления=0) тогда // тс.ЦенаПоступления=тс.Цена; конецесли; КонецЦикла Вот Сделала как Вы писали, только все равно не получается так и падает этот гребанный сыр на счет 004.01 |
|||
17
Масянька
14.08.13
✎
11:11
|
(16) А где условие: И ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("02026") )Тогда
|
|||
18
salvator
14.08.13
✎
11:12
|
(16) Сыр - это 02026?
|
|||
19
Ленулькин
14.08.13
✎
11:12
|
да сыр по группе 02026
|
|||
20
salvator
14.08.13
✎
11:13
|
(19) Ну что написала, то и получаешь.
Сыр попадает на 004.01 |
|||
21
Maxus43
14.08.13
✎
11:15
|
(19) не путайся в показаниях. код самого сыра какой?
|
|||
22
Масянька
14.08.13
✎
11:15
|
(19) Еще раз:
у тебя - И ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("02026") )Тогда а надо И ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("02026")<>Истина )Тогда |
|||
23
Maxus43
14.08.13
✎
11:15
|
Ну и в (9) был совершенно другой код, вы даже скопипастить не можете
|
|||
24
acsent
14.08.13
✎
11:16
|
не И а ИЛИ
|
|||
25
Гефест
14.08.13
✎
11:17
|
Без фото (не сыра) точно не взлетит
|
|||
26
Ленулькин
14.08.13
✎
11:21
|
Для каждого ТС из Товары Цикл
Если (ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("01829")) Или ТС.Номенклатура.ПринадлежитЭлементу(Справочники.Номенклатура.НайтиПоКоду("02026"))) <> Истина Тогда ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("004.01"); иначе ТС.СчетУчета = ПланыСчетов.Хозрасчетный.НайтиПоКоду("41.04"); КонецЕсли; ТС.СчетДоходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.01.1"); ТС.СчетУчетаНДСПоРеализации = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.03"); ТС.СчетРасходов = ПланыСчетов.Хозрасчетный.НайтиПоКоду("90.02.1"); ТС.Субконто = ТС.Номенклатура.НоменклатурнаяГруппа; если (тс.ЦенаПоступления>тс.цена) или (тс.ЦенаПоступления=0) тогда // тс.ЦенаПоступления=тс.Цена; УРА!!!!!УРАА!!!! Вроде все получилось! |
|||
27
Ленулькин
14.08.13
✎
11:22
|
Спасибо большое за помощь всем!)))) Большушеееее
|
|||
28
Масянька
14.08.13
✎
11:22
|
(26) Повезло. Но везение - странная штука.....
|
|||
29
Wobland
14.08.13
✎
11:23
|
(27) это не помощь, а наматывание изоленты на кривые костыли. код выкинуть, программиста позвать
|
|||
30
Ленулькин
14.08.13
✎
11:33
|
Ок спасибо за совет!
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |