Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1С Программирование и поддержка (1C)

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

Открыть новую тему     Написать ответ в эту тему

ToppeaDop

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору


Код:
 
/////////ВРЕМЕННАЯ ТАБЛИЦА/////////////
ВЫБРАТЬ РАЗРЕШЕННЫЕ
    СтатусыДокументов.Документ КАК Ссылка,
    СтатусыДокументов.Документ.Контрагент КАК ДокументКонтрагент,
    СтатусыДокументов.Статус КАК СтатусОплаты,
    СтатусыДокументов.ДополнительныйСтатус КАК СтатусОтгрузки,
    ТИПЗНАЧЕНИЯ(СтатусыДокументов.Документ) КАК тип,
    1 КАК Поле1
ПОМЕСТИТЬ СписокНеОтгруженныхСчетов
ИЗ
    РегистрСведений.СтатусыДокументов КАК СтатусыДокументов
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетНаОплатуПокупателю КАК СписокСчетов
        ПО (СтатусыДокументов.Документ.СчетНаОплатуПокупателю = СтатусыДокументов.Документ)
ГДЕ
    ТИПЗНАЧЕНИЯ(СтатусыДокументов.Документ) = ТИП(Документ.СчетНаОплатуПокупателю)
    И СтатусыДокументов.ДополнительныйСтатус = ЗНАЧЕНИЕ(Перечисление.СтатусыОтгрузки.НеОтгружен)
    И СтатусыДокументов.Статус = ЗНАЧЕНИЕ(Перечисление.СтатусОплатыСчета.Оплачен)
;
 
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
    СписокНеотгруженныхСчетов.Ссылка КАК Счет,
    СчетНаОплатуПокупателю.Контрагент КАК Контрагент,
    СчетНаОплатуПокупателюТовары.Номенклатура.Наименование КАК НоменклатураНаименование,
    СчетНаОплатуПокупателюТовары.Количество КАК Количество,
    СчетНаОплатуПокупателюТовары.Цена КАК Цена,
    СчетНаОплатуПокупателюТовары.Сумма КАК Сумма,
    КоличествоОстатокДт как Наличие
ИЗ
    СписокНеОтгруженныхСчетов КАК СписокНеотгруженныхСчетов
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетНаОплатуПокупателю КАК СчетНаОплатуПокупателю
        ПО (СписокНеотгруженныхСчетов.Ссылка = СчетНаОплатуПокупателю.Ссылка)
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетНаОплатуПокупателю.Товары КАК СчетНаОплатуПокупателюТовары
        ПО (СписокНеотгруженныхСчетов.Ссылка = СчетНаОплатуПокупателюТовары.Ссылка)
        ЛЕВОЕ СОЕДИНЕНИЕ  РегистрБухгалтерии.Хозрасчетный.Остатки КАК ХозрасчетныйОстатки
        ПО (СчетНаОплатуПокупателюТовары.Номенклатура = ХозрасчетныйОстатки.Субконто1)
 
 
УПОРЯДОЧИТЬ ПО
    СчетНаОплатуПокупателю.Номер,
    СчетНаОплатуПокупателюТовары.Номенклатура.Наименование
;
////////////////////////////////////////////////////////////////////////////////
/////ВЫВОД НА ЭКРАН ТОЛЬКО ТОВАРОВ///////////////////////
ВЫБРАТЬ
    СчетНаОплатуПокупателюТовары.Номенклатура как ТоварКОтгрузке,
    СчетНаОплатуПокупателюТовары.Количество КАК Количество,
    СчетНаОплатуПокупателюТовары.Цена КАК Цена,
    СчетНаОплатуПокупателюТовары.Сумма КАК Сумма,
    Выразить(СчетНаОплатуПокупателюТовары.Сумма/1.18 КАК ЧИСЛО(15,2)) КАК СуммаБезНДС,
    КоличествоОстатокДт как Наличие,
    СуммаОстатокДт как СуммаБух
    
ИЗ
    СписокНеОтгруженныхСчетов КАК СписокНеотгруженныхСчетов
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетНаОплатуПокупателю КАК СчетНаОплатуПокупателю
        ПО (СписокНеотгруженныхСчетов.Ссылка = СчетНаОплатуПокупателю.Ссылка)
        ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетНаОплатуПокупателю.Товары КАК СчетНаОплатуПокупателюТовары
        ПО (СписокНеотгруженныхСчетов.Ссылка = СчетНаОплатуПокупателюТовары.Ссылка)
        ЛЕВОЕ СОЕДИНЕНИЕ  РегистрБухгалтерии.Хозрасчетный.Остатки КАК ХозрасчетныйОстатки
        ПО (СчетНаОплатуПокупателюТовары.Номенклатура = ХозрасчетныйОстатки.Субконто1)
////////////////////////////////////////////////////////////////////////////////
 
 


Всего записей: 466 | Зарегистр. 24-08-2003 | Отправлено: 17:52 29-11-2017 | Исправлено: ToppeaDop, 17:55 29-11-2017
Открыть новую тему     Написать ответ в эту тему

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1С Программирование и поддержка (1C)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru