DBA Data[Home] [Help]

APPS.GMD_CUSTOMER_TESTS_GRP dependencies on FND_API

Line 95: x_return_status := FND_API.G_RET_STS_SUCCESS ;

91:
92: BEGIN
93: l_progress := '010';
94:
95: x_return_status := FND_API.G_RET_STS_SUCCESS ;
96: IF FND_API.to_Boolean( p_init_msg_list ) THEN
97: FND_MSG_PUB.initialize; -- clear the message stack.
98: END IF;
99:

Line 96: IF FND_API.to_Boolean( p_init_msg_list ) THEN

92: BEGIN
93: l_progress := '010';
94:
95: x_return_status := FND_API.G_RET_STS_SUCCESS ;
96: IF FND_API.to_Boolean( p_init_msg_list ) THEN
97: FND_MSG_PUB.initialize; -- clear the message stack.
98: END IF;
99:
100: -- Validate that required Fields are populated.

Line 104: RAISE FND_API.G_EXC_ERROR;

100: -- Validate that required Fields are populated.
101:
102: IF p_customer_tests_rec.test_id is NULL THEN
103: GMD_API_PUB.log_message('GMD_TEST_ID_CODE_NULL');
104: RAISE FND_API.G_EXC_ERROR;
105: ELSE
106: -- Check Test is Valid
107: OPEN c_check_test (p_customer_tests_rec.test_id);
108: FETCH c_check_test INTO l_display_precision,

Line 114: RAISE FND_API.G_EXC_ERROR;

110: IF c_check_test%NOTFOUND THEN
111: CLOSE c_check_test;
112: GMD_API_PUB.log_message('GMD_INVALID_TEST_ID',
113: 'TEST_ID',p_customer_tests_rec.test_id);
114: RAISE FND_API.G_EXC_ERROR;
115: END IF;
116: CLOSE c_check_test;
117: END IF;
118:

Line 122: RAISE FND_API.G_EXC_ERROR;

118:
119:
120: IF p_customer_tests_rec.cust_id is NULL THEN
121: GMD_API_PUB.log_message('GMD_API_CUST_ID_NULL');
122: RAISE FND_API.G_EXC_ERROR;
123: ELSE
124: -- Check Customer is Valid
125: OPEN c_check_cust (p_customer_tests_rec.cust_id);
126: FETCH c_check_cust INTO l_dummy;

Line 131: RAISE FND_API.G_EXC_ERROR;

127: IF c_check_cust%NOTFOUND THEN
128: CLOSE c_check_cust;
129: GMD_API_PUB.log_message('GMD_INVALID_CUST_ID',
130: 'CUST_ID',p_customer_tests_rec.cust_id);
131: RAISE FND_API.G_EXC_ERROR;
132: END IF;
133: CLOSE c_check_cust;
134: END IF;
135:

Line 142: RAISE FND_API.G_EXC_ERROR;

138:
139: IF l_delete_mark = 1 THEN
140: GMD_API_PUB.log_message('GMD_TEST_DELETED',
141: 'TEST',p_customer_tests_rec.test_id);
142: RAISE FND_API.G_EXC_ERROR;
143: END IF;
144:
145: -- Validate that record does not exist
146:

Line 155: RAISE FND_API.G_EXC_ERROR;

151:
152: GMD_API_PUB.log_message('GMD_CUST_TESTS_EXISTS',
153: 'CUST_ID',p_customer_tests_rec.cust_id,
154: 'TEST_ID',p_customer_tests_rec.test_id);
155: RAISE FND_API.G_EXC_ERROR;
156: END IF;
157:
158:
159: -- Validate Report Precison and Display

Line 164: RAISE FND_API.G_EXC_ERROR;

160:
161: IF p_customer_tests_rec.cust_test_display IS NULL AND
162: p_customer_tests_rec.report_precision IS NULL THEN
163: GMD_API_PUB.log_message('GMD','GMD_CUST_TEST_REQ');
164: RAISE FND_API.G_EXC_ERROR;
165: END IF;
166:
167: l_progress := '030';
168:

Line 177: RAISE FND_API.G_EXC_ERROR;

173: IF p_customer_tests_rec.report_precision is NOT NULL AND
174: p_customer_tests_rec.report_precision > l_display_precision THEN
175: GMD_API_PUB.log_message('GMD_REP_GRTR_DIS_PRCSN',
176: 'DISPLAY_PRECISION', l_display_precision);
177: RAISE FND_API.G_EXC_ERROR;
178:
179: END IF;
180: ELSE
181:

Line 185: RAISE FND_API.G_EXC_ERROR;

181:
182: IF p_customer_tests_rec.report_precision is NOT NULL THEN
183: GMD_API_PUB.log_message('GMD_REP_PRCSN_INVALID',
184: 'TEST_TYPE',l_test_type);
185: RAISE FND_API.G_EXC_ERROR;
186: END IF;
187:
188: IF p_customer_tests_rec.cust_test_display IS NULL THEN
189: GMD_API_PUB.log_message('GMD_CUST_DISPLAY_REQ');

Line 190: RAISE FND_API.G_EXC_ERROR;

186: END IF;
187:
188: IF p_customer_tests_rec.cust_test_display IS NULL THEN
189: GMD_API_PUB.log_message('GMD_CUST_DISPLAY_REQ');
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
192:
193: END IF;
194:

Line 197: WHEN FND_API.G_EXC_ERROR THEN

193: END IF;
194:
195: EXCEPTION
196:
197: WHEN FND_API.G_EXC_ERROR THEN
198: x_return_status := FND_API.G_RET_STS_ERROR;
199: WHEN OTHERS THEN
200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
201: GMD_API_PUB.log_message('GMD_API_ERROR',

Line 198: x_return_status := FND_API.G_RET_STS_ERROR;

194:
195: EXCEPTION
196:
197: WHEN FND_API.G_EXC_ERROR THEN
198: x_return_status := FND_API.G_RET_STS_ERROR;
199: WHEN OTHERS THEN
200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
201: GMD_API_PUB.log_message('GMD_API_ERROR',
202: 'PACKAGE' , 'GMD_CUSTOMER_TESTS_GRP',

Line 200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

196:
197: WHEN FND_API.G_EXC_ERROR THEN
198: x_return_status := FND_API.G_RET_STS_ERROR;
199: WHEN OTHERS THEN
200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
201: GMD_API_PUB.log_message('GMD_API_ERROR',
202: 'PACKAGE' , 'GMD_CUSTOMER_TESTS_GRP',
203: 'ERROR' , substr(sqlerrm,1,100),
204: 'POSITION' , l_progress);

Line 227: x_return_status := FND_API.G_RET_STS_SUCCESS ;

223:
224: BEGIN
225: l_progress := '010';
226:
227: x_return_status := FND_API.G_RET_STS_SUCCESS ;
228: IF FND_API.to_Boolean( p_init_msg_list ) THEN
229: FND_MSG_PUB.initialize; -- clear the message stack.
230: END IF;
231:

Line 228: IF FND_API.to_Boolean( p_init_msg_list ) THEN

224: BEGIN
225: l_progress := '010';
226:
227: x_return_status := FND_API.G_RET_STS_SUCCESS ;
228: IF FND_API.to_Boolean( p_init_msg_list ) THEN
229: FND_MSG_PUB.initialize; -- clear the message stack.
230: END IF;
231:
232: -- Validate that test_id and cust_id are populated.

Line 236: RAISE FND_API.G_EXC_ERROR;

232: -- Validate that test_id and cust_id are populated.
233:
234: IF p_test_id is NULL THEN
235: GMD_API_PUB.log_message('GMD_TEST_ID_CODE_NULL');
236: RAISE FND_API.G_EXC_ERROR;
237: END IF;
238:
239: IF p_cust_id is NULL THEN
240: GMD_API_PUB.log_message('GMD_API_CUST_ID_NULL');

Line 241: RAISE FND_API.G_EXC_ERROR;

237: END IF;
238:
239: IF p_cust_id is NULL THEN
240: GMD_API_PUB.log_message('GMD_API_CUST_ID_NULL');
241: RAISE FND_API.G_EXC_ERROR;
242: END IF;
243:
244: -- Validate that record Exists
245:

Line 252: RAISE FND_API.G_EXC_ERROR;

248:
249: GMD_API_PUB.log_message('GMD_CUST_TESTS_NOTEXISTS',
250: 'CUST_ID',p_cust_id,
251: 'TEST_ID',p_test_id);
252: RAISE FND_API.G_EXC_ERROR;
253: END IF;
254:
255: l_progress := '020';
256:

Line 267: RAISE FND_API.G_EXC_ERROR;

263: -- BUG 3554590 Check if the TEST is already deleted!
264: IF l_delete_mark = 1 THEN
265: GMD_API_PUB.log_message('GMD_TEST_DELETED',
266: 'TEST',p_test_id);
267: RAISE FND_API.G_EXC_ERROR;
268: END IF;
269:
270:
271: EXCEPTION

Line 272: WHEN FND_API.G_EXC_ERROR THEN

268: END IF;
269:
270:
271: EXCEPTION
272: WHEN FND_API.G_EXC_ERROR THEN
273: x_return_status := FND_API.G_RET_STS_ERROR ;
274: WHEN OTHERS THEN
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: GMD_API_PUB.log_message('GMD_API_ERROR',

Line 273: x_return_status := FND_API.G_RET_STS_ERROR ;

269:
270:
271: EXCEPTION
272: WHEN FND_API.G_EXC_ERROR THEN
273: x_return_status := FND_API.G_RET_STS_ERROR ;
274: WHEN OTHERS THEN
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: GMD_API_PUB.log_message('GMD_API_ERROR',
277: 'PACKAGE' , 'GMD_CUSTOMER_TESTS_GRP',

Line 275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

271: EXCEPTION
272: WHEN FND_API.G_EXC_ERROR THEN
273: x_return_status := FND_API.G_RET_STS_ERROR ;
274: WHEN OTHERS THEN
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276: GMD_API_PUB.log_message('GMD_API_ERROR',
277: 'PACKAGE' , 'GMD_CUSTOMER_TESTS_GRP',
278: 'ERROR' , substr(sqlerrm,1,100),
279: 'POSITION' , l_progress);