Инициализация Переменных

[Asteni]

Project Header - OnPreDataItem()
IF "Project Header".GETFILTER(Code) = '' THEN
BEGIN
Word.Quit;
CLEAR(Word);
ERROR('Âûáåðèòå êîä ÄÔË!');
END;

Project Header - OnAfterGetRecord()

Project Header - OnPostDataItem()
Word.Selection.Find.Text:='!!Íîìåð ÄÔË!!';
Word.Selection.Find.Execute;
Word.Selection.TypeText:=FORMAT("Project Header".Code);