Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Получение Значения из таблицы значения [v7.7 Конфигурация-Бухгалтерский учёт,редакция 4.5]

Apple2k
читатель
офлайн
Дата регистрации: 09.03.2010
Сообщений: 10
Пост №1
 
08.11.2010 15:33

"Доброго времени суток.<br><br>Собственно не могу понять, как преодолеть сие трудность:<br>Есть самописная выгрузка. Пытаюсь её дописать.<br><br>Что требуется:<br>Получить значение КодДвижения из таблицы значений ТЗ1, и на основании этого назначить переменной ВО :см. ниже<br><br>Примерно так: <br>ВО=?(КодДвижения=2,"1",0); //[Как есть сейчас- не работает, так как ]<br><br><br><br>ВО уже использую в личных целях. Там всё работает."

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №2
 
08.11.2010 15:50

"1. Если <br>> Получить значение КодДвижения из таблицы значений ТЗ1<br>То где ТЗ1 в <br>> ВО=?(КодДвижения=2,"1",0); //[Как есть сейчас- не работает, так как ]<br>Может надо так:<br>ВО=?(ТЗ1.КодДвижения=2,"1",0);<br>Учитывая, что приведен только кусочек не ясно как сделан перебор ТЗ1 через ВыбратьСтроки или циклом по индексам, а может вообще не сделан.<br>2. <br>> ВО уже использую в личных целях. Там всё работает.<br>Что бы это значило? Не боитесь переназначить переменную в самый неподходящий момент? Или просто констатация факта, что "ВО" используется правильно?"

Apple2k
читатель
офлайн
Дата регистрации: 09.03.2010
Сообщений: 10
Пост №3
 
08.11.2010 16:02

"1. При добавлении ТЗ1.КодДвижения не находит переменную ТЗ1.<br>ТЗ1 не переменная а таблица.<br><br>2. ТЗ1:<br><br> // Перебор таблиц прихода<br> <br> Если ТипОтчета=1 тогда <br> //Возвраты поставщикам<br> ТекстЗапроса = <br> "//{{ЗАПРОС(Сформировать)<br> |Период с НачДата по КонДата; <br> |ТекДок = Документ.СчетФактура.ТекущийДокумент;<br> |Контрагент = Документ.СчетФактура.Контрагент;<br> |Номенклатура = Документ.СчетФактура.Товар;<br> |НомерДок        = Документ.СчетФактура.НомерДок;<br> |ДатаДок       = Документ.СчетФактура.ДатаДок;<br> |Количество = Документ.СчетФактура.Количество; <br> |ВидОтгрузки       = Документ.СчетФактура.ВидОтгрузки;<br> |Условие (ВидОтгрузки = 2);<br> |Функция КоличествоСумма = Сумма(Количество);<br> |Группировка Номенклатура без групп;<br> |Группировка Контрагент;<br> |Группировка ТекДок;<br> |"//}}ЗАПРОС<br> ;<br> Иначе<br> //Возвраты покупателей<br> ТекстЗапроса=<br> "//{{ЗАПРОС(Сформировать)<br> |Период с (НачДата-10) по (КонДата+10);<br> |ОбрабатыватьДокументы Проведенные;<br> |ТекДок = Документ.ПоступлениеТоваров.ТекущийДокумент;<br> |Контрагент = Документ.ПоступлениеТоваров.Контрагент;<br> |Номенклатура = Документ.ПоступлениеТоваров.Товар;<br> |ТипМестаХранения = Документ.ПоступлениеТоваров.МестоХранения.ТипСклада;<br> |НомерДок = Документ.ПоступлениеТоваров.НомерДокВходящий;<br> |ДатаДок = Документ.ПоступлениеТоваров.ДатаДокВходящий;<br> |Количество = Документ.ПоступлениеТоваров.Количество; <br> |ВидПоступления = Документ.ПоступлениеТоваров.ВидПоступления; <br> |Функция КоличествоСумма = Сумма(Количество);<br> |Группировка Номенклатура без групп;<br> |Группировка Контрагент без групп;<br> |Группировка ТекДок;<br> |Условие((ДатаДок<=КонДата) и (ДатаДок>=НачДата)); <br> |Условие(ТипМестаХранения = ОптовыйСклад);<br> |Условие((ВидПоступления = 4) или (ВидПоступления = 13));<br> |"//}}ЗАПРОС ;<br> ;       <br> КонецЕсли;<br> <br> // Если ошибка в запросе, то выход из процедуры<br> Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда<br> Возврат;<br> КонецЕсли;      <br> <br> Сч=0;<br> Пока Запрос.Группировка(1) = 1 Цикл<br> Пока Запрос.Группировка(2) = 1 Цикл<br> Пока Запрос.Группировка(3) = 1 Цикл<br> <br> Сч=Сч+1; <br> Если Окр(Сч/100)=Сч/100 тогда<br> Состояние("Выгрузка запроса "+Сч);<br> КонецЕсли;                         <br> <br> Если ТипЗначенияСтр(Запрос.Номенклатура)<>"Справочник" тогда<br> Продолжить; <br> КонецЕсли; <br> <br> Если Запрос.Номенклатура.Вид()<>"Номенклатура" тогда<br> Продолжить; <br> КонецЕсли; <br> <br> Группа=Запрос.Номенклатура.Родитель;<br> Код=Число(Прав(Группа.Код,СтрДлина(Группа.Код)-2));<br> Если (Код>199) и (Код<500) тогда                                           <br> ТЗ1.НоваяСтрока();<br> ТЗ1.ВидДвижения="Возвраты";<br> <br> ТЗ1.КодДвижения =2;<br> ТЗ1.КодВ =Код; <br> ТЗ1.ГруппаВ =Группа;<br> ТЗ1.Опт =СокрЛП(Запрос.Контрагент.ТипКонтрагента);<br> ТЗ1.Опт =?(ТЗ1.Опт="Производитель"," "+ТЗ1.Опт,ТЗ1.Опт);<br> ТЗ1.Контрагент =Запрос.Контрагент;<br> ТЗ1.Количество =Запрос.КоличествоСумма*Запрос.Номенклатура.Емкость/10000; <br> ТЗ1.ТекДок =Запрос.ТекДок;<br> ТЗ1.НомерДок =Запрос.НомерДок;<br> ТЗ1.ДатаДок =Запрос.ДатаДок;<br> <br> // Разделяем по типу...<br> Адрес=РазобратьАдрес(Запрос.Контрагент.ЮридическийАдрес); <br> <br> Если СокрЛП(Адрес.ПолучитьЗначение(2))<>"Воронежская обл." Тогда<br> ТЗ1.Район="Другие регионы";<br> ТЗ1.ГР=3<br> Иначе <br> ТЗ1.Район="Воронежский регион";<br> ТЗ1.ГР=1<br> КонецЕсли;<br> <br> //Если Розница - убираем детализацию<br> Если ТЗ1.Опт="Розница" Тогда<br> ТЗ1.Район ="Розница";<br> ТЗ1.ГР =4;<br> КонецЕсли;<br>        <br> КонецЕсли;                               <br> КонецЦикла;<br> КонецЦикла;<br> КонецЦикла;<br><br>3. Констатация факта, что ВО используется правильно и только."

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №4
 
08.11.2010 16:32

"> ТЗ1 не переменная а таблица.<br>???? И что из того, что таблица?<br><br>> 1. При добавлении ТЗ1.КодДвижения не находит переменную ТЗ1.<br>А здесь значит находит:<br>> 2. ТЗ1:<br>> ТЗ1.НоваяСтрока();<br>> ТЗ1.ВидДвижения="Возвраты";<br>> ТЗ1.КодДвижения =2;<br>?<br>"

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация