Report 12469

[lobster]

Подскажите пожалуйста каким образом в Report'е 12469 (оборот товара за период) происходит выгрузка в excel?
Ншел в коде само содание лиса и параметры в excel:

Значения этих переменных попадают в excel:


TextValueLine(ZeroToBlank : Boolean)
IF StartDate > 0D THEN
StartingQtyText := TextValue(StartingQty,ZeroToBlank)
ELSE
StartingQtyText := '';
EndingQtyText := TextValue(EndingQty,ZeroToBlank);
IncreaseQtyText := TextValue(IncreaseQty,ZeroToBlank);
DecreaseQtyText := TextValue(DecreaseQty,ZeroToBlank);
StartingStoimostText:=TextValue(StartingCost,ZeroToBlank);

Не могу понять как?

[prefreitor]

Там используется буферная табличка Excel Buffer. Посмотрите в отчете ф-цию EnterCell, где она используется и OnPostReport.
Все остальное происходит в функциях самой таблички.

[lobster]

Цитата:

Сообщение от prefreitor

Там используется буферная табличка Excel Buffer. Посмотрите в отчете ф-цию EnterCell, где она используется и OnPostReport.
Все остальное происходит в функциях самой таблички.

Фукцию EnterCell нашел, но где она используется не могу найти.

[prefreitor]

Цитата:

Сообщение от lobster

Фукцию EnterCell нашел, но где она используется не могу найти.

Загляните в код секций.

[lobster]

Мне нужно выгрузить дополнительно в excell например значение переменной StartingCost. В функции EnterCell есть локальная переменная CellValue, как я понимаю значение всех выгружаемых переменных проходит именно через нее, но как и где прописать StartingCost понять не могу.

[prefreitor]

Цитата:

Сообщение от lobster

Мне нужно выгрузить дополнительно в excell например значение переменной StartingCost. В функции EnterCell есть локальная переменная CellValue, как я понимаю значение всех выгружаемых переменных проходит именно через нее, но как и где прописать StartingCost понять не могу.

Так вот же, открываем секцию смотрим:

IF ExportExcel AND CurrReport.SHOWOUTPUT THEN BEGIN
  CurrentRowNo += 1;
  EnterCell(CurrentRowNo, 1, "No.", FALSE, FALSE, FALSE);
  EnterCell(CurrentRowNo, 2, ItemDescription, FALSE, FALSE, FALSE);
  EnterCell(CurrentRowNo, 3, FORMAT(StartingCost), FALSE, FALSE, FALSE);
  EnterCell(CurrentRowNo, 4, FORMAT(IncreaseCost), FALSE, FALSE, FALSE);
  EnterCell(CurrentRowNo, 5, FORMAT(DecreaseCost), FALSE, FALSE, FALSE);
  EnterCell(CurrentRowNo, 6, FORMAT(EndingCost), FALSE, FALSE, FALSE);
END;

Где CurrentRowNo строка, число - номер столбца.
Т.е надо что то типа
EnterCell(НомерСтроки, НомерСтолбца, ВашаПеременнаяТекст, FALSE, FALSE, FALSE);

[lobster]

Спасибо Вам большое!