1С БП3.0 Нужна помошь

Вот как у меня это выглядит:
&НаСервере
Процедура ВыгрузкаОплаты();
Запрос = Новый Запрос("ВЫБРАТЬ
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.ДатаВходящегоДокумента КАК ДатаОплаты,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.Контрагент.Код КАК КодПлательщика,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.ДоговорКонтрагента.Код КАК ДоговорКонтрагента,
|    1 КАК ВидОплаты,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.НомерВходящегоДокумента КАК ПП,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.СуммаПлатежа КАК Сумма,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.Контрагент.Наименование,
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.ДоговорКонтрагента.Номер,
|    NULL КАК Номер
|ИЗ
|    Документ.ПоступлениеНаРасчетныйСчет.РасшифровкаПлатежа КАК ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа
|ГДЕ
|    ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.ДатаВходящегоДокумента МЕЖДУ &ДатаНач И &ДатаКон
|    И ПоступлениеНаРасчетныйСчетРасшифровкаПлатежа.Ссылка.Проведен = &Проведен
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Дата,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Контрагент.Код,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.ДоговорКонтрагента.Код,
|    2,
|    NULL,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.СуммаПлатежа,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Контрагент.Наименование,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.ДоговорКонтрагента.Номер,
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Номер
|ИЗ
|    Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ПриходныйКассовыйОрдерРасшифровкаПлатежа
|ГДЕ
|    ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Дата МЕЖДУ &ДатаНач И &ДатаКон
|    И ПриходныйКассовыйОрдерРасшифровкаПлатежа.Ссылка.Проведен = &Проведен
|
|УПОРЯДОЧИТЬ ПО
|    ДатаОплаты");
Запрос.УстановитьПараметр("ДатаНач", ЭтаФорма.Объект.ДатаНач);
Запрос.УстановитьПараметр("ДатаКон", ЭтаФорма.Объект.ДатаКон);
Запрос.УстановитьПараметр("Проведен", Проводка);
Проводка = Истина;

ТаблицаПоступлений = Запрос.Выполнить().Выгрузить();

Файл = Новый XBase;
Файл.Кодировка = КодировкаXBase.OEM;
Файл.поля.Добавить("DATA","D");
файл.поля.Добавить("KODKL","S",7);
файл.поля.Добавить("REGDOG_1C","S",10);
файл.поля.Добавить("OPLATA","N",1);
файл.поля.Добавить("NPLPOR","S",15);
файл.поля.Добавить("SUMMA","N",15,2);
Файл.СоздатьФайл("C:\Oplata.dbf");
Файл.Записать();

//ТаблицаПоступлений.ВыбратьСтроку();
Пока ТаблицаПоступлений.Следующий() цикл        // обходим табличную документа "Зарплата к выплате"
        Файл.Добавить();                        // добавляем новую запись в файл
        Файл.DATA = ТаблицаПоступлений.ДатаОплаты;
        Файл.KODKL = ТаблицаПоступлений.КодПлательщика;
        Файл.REGDOG_1C = ТаблицаПоступлений.ДоговорКонтрагента;
        Файл.OPLATA = ТаблицаПоступлений.ВидОплаты;
        Файл.NPLPOR = ТаблицаПоступлений.ПП;
        Файл.SUMMA = ТаблицаПоступлений.Сумма;
        Файл.Записать();                        // записываем внесенные данные в файл
КонецЦикла;
Файл.ЗакрытьФайл();                             // закрываем файл
Сообщить("Файл успешно сформирован!");

КонецПроцедуры

&НаКлиенте
Процедура Выгрузить(Команда);
    ВыгрузкаОплаты();
КонецПроцедуры;

Подскажите как переделать.