|   |   | 
| 
 | Регистры накопления 8,2 | ☑ | ||
|---|---|---|---|---|
| 0
    
        KonstantinK90 26.04.16✎ 08:47 | 
        Всем привет! Помогите разобраться с проблемой! Есть обработка с табличной часть она показывает остатки по Основным средствам. К примеру Основное средство числится в остатках в кол.-2 мне нужно сделать так что бы отредактировать 1 запись ос и добавить 2 запись вот ниже код там все понятно что я хочу сделать единственно мой код стирает все данные в моем регистре! в чем дело помогите!
 Процедура Кнопка1Нажатие1(Элемент) // Вставить содержимое обработчика. Если УстановитьИнвНомер Тогда нзРег1 = РегистрыНакопления.ОсновныеСредстваВРазрезе.СоздатьНаборЗаписей(); нзРег1.Отбор.Регистратор.Значение = ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока.Регистратор; нзРег1.Прочитать(); тзРег1 = нзРег1.Выгрузить(); ТекСтрока = ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока; //Для Каждого Стр из ТабличноеПоле1 Цикл СтркПоиска = Новый Структура("ОС,Склад",ТекСтрока.ОС,ТекСтрока.Склад); МасСтрТзРег1 = тзРег1.НайтиСтроки(СтркПоиска); Если ТекСтрока.Установить Тогда Для Каждого СтрТзРег1 Из МасСтрТзРег1 Цикл //Поиск нужной строки КолПозиций = СтрТзРег1.Количество - 1; СтрТзРег1.ИнвентарныйНомер = ТекСтрока.ИнвентарныйНомер; КонецЦикла; Иначе Сообщить("Признак установить не установлен!"); КонецЕсли; нзРег1.Загрузить(тзРег1); НзРег1.Записать(Истина); //Если позиции остались тогда бобавим новые Если КолПозиций > 0 Тогда //Для А=1 По КолПозиций Цикл Движения = РегистрыНакопления.ОсновныеСредстваВРазрезе.СоздатьНаборЗаписей(); Движения.Прочитать(); Для Каждого Стр Из ТабличноеПоле1 Цикл Если Стр.НомерСтроки = "1" Тогда Иначе Движение = Движения.Добавить(); Движение.ВидДвижения = ВидДвиженияНакопления.Приход; Движения.Отбор.Регистратор.Установить(ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока.Регистратор); Движение.Период = ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока.Регистратор.Дата; Движение.ОС = Стр.ОС; Движение.Склад = Стр.Склад; Движение.Регистратор = ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока.Регистратор; //Движение.Количество = Стр.Количество; //Движение.Сумма = Стр.Сумма; Движение.ИнвентарныйНомер = Стр.ИнвентарныйНомер; Движение.Коментарий = Стр.Коментарий; //ДвиженияПоРег = Истина; //ПартияДвижения = Стр.Партия; КонецЕсли; КонецЦикла; Движения.Записать(Истина); // КонецЦикла; КонецЕсли; КонецЕсли; КонецПроцедуры | |||
| 1
    
        HardBall 26.04.16✎ 09:00 | 
        1.Сначала создал набор записей. 
 2.Потом отобрал по регистратору. 3.Даобавил движения. 4.Записал. И все в цикле | |||
| 2
    
        KonstantinK90 26.04.16✎ 09:00 | 
        Можно ли как сделать?     | |||
| 3
    
        luter-89 26.04.16✎ 09:02 | 
        (0) Стирает, потому что набор читаешь     | |||
| 4
    
        KonstantinK90 26.04.16✎ 09:06 | 
        покажите на коде коекретно у меня ошибки потому что прочитать убираю и все равно перетирает     | |||
| 5
    
        ДенисЧ 26.04.16✎ 09:07 | 
        Перед чтением отбор по регисратору поставь     | |||
| 6
    
        KonstantinK90 26.04.16✎ 09:11 | 
        ага точно!     | |||
| 7
    
        KonstantinK90 26.04.16✎ 09:12 | 
        перетирать перестал как сделать если остаток 2 и в регистре одна запись по Основному средству, а мне нужно сделать 2 записи в регистре с разными инвентарными номерами?     | |||
| 8
    
        luter-89 26.04.16✎ 09:15 | 
        (7) Удали ту запись, сделай новые)     | |||
| 9
    
        luter-89 26.04.16✎ 09:15 | 
        (7) Только входишь в профессию?     | |||
| 10
    
        luter-89 26.04.16✎ 09:16 | 
        Вопрос не совсем понятен     | |||
| 11
    
        KonstantinK90 26.04.16✎ 09:16 | 
        по пробую объяснить что я хочу     | |||
| 12
    
        KonstantinK90 26.04.16✎ 09:27 | 
        Есть рег.Н по основным средствам (ОС)  я его скопировал и добавил измерения склад,Инвентарный номер перенес все остатки из основного рег.н. в свой и теперь хочу заполнить инвентарные номера по ос     | |||
| 13
    
        KonstantinK90 26.04.16✎ 09:28 | 
        т.е если ос остаток 2 то нужно мне установить им инвентарные номера и ос должно получиться 2 записи с инвентарными номерами     | |||
| 14
    
        KonstantinK90 26.04.16✎ 09:29 | 
        вот как мне такое сделать не могу придумать     | |||
| 15
    
        luter-89 26.04.16✎ 09:31 | 
        А инвентарные номера откуда берутся? В первоначальном регистре их не было.     | |||
| 16
    
        luter-89 26.04.16✎ 09:31 | 
        И как ты заполняешь новый регистр? или заполнял     | |||
| 17
    
        KonstantinK90 26.04.16✎ 09:33 | 
        создал обработку выгрузил остатки в табличную часть и создал заись в новый рег.н.     | |||
| 18
    
        luter-89 26.04.16✎ 09:35 | 
        А инвентарные номера где берешь?     | |||
| 19
    
        KonstantinK90 26.04.16✎ 09:41 | 
        человек в обработке будет указывать     | |||
| 20
    
        KonstantinK90 26.04.16✎ 09:41 | 
        для каждой позиции     | |||
| 21
    
        luter-89 26.04.16✎ 09:43 | 
        Как-то это все криво     | |||
| 22
    
        AceVi 26.04.16✎ 09:46 | 
        (20) 
 Есть же стандартный документ корректировка регистров работай через него. | |||
| 23
    
        luter-89 26.04.16✎ 09:48 | 
        (22) Он как бы уже данные загрузил в регистр,  а теперь его нужно перекрыжить,  как я понял     | |||
| 24
    
        KonstantinK90 26.04.16✎ 09:58 | 
        как это сделать     | |||
| 25
    
        luter-89 26.04.16✎ 10:02 | 
        (24) Тебе надо перекрыжить уже загруженный регистр, так? И раз это регистр накопления, то есть регистратор. Смотри регистратор ,который сделал движение с количеством 2, или регистраторы ,которые привели к такому остатку. Вот их и редактируй     | |||
| 26
    
        AceVi 26.04.16✎ 10:04 | 
        (23) (24) Че ты там и как загрузил? если у регистра есть регистратор? вот и правь в регистраторе, или как я сказал правь стандартным документом корректировка регистров = делай там 2 движения 1) минусует что было 2) делает новые записи с инв номерами.     | |||
| 27
    
        KonstantinK90 26.04.16✎ 10:19 | 
        к примеру остаток 2 нужно сделать 
 Для А=1 По Остаток = 2 Цикл //Как сделать 2 записи //1 запись с таким инвентарным номером //а 2 запись с другим инвентарным номером добавить КонецЦикла | |||
| 28
    
        KonstantinK90 26.04.16✎ 10:20 | 
        нет типового документа редактирования рег.Н     | |||
| 29
    
        luter-89 26.04.16✎ 10:25 | 
        (28) Что за конфигурация? (27) Тебе же сказали правь регистратор     | |||
| 30
    
        AceVi 26.04.16✎ 10:39 | 
        (28) КорректировкаЗаписейРегистров - можно корректировать любые регистры, кроме зарплатных.     | |||
| 31
    
        KonstantinK90 26.04.16✎ 10:40 | 
        "ДАЛИОН: АвтоМаркет", ред. 1.2 (1.2.3.2) (http://www.auto.dalion.ru)
 СофтБаланс (http://www.auto.dalion.ru) | |||
| 32
    
        AceVi 26.04.16✎ 11:07 | 
        (31) Вполне допускаю что в такой конфигурации должен быть похожий документ.
 Если нет, то в любом случае должны быть документы прихода и расхода по твоему регистру. вот оперируй ими. спиши что есть сейчас и прими по новой. | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |