Приветствую, как получить Уникальный идентификатор объекта в 1с 7.7?

Подобие 8, Выборка.Ссылка.УникальныйИдентификатор()

ты ветку завёл, чтобы удобней было красную Я нажимать?
http://help1c.com/faq/view/552.html

ЗначениеВСтрокуВнутр()
где-то в строке ИД-шник есть

Получается так ЗначениеВСтрокуВнутр(Документ.ТекущийДокумент())??

(4) выходит, где-то там

Мда...) Спасибо за помощь)

(6) там не вся строка УИД, а только кусок, точнее самый последний параметр в строке.

Функция ПолучитьИД(Нечто)
   Перем Стр;
   Если ПустоеЗначение(Нечто)=1 Тогда
       Возврат "не выбран объект";
   КонецЕсли;    
   
   Ид=СтрЗаменить(СтрЗаменить(ЗначениеВСтрокуВнутр(Нечто),",",РазделительСтрок),"""","");
   Ид=СтрЗаменить(Ид,"{","");
   Ид=СтрЗаменить(Ид,"}","");
   ТбКод=Прав(СтрПолучитьСтроку(Ид,7),3);
   ТбИд=_IdToStr(СтрПолучитьСтроку(Ид,7));
   ТбИдЧисло=ТбИд+ТбКод;
   IDD=СокрЛП(ТбИдЧисло);
   Возврат IDD;
КонецФункции

(8) Так короче


Функция ПолучитьID(Объект) Экспорт
   Перем Стр;
   Стр=ЗначениеВСтрокуВнутр(Объект);
   СЗ=СоздатьОбъект("СписокЗначений");
   СЗ.ИзСтрокиСРазделителями(Сред(Стр,2,СтрДлина(Стр)-2));
   Возврат  сокрЛП(_IdToStr(СЗ.ПолучитьЗначение(СЗ.РазмерСписка())));
КонецФункции

Короче, так

Функция ПолучитьДокументПоИдДок(РеквВидИдДок)
   Перем Мета;
   Перем Рез;

   Мета=СоздатьОбъект("MetaDataWork");
   Рез = Мета.ЗначениеИзДлиннойСтрокиБД("Документ",СтрЗаменить(Лев(РеквВидИдДок,13),"%"," "));
   
   Возврат Рез;
КонецФункции    // ПолучитьДокументПоИдДок(РеквВидИдДок)



Функция ПолучитьID_1СПП(ТекЭлем,ЧислоБукв)
   Перем Рез;
   Перем Мета;
   
   Рез = "";
   
   Мета = СоздатьОбъект("MetaDataWork");
   Если ЧислоБукв = 9 Тогда
       Рез = Мета.ЗначениеВСтрокуБД(ТекЭлем);
   ИначеЕсли ЧислоБукв = 13 Тогда
       Рез = Мета.ЗначениеВДлиннуюСтрокуБД(ТекЭлем);
   ИначеЕсли ЧислоБукв = 23 Тогда
       Рез = Мета.ЗначениеВСамуюДлиннуюСтрокуБД(ТекЭлем);
   ИначеЕсли ЧислоБукв = 3 Тогда
       Рез = Прав(Мета.ЗначениеВСтрокуБД(ТекЭлем),3);
   ИначеЕсли ЧислоБукв = 6 Тогда
       Рез = Лев(Мета.ЗначениеВСтрокуБД(ТекЭлем),6);
   КонецЕсли;
   
   Рез = СтрЗаменить(Рез," ","%");
   
   Возврат Рез;
КонецФункции    // ПолучитьID_1СПП(ТекЭлем,13)

(10) В каком место твоя портянка требующая наличия дополнительных не штатных ВК короче?

(11) Чего? Сам ты партянка, это халявный 1С++
И неважно, что база будет ДБФ и не будет использоваться интерфейсный механизм запросов.
Просто по скорости получения ИД, этот самый быстрый :)

(12) Еще раз это штатная ВК? Нет? Тогда до свидание

(13) А что, можно пользоваться только штатными ВК? Сама концепция ВК как бы намекает, что их могут писать и другие люди.

(13) Да и не смотри... я твои штатные Шатал.
Не для тебя пишу :)

(14)Так не факт что у ТС эта вк подключена.

(16) Тут два момента:
1. Кто мешает подключить?
2. Если нужен уникальный ID - то что с ним ТС собирается делать? "Штатные" средства 1С им пользуются невидимо для программиста.

(14) Другие <> не все. У некоторых по разным причинам их может и не быть

(17) представь справочник огромный, нужно найти 1 элемент зная его ID, делается это заменой строки и потом СтрокаВнутрВЗначение() работает на ура быстрее любых прямых запросов....

(17)
1. Причин много, начина от религии и заканчивая параноей у руководства/админа
2. ТОже что и 1С с ним делает, т.е. для идентификации объекта. Внезапно да?

(19) С этим согласен. Но это уже предполагает знание того, как построить аргумент для ЗначениеИзСтрокиВнутр - а в таком случае вопрос (0) просто не возникнет.

(20) Ну, религия - это дело личное. Но если паранойя у руководства - тут, согласен, действительно могут возникнуть проблемы. (Что не повод априори всем "нештатным" ВК говорить "до свиданья". Как пример - АТОЛовские ВК считать штатными или нет? Или Штриховские?).

(16) Это уже решать ТС, может он одумается и пристрастится к прекрасному :)

А вот ему (0) Еще и обработочка для удобной регистрации ВК:
http://yadi.sk/d/aR0fed5Y4EpN9

Там же и ВК лежат :)

СтрокаДействийФормы=Объект;
Сообщить(СтрокаДействийФормы);

(9)

Функция глПолучитьОбъектИД(Объект) Экспорт
// Функция получает ИД объекта
// Объект - объект метаданных
   Перем Сп,Стр;
   Сп=СоздатьОбъект("СписокЗначений");
   Сп.ДобавитьЗначение("",Объект);
   Сп.ПолучитьЗначение(1,Стр);
   Возврат Число(Стр);
КонецФункции    // глПолучитьИДОбъекта

//-------------------------------------------------------------------------
Функция глПолучитьВидИД(Объект="") Экспорт
// Функция получает ИД вида объекта
// Объект - объект метаданных
   Перем Сп,Тип;
   Тип=ТипЗначения(Объект);
   Если Тип=2 Тогда
       Тмп=ПолучитьПустоеЗначение(Объект);
   ИначеЕсли Тип=12 Тогда
       Тмп=ПолучитьПустоеЗначение("Документ."+Объект.Вид());
   ИначеЕсли Тип=11 Тогда
       Тмп=ПолучитьПустоеЗначение("Справочник."+Объект.Вид());
   ИначеЕсли Тип=10 Тогда
       Тмп=ПолучитьПустоеЗначение("Справочник."+Объект.Вид());
   ИначеЕсли Тип=15 Тогда
       Тмп=ПолучитьПустоеЗначение("Счет."+Объект.Вид());
   ИначеЕсли Тип=1 Тогда
       Возврат Объект;
   КонецЕсли;
   Сп=СоздатьОбъект("СписокЗначений");
   Сп.ИзСтрокиСРазделителями(ЗначениеВСтрокуВнутр(Тмп));
   Возврат Число(Сп.ПолучитьЗначение(4));
КонецФункции    // глПлучитьВидИД(Объект)

(19) а зачем тут прямой запрос?
собственно, действия системы будут аналогичны что при ЗначениеИзСтрокиБД, что при формировании из внутреннего представления ЗначениеИзСтрокиВнутр()
-----
а вообще, к ТС - ТрадиционныйКитайскийВопрос™