Имя: Пароль:
1C
1С v8
Как в БП 3.0 организовать кассу по обособленному подразделению?
0 Мисти
 
24.02.14
14:28
Нумерация должна быть отдельная и кассовая книга отдельная.
1 Мисти
 
24.02.14
14:29
Если у организации имеется несколько касс (в обособленных подразделениях), имеется возможность формирования отдельных разделов кассовой книги по каждому подразделению. Для этого должен быть установлен флажок "Подразделение" и выбрано нужное подразделение.
- это в справке к кассовой книге. Но реквизита "подразделение" в ней нет!
2 fmrlex
 
24.02.14
14:31
(1) Может быть программа не знает, что есть обособленные подразделения?
3 Мисти
 
24.02.14
14:33
Может быть! Пока не могу найти - это где-то задается?
4 Мисти
 
24.02.14
14:35
"В редакции 3.0 ведение обособленных подразделений предусмотрено только, если у вас Бухгалтерия предприятия КОРП" - а вот это - правда?
5 fmrlex
 
24.02.14
14:36
(4) Истинная.
6 Мисти
 
24.02.14
14:38
А как на нее перейти, если пока стоит просто 3.0?
Или доделать кусочек, связанный с кассовой книгой? (пока больше ничего не надо)
7 El_Duke
 
гуру
24.02.14
14:46
(6) накатить дистрибутив перехода
если в жинзи мало сложностей - можно "доделать кусочек"
8 Поpyчик-4
 
24.02.14
14:52
(6)

1. Посмотреть, как сделано в КОРП,
2. Портировать в обычную.
3. PRO..., обрадовать бухов
9 fmrlex
 
24.02.14
14:53
(8) 4. Пройти профилактическое лечение после употребления антидепрессантов...
10 Мисти
 
24.02.14
15:17
(8) Так и делаю!
11 Aleksey
 
24.02.14
15:21
(10) Интересно что проще, каждое обновление допиливать ПКО/РКО/ план счетов, кассовую книгу
Или разово заплатить 15 тысяч за апгрейд до КОРПа?
12 El_Duke
 
гуру
24.02.14
15:57
(11) ну видимо второе предположение из (7) в точку
жизнь скучна, мало адреналина и проч.
13 hhhh
 
24.02.14
16:16
(11) на самом деле нет. ей же не весь КОРП нужен. Поэтому надо заплатить 15 тыс. и еще вырезать оттуда, то что не касается кассовой книги. Весь остальной КОРП.
14 Мисти
 
24.02.14
16:26
(13) Вот именно! Я посоветовалась с теми, кто уже мудохался этим путем. Говорят - значительно проще добавить.
Удивительно, что текст формы документа ПКО совпадает!!
15 Мисти
 
24.02.14
16:40
Отладчик говорит, что
ЭтаФорма.Элементы.ПодразделениеОрганизации.Видимость = Истина, а нет этого реквизита в документе!
16 Мисти
 
24.02.14
16:45
Нашла константу "вести учет по подразделениям"!
17 Мисти
 
24.02.14
16:48
Как интересно! А установить ее невозможно - сбрасывается галочка!
18 El_Duke
 
гуру
24.02.14
16:50
(14) не тех советников выбрала
19 Мисти
 
24.02.14
16:51
Процедура ПередЗаписью(Отказ)
    
    Значение = Ложь;
    
КонецПроцедуры

Видимо, этим одна от другой и отличаются!
20 Мисти
 
24.02.14
17:06
Почему подразделение-то не видно??
21 Мисти
 
24.02.14
17:23
ЭтаФорма.Элементы.ПодразделениеОрганизации.Видимость = Истина; - написала на всякий случай при создании - всё равно не видать подразделения!
22 Зойч
 
24.02.14
17:26
Сначала кассу отдельную подавай. Потом отдельный баланс, потом всякие расчеты налогов на прибыль.
Полдумай
23 Мисти
 
24.02.14
17:27
Не-а, клялись, что  скоро и кассы отдельной не будет! Просто пока оформлена на другую налоговую инспекцию.
24 Мисти
 
24.02.14
17:43
Процедура УправлениеФормой(Форма)
    
    Элементы = Форма.Элементы;
    Объект   = Форма.Объект;
    
    Элементы.ПорядокОтраженияАванса.Доступность = НЕ Объект.РучнаяНастройка_УСН;
    Элементы.СчетУчетаРасчетовСКонтрагентомРозничнаяВыручка.Доступность = НЕ (Объект.ВыручкаСНТТ И Форма.УчетВПродажныхЦенах);
    Элементы.Патент.Доступность = Объект.ДеятельностьНаПатенте ИЛИ Форма.ПрименяетсяТолькоУСНПатент;
    
    Если Объект.ВидОперации = ПредопределенноеЗначение("Перечисление.ВидыОперацийПКО.ПрочийПриход") Тогда
        УстановитьЗаголовкиИДоступностьСубконто(Форма, Объект.СчетУчетаРасчетовСКонтрагентом);
        Элементы.Контрагент.Доступность = Ложь;
    Иначе
        Элементы.Контрагент.Доступность = Истина;
    КонецЕсли;
    
    Если Форма.ПрименяетсяУСНПатент И Объект.ВыручкаСНТТ И Форма.УчетВПродажныхЦенах Тогда
        Элементы.ГруппаСчетУчетаРасчетовПатент.ТекущаяСтраница = Элементы.ГруппаПатент;
    Иначе
        Элементы.ГруппаСчетУчетаРасчетовПатент.ТекущаяСтраница = Элементы.ГруппаСчетУчетаРасчетов;
    КонецЕсли;
    
    Если Форма.ПрименяетсяТолькоУСНПатент Тогда
        Элементы.ГруппаДеятельностьНаПатенте.ТекущаяСтраница   = Элементы.ГруппаНадписьПатент;
    ИначеЕсли Форма.ПрименяетсяУСНПатент Тогда
        Элементы.ГруппаДеятельностьНаПатенте.ТекущаяСтраница   = Элементы.ГруппаВыборДеятельностиНаПатенте;
    КонецЕсли;
    
    Элементы.ВалютаДокумента.Доступность = Форма.ОплатаВВалюте
        И Объект.ВидОперации <> ПредопределенноеЗначение("Перечисление.ВидыОперацийПКО.ВозвратЗаймаРаботником");
    
    УстановитьДоступностьКнопкиКУДиР(Форма);
    
    ОбновитьИтоги(Форма);
    
КонецПроцедуры
25 Мисти
 
24.02.14
17:43
Всякое разное там устанавливается, но только не подразделение!
26 Зойч
 
24.02.14
17:47
Ибо функциональная опция
27 Мисти
 
24.02.14
17:51
(26) Ну и что? Нельзя ее как-нибудь смоделировать?
Я пока не нашла, где она проверяется и задается?
Подозреваю, что если я поставлю галку-таки в константу, то у меня эти подразделения появятся везде, как и в КОРП.
28 Мисти
 
24.02.14
18:06
Думала обманула - добавила новый элемент формы с тем же значением - не, моего тоже не видно.
29 Мисти
 
24.02.14
18:07
Короче - не получится включить их существующий кусочек?
Добавить реквизит?
30 Зойч
 
24.02.14
18:18
(27) Именно так
31 Зойч
 
24.02.14
18:19
зайди в свойства реквизита в конфигурации
32 Мисти
 
24.02.14
18:31
Уже 10 раз заходила! Ничего там криминального не вижу.
33 Зойч
 
24.02.14
18:33
Отключи реквизит от функционально опции
34 Мисти
 
24.02.14
18:39
На закладке "дополнительно"?
А эта галка, зараза, не снимается!
35 Зойч
 
24.02.14
18:41
Зайди через функциональную опцию
36 Мисти
 
24.02.14
18:53
А там я уже была, там эта галка не ставится! (а все остальные - пожалуйста)
Обложили, короче.
Ничего, добавлю свой реквизит и "учет по подразделениям" на счете 50.1 (или на 50 целиком?)
37 Зойч
 
24.02.14
18:58
Включи возможность поддержки вначале
38 Мисти
 
24.02.14
18:58
(37) Уже давно! У меня там всё перелопачено.
39 Мисти
 
24.02.14
18:59
Может, правда, это было подгружено с обновлением?
40 Зойч
 
24.02.14
18:59
(38) Не заходи через дополнитьельно, заходи через свойства опции
41 PiVa123
 
24.02.14
19:05
Уже читайте не только ваши посты

v8: Не могу найти отображение элемента на форме
42 Мисти
 
24.02.14
19:06
Ура! И правда, недавно появилось, уже после снятия замочков!
43 Мисти
 
24.02.14
19:07
(41) Ну и что, это я тоже уже откопала.
44 Мисти
 
24.02.14
19:10
Вау! Сняла галку, теперь ПКО вообще не создается! Открывается странная пустая форма.
Всё, ну его, пойду своим путем.
45 Torquader
 
24.02.14
19:21
(44) А ту галку-то сняли ?
46 Мисти
 
24.02.14
19:32
(45) Наоборот, я обе поставила!
Обе сняла - теперь открылось. Уф.
47 Torquader
 
24.02.14
19:34
(46) Ну что, вас можно с победой поздравлять или лучше бы не открылось ?
48 Мисти
 
24.02.14
19:34
Не, всё равно лучше свое сделаю. В проводки не попадает!
Всё равно "пешком" делать.
49 Мисти
 
24.02.14
19:39
Всякие доп. реквизиты в подразделении организации тоже заводить наверное, заново, для симметрии.
50 Torquader
 
24.02.14
19:39
(48) А что мешает данные удалённой кассы писать в основную кассовую книгу организации, особенно - если это временно ?
51 Torquader
 
24.02.14
19:40
(49) А не проще ли вообще сделать организацию-дубль ?
52 Мисти
 
24.02.14
19:44
Какие-то у них требования, правила, не знаю. Так надо! Отдельная нумерация и отдельная кассовая книга.
53 Torquader
 
24.02.14
19:50
(52) Понимаешь, прежде чем программировать - нужно подумать и уточнить, а что они хотят.
Отдельная книга будет предполагать отдельный учёт или что они хотят - только отдельную нумерацию документов с отбором, но тогда книга-то, по большому счёту, будет общей.
54 Aleksey
 
24.02.14
20:17
(14) У меня корп. Подразделения можно не заполнять, а пустое подразделение - это все равно что БП Проф

А что для вас разница между корп и проф как между УТ10 и УТ11?

Для моих бухов - только в видимости одного реквизита в документе от отчетах, т.е. нет разницы
55 Aleksey
 
24.02.14
20:17
(52) помимо нумерации документов, есть еще нумерация листов кассовой книги
56 Мисти
 
24.02.14
20:18
(53) Почему книга будет общей?
Ну и нумерации будет 2, подумаешь!
57 Мисти
 
24.02.14
20:25
Надеюсь, хоть в регистре удастся воспользоваться существующим подразделением.
58 Мисти
 
24.02.14
21:44
&НаСервере
Процедура Кос_ПослеПроведенияПКОиРКООбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
    НаборХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
    НаборХозрасчетный.Отбор.Регистратор.Установить(Источник.Ссылка);
    НаборХозрасчетный.Прочитать();
    Если  НаборХозрасчетный.Количество()=0 Тогда
        Источник.Движения.НаборХозрасчетный.Записать(Ложь);
        НаборХозрасчетный.Отбор.Регистратор.Установить(Источник.Ссылка);
        НаборХозрасчетный.Прочитать();
    КонецЕсли;
    Для Каждого Движ из НаборХозрасчетный Цикл
        Если Источник.Метаданные().Имя = "ПриходныйКассовыйОрдер" Тогда        
            Если Движ.СчетДт.Код = "50.01" или  Движ.СчетДт.Код = "50.02" Тогда
                Движ.ПодразделениеДт = Источник.Кос_ПодразделениеОрганизации;
            КонецЕсли;
        Иначе
            Если Движ.СчетКт.Код = "50.01" или  Движ.СчетКт.Код = "50.02" Тогда
                Движ.ПодразделениеКт = Источник.Кос_ПодразделениеОрганизации;
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;
    Источник.ОбменДанными.Загрузка = Истина;
    НаборХозрасчетный.Записать();
59 Мисти
 
24.02.14
21:44
Почему мое подразделение не записалось?
60 Мисти
 
24.02.14
21:45
В отладчике вижу его даже после записи НаборХозрасчетный[0]
А в ДК - нет. Вручную в проводках можно выбрать!
61 Мисти
 
24.02.14
22:01
Процедура СформироватьОтчет(Знач ПараметрыОтчета, АдресХранилища) Экспорт
    
    ДатыЛистовСОшибками = Новый Массив;
    ПараметрыОтчета.СписокСформированныхЛистов.Очистить();
    
    СформироватьЛистыКассовйКниги(ПараметрыОтчета, ДатыЛистовСОшибками);
    
    ВозвращаемыеПараметры = Новый Структура("СписокСформированныхЛистов, ДатыЛистовСОшибками",
        ПараметрыОтчета.СписокСформированныхЛистов, ДатыЛистовСОшибками);
    ПоместитьВоВременноеХранилище(ВозвращаемыеПараметры, АдресХранилища);
    
КонецПроцедуры

Это из кассовой книги
Параметры отчета - это хто-о?
Это не реквизиты!
62 Мисти
 
24.02.14
23:39
Жду советов!
63 Aleksey
 
25.02.14
10:52
(62) переходи на КОРП, там это реализовано
64 Мисти
 
25.02.14
11:54
Нет, ну мы уже решили без корп обойтись.
Что я не так сделала при записи подразделения? Осталось-то чуть-чуть!
65 Йохохо
 
25.02.14
12:08
кассовую книгу то из корп взяли? там всего делов было на пару часов, лучше сделайте с нуля еще раз
66 Мисти
 
25.02.14
12:17
Так мне кажется, корп и не корп практически не отличаются, просто в некорп возможности корп "заглушены". По крайней мере, текст формы рко совпадает дословно.
67 Йохохо
 
25.02.14
12:19
об чем и речь, перетащить форму кассовой книги и пару реквизитов, перепровести по подразделению
68 Мисти
 
25.02.14
12:25
Сейчас проверю, но по-моему, и форма кассовой книги совпадает., только отключена функциональная опция.
Исправила 2 ошибки, теперь уже совсем непонятно - вообще движения не записываются. что я сделала не так?

НаборХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
    НаборХозрасчетный.Отбор.Регистратор.Установить(Источник.Ссылка);
    НаборХозрасчетный.Прочитать();
    Если  НаборХозрасчетный.Количество()=0 Тогда
        Источник.Движения.Хозрасчетный.Записать(Ложь);
        НаборХозрасчетный.Отбор.Регистратор.Установить(Источник.Ссылка);
        НаборХозрасчетный.Прочитать();
    КонецЕсли;
    Для Каждого Движ из НаборХозрасчетный Цикл
        Если Источник.Метаданные().Имя = "ПриходныйКассовыйОрдер" Тогда        
            Если Движ.СчетДт.Код = "50.01" или  Движ.СчетДт.Код = "50.02" Тогда
                Движ.ПодразделениеДт = Источник.Кос_ПодразделениеОрганизации;
            КонецЕсли;
        Иначе
            Если Движ.СчетКт.Код = "50.01" или  Движ.СчетКт.Код = "50.02" Тогда
                Движ.ПодразделениеКт = Источник.Кос_ПодразделениеОрганизации;
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;
    НаборХозрасчетный.ОбменДанными.Загрузка = Истина;
    НаборХозрасчетный.Записать();
69 Мисти
 
25.02.14
12:31
Я что, очистила движения, вместо того, чтоб добавить подразделение?
70 Мисти
 
25.02.14
12:41
После моей прекрасной доработки документ остался без проводок, хотя в отладчике видно, как всё читается, пишется...
71 Мисти
 
25.02.14
13:04
Ау?
72 Мисти
 
25.02.14
13:39
Попроще вопрос!
    |    ХозрасчетныйОстаткиИОбороты.Счет,
    |    ХозрасчетныйОстаткиИОбороты.Субконто1 КАК Субконто1,
    |    ХозрасчетныйОстаткиИОбороты.СуммаНачальныйОстатокДт КАК СуммаНачальныйОстатокДт,
    |    ХозрасчетныйОстаткиИОбороты.СуммаОборотДт,
    |    ХозрасчетныйОстаткиИОбороты.СуммаКонечныйОстатокКт,
    |    ХозрасчетныйОстаткиИОбороты.Субконто2 КАК Субконто2,
    |    ХозрасчетныйОстаткиИОбороты.Субконто3 КАК Субконто3
    |ИЗ
    |    РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты(&ГраницаОстатковНач, &ГраницаОстатковКон, Период, , Счет = &Счет,, ) КАК ХозрасчетныйОстаткиИОбороты
    |ГДЕ
    |    ХозрасчетныйОстаткиИОбороты.Субконто1 = &Субконто1
    |И    ХозрасчетныйОстаткиИОбороты.Субконто3 = &Субконто3";
73 Мисти
 
25.02.14
13:40
Как вот это "где" вставить в .ОстаткиИОбороты?
Я там пыталась писать Субуонто1 = &Субконто1, но она ругалась!
74 Мисти
 
25.02.14
14:05
Ну, хоть бы на 1 вопрос! А то я сразу в 2 задачках застряла.
75 Torquader
 
25.02.14
15:59
В (68) Где вообще запись хоть чего-то ?
76 Мисти
 
25.02.14
16:02
Ура.Наконец. Я так ждала!
В последней строчке.
77 Torquader
 
26.02.14
00:08
(76) Просто, очень "нравится" то, что делается в случае, когда количество записей равно 0.
Просто, ещё раз записать и ещё раз прочитать - ЗАЧЕМ - будто бы записи откуда-то появятся.
78 Мисти
 
26.02.14
00:38
(76) Так и есть! Они есть, но пока не записаны - не читаются!
Этот кусок как раз работает адекватно.
79 Torquader
 
01.03.14
00:14
(78) Не очень понял - пока не записаны - не читаются.
Если не записаны в одном объекте, то в другом их нет, а в том же самом - как они могут появиться ?
2 + 2 = 3.9999999999999999999999999999999...