1 шаг Создать реквизит в документе
Стандартным способом переписать из общего реквизита
в твой новый реквизит документа.Все сохранить.
Это сделать получается ?
после того как получиться опишу следующие шаги.

undo писал(а) 04. Сентября 2009 :: 06:55:

Я думал у тебя проблема с удалением общего реквизита из 1с
ну тогда элементарно.
создаешь реквизит в документе. это то точно получиться.
далее 1с++ и команда   update.
После можно на всякий случай переиндексировать таблицу шапки документа

undo писал(а) 04. Сентября 2009 :: 07:07:

Все равно все эксперементы делай на копии,
а то мало ли что.

База = СоздатьОбъект("OLEDBData");
     База.Соединение("
     |Provider=VFPOLEDB.1;
     |Null = Yes;
     |Exclusive = No;
     |SourceType = DBF;
     |Data Source=" + КаталогИБ() + ";
     |Mode=ReadWrite;
     |Extended Properties="""";
     |User ID="""";
     |Password="""";
     |Mask Password=False;
     |Collating Sequence=MACHINE;
     |DSN=""""");
     
     Запрос = База.СоздатьКоманду();
     
     ТекстЗапроса = "
     |UPDATE Док
     |SET $Док.ШтрихКодПодвал1 = Жур.$ОбщийРеквизит.ШтрихКодПодвал
     |From
     | $Документ.Доверенность Док
     |INNER JOIN
     |      1SJourn as Жур on Жур.IdDoc = Док.IdDoc      
     |";
     
     Запрос.Отладка(1);
     Запрос.ВыполнитьИнструкцию(ТекстЗапроса)

Прилогаю полную структуру. Обращаю внимание на | $Документ.Доверенность Док
Всем огромное спасибо за помощь.