1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33
34. 34
35. 35
36. 36
37. 37
38. 38
39. 39
40. 40
41. 41
42. 42
43. 43
44. 44
45. 45
46. 46
47. 47
48. 48
49. 49

CREATE PROCEDURE mix_kach1_spravka(
_date_time	DATETIME YEAR TO MINUTE, -- дата
_param_rez_id integer -- признак
) RETURNING integer, -- туфта
decimal; -- туфта

define _date_r nchar(19);
define _wzliv decimal;
define _n_nn_rez nchar(4);
define _mass integer;
define _mass1 integer;
define _date_begin DATETIME YEAR TO MINUTE;
define _date_end DATETIME YEAR TO MINUTE;
define _count integer;
define _wzliv_beg INTEGER;
define _bes_pas DECIMAL;
define i int;
define  _spr_id		  integer;
define	_all_w             decimal(7,1);
define	_go_w              decimal(7,1);
define	_pr_w              decimal(7,1);
define	_proc_go           decimal(4,1);
define	_proc_pr           decimal(4,1);
define _edatebegin Datetime year to minute;
define _w int;
define _m_go decimal;
define _m_pr decimal;
define test_date DATETIME YEAR TO MINUTE;

/*Опустим блок обработки ошибок*/

CREATE TEMP TABLE tmp_raschet1(
	--spr_id		  SERIAL NOT NULL,
	edate       Datetime year to MINUTE, --27.08.2008 Лазарев Е.В.
	w 		  int,
	all_w             decimal(7,1),
	go_w              decimal(7,1),
	pr_w              decimal(7,1),
	proc_go           decimal(4,1),
	proc_pr           decimal(4,1)
) with no log;

let _m_go = 0;
let _m_pr = 0;

execute procedure get_mix_quality(_date_time,_param_rez_id) into _w, _all_w, _go_w, _pr_w, _proc_go, _proc_pr, _edatebegin;
insert into tmp_raschet1 (edate,w,all_w, go_w,pr_w,proc_go,proc_pr) values (_edatebegin,_w,_all_w, _go_w, _pr_w, _proc_go, _proc_pr);

END PROCEDURE;