Discussion :

[Danicela]

J'ai le code suivant lors d'un WHEN BUTTON PRESSED :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
v_report_id:= FIND_REPORT_OBJECT('COLORIS');
 
erf :=RUN_REPORT_OBJECT(v_report_id);

COLORIS étant un état déclaré dans Etats rattaché à un vrai .rdf

Lorsque je clique sur le bouton correspondant dans l'exécution de la form, j'ai une erreur : "FRM-92101 : une erreur sest produite lors du démarrage du serveur Forms (etc.)", dans les détails j'ai ça : "oracle.forms.net.ConnectionException : Abandon de la session Forms : communication avec le processus runtime impossible." et avec ces classes en erreur : ConnectionException, HTTPNStream, DataOutputStream, StreamMessageWriter.

J'ai tenté de rajouter dans la variable d'environnement REPORTS_PATH le nom absolu du dossier contenant le report, mais ça n'a rien changé, de même pour la base de registres.

Merci pour votre aide.

[Danicela]

Le code suivant fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
PROCEDURE lancer_report IS
 
report_id REPORT_OBJECT; 
report_job_id VARCHAR2(200); 
rep_status VARCHAR2(200); 
JOB_NUMBER number; 
server_name VARCHAR2(200) := 'rep_stagiaire'; 
 
BEGIN 
/* Check to see if forms application is WEB deployed */ 
 
--IF get_application_property(user_interface) = 'WEB' THEN 
 
	--s'affiche trop tard
--	message('Traitement rapport en cours...', No_acknowledge);
 
	report_id:= FIND_REPORT_OBJECT('COLORIS'); 
 
	/* Set Report parameters given WEB deployment */ 
--	SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_SERVER , server_name); 
	SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,CACHE); 
 
	/* DESFORMAT could be HTML, HTMLCSS or PDF here*/ 
	SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESFORMAT,'PDF'); 
 
	/* Run the report */ 
	report_job_id := RUN_REPORT_OBJECT(report_id); 
 
	/* Check the report status */ 
	rep_status:=REPORT_OBJECT_STATUS(report_job_id); 
 
	WHILE rep_status IN ('RUNNING','OPENING_REPORT','ENQUEUED') 
	LOOP 
	rep_status := report_object_status(report_job_id); 
	END LOOP; 
 
	IF rep_status='FINISHED' THEN 
	message('Rapport correctement lancé'); 
 
	/* Display the report output in the client browser */ 
	JOB_NUMBER := length(server_name) + 2; 
	WEB.SHOW_DOCUMENT ('/reports/rwservlet/getjobid'||substr(report_job_id,JOB_NUMBER)||'?server=' || server_name ,'_BLANK'); 
 
	/* If report has failed display message to user */ 
	ELSE 
		message('Erreur report avec le statut : '||rep_status); 
	END IF; 
 
--ELSE 
 
	/* Else if forms application is Client-Server deployed */ 
	/* Set Report parameters given Client-Server deployment */ 
 
	/*report_id:= FIND_REPORT_OBJECT('COLORIS'); 
	SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_SERVER ,''); 
 
	/* Report to be executed via Reports Background Engine, not the 'new' Reports Multi-Tier Server */ 
	/* Destype SCREEN or PREVIEW can be used here */ 
 
	--SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,SCREEN); 
 
	/* Run the report */ 
 
	--report_job_id := RUN_REPORT_OBJECT(report_id); 
 
--END IF;
END;

Et avec l'objet report qui va avec.