убрать нули из пустых ячеек и добавить нули перед числами #145487


#0 by админ1
вечер, программеры бухам пишу отчет и там есть пара вещей: 1.перед числом из ТЗ (код подстатьи) нужно добавить 0 коды: 03   05    07   и т.д. в таблицу идет 3 5 7 и т.д. перевожу в строку: ЧислоВСтрВиде=Строка(НужноеЧисло); НовоеЧисло="0"+ЧислоВСтрВиде; через Сообщить кажет правильно, а в таблицу опять без нолей идет как обойти? 2. в ТЗ есть пустые ячейки с типом-число, иногда они пустые, в таблицу пишет 0, что не есть гуд раз пустые-надо пустыми и оставить) 3. почему то не пашет безотказная штука ПараметрыСтраницы, а точнее, не хочет выводить на печать ландшафтом, упорно сует портретную ориентацию.
#1 by Таня
#Ч015.2 например
#2 by Таня
или формат
#3 by а ля Скунк
1. 2.
#4 by админ1
а ля Скунк а на русском слабо? 3. не работает Таблица.ПараметрыСтраницы
#5 by админ1
а ля Скунк а на русском слабо? 3. не работает Таблица.ПараметрыСтраницы
#6 by Таня
идиоты... все... кроме некоторых... надо все параметры указывать, если опускаешь, то пустые места между запятыми ставить
#7 by админ1
идиоты... все... кроме некоторых... согласен 1.если что-параметр Ориентация страницы идет первым и никаких запятых перед собой не требует, так же как и после, если он единственный 2. ну естесственно было опробовано и с запятыми!)
#8 by Таня
+1,2) поставить проверку на Если Число > 0 тогда Ч 015.2 иначе Ч15.2
#9 by Таня
в опциях печати что указывал?
#10 by админ1
только убрал сетку
#11 by Таня
а имяОпцийПечати там есть?
#12 by админ1
нет
#13 by админ1
к 8 ну естесственно, теперь вместо нулей идет 0.00    ))))
#14 by Понтий Пилат
думаю, надо попросить весь код поглядеть.
#15 by а ля Скунк
что из вам надо перевести на русский?
#16 by админ1
да весь код обалденно длинный! я 2 дня парился, там 8 ТЗ, в итоге все сливается в одну, из которой выводится перебором строк в таблицу для печати проблем всего 3 осталось: 1. в ТЗ есть колонка КодПодстатьи, тип которой-число, и числа там типа 3,5,6,7,33 и т.д. нужно те числа, которые меньше 10, привести к виду 03,05,06,07 и т.д., я пытался конвертить число в строку и прибавлять "0" (см пост 0), и Сообщить выводит число правильно, с 0 впереди, но в таблице оно снова выглядит без 0, то есть пять конвертиться в число. 2. в ТЗ есть пустые ячейки, и при выводе их в таблицу они заменяются на 0 (ноль) мне же нужно оставить их пустыми, как есть 3. ни в какую не хочет таблица выводится на печать сразу в ландшафтной ориентации Таб.Показать; вот все что связано с внешним видом таблицы пробовал также делать типа: Таб.ПараметрыСтраницы(2,,,,,,,,,,,,,,,,);
#17 by а ля Скунк
что из этого вам перевести
#18 by админ1
о, спасибо аля скунку, помогло посчет вывода и не вывода нулей)
#19 by админ1
ничего не надо переводить))))все понятно) вспомнил, что так условие можно записать)
#20 by insider
насчет нулей: Чсл - это наше число, т.е. цифра в твоем случае, Зн - это сколько знаков нам нужно (всего, с запятой вместе), делаем так: СтрЗаменить(Формат(" ","С"+(Зн-СтрДлина(Чсл)))," ","0") - это добавились ведущие нули, дальше прибавить к этому чуду СокрЛП(Чсл) и так и выводить на печать, без #Ч015.2
#21 by а ля Скунк
зачем так сложно
#22 by а ля Скунк
смотри что у тебя в настройках печати стоит...
#23 by админ1
с добавлением нулей трабла так и не решилась((
#24 by а ля Скунк
в отчете ... в формуле где выводишь ... поставь вместо своего числа...
#25 by mos-ad
а как в ТЗ описана ячейка, в кот. ты добавляешь "03"?
#26 by админ1
все нормально
#27 by mos-ad
в смысле помощь болеше не нужна?
#28 by админ1
да, трабла с нулями решилась так: в ячейке таблицы ?(Число<10, "0"+Число, Число)
#29 by insider
не сложность - универсальность, т.е. неважно сколько нулей, хотя это и несколько выходит за рамки задачи... привык задачи в общем виде решать.
#30 by 427
типичный случай..
#31 by insider
очень интересно выделен код в ... вероятно "ржуНиПаДецки" - новый оператор встроенного языка :)
#32 by а ля Скунк
надо будет записать
Тэги:
Ответить:
Комментарии доступны только авторизированным пользователям