1с, OLE, регистры, остатки

[Denn]

Случилось тут у меня в одном филиале, напортачили с взаиморасчетами в базе 1с, ну и как вариант решения проблемы было решено сравнивать взаиморасчеты на определённые даты в рабочей базе и в копии...
а как бы это автоматизировать ? и "гавкать" на те моменты где не соответствие ? - сравнивать регистры двух баз через OLE !?
но мне раньше "ПолучатьОстатки" на разные даты не приходилось, - начал пробовать...
и упёрся, что "РасчитатьРегистрыНа" через OLE не так-то просто !!! точнее сказать немного не привычными методами... в итоге, с помощью инета, проб и ошибок, получился вот такой рабочий код:

	
        БазаОле=СоздатьОбъект("V77.Application"); // Получаем доступ к OLE объекту 1С	
	КаталогБазыОЛе  = "D:\1c";
	ПользовательОле = "user";
	ПарольОле       = "pass";
	МонопольныйРежимOLE = " "; // для немонопольного запуска указать пустую строку!   /m
	//ЗапускБезЗаставки = 1;       // для появления заставки (например, чтобы наблюдать
	// процесс запуска базы OLE визуально) поставьте здесь "0"
	РезультатПодключения = БазаОле.Initialize ( БазаОле.RMTrade,"/d"+СокрЛП(КаталогБазыОле)+" /n"+СокрЛП(ПользовательОле)+" /p"+СокрЛП(ПарольОле)+МонопольныйРежимOLE,"NO_SPLASH_SHOW");
	Если РезультатПодключения = 0 Тогда
		Предупреждение("Не удалось подключится к указанной базе - проверьте вводные!");
	КонецЕсли;	
	
	Спр=СоздатьОбъект("Справочник.Клиенты");   
	Рег=СоздатьОбъект("Регистр.Взаиморасчеты");
	СпрОЛЕ = БазаОле.CreateObject("Справочник.Клиенты"); // "СоздатьОбъект" в OLE не работает!
	РегО = БазаОле.CreateObject("Регистры");
	РегОЛЕ = РегО.Взаиморасчеты;
	
	Рег.ВременныйРасчет(1);
	РегОЛЕ.ВременныйРасчет(1);
	РассчитатьРегистрыНа(Дата2); 
	РегО.РассчитатьРегистрыНа(Дата2);
       
      Долг=РегОле.СводныйОстаток(,,,Ресурс);

в принципе, строка : "РегОЛЕ.ВременныйРасчет(1);" мне кажется здесь лишняя (это сейчас мне кажется, а когда писал код - думал нужна )
метод СводныйОстаток(,,,Ресурс) 100% работает отлично, хотел поэкспериментировать с другими методами, но руки не дошли.