21.10.2018, 12:16 [+3 UTC]
в нашей команде: 3 030 чел. | участники онлайн: 5 (рекорд: 21)

:: РЕГИСТРАЦИЯ

:: задать вопрос

:: все разделы

:: правила

:: новости

:: участники

:: доска почёта

:: форум

:: блоги

:: поиск

:: статистика

:: наш журнал

:: наши встречи

:: наша галерея

:: отзывы о нас

:: поддержка

:: руководство

Версия системы:
7.51 (29.09.2018)

Общие новости:
24.09.2018, 16:49

Форум:
20.10.2018, 14:47

Последний вопрос:
21.10.2018, 10:57

Последний ответ:
21.10.2018, 07:42

Последняя рассылка:
21.10.2018, 07:45

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
30.09.2009, 16:44 »
Андрей Кузнецов aka Dr_Andrew
Спасибо, помогло! Правда, обошёлся более простой командой: g++ TMainForm.cpp TProgramme.cpp main.cpp -o HelloWindow [вопрос № 172756, ответ № 254857]
29.05.2012, 19:22 »
Megaloman
Хотя задача и не решена, в ответе содержится полезная информация применительно к поставленной задаче. Возможно я что-то не понимаю при использовании соединения, организованного сторонней организацией. [вопрос № 186157, ответ № 270948]
22.04.2011, 01:30 »
Посетитель - 369100
спасибо огромное! Правда я уже к тому моменту тоже решила, ответ сошелся! еще раз спасибо! [вопрос № 182900, ответ № 266786]

РАЗДЕЛ [неизвестная рассылка]

[администратор рассылки: [неизвестный]]

Лучшие эксперты в этом разделе


Перейти к консультации №:
 

Консультация онлайн # 66062
Раздел: [неизвестная рассылка]
Автор вопроса: Andru
Отправлена: 08.12.2006, 08:50
Поступило ответов: 5

Здравствуйте Уважаемые Эксперты!
Есть небольшая проблемма с выгрузской из табличной части реализации Торговли 9.0 в Excell. Вопрос: как можно при этом доработать файл выгрузки чтоб к ниже перечисленным колонкам выгружался КОД выгружаемого товара (Наименование), те обращение к справочнику номенклатура, тк в табличной части кода нет. Вот файл:
Процедура Выгрузить()
Спр = СоздатьОбъект ("Справочник.Номенклатура");
Табл = СоздатьОбъект("Таблица");
ПечТабл = СоздатьОбъект("Таблица");
Док.ВыгрузитьТабличнуюЧасть(Табл,);
Табл.ВыбратьСтроки();
Пока Табл.ПолучитьСтроку() = 1 Цикл
Номенклатура = Табл.Номенклатура;
Количество = Табл.Количество;
Цена = Табл.Цена;
Сумма = Табл.Сумма;
СуммаНдс = Окр(Табл.СуммаНДС, 2, 1);
ПечТабл.ВывестиСекцию("Строка");
КонецЦикла;
ПечТабл.Показать("Выгруженный товар","");
КонецПроцедуры
Заранее Спасибо, Андрей!

Состояние: Консультация закрыта

Ответ # 130569 от Зайцев Александр

Здравствуйте, Andru!
Добавьте после строки Номенклатура = Табл.Номенклатура; следующий код
Спр.НайтиПоНаименованию (Номенклатура,0,1);
Код = Спр.Код;

И измените
Табл = СоздатьОбъект("ТаблицаЗначений");


Консультировал: Зайцев Александр
Дата отправки: 08.12.2006, 09:04

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 130571 от Munster

Здравствуйте, Andru!
Можно попробовать делать выборку не таблицы значений, а самого документа.
Док.ВыбратьСтроки();
Пока Док.ПолучитьСтроку()=1 Цикл
Код=Док.Номенклаткра.Код;
//далее по тексту


Консультировал: Munster
Дата отправки: 08.12.2006, 09:17

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 130572 от IUnknown

Здравствуйте, Andru!
если я правильно понял вопрос то вам пожет следующее

Код = Табл.Номенклатура.Код;


Консультировал: IUnknown
Дата отправки: 08.12.2006, 09:17

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 130580 от Strawberry

Здравствуйте, Andru!
Процедура Выгрузить()
Спр = СоздатьОбъект ("Справочник.Номенклатура");
Табл = СоздатьОбъект("Таблица");
ПечТабл = СоздатьОбъект("Таблица");
Док.ВыгрузитьТабличнуюЧасть(Табл,);
Табл.ВыбратьСтроки();
Пока Табл.ПолучитьСтроку() = 1 Цикл
Код=Табл.Номенклатура.Код;
Номенклатура = Табл.Номенклатура;
Количество = Табл.Количество;
Цена = Табл.Цена;
Сумма = Табл.Сумма;
СуммаНдс = Окр(Табл.СуммаНДС, 2, 1);
ПечТабл.ВывестиСекцию("Строка");
КонецЦикла;
ПечТабл.Показать("Выгруженный товар","");
КонецПроцедуры


Консультировал: Strawberry
Дата отправки: 08.12.2006, 09:59

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 131058 от Ovr1970

Здравствуйте, Andru!
Нужно в талице, которая выводится, добавить еще одну колонку, в которой поставить заголовок КОД и в этой колонке в секции "Строка" выражение "Номенклатура.код"


Консультировал: Ovr1970
Дата отправки: 11.12.2006, 13:27

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Мини-форум консультации № 66062

Посетитель

ID: 27905

# 1

= общий = | 08.12.2006, 09:47 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

Спасибо!


Посетитель

ID: 27905

# 2

= общий = | 08.12.2006, 09:53 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

Супер! Все работает! Спасибо ЛЮДИ ДОБРЫЕ!!! очень помогли!

 

Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.18023 сек.

© 2001-2018, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.51 от 29.09.2018