Navigation:  Конфигурация комплекса > Печатные формы >

Построение печатных форм на основании rtf шаблона

Previous pageReturn to chapter overviewNext page

В фабиусе вы можете использовать возможности невизуального компонента EK RTF report.

 

clip2215

 

Автор этого компонента Eugene Kuchugurov. В фабиусе используется версия его программы 3.10. Этот компонент создавался на протяжении 12 лет с 2000 до 2011 года.

Смысл этой программы в том, что вы можете использовать программу WinWord любой версии для подготовки шаблона. Все что необходимо будет сделать - сохранить шаблон в RTF формате. Причем, пользователям даже не обязательно иметь на компьютере Word. По умолчанию на всех компьютерах Windows устанавливается программа WordPad, таким образом, ваш шаблон будет работать на любом компьютере.

 

Для знакомства с ekrtf откройте справочник R38. Нажмите SHIFT+F9. Найдите бланк EkRTFReport.rtf и нажмите клавишу ENTER. Откройте программу.

 

<OPENPIPELINE>

local dict, t, fld, sql, t2

dict := { { 'gg', 'Алексей' } }

// t

// t_KOD

// t_NAME

fld := 't_KOD,N,5; t_NAME,C,50; '

t := CreateTmpFile( fld, 't' , ~IsFreeDel := true, ~Own := PrintForm() )

t2 := CreateTmpFile( fld, 't2', ~IsFreeDel := true, ~Own := PrintForm() )

sql := [ Select KOD, Left( PNAME, 50 ) ;

From R38 ]

SimpleSql( [ Insert into ] + TmpFilePath( t ) + [( t_KOD, t_NAME ) ] + sql, ReflisPath )

( t )->( DbGoTop() )

sql := [ Select TOP 100 PERCENT t_KOD, t_NAME ;

From ] + TmpFilePath( t ) + [ ;

Order by t_NAME ]

SimpleSql( [ Insert into ] + TmpFilePath( t2 ) + [( t_KOD, t_NAME ) ] + sql, ReflisPath )

( t2 )->( DbGoTop() )

EkRtfReport( 'EkRTFReport.rtf', { t, t2 }, dict )

 

Найдите на диске в папке Fabius\Reflis\Template файл EkRTFReport.rtf

Внутри него написано следующее

 

Привет, \ gg \

Сортировка по коду

Код

Наименование

\ scan( t ) \

\ t : t_KOD \

\ t : t_NAME \

\ endscan \

 

Сортировка по алфавиту

Код

Наименование

\ scan( t2 ) \

\ t2 : t_KOD \

\ t2 : t_NAME \

\ endscan \

 

 

Дополнительные примеры вы можете найти на сайте http://www.128byte.ru/