[Home] [Help]
PACKAGE BODY: APPS.GR_EURO_CLASSIFICATION
Source
1 PACKAGE BODY GR_EURO_CLASSIFICATION AS
2 /*$Header: GRPEUROB.pls 120.1 2005/09/06 14:37:36 pbamb noship $*/
3 PROCEDURE Classify_Hazard
4 (errbuf OUT NOCOPY VARCHAR2,
5 retcode OUT NOCOPY VARCHAR2,
6 p_api_version IN NUMBER,
7 p_init_msg_list IN VARCHAR2,
8 p_commit IN VARCHAR2,
9 p_validation_level IN NUMBER,
10 p_item_to_classify_from IN VARCHAR2,
11 p_item_to_classify_to IN VARCHAR2,
12 p_print_calculations IN VARCHAR2,
13 x_session_id OUT NOCOPY NUMBER,
14 x_return_status OUT NOCOPY VARCHAR2,
15 x_msg_count OUT NOCOPY NUMBER,
16 x_msg_data OUT NOCOPY VARCHAR2)
17 IS
18 BEGIN
19
20 NULL;
21 x_return_status := FND_API.G_RET_STS_SUCCESS;
22
23 EXCEPTION
24
25 WHEN OTHERS THEN
26 x_return_status := FND_API.G_RET_STS_SUCCESS;
27
28 END Classify_Hazard;
29
30 PROCEDURE Assign_Risk_Phrases (errbuf OUT NOCOPY VARCHAR2,
31 retcode OUT NOCOPY VARCHAR2,
32 p_api_version IN NUMBER,
33 p_session_id IN NUMBER,
34 p_item_to_classify IN VARCHAR2,
35 p_print_calculations IN VARCHAR2,
36 x_return_status OUT NOCOPY VARCHAR2,
37 x_msg_count OUT NOCOPY NUMBER,
38 x_msg_data OUT NOCOPY VARCHAR2)
39
40 IS
41 BEGIN
42
43 NULL;
44 x_return_status := FND_API.G_RET_STS_SUCCESS;
45
46 /* Exception Handling */
47 EXCEPTION
48
49 WHEN OTHERS THEN
50 x_return_status := FND_API.G_RET_STS_SUCCESS;
51
52 END Assign_Risk_Phrases;
53
54 PROCEDURE Assign_Safety_Phrases (errbuf OUT NOCOPY VARCHAR2,
55 retcode OUT NOCOPY VARCHAR2,
56 p_api_version IN NUMBER,
57 p_session_id IN NUMBER,
58 p_item_to_classify IN VARCHAR2,
59 p_print_calculations IN VARCHAR2,
60 x_return_status OUT NOCOPY VARCHAR2,
61 x_msg_count OUT NOCOPY NUMBER,
62 x_msg_data OUT NOCOPY VARCHAR2)
63
64 IS
65 BEGIN
66 NULL;
67 x_return_status := FND_API.G_RET_STS_SUCCESS;
68
69 /* Exception Handling */
70 EXCEPTION
71
72 WHEN OTHERS THEN
73 x_return_status := FND_API.G_RET_STS_SUCCESS;
74
75 END Assign_Safety_Phrases;
76
77
78 PROCEDURE Update_Hazard_Classifications (errbuf OUT NOCOPY VARCHAR2,
79 retcode OUT NOCOPY VARCHAR2,
80 p_api_version IN NUMBER,
81 p_init_msg_list IN VARCHAR2,
82 p_commit IN VARCHAR2,
83 p_validation_level IN NUMBER,
84 p_session_id IN NUMBER,
85 p_item_to_update IN VARCHAR2,
86 p_update_documents IN VARCHAR2,
87 p_delete_work IN VARCHAR2,
88 x_return_status OUT NOCOPY VARCHAR2,
89 x_msg_count OUT NOCOPY NUMBER,
90 x_msg_data OUT NOCOPY VARCHAR2)
91
92 IS
93 BEGIN
94 NULL;
95 x_return_status := FND_API.G_RET_STS_SUCCESS;
96
97 /* Exception Handling */
98 EXCEPTION
99
100 WHEN OTHERS THEN
101 x_return_status := FND_API.G_RET_STS_SUCCESS;
102
103 END Update_Hazard_Classifications;
104
105 PROCEDURE Delete_Work_Data (errbuf OUT NOCOPY VARCHAR2,
106 retcode OUT NOCOPY VARCHAR2,
107 p_api_version IN NUMBER,
108 p_init_msg_list IN VARCHAR2,
109 p_commit IN VARCHAR2,
110 p_validation_level IN NUMBER,
111 p_session_id IN NUMBER,
112 p_item_code IN VARCHAR2,
113 x_return_status OUT NOCOPY VARCHAR2,
114 x_msg_count OUT NOCOPY NUMBER,
115 x_msg_data OUT NOCOPY VARCHAR2)
116
117 IS
118 BEGIN
119 NULL;
120 x_return_status := FND_API.G_RET_STS_SUCCESS;
121
122 /* Exception Handling */
123 EXCEPTION
124
125 WHEN OTHERS THEN
126 x_return_status := FND_API.G_RET_STS_SUCCESS;
127
128 END Delete_Work_Data;
129
130 FUNCTION ITEM_MATCHES_CATEGORY_VALUE(p_item_to_compare IN VARCHAR2,
131 p_safety_category_code IN VARCHAR2,
132 p_category_value IN VARCHAR2) RETURN BOOLEAN IS
133
134
135 BEGIN
136 NULL;
137 RETURN TRUE;
138
139 EXCEPTION
140 WHEN OTHERS THEN
141
142 RETURN TRUE ;
143 END ITEM_MATCHES_CATEGORY_VALUE;
144 END GR_EURO_CLASSIFICATION;