![]() |
![]() |
![]() |
|
Движения по новому регистру. | ☑ | ||
---|---|---|---|---|
0
capllary
26.02.15
✎
09:28
|
Народ, прошу сразу не пинать, первый раз делаю движения по регистрам.
И вот такой вопрос как прописать, чтобы при наличии не заполненного значения из таблицы значений не заполнялся и регистр, а то в регистре куча пустых значений. Пробовал так прописать - не помогает. Процедура ЗаполнениеДиженийПоРегиструНакопленияРПР() // регистр РезервыПредстоящихРасходов Приход Движения.РезервыПредстоящихРасходов.Очистить(); Для Каждого ТекСтрокаРезервыОО Из РезервыОО Цикл Движение = Движения.РезервыПредстоящихРасходов.Добавить(); Движение.ВидДвижения = ВидДвиженияНакопления.Приход; Движение.Период = Дата; Движение.Сотрудник = ТекСтрокаРезервыОО.Сотрудник; Движение.ОстаткиОтпусков = ТекСтрокаРезервыОО.СуммаНачислено; //Движение.ИспользованоОО = -ТекСтрокаРезервыОО.СуммаИспользовано; КонецЦикла; Для Каждого ТекСтрокаРезервыОО Из РезервыОО Цикл Движение = Движения.РезервыПредстоящихРасходов.Добавить(); Движение.ВидДвижения = ВидДвиженияНакопления.Расход; Движение.Период = Дата; Движение.Сотрудник = ТекСтрокаРезервыОО.Сотрудник; Если ЗначениеЗаполнено(ТекСтрокаРезервыОО.СуммаИспользовано) ИЛИ НЕ ПустаяСтрока(ТекСтрокаРезервыОО.СуммаИспользовано) Тогда Движение.ОстаткиОтпусков = ТекСтрокаРезервыОО.СуммаИспользовано; КонецЕсли; //Движение.ИспользованоОО = -ТекСтрокаРезервыОО.СуммаИспользовано; КонецЦикла; КонецПроцедуры |
|||
1
Godofsin
26.02.15
✎
09:30
|
Проверку заполнения установи
|
|||
2
Godofsin
26.02.15
✎
09:30
|
У реквизита ТЧ
|
|||
3
Лефмихалыч
26.02.15
✎
09:30
|
Для Каждого ТекСтрокаРезервыОО Из РезервыОО Цикл
Если не ЗначениеЗапронено() Тогда Продолжить; КонецЕсли; и вот тут уже все остальное |
|||
4
Cube
26.02.15
✎
09:31
|
Для Каждого ТекСтрокаРезервыОО Из РезервыОО Цикл
Если ЗначениеЗаполнено(ТекСтрокаРезервыОО.СуммаИспользовано) ИЛИ НЕ ПустаяСтрока(ТекСтрокаРезервыОО.СуммаИспользовано) Тогда Движение = Движения.РезервыПредстоящихРасходов.Добавить(); Движение.ВидДвижения = ВидДвиженияНакопления.Расход; Движение.Период = Дата; Движение.Сотрудник = ТекСтрокаРезервыОО.Сотрудник; Движение.ОстаткиОтпусков = ТекСтрокаРезервыОО.СуммаИспользовано; //Движение.ИспользованоОО = -ТекСтрокаРезервыОО.СуммаИспользовано; КонецЕсли; КонецЦикла; |
|||
5
mikecool
26.02.15
✎
09:37
|
(4) а анфига ПустаяСтрока(ТекСтрокаРезервыОО.СуммаИспользовано) ?
|
|||
6
Cube
26.02.15
✎
09:40
|
(5) Это тупой копипаст, я даже не вникал, просто переставил строки "шоб работало как надо" :)
|
|||
7
capllary
26.02.15
✎
09:40
|
(3) Спасибо.
|
|||
8
Крошка Ру
26.02.15
✎
09:57
|
(3) "ЗначениеЗапронено()"
Хорошая функция, надо взять на вооружение. |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |