Имя: Пароль:
1C
1C 7.7
v7: Запрос в 1с 7.7
, ,
0 exactly
 
21.10.16
04:46
Есть запрос в 8.2
ВЫБРАТЬ
    ХозрасчетныйОборотыДтКт.Регистратор,
    ХозрасчетныйОборотыДтКт.СчетДт,
    ХозрасчетныйОборотыДтКт.СчетКт,
    ХозрасчетныйОборотыДтКт.СубконтоДт1,
    ХозрасчетныйОборотыДтКт.СубконтоДт2,
    ХозрасчетныйОборотыДтКт.СубконтоКт1,
    ХозрасчетныйОборотыДтКт.СубконтоКт2,
    ХозрасчетныйОборотыДтКт.СубконтоКт3,
    ХозрасчетныйОборотыДтКт.СуммаОборот,
    ХозрасчетныйОборотыДтКт.КоличествоОборотДт,
    ХозрасчетныйОборотыДтКт.КоличествоОборотКт
ПОМЕСТИТЬ ВТ_Регистраторы
ИЗ
    РегистрБухгалтерии.Хозрасчетный.ОборотыДтКт(&НачалоПериода, &КонецПериода, Регистратор, СчетДт В (&СчетДт), , , , ) КАК ХозрасчетныйОборотыДтКт
ГДЕ
    НЕ ХозрасчетныйОборотыДтКт.Регистратор ССЫЛКА Документ.ОтражениеЗарплатыВРеглУчете
    И НЕ ХозрасчетныйОборотыДтКт.Регистратор ССЫЛКА Документ.КорректировкаПрочихЗатрат
    И НЕ ХозрасчетныйОборотыДтКт.Регистратор ССЫЛКА Документ.РасчетСебестоимостиВыпуска
    И НЕ ХозрасчетныйОборотыДтКт.Регистратор ССЫЛКА Документ.КорректировкаЗаписейРегистров
    И НЕ ХозрасчетныйОборотыДтКт.Регистратор ССЫЛКА Документ.КорректировкаСтоимостиСписанияТоваров
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования, ПоступлениеТоваровУслуг.Ссылка) КАК ДокументПоступления,
    ВТ_Регистраторы.Регистратор,
    ВТ_Регистраторы.СчетДт,
    ВТ_Регистраторы.СчетКт,
    ВТ_Регистраторы.СубконтоДт1 КАК ОбъектСтроительства,
    ВТ_Регистраторы.СубконтоДт2,
    ВТ_Регистраторы.СубконтоКт1 КАК ДокументПоступленияКонтрагент,
    ВТ_Регистраторы.СубконтоКт2,
    ВТ_Регистраторы.СубконтоКт3,
    ВТ_Регистраторы.СуммаОборот КАК Сумма,
    ВТ_Регистраторы.КоличествоОборотДт КАК Количество,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.Номер, ПоступлениеТоваровУслуг.Номер) КАК ДокументПоступленияНомер,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.Дата, ПоступлениеТоваровУслуг.Дата) КАК ДокументПоступленияДата,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.СуммаДокумента, ПоступлениеТоваровУслуг.СуммаДокумента) КАК ДокументПоступленияСуммаДокумента,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.НомерВходящегоДокумента, ПоступлениеТоваровУслуг.НомерВходящегоДокумента) КАК ДокументПоступленияНомерВходящегоДокумента,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.ДатаВходящегоДокумента, ПоступлениеТоваровУслуг.ДатаВходящегоДокумента) КАК ДокументПоступленияДатаВходящегоДокумента,
    ЕСТЬNULL(ПартииТоваровНаСкладахОбороты.ДокументОприходования.Контрагент, ПоступлениеТоваровУслуг.Контрагент) КАК ДокументПостпуленияКонтрагент_
ИЗ
    ВТ_Регистраторы КАК ВТ_Регистраторы
        ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ПартииТоваровНаСкладах.Обороты(&НачалоПериода, &КонецПериода, Регистратор, ) КАК ПартииТоваровНаСкладахОбороты
        ПО ВТ_Регистраторы.Регистратор = ПартииТоваровНаСкладахОбороты.Регистратор
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
        ПО ВТ_Регистраторы.Регистратор = ПоступлениеТоваровУслуг.Ссылка

Можно ли его перенести в 7.7?
1 Злопчинский
 
21.10.16
05:22
куда? в бухию? в тис?
в бухию - нет. так как в семерочной бухии штатно никакие партии на складах обычно не ведутся
в тис - нет, так как в тис нет ни хозрасчетного пс, ни субконто - как родных объектов (есть их слепок из бухии и все надо тащить по справочнику хозопераций и глобальным процедурам построения проводок)

а так - решить задачу - то я думаю можно, только нахрена? зачем ниве колеса от карьерного самосвала?
2 HawkEye
 
21.10.16
08:59
(0) переноси, я не против...
3 Масянька
 
21.10.16
09:08
(1) А у Вас есть такой же, но с перламутровыми пуговицами? (С)
4 exactly
 
21.10.16
10:44
Конфигурация ПУБ 7.7. Нужно уничтожить архив документов. Но там есть такие которые по материалам, которые пошли на модернизацию основных средств. Их нужно сохранить. Вот в 8 ке отчет написали, а в семерке не получается...
5 Vladal
 
модератор
21.10.16
10:50
(2) Обращаю внимание на правила форума:
2. Флейм и оффтопик в тематических разделах 1С и IT не допускается.
5. Не засоряйте форум бессмысленными сообщениями (вандализм).

Если нет ответа по существу вопроса, не надо ничего писать.
6 Fedor-1971
 
21.10.16
11:39
(4) программно отличить эти документы сможешь от остальных?
Возможно, и не понадобится тебе запрос в 7.7
7 exactly
 
21.10.16
11:53
(6) программно в смысле конвертацией данных перенести в 8 ку? (Пробовал данных много за 5 лет долго, и нет гарантии что счета учета в 7.7 и 8.2 совпадут...) Или как- то по другому?
8 Fedor-1971
 
21.10.16
11:56
(7) Например, можно грохнуть все документы так:
Добавляешь реквизит НеУдалятьИзАрхива, тем документам которые должны остаться ставим его в 1

Док = СоздатьОбъект("Документ"); //или Документ.??? для конкретного типа документов
Док.Выбрать(ДатаНач, ДатаКон);
Пока Док.ПолучитьДокумент()=1 цикл
  Если Док.НеУдалятьИзАрхива=0 тогда
    Док.Удалить(0);  //для больших экстремалов 1 - прямо насовсем удалить
  КонецЕсли;
КонецЦикла;


Ты бы задачку полностью озвучил, думается мне, что тебе нужна обработка обрезки БД с некоторой доработкой
9 Fedor-1971
 
21.10.16
11:59
8+ там где Док.Удалить - тебе нужно изобрести способ определения что документ должен остаться
Как минимум, ещё нужно остатки по счетам сформировать перед данным действом, иначе все отчёты поплывут.
10 exactly
 
21.10.16
12:00
озвучил в (4) нужно выбрать документы партий, которые потом ушли на модернизацию ОС.
11 exactly
 
21.10.16
12:01
получается что в 7 ке регистр партий он же и есть регитср бухгалтерии?(ПУБ)
12 Ёпрст
 
21.10.16
12:03
(11) нет
13 Ёпрст
 
21.10.16
12:04
И.. лучше б ты не совался в клюшки. С такими знаниями ты из неё ничего не получишь.
14 Fedor-1971
 
21.10.16
12:08
(10) вот что ты озвучил:
необходимо удалить все документы кроме тех, в которых материалы пошли на модернизацию ОС.

Твоей конфигурации здесь нет и нам не видно, как построен у тебя партионный учёт, как собственно списывались материалы на модернизацию ОС.
Из того что ты озвучил вовсе не понятно что нужно получить в результате и для чего: надо сохранить баланс или нет, зачем тебе обрезок БД с поломанными проводками (при прямом удалении документов)
15 Fedor-1971
 
21.10.16
12:13
(11) в 7 нет регистров бухгалтерии, там план счетов и проводки при нём
Партионный учёт - возможно и построен на оборотном регистре, а возможно в виде справочника партий и субконто Партии.
Если очень хочешь разобраться в 7.7 - открывай конфигуратор и смотри (что, где и как), иначе (13)
16 exactly
 
21.10.16
12:25
(15) да, спасибо. Разберусь конечно
17 LazyStranger
 
25.10.16
22:17
(15) в ПУБ 7.7 есть регистр остатков "Партии"