DBA Data[Home] [Help]

APPS.PSB_WS_DISTRIBUTION_RULES_PVT dependencies on FND_API

Line 22: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

18:
19: PROCEDURE Insert_Row
20: (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
23: p_commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: p_return_status OUT NOCOPY VARCHAR2,
26: p_msg_count OUT NOCOPY NUMBER,

Line 23: p_commit IN VARCHAR2 := FND_API.G_FALSE,

19: PROCEDURE Insert_Row
20: (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
23: p_commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: p_return_status OUT NOCOPY VARCHAR2,
26: p_msg_count OUT NOCOPY NUMBER,
27: p_msg_data OUT NOCOPY VARCHAR2,

Line 24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

20: (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
23: p_commit IN VARCHAR2 := FND_API.G_FALSE,
24: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
25: p_return_status OUT NOCOPY VARCHAR2,
26: p_msg_count OUT NOCOPY NUMBER,
27: p_msg_data OUT NOCOPY VARCHAR2,
28: p_Row_Id IN OUT NOCOPY VARCHAR2,

Line 72: IF NOT FND_API.Compatible_API_Call ( l_api_version,

68: BEGIN
69: --
70: SAVEPOINT Insert_Row_Pvt ;
71: --
72: IF NOT FND_API.Compatible_API_Call ( l_api_version,
73: p_api_version,
74: l_api_name,
75: G_PKG_NAME )
76: THEN

Line 77: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

73: p_api_version,
74: l_api_name,
75: G_PKG_NAME )
76: THEN
77: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
78: END IF;
79: --
80:
81: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 81: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

77: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
78: END IF;
79: --
80:
81: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
82: FND_MSG_PUB.initialize ;
83: END IF;
84: --
85: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 85: p_return_status := FND_API.G_RET_STS_SUCCESS ;

81: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
82: FND_MSG_PUB.initialize ;
83: END IF;
84: --
85: p_return_status := FND_API.G_RET_STS_SUCCESS ;
86: --
87: P_LAST_UPDATE_DATE := SYSDATE;
88: if(P_MODE = 'I') then
89: P_LAST_UPDATED_BY := 1;

Line 103: raise FND_API.G_EXC_ERROR;

99: end if;
100: else
101: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
102: FND_MSG_PUB.Add ;
103: raise FND_API.G_EXC_ERROR;
104: end if;
105: --
106:
107: INSERT INTO psb_ws_distribution_rule_lines

Line 165: RAISE FND_API.G_EXC_ERROR ;

161: OPEN C;
162: FETCH C INTO p_Row_Id;
163: IF (C%NOTFOUND) THEN
164: CLOSE C;
165: RAISE FND_API.G_EXC_ERROR ;
166: END IF;
167: CLOSE C;
168: --
169:

Line 171: IF FND_API.To_Boolean ( p_commit ) THEN

167: CLOSE C;
168: --
169:
170: --
171: IF FND_API.To_Boolean ( p_commit ) THEN
172: COMMIT WORK;
173: END iF;
174: --
175: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 180: WHEN FND_API.G_EXC_ERROR THEN

176: p_data => p_msg_data );
177: --
178: EXCEPTION
179: --
180: WHEN FND_API.G_EXC_ERROR THEN
181: --
182: ROLLBACK TO Insert_Row_Pvt ;
183: p_return_status := FND_API.G_RET_STS_ERROR;
184: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 183: p_return_status := FND_API.G_RET_STS_ERROR;

179: --
180: WHEN FND_API.G_EXC_ERROR THEN
181: --
182: ROLLBACK TO Insert_Row_Pvt ;
183: p_return_status := FND_API.G_RET_STS_ERROR;
184: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
185: p_data => p_msg_data );
186: --
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

183: p_return_status := FND_API.G_RET_STS_ERROR;
184: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
185: p_data => p_msg_data );
186: --
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: --
189: ROLLBACK TO Insert_Row_Pvt ;
190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
191: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

186: --
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: --
189: ROLLBACK TO Insert_Row_Pvt ;
190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
191: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
192: p_data => p_msg_data );
193: --
194: WHEN OTHERS THEN

Line 197: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

193: --
194: WHEN OTHERS THEN
195: --
196: ROLLBACK TO Insert_Row_Pvt ;
197: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
198: --
199: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
200: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
201: l_api_name);

Line 219: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

215:
216: PROCEDURE Lock_Row
217: (
218: p_api_version IN NUMBER,
219: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
220: p_commit IN VARCHAR2 := FND_API.G_FALSE,
221: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
222: p_return_status OUT NOCOPY VARCHAR2,
223: p_msg_count OUT NOCOPY NUMBER,

Line 220: p_commit IN VARCHAR2 := FND_API.G_FALSE,

216: PROCEDURE Lock_Row
217: (
218: p_api_version IN NUMBER,
219: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
220: p_commit IN VARCHAR2 := FND_API.G_FALSE,
221: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
222: p_return_status OUT NOCOPY VARCHAR2,
223: p_msg_count OUT NOCOPY NUMBER,
224: p_msg_data OUT NOCOPY VARCHAR2,

Line 221: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

217: (
218: p_api_version IN NUMBER,
219: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
220: p_commit IN VARCHAR2 := FND_API.G_FALSE,
221: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
222: p_return_status OUT NOCOPY VARCHAR2,
223: p_msg_count OUT NOCOPY NUMBER,
224: p_msg_data OUT NOCOPY VARCHAR2,
225: --

Line 285: IF NOT FND_API.Compatible_API_Call ( l_api_version,

281: BEGIN
282: --
283: SAVEPOINT Lock_Row_Pvt ;
284: --
285: IF NOT FND_API.Compatible_API_Call ( l_api_version,
286: p_api_version,
287: l_api_name,
288: G_PKG_NAME )
289: THEN

Line 290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

286: p_api_version,
287: l_api_name,
288: G_PKG_NAME )
289: THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF;
292: --
293:
294: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 294: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF;
292: --
293:
294: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
295: FND_MSG_PUB.initialize ;
296: END IF;
297: --
298: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 298: p_return_status := FND_API.G_RET_STS_SUCCESS ;

294: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
295: FND_MSG_PUB.initialize ;
296: END IF;
297: --
298: p_return_status := FND_API.G_RET_STS_SUCCESS ;
299: p_row_locked := FND_API.G_TRUE ;
300: --
301: OPEN C;
302: --

Line 299: p_row_locked := FND_API.G_TRUE ;

295: FND_MSG_PUB.initialize ;
296: END IF;
297: --
298: p_return_status := FND_API.G_RET_STS_SUCCESS ;
299: p_row_locked := FND_API.G_TRUE ;
300: --
301: OPEN C;
302: --
303: FETCH C INTO Recinfo;

Line 310: RAISE FND_API.G_EXC_ERROR ;

306: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
307: FND_MSG_PUB.Add;
308: -- For bug # 2396565 : Following statement comented since Cursor is already closed
309: -- CLOSE c;
310: RAISE FND_API.G_EXC_ERROR ;
311: END IF;
312: CLOSE C;
313: IF
314: (

Line 369: RAISE FND_API.G_EXC_ERROR ;

365: NULL ;
366: ELSE
367: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED') ;
368: FND_MSG_PUB.Add ;
369: RAISE FND_API.G_EXC_ERROR ;
370: END IF;
371:
372: --
373: /*--

Line 374: IF FND_API.To_Boolean ( p_commit ) THEN

370: END IF;
371:
372: --
373: /*--
374: IF FND_API.To_Boolean ( p_commit ) THEN
375: COMMIT WORK;
376: END iF;
377: --
378: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 387: p_row_locked := FND_API.G_FALSE ;

383: --
384: WHEN App_Exception.Record_Lock_Exception THEN
385: --
386: ROLLBACK TO Lock_Row_Pvt ;
387: p_row_locked := FND_API.G_FALSE ;
388: p_return_status := FND_API.G_RET_STS_ERROR ;
389: --
390: WHEN FND_API.G_EXC_ERROR THEN
391: --

Line 388: p_return_status := FND_API.G_RET_STS_ERROR ;

384: WHEN App_Exception.Record_Lock_Exception THEN
385: --
386: ROLLBACK TO Lock_Row_Pvt ;
387: p_row_locked := FND_API.G_FALSE ;
388: p_return_status := FND_API.G_RET_STS_ERROR ;
389: --
390: WHEN FND_API.G_EXC_ERROR THEN
391: --
392: ROLLBACK TO Lock_Row_Pvt ;

Line 390: WHEN FND_API.G_EXC_ERROR THEN

386: ROLLBACK TO Lock_Row_Pvt ;
387: p_row_locked := FND_API.G_FALSE ;
388: p_return_status := FND_API.G_RET_STS_ERROR ;
389: --
390: WHEN FND_API.G_EXC_ERROR THEN
391: --
392: ROLLBACK TO Lock_Row_Pvt ;
393: p_return_status := FND_API.G_RET_STS_ERROR;
394: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 393: p_return_status := FND_API.G_RET_STS_ERROR;

389: --
390: WHEN FND_API.G_EXC_ERROR THEN
391: --
392: ROLLBACK TO Lock_Row_Pvt ;
393: p_return_status := FND_API.G_RET_STS_ERROR;
394: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
395: p_data => p_msg_data );
396: --
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

393: p_return_status := FND_API.G_RET_STS_ERROR;
394: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
395: p_data => p_msg_data );
396: --
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
398: --
399: ROLLBACK TO Lock_Row_Pvt ;
400: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
401: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 400: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

396: --
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
398: --
399: ROLLBACK TO Lock_Row_Pvt ;
400: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
401: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
402: p_data => p_msg_data );
403: --
404: WHEN OTHERS THEN

Line 407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

403: --
404: WHEN OTHERS THEN
405: --
406: ROLLBACK TO Lock_Row_Pvt ;
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: --
409: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
410: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
411: l_api_name);

Line 430: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

426:
427: PROCEDURE Update_Row
428: (
429: p_api_version IN NUMBER,
430: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
431: p_commit IN VARCHAR2 := FND_API.G_FALSE,
432: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
433: p_return_status OUT NOCOPY VARCHAR2,
434: p_msg_count OUT NOCOPY NUMBER,

Line 431: p_commit IN VARCHAR2 := FND_API.G_FALSE,

427: PROCEDURE Update_Row
428: (
429: p_api_version IN NUMBER,
430: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
431: p_commit IN VARCHAR2 := FND_API.G_FALSE,
432: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
433: p_return_status OUT NOCOPY VARCHAR2,
434: p_msg_count OUT NOCOPY NUMBER,
435: p_msg_data OUT NOCOPY VARCHAR2,

Line 432: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

428: (
429: p_api_version IN NUMBER,
430: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
431: p_commit IN VARCHAR2 := FND_API.G_FALSE,
432: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
433: p_return_status OUT NOCOPY VARCHAR2,
434: p_msg_count OUT NOCOPY NUMBER,
435: p_msg_data OUT NOCOPY VARCHAR2,
436: --

Line 472: IF NOT FND_API.Compatible_API_Call ( l_api_version,

468: BEGIN
469: --
470: SAVEPOINT Update_Row_Pvt ;
471: --
472: IF NOT FND_API.Compatible_API_Call ( l_api_version,
473: p_api_version,
474: l_api_name,
475: G_PKG_NAME )
476: THEN

Line 477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

473: p_api_version,
474: l_api_name,
475: G_PKG_NAME )
476: THEN
477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
478: END IF;
479: --
480:
481: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 481: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
478: END IF;
479: --
480:
481: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
482: FND_MSG_PUB.initialize ;
483: END IF;
484: --
485: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 485: p_return_status := FND_API.G_RET_STS_SUCCESS ;

481: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
482: FND_MSG_PUB.initialize ;
483: END IF;
484: --
485: p_return_status := FND_API.G_RET_STS_SUCCESS ;
486: --
487:
488: P_LAST_UPDATE_DATE := SYSDATE;
489: if(P_MODE = 'I') then

Line 504: raise FND_API.G_EXC_ERROR ;

500: end if;
501: else
502: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
503: FND_MSG_PUB.Add ;
504: raise FND_API.G_EXC_ERROR ;
505: end if;
506: --
507: UPDATE psb_ws_distribution_rule_lines
508: SET

Line 533: RAISE FND_API.G_EXC_ERROR ;

529: last_update_login = p_last_update_login
530: WHERE distribution_rule_line_id = p_distribution_rule_line_id;
531:
532: IF (SQL%NOTFOUND) THEN
533: RAISE FND_API.G_EXC_ERROR ;
534: END IF;
535:
536: --
537: --

Line 540: IF FND_API.To_Boolean ( p_commit ) THEN

536: --
537: --
538: -- Standard check of p_commit.
539:
540: IF FND_API.To_Boolean ( p_commit ) THEN
541: COMMIT WORK;
542: END iF;
543: --
544: -- Standard call to get message count and if count is 1, get message info.

Line 550: WHEN FND_API.G_EXC_ERROR THEN

546: p_data => p_msg_data );
547: --
548: EXCEPTION
549:
550: WHEN FND_API.G_EXC_ERROR THEN
551: --
552: ROLLBACK TO Update_Row_Pvt ;
553: p_return_status := FND_API.G_RET_STS_ERROR;
554: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 553: p_return_status := FND_API.G_RET_STS_ERROR;

549:
550: WHEN FND_API.G_EXC_ERROR THEN
551: --
552: ROLLBACK TO Update_Row_Pvt ;
553: p_return_status := FND_API.G_RET_STS_ERROR;
554: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
555: p_data => p_msg_data );
556: --
557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

553: p_return_status := FND_API.G_RET_STS_ERROR;
554: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
555: p_data => p_msg_data );
556: --
557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
558: --
559: ROLLBACK TO Update_Row_Pvt ;
560: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 560: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

556: --
557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
558: --
559: ROLLBACK TO Update_Row_Pvt ;
560: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
562: p_data => p_msg_data );
563: --
564: WHEN OTHERS THEN

Line 567: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

563: --
564: WHEN OTHERS THEN
565: --
566: ROLLBACK TO Update_Row_Pvt ;
567: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
568: --
569: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
570: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
571: l_api_name);

Line 590: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

586:
587: PROCEDURE Delete_Row
588: (
589: p_api_version IN NUMBER,
590: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
591: p_commit IN VARCHAR2 := FND_API.G_FALSE,
592: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
593: p_return_status OUT NOCOPY VARCHAR2,
594: p_msg_count OUT NOCOPY NUMBER,

Line 591: p_commit IN VARCHAR2 := FND_API.G_FALSE,

587: PROCEDURE Delete_Row
588: (
589: p_api_version IN NUMBER,
590: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
591: p_commit IN VARCHAR2 := FND_API.G_FALSE,
592: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
593: p_return_status OUT NOCOPY VARCHAR2,
594: p_msg_count OUT NOCOPY NUMBER,
595: p_msg_data OUT NOCOPY VARCHAR2,

Line 592: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

588: (
589: p_api_version IN NUMBER,
590: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
591: p_commit IN VARCHAR2 := FND_API.G_FALSE,
592: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
593: p_return_status OUT NOCOPY VARCHAR2,
594: p_msg_count OUT NOCOPY NUMBER,
595: p_msg_data OUT NOCOPY VARCHAR2,
596: --

Line 608: IF NOT FND_API.Compatible_API_Call ( l_api_version,

604: BEGIN
605: --
606: SAVEPOINT Delete_Row_Pvt ;
607: --
608: IF NOT FND_API.Compatible_API_Call ( l_api_version,
609: p_api_version,
610: l_api_name,
611: G_PKG_NAME )
612: THEN

Line 613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

609: p_api_version,
610: l_api_name,
611: G_PKG_NAME )
612: THEN
613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
614: END IF;
615: --
616:
617: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 617: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
614: END IF;
615: --
616:
617: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
618: FND_MSG_PUB.initialize ;
619: END IF;
620: --
621: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 621: p_return_status := FND_API.G_RET_STS_SUCCESS ;

617: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
618: FND_MSG_PUB.initialize ;
619: END IF;
620: --
621: p_return_status := FND_API.G_RET_STS_SUCCESS ;
622: --
623:
624: --
625: -- Deleting the record in psb_ws_distribution_rule_lines.

Line 635: IF FND_API.To_Boolean ( p_commit ) THEN

631: RAISE NO_DATA_FOUND ;
632: END IF;
633:
634: --
635: IF FND_API.To_Boolean ( p_commit ) THEN
636: COMMIT WORK;
637: END iF;
638: --
639: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 644: WHEN FND_API.G_EXC_ERROR THEN

640: p_data => p_msg_data );
641:
642: EXCEPTION
643: --
644: WHEN FND_API.G_EXC_ERROR THEN
645: --
646: ROLLBACK TO Delete_Row_Pvt ;
647: p_return_status := FND_API.G_RET_STS_ERROR;
648: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 647: p_return_status := FND_API.G_RET_STS_ERROR;

643: --
644: WHEN FND_API.G_EXC_ERROR THEN
645: --
646: ROLLBACK TO Delete_Row_Pvt ;
647: p_return_status := FND_API.G_RET_STS_ERROR;
648: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
649: p_data => p_msg_data );
650: --
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

647: p_return_status := FND_API.G_RET_STS_ERROR;
648: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
649: p_data => p_msg_data );
650: --
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: --
653: ROLLBACK TO Delete_Row_Pvt ;
654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
655: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

650: --
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: --
653: ROLLBACK TO Delete_Row_Pvt ;
654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
655: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
656: p_data => p_msg_data );
657: --
658: WHEN OTHERS THEN

Line 661: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

657: --
658: WHEN OTHERS THEN
659: --
660: ROLLBACK TO Delete_Row_Pvt ;
661: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
662: --
663: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
664: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
665: l_api_name);

Line 685: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

681:
682: PROCEDURE Check_Unique
683: (
684: p_api_version IN NUMBER,
685: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
686: p_commit IN VARCHAR2 := FND_API.G_FALSE,
687: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
688: p_return_status OUT NOCOPY VARCHAR2,
689: p_msg_count OUT NOCOPY NUMBER,

Line 686: p_commit IN VARCHAR2 := FND_API.G_FALSE,

682: PROCEDURE Check_Unique
683: (
684: p_api_version IN NUMBER,
685: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
686: p_commit IN VARCHAR2 := FND_API.G_FALSE,
687: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
688: p_return_status OUT NOCOPY VARCHAR2,
689: p_msg_count OUT NOCOPY NUMBER,
690: p_msg_data OUT NOCOPY VARCHAR2,

Line 687: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

683: (
684: p_api_version IN NUMBER,
685: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
686: p_commit IN VARCHAR2 := FND_API.G_FALSE,
687: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
688: p_return_status OUT NOCOPY VARCHAR2,
689: p_msg_count OUT NOCOPY NUMBER,
690: p_msg_data OUT NOCOPY VARCHAR2,
691: --

Line 713: IF NOT FND_API.Compatible_API_Call ( l_api_version,

709: BEGIN
710: --
711: SAVEPOINT Check_Unique_Pvt ;
712: --
713: IF NOT FND_API.Compatible_API_Call ( l_api_version,
714: p_api_version,
715: l_api_name,
716: G_PKG_NAME )
717: THEN

Line 718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

714: p_api_version,
715: l_api_name,
716: G_PKG_NAME )
717: THEN
718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
719: END IF;
720: --
721:
722: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 722: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
719: END IF;
720: --
721:
722: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
723: FND_MSG_PUB.initialize ;
724: END IF;
725: --
726: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 726: p_return_status := FND_API.G_RET_STS_SUCCESS ;

722: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
723: FND_MSG_PUB.initialize ;
724: END IF;
725: --
726: p_return_status := FND_API.G_RET_STS_SUCCESS ;
727: --
728:
729: -- Checking the Psb_set_relations table for references.
730: OPEN c;

Line 743: IF FND_API.To_Boolean ( p_commit ) THEN

739: END IF;
740:
741: CLOSE c;
742: --
743: IF FND_API.To_Boolean ( p_commit ) THEN
744: COMMIT WORK;
745: END iF;
746: --
747: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 752: WHEN FND_API.G_EXC_ERROR THEN

748: p_data => p_msg_data );
749: --
750: EXCEPTION
751: --
752: WHEN FND_API.G_EXC_ERROR THEN
753: --
754: ROLLBACK TO Check_Unique_Pvt ;
755: p_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 755: p_return_status := FND_API.G_RET_STS_ERROR;

751: --
752: WHEN FND_API.G_EXC_ERROR THEN
753: --
754: ROLLBACK TO Check_Unique_Pvt ;
755: p_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
757: p_data => p_msg_data );
758: --
759: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 759: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

755: p_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
757: p_data => p_msg_data );
758: --
759: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
760: --
761: ROLLBACK TO Check_Unique_Pvt ;
762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
763: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

758: --
759: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
760: --
761: ROLLBACK TO Check_Unique_Pvt ;
762: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
763: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
764: p_data => p_msg_data );
765: --
766: WHEN OTHERS THEN

Line 769: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

765: --
766: WHEN OTHERS THEN
767: --
768: ROLLBACK TO Check_Unique_Pvt ;
769: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
770: --
771: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
772: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
773: l_api_name);

Line 787: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

783:
784: PROCEDURE Distribution_Insert_Row
785: (
786: p_api_version IN NUMBER,
787: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
788: p_commit IN VARCHAR2 := FND_API.G_FALSE,
789: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
790: p_return_status OUT NOCOPY VARCHAR2,
791: p_msg_count OUT NOCOPY NUMBER,

Line 788: p_commit IN VARCHAR2 := FND_API.G_FALSE,

784: PROCEDURE Distribution_Insert_Row
785: (
786: p_api_version IN NUMBER,
787: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
788: p_commit IN VARCHAR2 := FND_API.G_FALSE,
789: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
790: p_return_status OUT NOCOPY VARCHAR2,
791: p_msg_count OUT NOCOPY NUMBER,
792: p_msg_data OUT NOCOPY VARCHAR2,

Line 789: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

785: (
786: p_api_version IN NUMBER,
787: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
788: p_commit IN VARCHAR2 := FND_API.G_FALSE,
789: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
790: p_return_status OUT NOCOPY VARCHAR2,
791: p_msg_count OUT NOCOPY NUMBER,
792: p_msg_data OUT NOCOPY VARCHAR2,
793: p_Row_Id IN OUT NOCOPY VARCHAR2,

Line 825: IF NOT FND_API.Compatible_API_Call ( l_api_version,

821: BEGIN
822: --
823: SAVEPOINT Distribution_Insert_Row_Pvt ;
824: --
825: IF NOT FND_API.Compatible_API_Call ( l_api_version,
826: p_api_version,
827: l_api_name,
828: G_PKG_NAME )
829: THEN

Line 830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

826: p_api_version,
827: l_api_name,
828: G_PKG_NAME )
829: THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
831: END IF;
832: --
833:
834: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 834: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
831: END IF;
832: --
833:
834: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
835: FND_MSG_PUB.initialize ;
836: END IF;
837: --
838: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 838: p_return_status := FND_API.G_RET_STS_SUCCESS ;

834: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
835: FND_MSG_PUB.initialize ;
836: END IF;
837: --
838: p_return_status := FND_API.G_RET_STS_SUCCESS ;
839: --
840: P_LAST_UPDATE_DATE := SYSDATE;
841: if(P_MODE = 'I') then
842: P_LAST_UPDATED_BY := 1;

Line 856: raise FND_API.G_EXC_ERROR;

852: end if;
853: else
854: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
855: FND_MSG_PUB.Add ;
856: raise FND_API.G_EXC_ERROR;
857: end if;
858: --
859:
860: INSERT INTO psb_ws_distributions

Line 895: RAISE FND_API.G_EXC_ERROR ;

891: OPEN C;
892: FETCH C INTO p_Row_Id;
893: IF (C%NOTFOUND) THEN
894: CLOSE C;
895: RAISE FND_API.G_EXC_ERROR ;
896: END IF;
897: CLOSE C;
898: --
899:

Line 901: IF FND_API.To_Boolean ( p_commit ) THEN

897: CLOSE C;
898: --
899:
900: --
901: IF FND_API.To_Boolean ( p_commit ) THEN
902: COMMIT WORK;
903: END iF;
904: --
905: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 910: WHEN FND_API.G_EXC_ERROR THEN

906: p_data => p_msg_data );
907: --
908: EXCEPTION
909: --
910: WHEN FND_API.G_EXC_ERROR THEN
911: --
912: ROLLBACK TO Distribution_Insert_Row_Pvt ;
913: p_return_status := FND_API.G_RET_STS_ERROR;
914: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 913: p_return_status := FND_API.G_RET_STS_ERROR;

909: --
910: WHEN FND_API.G_EXC_ERROR THEN
911: --
912: ROLLBACK TO Distribution_Insert_Row_Pvt ;
913: p_return_status := FND_API.G_RET_STS_ERROR;
914: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
915: p_data => p_msg_data );
916: --
917: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 917: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

913: p_return_status := FND_API.G_RET_STS_ERROR;
914: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
915: p_data => p_msg_data );
916: --
917: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
918: --
919: ROLLBACK TO Distribution_Insert_Row_Pvt ;
920: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
921: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 920: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

916: --
917: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
918: --
919: ROLLBACK TO Distribution_Insert_Row_Pvt ;
920: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
921: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
922: p_data => p_msg_data );
923: --
924: WHEN OTHERS THEN

Line 927: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

923: --
924: WHEN OTHERS THEN
925: --
926: ROLLBACK TO Distribution_Insert_Row_Pvt ;
927: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: --
929: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
930: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
931: l_api_name);

Line 943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

939:
940: PROCEDURE Rules_Insert_Row
941: (
942: p_api_version IN NUMBER,
943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
944: p_commit IN VARCHAR2 := FND_API.G_FALSE,
945: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
946: p_return_status OUT NOCOPY VARCHAR2,
947: p_msg_count OUT NOCOPY NUMBER,

Line 944: p_commit IN VARCHAR2 := FND_API.G_FALSE,

940: PROCEDURE Rules_Insert_Row
941: (
942: p_api_version IN NUMBER,
943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
944: p_commit IN VARCHAR2 := FND_API.G_FALSE,
945: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
946: p_return_status OUT NOCOPY VARCHAR2,
947: p_msg_count OUT NOCOPY NUMBER,
948: p_msg_data OUT NOCOPY VARCHAR2,

Line 945: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

941: (
942: p_api_version IN NUMBER,
943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
944: p_commit IN VARCHAR2 := FND_API.G_FALSE,
945: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
946: p_return_status OUT NOCOPY VARCHAR2,
947: p_msg_count OUT NOCOPY NUMBER,
948: p_msg_data OUT NOCOPY VARCHAR2,
949: p_Row_Id IN OUT NOCOPY VARCHAR2,

Line 977: IF NOT FND_API.Compatible_API_Call ( l_api_version,

973: BEGIN
974: --
975: SAVEPOINT Rules_Insert_Row_Pvt ;
976: --
977: IF NOT FND_API.Compatible_API_Call ( l_api_version,
978: p_api_version,
979: l_api_name,
980: G_PKG_NAME )
981: THEN

Line 982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

978: p_api_version,
979: l_api_name,
980: G_PKG_NAME )
981: THEN
982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
983: END IF;
984: --
985:
986: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 986: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
983: END IF;
984: --
985:
986: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
987: FND_MSG_PUB.initialize ;
988: END IF;
989: --
990: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 990: p_return_status := FND_API.G_RET_STS_SUCCESS ;

986: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
987: FND_MSG_PUB.initialize ;
988: END IF;
989: --
990: p_return_status := FND_API.G_RET_STS_SUCCESS ;
991: --
992: P_LAST_UPDATE_DATE := SYSDATE;
993: if(P_MODE = 'I') then
994: P_LAST_UPDATED_BY := 1;

Line 1008: raise FND_API.G_EXC_ERROR;

1004: end if;
1005: else
1006: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1007: FND_MSG_PUB.Add ;
1008: raise FND_API.G_EXC_ERROR;
1009: end if;
1010: --
1011:
1012: INSERT INTO psb_ws_distribution_rules

Line 1037: RAISE FND_API.G_EXC_ERROR ;

1033: OPEN C;
1034: FETCH C INTO p_Row_Id;
1035: IF (C%NOTFOUND) THEN
1036: CLOSE C;
1037: RAISE FND_API.G_EXC_ERROR ;
1038: END IF;
1039: CLOSE C;
1040: --
1041:

Line 1043: IF FND_API.To_Boolean ( p_commit ) THEN

1039: CLOSE C;
1040: --
1041:
1042: --
1043: IF FND_API.To_Boolean ( p_commit ) THEN
1044: COMMIT WORK;
1045: END iF;
1046: --
1047: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1052: WHEN FND_API.G_EXC_ERROR THEN

1048: p_data => p_msg_data );
1049: --
1050: EXCEPTION
1051: --
1052: WHEN FND_API.G_EXC_ERROR THEN
1053: --
1054: ROLLBACK TO Rules_Insert_Row_Pvt ;
1055: p_return_status := FND_API.G_RET_STS_ERROR;
1056: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1055: p_return_status := FND_API.G_RET_STS_ERROR;

1051: --
1052: WHEN FND_API.G_EXC_ERROR THEN
1053: --
1054: ROLLBACK TO Rules_Insert_Row_Pvt ;
1055: p_return_status := FND_API.G_RET_STS_ERROR;
1056: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1057: p_data => p_msg_data );
1058: --
1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1055: p_return_status := FND_API.G_RET_STS_ERROR;
1056: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1057: p_data => p_msg_data );
1058: --
1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1060: --
1061: ROLLBACK TO Rules_Insert_Row_Pvt ;
1062: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1063: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1062: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1058: --
1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1060: --
1061: ROLLBACK TO Rules_Insert_Row_Pvt ;
1062: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1063: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1064: p_data => p_msg_data );
1065: --
1066: WHEN OTHERS THEN

Line 1069: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1065: --
1066: WHEN OTHERS THEN
1067: --
1068: ROLLBACK TO Rules_Insert_Row_Pvt ;
1069: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1070: --
1071: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1072: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1073: l_api_name);

Line 1087: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1083:
1084: PROCEDURE Rules_Delete_Row
1085: (
1086: p_api_version IN NUMBER,
1087: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1088: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1089: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1090: p_return_status OUT NOCOPY VARCHAR2,
1091: p_msg_count OUT NOCOPY NUMBER,

Line 1088: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1084: PROCEDURE Rules_Delete_Row
1085: (
1086: p_api_version IN NUMBER,
1087: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1088: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1089: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1090: p_return_status OUT NOCOPY VARCHAR2,
1091: p_msg_count OUT NOCOPY NUMBER,
1092: p_msg_data OUT NOCOPY VARCHAR2,

Line 1089: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1085: (
1086: p_api_version IN NUMBER,
1087: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1088: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1089: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1090: p_return_status OUT NOCOPY VARCHAR2,
1091: p_msg_count OUT NOCOPY NUMBER,
1092: p_msg_data OUT NOCOPY VARCHAR2,
1093: --

Line 1106: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1102: BEGIN
1103: --
1104: SAVEPOINT Rules_Delete_Row_Pvt ;
1105: --
1106: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1107: p_api_version,
1108: l_api_name,
1109: G_PKG_NAME )
1110: THEN

Line 1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1107: p_api_version,
1108: l_api_name,
1109: G_PKG_NAME )
1110: THEN
1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1112: END IF;
1113: --
1114:
1115: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

Line 1115: IF FND_API.to_Boolean ( p_init_msg_list ) THEN

1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1112: END IF;
1113: --
1114:
1115: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1116: FND_MSG_PUB.initialize ;
1117: END IF;
1118: --
1119: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1119: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1115: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1116: FND_MSG_PUB.initialize ;
1117: END IF;
1118: --
1119: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1120: --
1121:
1122: SELECT count(*) INTO l_ws_count
1123: FROM psb_ws_distributions

Line 1129: RAISE FND_API.G_EXC_ERROR ;

1125:
1126: IF (l_ws_count <> 0) THEN
1127: FND_MESSAGE.SET_NAME('PSB', 'PSB_RULE_IS_DISTRIBUTED');
1128: FND_MSG_PUB.Add;
1129: RAISE FND_API.G_EXC_ERROR ;
1130: END IF;
1131: --
1132: -- Deleting the record in psb_ws_distribution_rule_lines and rules.
1133: --

Line 1145: IF FND_API.To_Boolean ( p_commit ) THEN

1141: RAISE NO_DATA_FOUND ;
1142: END IF;
1143:
1144: --
1145: IF FND_API.To_Boolean ( p_commit ) THEN
1146: COMMIT WORK;
1147: END iF;
1148: --
1149: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1154: WHEN FND_API.G_EXC_ERROR THEN

1150: p_data => p_msg_data );
1151:
1152: EXCEPTION
1153: --
1154: WHEN FND_API.G_EXC_ERROR THEN
1155: --
1156: ROLLBACK TO Rules_Delete_Row_Pvt ;
1157: p_return_status := FND_API.G_RET_STS_ERROR;
1158: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1157: p_return_status := FND_API.G_RET_STS_ERROR;

1153: --
1154: WHEN FND_API.G_EXC_ERROR THEN
1155: --
1156: ROLLBACK TO Rules_Delete_Row_Pvt ;
1157: p_return_status := FND_API.G_RET_STS_ERROR;
1158: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1159: p_data => p_msg_data );
1160: --
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1157: p_return_status := FND_API.G_RET_STS_ERROR;
1158: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1159: p_data => p_msg_data );
1160: --
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: --
1163: ROLLBACK TO Rules_Delete_Row_Pvt ;
1164: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1165: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1164: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1160: --
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: --
1163: ROLLBACK TO Rules_Delete_Row_Pvt ;
1164: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1165: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1166: p_data => p_msg_data );
1167: --
1168: WHEN OTHERS THEN

Line 1171: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1167: --
1168: WHEN OTHERS THEN
1169: --
1170: ROLLBACK TO Rules_Delete_Row_Pvt ;
1171: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1172: --
1173: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1174: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1175: l_api_name);

Line 1191: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1187:
1188: PROCEDURE Copy_Rule
1189: (
1190: p_api_version IN NUMBER,
1191: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1192: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1193: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1194: p_return_status OUT NOCOPY VARCHAR2,
1195: p_msg_count OUT NOCOPY NUMBER,

Line 1192: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1188: PROCEDURE Copy_Rule
1189: (
1190: p_api_version IN NUMBER,
1191: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1192: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1193: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1194: p_return_status OUT NOCOPY VARCHAR2,
1195: p_msg_count OUT NOCOPY NUMBER,
1196: p_msg_data OUT NOCOPY VARCHAR2,

Line 1193: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1189: (
1190: p_api_version IN NUMBER,
1191: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1192: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1193: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1194: p_return_status OUT NOCOPY VARCHAR2,
1195: p_msg_count OUT NOCOPY NUMBER,
1196: p_msg_data OUT NOCOPY VARCHAR2,
1197: --

Line 1244: if FND_API.to_Boolean (p_init_msg_list) then

1240: SAVEPOINT Copy_Rule;
1241:
1242: -- Initialize message list if p_init_msg_list is set to TRUE.
1243:
1244: if FND_API.to_Boolean (p_init_msg_list) then
1245: FND_MSG_PUB.initialize;
1246: end if;
1247:
1248: -- Initialize API return status to success

Line 1250: l_return_status := FND_API.G_RET_STS_SUCCESS;

1246: end if;
1247:
1248: -- Initialize API return status to success
1249:
1250: l_return_status := FND_API.G_RET_STS_SUCCESS;
1251: --
1252: -- ... insert distribution rules
1253:
1254: SELECT psb_ws_distribution_rules_s.NEXTVAL

Line 1260: p_init_msg_list => fnd_api.g_false,

1256:
1257:
1258: RULES_INSERT_ROW (
1259: p_api_version => 1.0,
1260: p_init_msg_list => fnd_api.g_false,
1261: p_commit => fnd_api.g_false,
1262: p_validation_level => fnd_api.g_valid_level_full,
1263: p_return_status => l_return_status,
1264: p_msg_count => p_msg_count,

Line 1261: p_commit => fnd_api.g_false,

1257:
1258: RULES_INSERT_ROW (
1259: p_api_version => 1.0,
1260: p_init_msg_list => fnd_api.g_false,
1261: p_commit => fnd_api.g_false,
1262: p_validation_level => fnd_api.g_valid_level_full,
1263: p_return_status => l_return_status,
1264: p_msg_count => p_msg_count,
1265: p_msg_data => p_msg_data,

Line 1262: p_validation_level => fnd_api.g_valid_level_full,

1258: RULES_INSERT_ROW (
1259: p_api_version => 1.0,
1260: p_init_msg_list => fnd_api.g_false,
1261: p_commit => fnd_api.g_false,
1262: p_validation_level => fnd_api.g_valid_level_full,
1263: p_return_status => l_return_status,
1264: p_msg_count => p_msg_count,
1265: p_msg_data => p_msg_data,
1266: p_row_id => l_rowid,

Line 1284: p_init_msg_list => fnd_api.g_false,

1280: INTO l_dist_rule_line_id FROM dual;
1281:
1282: INSERT_ROW (
1283: p_api_version => 1.0,
1284: p_init_msg_list => fnd_api.g_false,
1285: p_commit => fnd_api.g_false,
1286: p_validation_level => fnd_api.g_valid_level_full,
1287: p_return_status => l_return_status,
1288: p_msg_count => p_msg_count,

Line 1285: p_commit => fnd_api.g_false,

1281:
1282: INSERT_ROW (
1283: p_api_version => 1.0,
1284: p_init_msg_list => fnd_api.g_false,
1285: p_commit => fnd_api.g_false,
1286: p_validation_level => fnd_api.g_valid_level_full,
1287: p_return_status => l_return_status,
1288: p_msg_count => p_msg_count,
1289: p_msg_data => p_msg_data,

Line 1286: p_validation_level => fnd_api.g_valid_level_full,

1282: INSERT_ROW (
1283: p_api_version => 1.0,
1284: p_init_msg_list => fnd_api.g_false,
1285: p_commit => fnd_api.g_false,
1286: p_validation_level => fnd_api.g_valid_level_full,
1287: p_return_status => l_return_status,
1288: p_msg_count => p_msg_count,
1289: p_msg_data => p_msg_data,
1290: p_row_id => l_rowid,

Line 1322: when FND_API.G_EXC_ERROR then

1318: g_dbug := g_dbug || g_chr10 || 'rule id is: ' || to_char(l_dist_rule_id);
1319: --
1320: EXCEPTION
1321:
1322: when FND_API.G_EXC_ERROR then
1323: --
1324: rollback to Copy_Rule;
1325: p_return_status := FND_API.G_RET_STS_ERROR;
1326: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 1325: p_return_status := FND_API.G_RET_STS_ERROR;

1321:
1322: when FND_API.G_EXC_ERROR then
1323: --
1324: rollback to Copy_Rule;
1325: p_return_status := FND_API.G_RET_STS_ERROR;
1326: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1327: p_data => p_msg_data);
1328: --
1329: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 1329: when FND_API.G_EXC_UNEXPECTED_ERROR then

1325: p_return_status := FND_API.G_RET_STS_ERROR;
1326: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1327: p_data => p_msg_data);
1328: --
1329: when FND_API.G_EXC_UNEXPECTED_ERROR then
1330: --
1331: rollback to Copy_Rule;
1332: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1333: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

Line 1332: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1328: --
1329: when FND_API.G_EXC_UNEXPECTED_ERROR then
1330: --
1331: rollback to Copy_Rule;
1332: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1333: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1334: p_data => p_msg_data);
1335: --
1336: when OTHERS then

Line 1339: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1335: --
1336: when OTHERS then
1337: --
1338: rollback to Copy_Rule ;
1339: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1340: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
1341: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1342: l_api_name);
1343: end if;