powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Oracle Forms [игнор отключен] [закрыт для гостей] / Oracle Forms 6 и поля слияния в Word
5 сообщений из 5, страница 1 из 1
Oracle Forms 6 и поля слияния в Word
    #33951704
alex_soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем доброго ...
Задача:
Необходимо вывести в Worde какой-то текст в котором нужно вставить данные из базы. (Почему Word? Чтобы пользователи могли что-то править и там нужну колонтитулы).
Как я сделал:
Создал в Forms_ах файл-табличку формата html (это будем у меня как файл источника данных). В Word_е создал документ в которых вставил данные и файла источника данных. То есть у меня получаеться что в процессе выполнения сначала создаеться файл (*.html) и сразу запускаеться Word.
В чем проблема:
При открытии Word_а выпрыгивает окно и спрашивает данные помещать в документ или нет.
Вопрос Как избавиться от отого окно или если кто-то делал что-то подобное, просьба подсказать.
...
Рейтинг: 0 / 0
Oracle Forms 6 и поля слияния в Word
    #33951769
Фотография Sergey_Evdokimov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
alex_softв процессе выполнения сначала создаеться файл (*.html) и сразу запускаеться Word. Если по мужски приведете код - попробую найти как избавицо...
...
Рейтинг: 0 / 0
Oracle Forms 6 и поля слияния в Word
    #33951784
alex_soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот что на кнопке выполнения "висит".

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
DECLARE
	V_FILE text_io.FILE_TYPE;
	v_dir       VARCHAR2( 100 ) := ('C:\');
  v_fname     VARCHAR2( 100 ) := ('proba.html');
  c3	varchar2( 10 );
  c1 varchar2( 200 );
  n   varchar2( 10 );
  d   date;
 
  begin
	V_FILE := text_io.fopen (v_dir || v_fname ,'w');
	text_io.PUTF(V_FILE,'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">');
	text_io.PUTF(V_FILE,'<html>');
	text_io.PUTF(V_FILE,'<head>');
  text_io.PUTF(V_FILE,'<title>Справка о введенных платежах </title>');
  text_io.PUTF(V_FILE,'</head>');
  SELECT CLIE_NAME3 , CLIE_NAME1, AGRM_NUMBER, AGRM_DT1 into c3,c1,n,d
  FROM CLIENTS , AGREEMENTS 
 WHERE CLIE_ID = AGRM_CLIE_ID(+)
   AND CLIE_NAME3 = :fil.clie_name
   AND AGRM_DT2 IS NULL;
    text_io.PUTF(V_FILE,'<table border="1" cellpadding="0" cellspacing="0" style="border: 1px solid black">'); 	 
  	text_io.PUTF(V_FILE,'<tr>');
    text_io.PUTF(V_FILE,'<td>1</td><td>2</td><td>3</td><td>4</td>');
    text_io.PUTF(V_FILE,'</tr>');
    text_io.PUTF(V_FILE,'<tr>');
  	text_io.PUTF(V_FILE,'<td>'||(c3)||'</td>'||'<td>'||(c1)||'</td>'||'<td>'||(n)||'</td>'||'<td>'||(d)||'</td>');
   	text_io.PUTF(V_FILE,'</tr>');
   	text_io.PUTF(V_FILE,'</body>');
    text_io.PUTF(V_FILE,'</html>');
		text_io.FCLOSE(V_FILE);
	Set_Alert_Property('end', ALERT_MESSAGE_TEXT, 'Печатать');		
  id_alert:=show_alert('end');
		Host('cmd /c start c:/cavu.doc');
		end;
...
Рейтинг: 0 / 0
Oracle Forms 6 и поля слияния в Word
    #33951819
Фотография Sergey_Evdokimov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
Set_Alert_Property('end', ALERT_MESSAGE_TEXT, 'Печатать');
  id_alert:=show_alert('end');
У меня кроме вашего алерта на Office 2003 ничего лишнего не выпрыгивает... Смотрите настройки Worda.
И еще попробуйте выкинуть строчку
Код: plaintext
text_io.PUTF(V_FILE,'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">');
...
Рейтинг: 0 / 0
Oracle Forms 6 и поля слияния в Word
    #33957766
alex_soft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Большое спасибо!
В настройках Worda такого не нашел попробую это окно "убить" макросом.
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Oracle Forms [игнор отключен] [закрыт для гостей] / Oracle Forms 6 и поля слияния в Word
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]