Пишу запрос,возможно ли как то в запросе преобразовать римские в арабские?

А зачем это делать в запросе?

Будь мужиком - напиши функцию!

(1)Хотелось чтоб отчет работал быстрее

(2)Написал функцию дальше что?

Как совместить функцию и запрос тогда?

Никак не прокатит да?

аууууууууууууууууууу

Чего хоть твой запрос должен делать? И что хочешь в результате получить? Тебе ведь могут посоветовать здесь такое...

гугл говорит, что
eligere
 exprimitur(ТвоёЧисло sicut numerus) sicut romanus

:) ГарриПоттер.АрабикусРомус(ВашеЧисло)

(8)Мне надо сумму найти (римское число *количество)

(10)Ну это по любому прокатит

(11) откуда такие изощрения у тебя в голове?

(13)Мсье Erhov_egor знает толк в извращениях

(14)с детства начал

кстати, почему б не попросить запрос сразу формировать нужный ТабДокумент? быстрее ж будет

Правильно, если 70-й счёт вести латынью и римскими цифрами - мало кто поймёт, где деньги.

Развод?

(16)Попросил сделал,но еще чтоб лишнее не делать хочу с цифрами римскими поработать в запросе а он не хочет гад

(19) ТабДок в запросе сделал?

>а он не хочет гад
он просто в школе не учился

Двоичные попробуй.

(20)Да, а дальше что?

(0) если речь о типовых, то там в глобальнике есть Функция ПреобразоватьЧислоВАрабскуюНотацию(РимскоеЧисло)

(24)Дальше что?

Будь мужиком, пиши в Бинарном исчислении :)

(25) дальше вставляй её в запрос)

(25)Встречный вопрос: По твоему, Что такое Римское Число?

(27)Думаешь, там у него реальные римские цыфры и нет типо символа "Х" (не как Икс, а как буква Ха, из латиницы) :)

(27)Юморист

(30) и он ещё нас обзывает!

(17)>> Правильно, если 70-й счёт вести латынью и римскими цифрами - мало кто поймёт, где деньги.

Если бы Налоговая смотрела в БД, то все бы так и шифровались :)
Но им побоку, что и как в электронном виде, их будут интересовать бумажные копии из архивов с печатями ;)

(30) ты хоть запрос покажи)

1. число в строку
2. строку - в массив символов
3. каждому символу в соответствие - римскую цифру
4. п.3 в строку

(34)Бу га га... тут без функции не взлетит, тут нужен тупой пересчет римского бреда в 10-тичную и надеяться, что все символы написаны латиницей :)

(35) На платформе 8.x ещё можно запросом отделаться, хотя... Там же нет преобразования числа в строку - отстой (((.

|ОбрабатыватьДокументы Проведенные;
   |Период с НачДата по КонДата;  
   |ТТНМолоко         = Документ.ТТНМолоко.ТекущийДокумент;
   |МестаХранения     = Документ.ТТНМолоко.МестаХранения;
   |Контрагент        = Документ.ТТНМолоко.Контрагент;
   |Населе            = Документ.ТТНМолоко.Население;
   |Сорт              = Документ.ТТНМолоко.Сорт;
   |КоличествоУчетное = Документ.ТТНМолоко.Количество;
   |Количество        = Документ.ТТНМолоко.КоличествоПриход;
   |Жир               = Документ.ТТНМолоко.Жирность;
   |Белок             = Документ.ТТНМолоко.Белок;
   |СОМО              = Документ.ТТНМолоко.СОМО;
   |Кислотность       = Документ.ТТНМолоко.Кислотность;
   |ГруппаЧистоты     = Документ.ТТНМолоко.ГруппаЧистоты;
   |Плотность         = Документ.ТТНМолоко.Плотность;
   |Термоустойчивость = Документ.ТТНМолоко.Термоустойчивость;
   |Редуктаза         = Документ.ТТНМолоко.Редуктаза;
   |СомКлетки         = Документ.ТТНМолоко.СомКлетки;  
   |Температура       = Документ.ТТНМолоко.Температура;  
   |Функция СумЖир              = Сумма(Жир*Количество);  
   |Функция СумБелок            = Сумма(Белок*Количество);
   |Функция СумСОМО             = Сумма(СОМО*Количество);
   |Функция СумПлотность        = Сумма(Плотность*Количество);
   |Функция СумСомКлетки        = Сумма(СомКлетки*Количество);
   |Функция СумСомТемпература   = Сумма(Температура*Количество);  
   |Функция СумГруппаЧистоты    = Сумма(ПреобразоватьЧислоВАрабскуюНотацию(ГруппаЧистоты)*Количество);
   |Функция КолПФ = Сумма(Количество);  
   |Функция КолиС = Сумма(КоличествоУчетное);
   |Функция КолПВ = Сумма(Количество) когда (Сорт = СортВ);    
   |Функция КолПС = Сумма(Количество) когда (Сорт = СортС);    
   |Функция КолП1 = Сумма(Количество) когда (Сорт = Сорт1);    
   |Функция КолП2 = Сумма(Количество) когда (Сорт = Сорт2);    
   |Функция КолПН = Сумма(Количество) когда ((Сорт<>СортВ)и(Сорт<>СортС)и(Сорт<>Сорт1)и(Сорт<>Сорт2));

(37) ГруппаЧистоты вообще какие значения может принимать? от I  до IV?

(38)ага

Через когда можно как нить?

(37) ты уверен что ГруппуЧистоты нужно умножать на количество?

(40)  нет. Либо через внешнюю функцию, либо считай после запроса при выводе

(41)уверен

Внешняя функция это как?

(44)

Функция ПреобразоватьЧислоВАрабскуюНотацию(ЧислоРимское) Экспорт
...

(45)А где ты в глобальнике такую функцию нашел?

(46) к (24)

А почему через внешнюю то прокатит че то догнать не могу?

Казалось бы, а причем тут вообще 1С 7.7 ;)

(47) в типовой бухии
(48) не работает или что?

(48)Потому, что будет медленно, но прокатит.
Функция может быть в глобальнике, а может и в модуле запроса.
Это как хочешь. Функцию ты должен найти или написать сам.
И вообще, какой это умник хранит числовое значение в абы каком представлении :)

И если ты точно уверен в цифрах, то там можно и без пересчета все упростить через "Если <Условие цифры ХХ> Тогда"

//*****************************************************************************
// ПреобразоватьЧислоВАрабскуюНотацию(РимскоеЧисло)
//
// Параметры
//        РимскоеЧисло - строка, число, записанное римскими цифрами
//
// Возвращаемое значение
//        число
//
// Описание
//        преобразует число, записанное римскими цифрами, в "обычное" число,
//        например:
//                ПреобразоватьЧислоВАрабскуюНотацию("ХVII") = 17
//
Функция ПреобразоватьЧислоВАрабскуюНотацию(РимскоеЧисло)
   
   АрабскоеЧисло=0;

   c1 = "1";c5 = "У";c10 = "Х";c50 = "Л";c100 ="С";c500 = "М";c1000 = "Д";

   РимскоеЧисло = СокрЛП(РимскоеЧисло);
   ЧислоСимволов = СтрДлина(РимскоеЧисло);

   Для Сч=1 По ЧислоСимволов Цикл
      Если Сред(РимскоеЧисло,Сч,1) = c1000 Тогда
         АрабскоеЧисло = АрабскоеЧисло+1000;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c500 Тогда
         АрабскоеЧисло = АрабскоеЧисло+500;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c100 Тогда
         Если (Сч < ЧислоСимволов) И ((Сред(РимскоеЧисло,Сч+1,1) = c500) ИЛИ (Сред(РимскоеЧисло,Сч+1,1) = c1000)) Тогда
            АрабскоеЧисло = АрабскоеЧисло-100;
         Иначе
            АрабскоеЧисло = АрабскоеЧисло+100;
         КонецЕсли;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c50 Тогда
         АрабскоеЧисло = АрабскоеЧисло+50;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c10 Тогда
         Если (Сч < ЧислоСимволов) И ((Сред(РимскоеЧисло,Сч+1,1) = c50) ИЛИ (Сред(РимскоеЧисло,Сч+1,1) = c100)) Тогда
            АрабскоеЧисло = АрабскоеЧисло-10;
         Иначе
            АрабскоеЧисло = АрабскоеЧисло+10;
         КонецЕсли;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c5 Тогда
         АрабскоеЧисло = АрабскоеЧисло+5;
      ИначеЕсли Сред(РимскоеЧисло,Сч,1) = c1 Тогда
         Если (Сч < ЧислоСимволов) И ((Сред(РимскоеЧисло,Сч+1,1) = c5) ИЛИ (Сред(РимскоеЧисло,Сч+1,1) = c10)) Тогда
            АрабскоеЧисло = АрабскоеЧисло-1;
         Иначе
            АрабскоеЧисло = АрабскоеЧисло+1;
         КонецЕсли;
      КонецЕсли;
   КонецЦикла;
   Возврат АрабскоеЧисло;
КонецФункции //ПреобразоватьЧислоВАрабскуюНотацию

(52)Эта функция есть

(53)Уже одно есть, а как записаны сами Римские цифры?
В функции они написаны кирилицей, а у вас?

(51)через если писать,то получится надо выгружать в тз а дальше выводить на печать

(53) добавь в неё СтрЗаменить(РимскоеЧисло, "1", "I")

(56)Это понятно, там когда возврат идет из функции пишет что невозможно присвоить значение группечистоты

(57) наоборот, кстати: СтрЗаменить(РимскоеЧисло, "I", "1")

все решено спасибо всем

(55)>>через если писать,то получится надо выгружать в тз а дальше выводить на печать

С чего это?

(60)Ну если не поставишь в запросе,значит вывести сразу не получится,или я не так понял просто

(61) что значит вывести сразу? давно запросы можно сразу выводить на экран?

(62)ну группировка и вывести

(62) как только консоль изобрели. я могу

(63) макет поправь и даже код менять не придётся

(65)там же накопление нужно мне по всем строкам документов, где группа чистоты * количество