Аналитика

Благодарю, все работает.

В дополнение к функции BDY(см. Помощь-Что нового? в Ged.exe), возвращающей дату рождения по индивидуальному налоговому номеру, аналогичное действие можно осуществить в Reports (см. вложенный пример).

Кадастровый план ин4 в репортс так и нельзя загнать?

я столкнулся с проблемой... ПОМОГИТЕ...
-когда подгружается графика в report проблем нет, но после редактирования страницы теряется масштаб.
-в программе Frpeditor картинка с графикой не отображается, даже без редактирования.

код которым я пользуюсь:

procedure Picture4OnBeforePrint(Sender: TfrxComponent);
begin
with Picture4, Engine do
begin
FileName:=GetProgramDir+'\Pictures\Report'+IntToStr(<ObjNum>)+'.bmp';
loadfromfile(FileName)
end
end;

прикрепляю шаблон.

помогите пожалуйста с вопросом, очень нужно!!!

С сохранением масштаба в этом случае возникают проблемы, т.к. заранее неизвестен размер формируемого растра.
Можно формировать картинку кадплана предварительно используя DMT-шаблон определенных размеров(таких же как у Image в fr3-шаблоне), пример во вложении. И подгружать картинку уже не из файла GetProgramDir+'\Pictures\Report'+IntToStr(<ObjNum>)+'.bmp' а из файла GetProgramDir+'\Pictures\CP'+CadNumber+'.bmp', где CadNumber - полный кадастровый номер(19 цифр без двоеточий).
Во избежание стирания всех файлов в папке Pictures перед вызовом генератора отчетов установите(Сервис-Настройки-Главная-Константы) константу ReportPictures=0.

Решил проблему заменой формата с bmp на WMF.
FileName:=GetProgramDir+'\Pictures\Report'+IntToStr(<ObjNum>)+'.WMF'
Работает отлично... масштаб не теряется и качество картинки получше. Одна проблема, файл WMF в папку Pictures нужно вкидывать вручную. Есть ли функция выбора формата картинки, который формирует сам Report в папку Pictures? Спасибо за ответ.

;Скрипт формирует для помеченного объекта кадплан из Digitals\CP.dmt и сохраняет его
;в Digitals\Pictures\CPXXXXXXXXXXXXXXXXXXX.wmf где XXXXXXXXXXXXXXXXXXX - кадастровый номер
$PP=@ProgramPath
$IN4Map=@ActivateMap
@CreateFolder $PP\Documents\
Документы | CP
$CPMap=@ActivateMap
@Dialog.WaitBox Отредактируйте кадастровый план и нажмите кнопку "Продолжить"
@ActivateMap $CPMap
Файл | Сохранить
$FN=@Map.ClearShortFilename
@CreateFolder $PP\Pictures\
$FN=$PP\Pictures\$FN.wmf
@Map.SaveToTIF 300 24 $FN
@CloseMap $CPMap
@ActivateMap $IN4Map

возможно целесообразно еще добавить вызов генератора отчетов в конце скрипта

файл сохраняет нормально, но в названии файла выносится ошибка CP2320986601060220220051.wmf , 2 раза выводит квартал. Может что не так сделал? В общем создал переменную сadnumber что бы совпадал с названием файла.
Генерирую отчет и:
Были обнаружены следующие ошибки:Metafile is not valid
Но когда делаю вручную экспорт wmf с таким же названием CP2320986601060220220051.wmf все работает. только не wmf а WMF.

я так понял что то с форматом? или Report старенький?

Извините, это я не так сделал. В свойствах карты CP.dmt в поле "Имя" вместо Parent[DS]Parent[SD]Parent[BC]P[SC] нужно поставить Parent[DS]Parent[SD]P[SC] либо Parent[DS]Parent[SD]Parent[BC]CUT(4,4,P[SC])

Теперь сохраняет отлично!
Но все равно что то с форматом
Были обнаружены следующие ошибки:Metafile is not valid
если вручную то работает.
Файл-экспорт в-WMF-.........Piktures-CP0000000000000000000.WMF

А если экспортировать через bmp и выбрать Windows Metafile, результат тот же с ошибкой. хотя формат один и тот же

Помогите пожалуйста я не знаю почему при генерировании отчета на 2 участка , не получается разные целевые назначения, а идет повтор одного, в зависимости какой участок был выделен первым. Спасибо.

в тексте скрипта строки

определяют номера участков с нужным кодом целевого назначения.
Если такие участки не найдены, то переменные BudSR и SilSR будут равны нулю и все обращения к функции Param('название дескриптора',BudSR) и Param('название дескриптора',SilSR) будут возвращать значения для первого участка. Избежать этого можно проверяя значения переменных BudSR и SilSR сразу после инициализации, останавливая построение отчета в случае если хоть одна из этих переменных равна нулю.