Приветствую! Подскажите, есть ли в 1с 7.7 процедура преобразования символов из ASCII в Hex?

//*******************************************
//Преобразование DEC в HEX
Function DECtoHEX(DEC) Экспорт
  Ост=DEC;Hex="";
  Пока Ост>0 Цикл
    HEX0=Ост-Цел(Ост/16)*16;
    Ост=Цел(Ост/16);
    Если HEX0=10 Тогда
      HEX0="A";
    ИначеЕсли HEX0=11 Тогда
      HEX0="B"
    ИначеЕсли HEX0=12 Тогда
      HEX0="C"
    ИначеЕсли HEX0=13 Тогда
      HEX0="D"
    ИначеЕсли HEX0=14 Тогда
      HEX0="E"
    ИначеЕсли HEX0=15 Тогда
      HEX0="F"
    КонецЕсли;
    Hex=""+HEX0+Hex;
  КонецЦикла;
  Возврат Hex;
EndFunction

Мне надо ASCII в Hex, а это DEC в HEX

ASCII - G, в HEX - 47
ASCII - @, в HEX - 40
Кто программировал сканер штрих кодов знает

специально для программистов сканеров была разработана ф-я КодСимв()