Тема о выводе номера, без впереди стоящих нолей, уже ни раз поднималась.  Но прошу помочь наглядно.

взять типовую БП и подсмотреть?

ТекстЗапросаШапка = "
   |ВЫБРАТЬ
   |    Номер КАК Номер,
   |    Дата  КАК ДатаСоставления,
   |   Комментарий КАК Комментарий,
   |    НомерВходящегоДокумента КАК НомерСопроводительногоДокумента,
   |    Организация,
   |    Организация             КАК ЮрФизЛицо,
   |    ВЫБОР
   |        КОГДА ВидПоступления = &ВидПоступленияОрдер ТОГДА СкладОрдер.Склад
   |        ИНАЧЕ СкладОрдер
   |    КОНЕЦ КАК МестоПриемки,
   |    ВЫБОР
   |        КОГДА ВидПоступления = &ВидПоступленияОрдер ТОГДА СкладОрдер.Склад.Представление
   |        ИНАЧЕ СкладОрдер.Представление
   |    КОНЕЦ КАК СкладНаименование,
   |    ВЫБОР    КОГДА ОтражатьВБухгалтерскомУчете
   |            ТОГДА ПодразделениеОрганизации
   |            ИНАЧЕ Подразделение
   |    КОНЕЦ КАК Подразделение,
   |    ВЫБОР    КОГДА ОтражатьВБухгалтерскомУчете
   |            ТОГДА ПРЕДСТАВЛЕНИЕ(ПодразделениеОрганизации)
   |            ИНАЧЕ ПРЕДСТАВЛЕНИЕ(Подразделение)
   |    КОНЕЦ КАК ПредставлениеПодразделения,
   |    Контрагент.Код КАК ПоставщикКод,
   |    Контрагент     КАК Поставщик,
   |    ВалютаДокумента,
   |    КурсВзаиморасчетов      КАК Курс,
   |    КратностьВзаиморасчетов КАК Кратность,
   |    УчитыватьНДС,
   |    СуммаВключаетНДС,
   |    СчетУчетаРасчетовСКонтрагентом КАК СубСчет
   |ИЗ
   |    Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
   |ГДЕ
   |    ПоступлениеТоваровУслуг.Ссылка = &ТекущийДокумент";
   
   ТекстЗапросаПоТоварам = "
       |ВЫБРАТЬ
   |    ВложенныйЗапрос.Номенклатура,
   |    ВЫРАЗИТЬ(ВложенныйЗапрос.Номенклатура.НаименованиеПолное КАК Строка(1000)) КАК ТоварНаименование,
   |    ВложенныйЗапрос.Номенклатура.Код                КАК ТоварКод,
   |    ВложенныйЗапрос.ЕдиницаИзмерения.Представление  КАК ЕдиницаИзмеренияНаименование,
   |    ВложенныйЗапрос.ЕдиницаИзмерения.ЕдиницаПоКлассификатору.Код КАК ЕдиницаИзмеренияКод,
   |    ВложенныйЗапрос.СтавкаНДС,
   |    ВложенныйЗапрос.КоличествоПринято,
   |    ВложенныйЗапрос.Стоимость,
   |    ВложенныйЗапрос.СуммаНДС,
   |    ВложенныйЗапрос.Характеристика,
   |    ВложенныйЗапрос.Серия,
   |    ВложенныйЗапрос.НомерСтроки КАК НомерСтроки,
   |    ВложенныйЗапрос.Метка       КАК Метка
   |
   |ИЗ
   |    (
   |    ВЫБРАТЬ
   |        Номенклатура,
   |        ЕдиницаИзмерения,
   |        СтавкаНДС,
   |        СУММА(Количество)                    КАК КоличествоПринято,
   |        СУММА(Сумма    * &Курс / &Кратность) КАК Стоимость,
   |        СУММА(СуммаНДС * &Курс / &Кратность) КАК СуммаНДС,
   |        ХарактеристикаНоменклатуры           КАК Характеристика,
   |        СерияНоменклатуры                    КАК Серия,
   |        МИНИМУМ(НомерСтроки)                 КАК НомерСтроки,
   |        0                                    КАК Метка
   |    ИЗ
   |        Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслуг
   |    ГДЕ
   |        ПоступлениеТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |    СГРУППИРОВАТЬ ПО
   |        Номенклатура,
   |        ЕдиницаИзмерения,
   |        СтавкаНДС,
   |        ХарактеристикаНоменклатуры,
   |        СерияНоменклатуры,
   |        Цена
   |    ) КАК ВложенныйЗапрос
   |
   |ОБЪЕДИНИТЬ ВСЕ
   |
   |ВЫБРАТЬ
   |    Номенклатура,
   |    ВЫРАЗИТЬ(Номенклатура.НаименованиеПолное КАК Строка(1000)),
   |    Номенклатура.Код,
   |    Номенклатура.ЕдиницаХраненияОстатков.Представление  КАК ЕдиницаИзмеренияНаименование,
   |    Номенклатура.ЕдиницаХраненияОстатков.ЕдиницаПоКлассификатору.Код КАК ЕдиницаИзмеренияКод,
   |    ""Без НДС"",
   |    Количество,
   |    Сумма    * &Курс / &Кратность,
   |    0,
   |    NULL,
   |    NULL,
   |    НомерСтроки КАК НомерСтроки,
   |    2           КАК Метка
   |ИЗ
   |    Документ.ПоступлениеТоваровУслуг.ВозвратнаяТара КАК ПоступлениеТоваровУслуг
   |ГДЕ
   |    ПоступлениеТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |УПОРЯДОЧИТЬ ПО Метка ВОЗР, НомерСтроки ВОЗР
   |";
   
   Макет = ПолучитьОбщийМакет("М4");
   
   ТабДокумент = Новый ТабличныйДокумент;
   
   // Зададим параметры печатной формы по умолчанию
   ТабДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
   
   // Восстановим установленные пользователем параметры печатной формы
   ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПоступлениеТоваровУслуг_М4";
   
   ПервыйДокумент = Истина;
   
   Для Каждого Ссылка Из МассивОбъектов Цикл
       
       Если НЕ ПервыйДокумент Тогда
           ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
       КонецЕсли;
       ПервыйДокумент = Ложь;
       
       НомерСтрокиНачало = ТабДокумент.ВысотаТаблицы + 1;

       Запрос = Новый Запрос;
       Запрос.УстановитьПараметр("ТекущийДокумент",     Ссылка);
       Запрос.УстановитьПараметр("ВидПоступленияОрдер", Перечисления.ВидыПоступленияТоваров.ПоОрдеру);
       
       Запрос.Текст = ТекстЗапросаШапка;
       Шапка = Запрос.Выполнить().Выбрать();
       Шапка.Следующий();
       
       
       ЗапросПоТоварам = Новый Запрос();
       ЗапросПоТоварам.УстановитьПараметр("ТекущийДокумент", Ссылка);
       
       
       Если Ссылка.ВалютаДокумента = Ссылка.ДоговорКонтрагента.ВалютаВзаиморасчетов Тогда
           
           // Документ оформлен в валюте взаиморасчетов
           ЗапросПоТоварам.УстановитьПараметр("Курс", Ссылка.КурсВзаиморасчетов);
           ЗапросПоТоварам.УстановитьПараметр("Кратность", Ссылка.КратностьВзаиморасчетов);
           
       Иначе
           
           // Документ оформлен в валюте регламентированного учета
           ЗапросПоТоварам.УстановитьПараметр("Курс",      1);
           ЗапросПоТоварам.УстановитьПараметр("Кратность", 1);
           
       КонецЕсли;
       
       ЗапросПоТоварам.Текст = ТекстЗапросаПоТоварам;
       ВыборкаСтрокТовары = ЗапросПоТоварам.Выполнить().Выбрать();
       
           
       // Выводим общие реквизиты шапки
       СведенияОПокупателе = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.ЮрФизЛицо, Шапка.ДатаСоставления);

       ОбластьМакета = Макет.ПолучитьОбласть("Шапка");
       ОбластьМакета.Параметры.Заполнить(Шапка);
       ОбластьМакета.Параметры.ПредставлениеОрганизации = ФормированиеПечатныхФормСервер.ОписаниеОрганизации(СведенияОПокупателе);
       ОбластьМакета.Параметры.ОрганизацияПоОКПО        = СведенияОПокупателе.КодПоОКПО;
       ОбластьМакета.Параметры.НомерДокумента           = ОбщегоНазначения.ПолучитьНомерНаПечать(Шапка);
       ОбластьМакета.Параметры.Комментарий = Шапка.Комментарий;
       ТабДокумент.Вывести(ОбластьМакета);

       // Выводим заголовок докмента
       ОбластьМакета = Макет.ПолучитьОбласть("ЗаголовокДокумента");
       ОбластьМакета.Параметры.Заполнить(Шапка);
       ОбластьМакета.Параметры.ДатаСоставления = Шапка.ДатаСоставления;
       ПредставлениеКонтрагента = ФормированиеПечатныхФормСервер.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Поставщик, Шапка.ДатаСоставления), "ПолноеНаименование,");
       ОбластьМакета.Параметры.ПоставщикНаименование = ПредставлениеКонтрагента;
ТабДокумент.Вывести(ОбластьМакета);

Есть поле на печатной форме ПоставщикКод. Он берет свой номер из справочника Контрагенты.Код.
Не получается вывести ПоставщикКод без впереди стоящих нолей. Пробовала ОбщегоНазначения.ПолучитьНомерНаПечать, но, кажется,  что-то не так прописываю... HELP!

(3) Без фото не взлетит

взлетит, если поможете)

(5) да-да-да, у нас нет лицензии на осуществление кредитных операций, поэтому авансом не помогаем.

а я на работе не храню архив личных фотографий, так что помочь не могу

(3) Посмотри, как работает ПолучитьНомерНаПечать - и сделай аналогично для кодов контрагентов.

и что если на фотографии окажется зеленый сопливый тролль, вы также помогать откажетесь?

ПолучитьНомерНаПечать() - что в скобках указывается?

(10) А посмотреть код этой процедуры - религия не позволяет?
Сама ПолучитьНомерНаПечать в данном случае не сгодится. Смотри код и делай по аналогии.

так я итак сижу в коде.
По аналогии с чем?

(12) Если сидишь в коде - то видишь в этой процедуре комментарий
// удаление ведущих нулей
и видишь то, что после этого комментария написано.
Какой ещё информации тебе не хватает, чтобы понять - как удалить ведущие нули в коде?

(9) Конечно. Ибо указан пол женский, а на деле тролль - на лицо явный обман)

я, конечно, извиняюсь, но где ты нашел такой комментарий Rie?

(15) Точно тролль.

)

ткните мне пальцем и скажите, как прописать.

(17) Продолжай в том же духе. Еще пару постов как (15) и спасет только фото ню)))

(15) В тексте процедуры ПолучитьНомерНаПечать.
Вы эту процедуру читали?

т.е. сначала убрала здесь v8: Как убрать лишние символы в номере , а теперь и до 8ки дошла ?

ПолучитьНомерНаПечать встречается только,когда в область Шапки номер выводим

zak555, мне не помогло

(22) Вы в текст функции ПолучитьНомерНаПечать - заглядывали?
(Ветка утоплена до тех пор, пока не посмотрите текст этой функции).

(23) там всё указали

в общий модуль?

почему нельзя сделать также,как при выводе номера в шапке?

(27) Можно. Сделайте.

КАААААК?

ОбластьМакета.Параметры.НомерДокумента  = ОбщегоНазначения.ПолучитьНомерНаПечать(Шапка);

Как прописать для ПоставщикаКод, если он ссылается на справочник?

(30) Ндя, точно только ню))

есть еще вот такой вариант:
ПоставщикКод   = СокрЛП(ПоставщикКод);
   Префикс=Найти(ПоставщикКод,"0");
   ПоставщикКод=Сред(ПоставщикКод,Префикс+1);
               
   // так же, может остаться "минус" впереди
   Если Лев(ПоставщикКод, 1) = "-" Тогда
       ПоставщикКод = Сред(ПоставщикКод, 2);
   КонецЕсли;
   
   // удаление ведущих нулей
   Пока Лев(ПоставщикКод, 1)="0" Цикл
       ПоставщикКод = Сред(ПоставщикКод, 2);
   КонецЦикла;
   
   Возврат ПоставщикКод;

но выводит ошибку: {ОбщийМодуль.УправлениеПечатью.Модуль(32)}: Значение не является значением объектного типа (КоличествоЭкземпляров)Стр.ТабличныйДокумент.КоличествоЭкземпляров = Стр.Экземпляров;

Meloni пока фотку не поставишь - ничего не получится

(29) Ещё раз объясняю алгоритм:
1. Открываете модуль ОбщегоНазначения, находите там функцию ПолучитьНомерНаПечать, читаете её текст.
2. В тексте этой функции находите то место, где удаляются ведущие нули.
3. _По аналогии_ пишете свою функцию, удаляющую ведущие нули из любой строки (в том числе и кода контрагента).
4. ...
5. PROFIT!

(32) О! Эту проблему вы решили!

так вот выше написанный код и есть функция ПолучитьНомерНаПечать. Но,как видите, выдал ошибку

(37) Может лучше замуж? Ну ее, эту 1С?))

Не хочу никаких мальчиков, я хочу 1С!)

подскажите, что делать с ошибкой?

(37) НЕ вышенаписанный код выдал ошибку. В коде из (32) НЕТ
Стр.ТабличныйДокумент.КоличествоЭкземпляров = Стр.Экземпляров;

(40) Тебе уже все сказали что делать, перечитай внимательно ветку

(40)
1. Найти то место, в котором возникает ошибка
2. Посмотреть значения переменных (например, Отладчиком).
3. Убедиться, что значения переменных - не те, что требуются.
4. Понять, почему же они не те.
5. Исправить ошибку.

с вами только кашу из топора можно сварить

(44) Префикс в этом коде есть?

нет

(44) А Вы попробуйте действовать по предложенным Вам алгоритмам. И удивитесь результату :-)

функция без ошибок, переменные описаны. Чего еще 1С нужно!?

Скажите вот еще что. Мне же нужно сослаться на функцию ПолучитьНомерНаПечать? Если да, то просто
ПоставщикКод = ПолучитьНомерНаПечать(Документ)?
Или как-то по-другому?

(48) А что говорит товарищ Отладчик?
Вы посмотрели значения этих переменных в той точке, в которой произошла ошибка?

(Отсутствие синтаксических ошибок - не означает отсутствия ошибок. Синтаксическая корректность - это базовое требование, если ошибки в синтаксисе - то дальше говорить не о чем до их исправления).

(49) Что за функция ПолучитьНомерНаПечать?

(49) Прошу прощения, Вы кто по профессии?
(Эта информация нужна для того, чтобы говорить в понятных Вам терминах и давать понятные Вам советы. Поскольку по Вашим постам складывается впечатление, что от программирования Вы ой как далеки).

я начинающий

начинающий что?

(44) До Светы тебе как до Луны пешком, в топку

это Вы мне?

(56) Давай, до свидания

(0) читаем http://www.forum.mista.ru/rules.php
Рекомендации:
Как задать вопрос по теме 1С или советы новичку. Автор - Сергей Токарев (GrayT).
Общие моменты
Четко сформулируйте свой вопрос.
Тема должна отражать суть сообщения. Не допускаются темы типа "Подскажите", "1С", "help", "есть вопрос", "не получается", темы большими буквами, заголовки с кучей восклицательных/вопросительных знаков.
Правильно указывайте раздел: 1С, IT, LIFE. Ветки, не связанные с 1С или IT, помещайте в раздел LIFE.
Пишите грамотно. Никто не застрахован от ошибок, но не надо щеголять безграмотностью. В сложных случаях рекомендуется сначала написать сообщение в Word со включенной проверкой орфографии.
Не ставьте "общих" вопросов. Если Вы даже не знаете, как подступиться к задаче, все равно скажите, какие у Вас есть идеи.
Не используйте много жаргонизмов. Возможно, тот, кто знает ответ, не поймет Вас.
Если в ответе Вы встретили незнакомую аббревиатуру или термины загляните в краткий словарик (см. ниже)
Скорее всего Вы не первый, кто столкнулся с этой проблемой. Попробуйте найти ответ на форуме (в правом нижнем углу есть окно поиска) или в многочисленных статьях и FAQ по 1С, ссылки на которые вы найдете на сайте www.mista.ru. В любом случае полученные знания не будут лишними.
Чем полнее вы опишите свою проблему, тем быстрее Вам смогут помочь. Следующие пункты помогут Вам сориентироваться, какая информация наиболее важна.
Языком общения на форуме является русский. Сообщения, написаные на любом другом языке, ввиду незнания модератором всех языков мира, кроме русского, автоматически рассматриваются как подстрекательство к свержению правящего строя, выраженное чистой матерной руганью, со всеми вытекающими отсюда последствиями. Необходимое примечание: "удафкомовский" жаргон и прочие ущербные модификации русского языка признаются языками иностранными, далее см. выше.
Если у Вас проблемы с запуском, работоспособностью или производительностью системы 1С:Предприятие
Укажите версию 1С:Предприятия - 7.5, 7.7, 8.0 и желательно указать релиз платформы
Укажите, какая у Вас программа (однопользовательская, на трех пользователей, сетевая)
На какой платформе работает база (файловая DBF или клиент-серверная SQL)
Операционные системы на сервере и рабочих станциях
Используете ли терминальный доступ.
Релиз используемой конфигурации.
Вариант установки программы (локальный или сетевой)
Где возникают проблемы (на сервере или рабочей станции), количество машин в сети.
Если у Вас проблемы при работе с конкретной конфигурацией
Является ли конфигурация полностью стандартной, модифицированной или полностью самописной.
Для стандартных программ обязательно укажите редакцию «Бухгалтерия 455», «Торговля 932», «Зарплата и Кадры 243» и т.д.
Укажите, в какой момент происходит ошибка: «при формировании отчета, при проведении, при работе со справочником», и не забудьте указать каким именно.
Опишите, в чем заключается ошибка.
Если вы не можете реализовать задуманный код
Обрисуйте задачу в целом: «Пишу складскую программу»
Укажите конкретную задачу: «Хочу выбрать из регистра следующую информацию…» – возможно, Вам дадут рекомендации не только как исправить ошибку, но и как более грамотно реализовать задачу
Укажите в чем проблема: «Но в результате сумма остается нулевой»
Если Вы вносите исправления в стандартную конфигурацию, укажите в какую (см. п. 3.2)
Укажите, какие компоненты используете (Бухгалтерию, Оперативный учет, Расчет, УРБД)
Если проблема с конкретным кодом приведите листинг программы, но придерживайтесь принципа разумной достаточности – ошибку проще найти в небольшом листинге, чем изучать весь модуль.

извините, где я могу найти этот модуль?

Блин, ну что за несправедливость? Вчера блондинке мужеского полу помогали без фото, а тут прям в каждом посте только про фото. несправедливо!

ну даешь чувак.. в (35) же все написано

после этой функции где и что еще нужно добавить?

(61) А что вам (прекрасной части форума) мешает объединиться и требовать фотки с мужчин!? Я думаю многие присутствующие здесь с интересом бы за этим понаблюдали ;D

тогда сайт перейдет в разряд знакомств)

(65) Понятно стало, где вызывать функцию?

нет

(67) теперь понятно - мое убеждение, что девушка-программист и программирование несовместимы - подтверждает.

Вы принципиально против исследования кода типовых?
За то время что вы просите разжувать - могли бы уж разобраться - даже если первый раз в 1с.
Ну поймите - ну не могут люди все время за вас работу делать.

Кстати, вопрос - а почему Вы не используете типовой механизм присвоения/вывода номеров?

(67) Без фотки в ЛК - нет стимула все разжевывать.

(69) "- Хорошо! Ставлю пять. Но вы знаете как правильно измерить высоту небоскроба с помощью барометра?
- Конечно знаю! Но ведь это так скучно..." (с)

ПрограмлюКакИндус исправьте ошибку в своем нике для начала

Я прошу не сделать за меня, а объяснить, что необходимо еще дописать помимо функции удаления лидирующих нулей. А вы только и говорите про фото, про то,что девушки и программирование несовместимы.
Задала вопрос по существу, будьте добры отвечать тоже по существу.

у кого за плечами 20 летний опыт... не сравнивайте с начинающим. Вы были тоже когда-то нубами

>про то,что девушки и программирование несовместимы

требую пруфа!!!

>у кого за плечами 20 летний опыт... не сравнивайте с начинающим. Вы были тоже когда-то нубами

только было лишь Фидо и BBS, причём не у многих... а уж комп дома - редкое исключение из правил! До всего доходили сами а вам подавай на блюдечке с голубьой каёмочкой - халявы ищите!

Meloni, на случай если Вы сюда еще раз заглянете... Видите ли, тут действую сразу несколько факторов:
1) А тролли тут жирные :) Нас даже упомянутый в (9) зеленый сопливый тролль заинтересует.
2) Фото девушки-ТС - старая и добрая традиция.
3) Вам подсказали и неоднократно. Для человека хот чуть-чуть разбирающегося в программировании этого было бы достаточно.
4) Тот код который приведен в (0) заставляет шевелиться ("И от мыслей ентих, Чтой-то подымается! Не в штанах конечно, А в душе моей!" (с)) не только волосы.
5) Ваша проблема решается 4-мя строчками кода, но мы же тролли, в "пике" за этой веткой наблюдали человек 30. Молча :)
6) Даже зеленый сопливый тролль может сделать сексуальный автопортрет. И удивиться количеству помочь и объяснить ;)

затащила ёпт!)