eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.JTF_TERRITORY_PVT dependencies on FND_API

Line 42: -- 08/08/00 jdochert Removing if statement that causes error when LOW_VALUE_CHAR = FND_API.G_MISS_CHAR

38: -- into Create API was ignored:
39: -- l_terr_id := 0;
40: -- TO
41: -- l_terr_id NUMBER := P_TERR_ALL_REC.TERR_ID;
42: -- 08/08/00 jdochert Removing if statement that causes error when LOW_VALUE_CHAR = FND_API.G_MISS_CHAR
43: -- and ID_USED_FLAG = 'Y": this was an error in logic.
44: -- 08/21/00 jdochert Changing overlap_exists procedure to do an UPPER on comparison operator
45: -- 09/09/00 jdochert Added Unique validation for JTF_TERR_USGS_ALL + JTF_TERR_QTYPE_USGS_ALL
46: -- 09/17/00 jdochert BUG#1408610 FIX

Line 96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,

92: ** current_record stores pointer to the current record used during
93: ** the generation process.
94: */
95: TYPE Dynamic_Qual_Rec_Type IS RECORD (
96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,
97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,

Line 97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,

93: ** the generation process.
94: */
95: TYPE Dynamic_Qual_Rec_Type IS RECORD (
96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,
97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,

Line 98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,

94: */
95: TYPE Dynamic_Qual_Rec_Type IS RECORD (
96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,
97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,

Line 99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,

95: TYPE Dynamic_Qual_Rec_Type IS RECORD (
96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,
97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,

Line 100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,

96: Rowid VARCHAR2(50) , -- := FND_API.G_MISS_CHAR,
97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,

Line 101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,

97: TERR_QUAL_ID NUMBER , -- := FND_API.G_MISS_NUM,
98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

Line 102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,

98: LAST_UPDATE_DATE DATE , -- := FND_API.G_MISS_DATE,
99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

Line 103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,

99: LAST_UPDATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

Line 104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,

100: CREATION_DATE DATE , -- := FND_API.G_MISS_DATE,
101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,

Line 105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

101: CREATED_BY NUMBER , -- := FND_API.G_MISS_NUM,
102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,
109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM

Line 106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

102: LAST_UPDATE_LOGIN NUMBER , -- := FND_API.G_MISS_NUM,
103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,
109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM
110: , START_RECORD NUMBER

Line 107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,

103: TERR_ID NUMBER , -- := FND_API.G_MISS_NUM,
104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,
109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM
110: , START_RECORD NUMBER
111: , NUM_RECORDS NUMBER

Line 108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,

104: QUAL_USG_ID NUMBER , -- := FND_API.G_MISS_NUM,
105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,
109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM
110: , START_RECORD NUMBER
111: , NUM_RECORDS NUMBER
112: , CURRENT_VALUE_SET NUMBER

Line 109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM

105: USE_TO_NAME_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
106: GENERATE_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
107: OVERLAP_ALLOWED_FLAG VARCHAR2(1) , -- := FND_API.G_MISS_CHAR,
108: QUALIFIER_MODE VARCHAR2(30) , -- := FND_API.G_MISS_CHAR,
109: ORG_ID NUMBER -- := FND_API.G_MISS_NUM
110: , START_RECORD NUMBER
111: , NUM_RECORDS NUMBER
112: , CURRENT_VALUE_SET NUMBER
113: , CURRENT_RECORD NUMBER );

Line 142: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

138: -- p_Terr_Values_Tbl Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl
139: --
140: -- Optional
141: -- Parameter Name Data Type Default
142: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
143: -- p_Commit VARCHAR2 := FND_API.G_FALSE
144: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
145: --
146: -- OUT :

Line 143: -- p_Commit VARCHAR2 := FND_API.G_FALSE

139: --
140: -- Optional
141: -- Parameter Name Data Type Default
142: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
143: -- p_Commit VARCHAR2 := FND_API.G_FALSE
144: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
145: --
146: -- OUT :
147: -- Parameter Name Data Type

Line 144: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,

140: -- Optional
141: -- Parameter Name Data Type Default
142: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
143: -- p_Commit VARCHAR2 := FND_API.G_FALSE
144: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
145: --
146: -- OUT :
147: -- Parameter Name Data Type
148: -- x_Return_Status VARCHAR2(1)

Line 168: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

164: -- End of Comments
165: --
166: PROCEDURE Create_Territory
167: (p_Api_Version_Number IN NUMBER,
168: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
169: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
170: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
171: x_Return_Status OUT NOCOPY VARCHAR2,
172: x_Msg_Count OUT NOCOPY NUMBER,

Line 169: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

165: --
166: PROCEDURE Create_Territory
167: (p_Api_Version_Number IN NUMBER,
168: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
169: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
170: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
171: x_Return_Status OUT NOCOPY VARCHAR2,
172: x_Msg_Count OUT NOCOPY NUMBER,
173: x_Msg_Data OUT NOCOPY VARCHAR2,

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

166: PROCEDURE Create_Territory
167: (p_Api_Version_Number IN NUMBER,
168: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
169: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
170: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
171: x_Return_Status OUT NOCOPY VARCHAR2,
172: x_Msg_Count OUT NOCOPY NUMBER,
173: x_Msg_Data OUT NOCOPY VARCHAR2,
174: p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,

Line 218: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

214: -- Standard Start of API savepoint
215: SAVEPOINT CREATE_TERRITORY_PVT;
216:
217: -- Standard call to check for call compatibility.
218: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
219: p_api_version_number,
220: l_api_name,
221: G_PKG_NAME)
222: THEN

Line 223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

219: p_api_version_number,
220: l_api_name,
221: G_PKG_NAME)
222: THEN
223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
224: END IF;
225:
226: -- Initialize message list if p_init_msg_list is set to TRUE.
227: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 227: IF FND_API.to_Boolean( p_init_msg_list ) THEN

223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
224: END IF;
225:
226: -- Initialize message list if p_init_msg_list is set to TRUE.
227: IF FND_API.to_Boolean( p_init_msg_list ) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: -- Debug Message

Line 240: x_return_status := FND_API.G_RET_STS_SUCCESS;

236: FND_MSG_PUB.Add;
237: END IF;
238:
239: -- Initialize API return status to success
240: x_return_status := FND_API.G_RET_STS_SUCCESS;
241: --
242: --Check whether the Usage records are specified
243: If (p_Terr_Usgs_Tbl.COUNT = 0 ) Then
244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 248: x_return_status := FND_API.G_RET_STS_ERROR;

244: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
246: FND_MSG_PUB.ADD;
247: END IF;
248: x_return_status := FND_API.G_RET_STS_ERROR;
249: raise FND_API.G_EXC_ERROR;
250: END IF;
251: --
252: --dbms_output('About to check p_Terr_Values_Tbl.count - ' || to_char(p_Terr_Values_Tbl.count));

Line 249: raise FND_API.G_EXC_ERROR;

245: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
246: FND_MSG_PUB.ADD;
247: END IF;
248: x_return_status := FND_API.G_RET_STS_ERROR;
249: raise FND_API.G_EXC_ERROR;
250: END IF;
251: --
252: --dbms_output('About to check p_Terr_Values_Tbl.count - ' || to_char(p_Terr_Values_Tbl.count));
253: --

Line 261: x_return_status := FND_API.G_RET_STS_ERROR;

257: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
258: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL_USG');
259: FND_MSG_PUB.ADD;
260: END IF;
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: raise FND_API.G_EXC_ERROR;
263: END IF;
264: --
265: --

Line 262: raise FND_API.G_EXC_ERROR;

258: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL_USG');
259: FND_MSG_PUB.ADD;
260: END IF;
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: raise FND_API.G_EXC_ERROR;
263: END IF;
264: --
265: --
266: -- API body

Line 295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

291:
292: x_Terr_Usgs_Out_Tbl := l_Terr_Usgs_Out_Tbl;
293: x_Terr_QualTypeUsgs_Out_Tbl := l_Terr_QualTypeUsgs_Out_Tbl;
294:
295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
296: X_Return_Status := l_return_status;
297: RAISE FND_API.G_EXC_ERROR;
298: END IF;
299:

Line 297: RAISE FND_API.G_EXC_ERROR;

293: x_Terr_QualTypeUsgs_Out_Tbl := l_Terr_QualTypeUsgs_Out_Tbl;
294:
295: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
296: X_Return_Status := l_return_status;
297: RAISE FND_API.G_EXC_ERROR;
298: END IF;
299:
300: --dbms_output.put_line('Value of x_return_status='|| x_return_status);
301:

Line 308: -- x_return_status := FND_API.G_RET_STS_ERROR;

304: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
305: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL');
306: -- FND_MSG_PUB.ADD;
307: -- END IF;
308: -- x_return_status := FND_API.G_RET_STS_ERROR;
309: -- raise FND_API.G_EXC_ERROR;
310: --END IF;
311: --
312:

Line 309: -- raise FND_API.G_EXC_ERROR;

305: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_QUAL');
306: -- FND_MSG_PUB.ADD;
307: -- END IF;
308: -- x_return_status := FND_API.G_RET_STS_ERROR;
309: -- raise FND_API.G_EXC_ERROR;
310: --END IF;
311: --
312:
313: IF (p_Terr_Qual_Tbl.COUNT > 0 ) THEN

Line 323: -- x_return_status := FND_API.G_RET_STS_ERROR;

319: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
320: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
321: -- FND_MSG_PUB.ADD;
322: -- END IF;
323: -- x_return_status := FND_API.G_RET_STS_ERROR;
324: -- raise FND_API.G_EXC_ERROR;
325: -- END IF;
326: --
327:

Line 324: -- raise FND_API.G_EXC_ERROR;

320: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
321: -- FND_MSG_PUB.ADD;
322: -- END IF;
323: -- x_return_status := FND_API.G_RET_STS_ERROR;
324: -- raise FND_API.G_EXC_ERROR;
325: -- END IF;
326: --
327:
328: For l_Qual_Counter IN p_Terr_Qual_Tbl.first .. p_Terr_Qual_Tbl.count LOOP

Line 355: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

351: x_Terr_Qual_Out_Tbl(nvl(x_Terr_Qual_Out_Tbl.first, 0)+1) := l_Terr_Qual_Out_Tbl(1);
352: -- Save the terr qualifier id
353: l_Terr_Qual_Id := l_Terr_Qual_Out_Tbl(1).terr_qual_id;
354:
355: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
356: X_Return_Status := l_return_status;
357: RAISE FND_API.G_EXC_ERROR;
358: END IF;
359:

Line 357: RAISE FND_API.G_EXC_ERROR;

353: l_Terr_Qual_Id := l_Terr_Qual_Out_Tbl(1).terr_qual_id;
354:
355: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
356: X_Return_Status := l_return_status;
357: RAISE FND_API.G_EXC_ERROR;
358: END IF;
359:
360: -- JDOCHERT 07/27 Territory Values no longer required
361: IF (p_Terr_Values_Tbl.COUNT > 0) THEN

Line 383: -- x_return_status := FND_API.G_RET_STS_ERROR;

379:
380: --
381: -- JDOCHERT 07/27 Territory Values no longer required
382: --If l_Index = 0 Then
383: -- x_return_status := FND_API.G_RET_STS_ERROR;
384: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
385: -- FND_MSG_PUB.ADD;
386: -- raise FND_API.G_EXC_ERROR;
387: --End If;

Line 386: -- raise FND_API.G_EXC_ERROR;

382: --If l_Index = 0 Then
383: -- x_return_status := FND_API.G_RET_STS_ERROR;
384: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_VALUES');
385: -- FND_MSG_PUB.ADD;
386: -- raise FND_API.G_EXC_ERROR;
387: --End If;
388: --
389:
390: IF (l_terr_values_tbl.COUNT > 0) THEN

Line 418: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

414:
415: END IF;
416:
417: --
418: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
419: X_Return_Status := l_return_status;
420: RAISE FND_API.G_EXC_ERROR;
421: END IF;
422:

Line 420: RAISE FND_API.G_EXC_ERROR;

416:
417: --
418: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
419: X_Return_Status := l_return_status;
420: RAISE FND_API.G_EXC_ERROR;
421: END IF;
422:
423: END IF; /* IF (l_terr_values_tbl.COUNT > 0) */
424:

Line 433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

429: End LOOP;
430:
431: END IF; /* p_Terr_Qual_Tbl.count > 0 */
432:
433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
434: X_Return_Status := l_return_status;
435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:

Line 435: RAISE FND_API.G_EXC_ERROR;

431: END IF; /* p_Terr_Qual_Tbl.count > 0 */
432:
433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
434: X_Return_Status := l_return_status;
435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:
438: --If the program reached here, that mena evry thing went smooth
439: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 439: x_return_status := FND_API.G_RET_STS_SUCCESS;

435: RAISE FND_API.G_EXC_ERROR;
436: END IF;
437:
438: --If the program reached here, that mena evry thing went smooth
439: x_return_status := FND_API.G_RET_STS_SUCCESS;
440:
441: -- Debug Message
442: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
443: THEN

Line 456: IF FND_API.to_Boolean( p_commit )

452: p_data => x_msg_data
453: );
454:
455: -- Standard check for p_commit
456: IF FND_API.to_Boolean( p_commit )
457: THEN
458: COMMIT WORK;
459: END IF;
460: --

Line 463: WHEN FND_API.G_EXC_ERROR THEN

459: END IF;
460: --
461: EXCEPTION
462: --
463: WHEN FND_API.G_EXC_ERROR THEN
464: --dbms_output('Create_Territory PVT: FND_API.G_EXC_ERROR');
465: ROLLBACK TO CREATE_TERRITORY_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR ;
467: FND_MSG_PUB.Count_And_Get

Line 464: --dbms_output('Create_Territory PVT: FND_API.G_EXC_ERROR');

460: --
461: EXCEPTION
462: --
463: WHEN FND_API.G_EXC_ERROR THEN
464: --dbms_output('Create_Territory PVT: FND_API.G_EXC_ERROR');
465: ROLLBACK TO CREATE_TERRITORY_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR ;
467: FND_MSG_PUB.Count_And_Get
468: ( p_count => x_msg_count,

Line 466: x_return_status := FND_API.G_RET_STS_ERROR ;

462: --
463: WHEN FND_API.G_EXC_ERROR THEN
464: --dbms_output('Create_Territory PVT: FND_API.G_EXC_ERROR');
465: ROLLBACK TO CREATE_TERRITORY_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR ;
467: FND_MSG_PUB.Count_And_Get
468: ( p_count => x_msg_count,
469: p_data => x_msg_data
470: );

Line 472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

468: ( p_count => x_msg_count,
469: p_data => x_msg_data
470: );
471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: --dbms_output('Create_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
474: ROLLBACK TO CREATE_TERRITORY_PVT;
475: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: FND_MSG_PUB.Count_And_Get

Line 473: --dbms_output('Create_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

469: p_data => x_msg_data
470: );
471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: --dbms_output('Create_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
474: ROLLBACK TO CREATE_TERRITORY_PVT;
475: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: FND_MSG_PUB.Count_And_Get
477: ( p_count => x_msg_count,

Line 475: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: --dbms_output('Create_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
474: ROLLBACK TO CREATE_TERRITORY_PVT;
475: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: FND_MSG_PUB.Count_And_Get
477: ( p_count => x_msg_count,
478: p_data => x_msg_data
479: );

Line 484: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

480:
481: WHEN OTHERS THEN
482: --dbms_output('Create_Territory PVT: OTHERS - ' || SQLERRM);
483: ROLLBACK TO CREATE_TERRITORY_PVT;
484: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
485: FND_MSG_PUB.Count_And_Get
486: ( p_count => x_msg_count,
487: p_data => x_msg_data
488: );

Line 513: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE

509: -- p_Terr_Id NUMBER
510: --
511: -- Optional
512: -- Parameter Name Data Type Default
513: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
514: -- p_Commit VARCHAR2 FND_API.G_FALSE
515: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
516: --
517: -- OUT :

Line 514: -- p_Commit VARCHAR2 FND_API.G_FALSE

510: --
511: -- Optional
512: -- Parameter Name Data Type Default
513: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
514: -- p_Commit VARCHAR2 FND_API.G_FALSE
515: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
516: --
517: -- OUT :
518: -- Parameter Name Data Type

Line 515: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,

511: -- Optional
512: -- Parameter Name Data Type Default
513: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
514: -- p_Commit VARCHAR2 FND_API.G_FALSE
515: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
516: --
517: -- OUT :
518: -- Parameter Name Data Type
519: -- X_Return_Status VARCHAR2(1)

Line 531: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

527: -- End of Comments
528: --
529: PROCEDURE Delete_Territory
530: (p_Api_Version_Number IN NUMBER,
531: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
532: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
533: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
534: X_Return_Status OUT NOCOPY VARCHAR2,
535: X_Msg_Count OUT NOCOPY NUMBER,

Line 532: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

528: --
529: PROCEDURE Delete_Territory
530: (p_Api_Version_Number IN NUMBER,
531: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
532: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
533: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
534: X_Return_Status OUT NOCOPY VARCHAR2,
535: X_Msg_Count OUT NOCOPY NUMBER,
536: X_Msg_Data OUT NOCOPY VARCHAR2,

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

529: PROCEDURE Delete_Territory
530: (p_Api_Version_Number IN NUMBER,
531: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
532: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
533: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
534: X_Return_Status OUT NOCOPY VARCHAR2,
535: X_Msg_Count OUT NOCOPY NUMBER,
536: X_Msg_Data OUT NOCOPY VARCHAR2,
537: p_Terr_Id IN NUMBER)

Line 566: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

562: -- Standard Start of API savepoint
563: SAVEPOINT Delete_Territory_Pvt;
564:
565: -- Standard call to check for call compatibility.
566: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
567: p_api_version_number,
568: l_api_name,
569: G_PKG_NAME)
570: THEN

Line 571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

567: p_api_version_number,
568: l_api_name,
569: G_PKG_NAME)
570: THEN
571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: END IF;
573:
574: -- Initialize message list if p_init_msg_list is set to TRUE.
575: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 575: IF FND_API.to_Boolean( p_init_msg_list ) THEN

571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: END IF;
573:
574: -- Initialize message list if p_init_msg_list is set to TRUE.
575: IF FND_API.to_Boolean( p_init_msg_list ) THEN
576: FND_MSG_PUB.initialize;
577: END IF;
578:
579: -- Debug Message

Line 588: x_return_status := FND_API.G_RET_STS_SUCCESS;

584: FND_MSG_PUB.Add;
585: END IF;
586:
587: -- Initialize API return status to success
588: x_return_status := FND_API.G_RET_STS_SUCCESS;
589:
590: -- Get all the Territories in the Hierarchy
591: FOR c in c_Terr LOOP
592: --

Line 634: IF FND_API.to_Boolean( p_commit )

630: p_data => x_msg_data
631: );
632:
633: -- Standard check for p_commit
634: IF FND_API.to_Boolean( p_commit )
635: THEN
636: COMMIT WORK;
637: END IF;
638: --

Line 643: WHEN FND_API.G_EXC_ERROR THEN

639: --dbms_output('Delete_Territory PVT: Exiting API');
640:
641: EXCEPTION
642: --
643: WHEN FND_API.G_EXC_ERROR THEN
644: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_ERROR');
645: --
646: ROLLBACK TO DELETE_TERRITORY_PVT;
647: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 644: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_ERROR');

640:
641: EXCEPTION
642: --
643: WHEN FND_API.G_EXC_ERROR THEN
644: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_ERROR');
645: --
646: ROLLBACK TO DELETE_TERRITORY_PVT;
647: x_return_status := FND_API.G_RET_STS_ERROR ;
648: FND_MSG_PUB.Count_And_Get

Line 647: x_return_status := FND_API.G_RET_STS_ERROR ;

643: WHEN FND_API.G_EXC_ERROR THEN
644: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_ERROR');
645: --
646: ROLLBACK TO DELETE_TERRITORY_PVT;
647: x_return_status := FND_API.G_RET_STS_ERROR ;
648: FND_MSG_PUB.Count_And_Get
649: ( p_count => x_msg_count,
650: p_data => x_msg_data
651: );

Line 653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

649: ( p_count => x_msg_count,
650: p_data => x_msg_data
651: );
652:
653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
654: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
655: ROLLBACK TO DELETE_TERRITORY_PVT;
656: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
657: FND_MSG_PUB.Count_And_Get

Line 654: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

650: p_data => x_msg_data
651: );
652:
653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
654: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
655: ROLLBACK TO DELETE_TERRITORY_PVT;
656: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
657: FND_MSG_PUB.Count_And_Get
658: ( p_count => x_msg_count,

Line 656: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

652:
653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
654: --dbms_output('Delete_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
655: ROLLBACK TO DELETE_TERRITORY_PVT;
656: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
657: FND_MSG_PUB.Count_And_Get
658: ( p_count => x_msg_count,
659: p_data => x_msg_data
660: );

Line 665: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

661:
662: WHEN OTHERS THEN
663: --dbms_output('Delete_Territory PVT: OTHERS - ' || SQLERRM);
664: ROLLBACK TO DELETE_TERRITORY_PVT;
665: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
666: FND_MSG_PUB.Count_And_Get
667: ( p_count => x_msg_count,
668: p_data => x_msg_data
669: );

Line 696: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

692: -- p_Terr_Values_Tbl Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl
693: --
694: -- Optional
695: -- Parameter Name Data Type Default
696: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
697: -- p_Commit VARCHAR2 := FND_API.G_FALSE
698: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
699: --
700: -- OUT :

Line 697: -- p_Commit VARCHAR2 := FND_API.G_FALSE

693: --
694: -- Optional
695: -- Parameter Name Data Type Default
696: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
697: -- p_Commit VARCHAR2 := FND_API.G_FALSE
698: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
699: --
700: -- OUT :
701: -- Parameter Name Data Type

Line 698: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,

694: -- Optional
695: -- Parameter Name Data Type Default
696: -- p_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
697: -- p_Commit VARCHAR2 := FND_API.G_FALSE
698: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
699: --
700: -- OUT :
701: -- Parameter Name Data Type
702: -- X_Return_Status VARCHAR2(1)

Line 719: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

715: -- End of Comments
716: --
717: PROCEDURE Update_Territory
718: (p_Api_Version_Number IN NUMBER,
719: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
720: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
721: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
722: X_Return_Status OUT NOCOPY VARCHAR2,
723: X_Msg_Count OUT NOCOPY NUMBER,

Line 720: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

716: --
717: PROCEDURE Update_Territory
718: (p_Api_Version_Number IN NUMBER,
719: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
720: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
721: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
722: X_Return_Status OUT NOCOPY VARCHAR2,
723: X_Msg_Count OUT NOCOPY NUMBER,
724: X_Msg_Data OUT NOCOPY VARCHAR2,

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

717: PROCEDURE Update_Territory
718: (p_Api_Version_Number IN NUMBER,
719: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
720: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
721: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
722: X_Return_Status OUT NOCOPY VARCHAR2,
723: X_Msg_Count OUT NOCOPY NUMBER,
724: X_Msg_Data OUT NOCOPY VARCHAR2,
725: p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,

Line 746: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

742: -- Standard Start of API savepoint
743: SAVEPOINT UPDATE_TERRITORY_PVT;
744:
745: -- Standard call to check for call compatibility.
746: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
747: p_api_version_number,
748: l_api_name,
749: G_PKG_NAME)
750: THEN

Line 751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

747: p_api_version_number,
748: l_api_name,
749: G_PKG_NAME)
750: THEN
751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
752: END IF;
753:
754: -- Initialize message list if p_init_msg_list is set to TRUE.
755: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 755: IF FND_API.to_Boolean( p_init_msg_list ) THEN

751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
752: END IF;
753:
754: -- Initialize message list if p_init_msg_list is set to TRUE.
755: IF FND_API.to_Boolean( p_init_msg_list ) THEN
756: FND_MSG_PUB.initialize;
757: END IF;
758:
759: -- Debug Message

Line 768: x_return_status := FND_API.G_RET_STS_SUCCESS;

764: FND_MSG_PUB.Add;
765: END IF;
766:
767: -- Initialize API return status to success
768: x_return_status := FND_API.G_RET_STS_SUCCESS;
769: --
770: -- API body
771: --
772:

Line 774: If p_Terr_All_Rec.Terr_Id <> FND_API.G_MISS_NUM Then

770: -- API body
771: --
772:
773: --Check whether the Territory_Id is Valid
774: If p_Terr_All_Rec.Terr_Id <> FND_API.G_MISS_NUM Then
775: --dbms_output('Update_Territory PVT: Before Calling Update_territory_Record');
776: Update_territory_Record( P_Api_Version_Number => P_Api_Version_Number,
777: P_Init_Msg_List => P_Init_Msg_List,
778: P_Commit => P_Commit,

Line 785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

781: X_Return_Status => l_Return_Status,
782: X_Msg_Count => x_Msg_Count,
783: X_Msg_Data => x_Msg_Data,
784: X_Terr_All_Out_rec => X_Terr_All_Out_Rec);
785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: RAISE FND_API.G_EXC_ERROR;
787: END IF;
788: --
789: End If;

Line 786: RAISE FND_API.G_EXC_ERROR;

782: X_Msg_Count => x_Msg_Count,
783: X_Msg_Data => x_Msg_Data,
784: X_Terr_All_Out_rec => X_Terr_All_Out_Rec);
785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: RAISE FND_API.G_EXC_ERROR;
787: END IF;
788: --
789: End If;
790:

Line 804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

800: X_Return_Status => l_Return_Status,
801: X_Msg_Count => x_Msg_Count,
802: X_Msg_Data => x_Msg_Data,
803: X_Terr_Usgs_Out_Tbl => X_Terr_Usgs_Out_Tbl);
804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
805: RAISE FND_API.G_EXC_ERROR;
806: END IF;
807: --
808: End If;

Line 805: RAISE FND_API.G_EXC_ERROR;

801: X_Msg_Count => x_Msg_Count,
802: X_Msg_Data => x_Msg_Data,
803: X_Terr_Usgs_Out_Tbl => X_Terr_Usgs_Out_Tbl);
804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
805: RAISE FND_API.G_EXC_ERROR;
806: END IF;
807: --
808: End If;
809:

Line 824: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

820: X_Return_Status => l_Return_Status,
821: X_Msg_Count => x_Msg_Count,
822: X_Msg_Data => x_Msg_Data,
823: X_Terr_QualTypeUsgs_Out_Tbl => X_Terr_QualTypeUsgs_Out_Tbl);
824: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
825: RAISE FND_API.G_EXC_ERROR;
826: END IF;
827: --
828: End If;

Line 825: RAISE FND_API.G_EXC_ERROR;

821: X_Msg_Count => x_Msg_Count,
822: X_Msg_Data => x_Msg_Data,
823: X_Terr_QualTypeUsgs_Out_Tbl => X_Terr_QualTypeUsgs_Out_Tbl);
824: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
825: RAISE FND_API.G_EXC_ERROR;
826: END IF;
827: --
828: End If;
829:

Line 843: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

839: X_Return_Status => l_Return_Status,
840: X_Msg_Count => x_Msg_Count,
841: X_Msg_Data => x_Msg_Data,
842: X_Terr_Qual_Out_Tbl => X_Terr_Qual_Out_Tbl);
843: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: --
847: End If;

Line 844: RAISE FND_API.G_EXC_ERROR;

840: X_Msg_Count => x_Msg_Count,
841: X_Msg_Data => x_Msg_Data,
842: X_Terr_Qual_Out_Tbl => X_Terr_Qual_Out_Tbl);
843: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: --
847: End If;
848:

Line 861: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

857: X_Return_Status => l_Return_Status,
858: X_Msg_Count => x_Msg_Count,
859: X_Msg_Data => x_Msg_Data,
860: X_Terr_Value_Out_Tbl => X_Terr_Values_Out_Tbl);
861: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
862: RAISE FND_API.G_EXC_ERROR;
863: END IF;
864: End If;
865: --

Line 862: RAISE FND_API.G_EXC_ERROR;

858: X_Msg_Count => x_Msg_Count,
859: X_Msg_Data => x_Msg_Data,
860: X_Terr_Value_Out_Tbl => X_Terr_Values_Out_Tbl);
861: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
862: RAISE FND_API.G_EXC_ERROR;
863: END IF;
864: End If;
865: --
866:

Line 882: IF FND_API.to_Boolean( p_commit )

878: p_data => x_msg_data
879: );
880:
881: -- Standard check for p_commit
882: IF FND_API.to_Boolean( p_commit )
883: THEN
884: COMMIT WORK;
885: END IF;
886: --

Line 892: WHEN FND_API.G_EXC_ERROR THEN

888:
889: --
890: EXCEPTION
891: --
892: WHEN FND_API.G_EXC_ERROR THEN
893: --dbms_output('Update_Territory PVT: FND_API.G_EXC_ERROR');
894: ROLLBACK TO UPDATE_TERRITORY_PVT;
895: x_return_status := FND_API.G_RET_STS_ERROR ;
896: FND_MSG_PUB.Count_And_Get

Line 893: --dbms_output('Update_Territory PVT: FND_API.G_EXC_ERROR');

889: --
890: EXCEPTION
891: --
892: WHEN FND_API.G_EXC_ERROR THEN
893: --dbms_output('Update_Territory PVT: FND_API.G_EXC_ERROR');
894: ROLLBACK TO UPDATE_TERRITORY_PVT;
895: x_return_status := FND_API.G_RET_STS_ERROR ;
896: FND_MSG_PUB.Count_And_Get
897: ( p_count => x_msg_count,

Line 895: x_return_status := FND_API.G_RET_STS_ERROR ;

891: --
892: WHEN FND_API.G_EXC_ERROR THEN
893: --dbms_output('Update_Territory PVT: FND_API.G_EXC_ERROR');
894: ROLLBACK TO UPDATE_TERRITORY_PVT;
895: x_return_status := FND_API.G_RET_STS_ERROR ;
896: FND_MSG_PUB.Count_And_Get
897: ( p_count => x_msg_count,
898: p_data => x_msg_data
899: );

Line 901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

897: ( p_count => x_msg_count,
898: p_data => x_msg_data
899: );
900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: --dbms_output('Update_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
903: ROLLBACK TO UPDATE_TERRITORY_PVT;
904: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
905: FND_MSG_PUB.Count_And_Get

Line 902: --dbms_output('Update_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

898: p_data => x_msg_data
899: );
900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: --dbms_output('Update_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
903: ROLLBACK TO UPDATE_TERRITORY_PVT;
904: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
905: FND_MSG_PUB.Count_And_Get
906: ( p_count => x_msg_count,

Line 904: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: --dbms_output('Update_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
903: ROLLBACK TO UPDATE_TERRITORY_PVT;
904: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
905: FND_MSG_PUB.Count_And_Get
906: ( p_count => x_msg_count,
907: p_data => x_msg_data
908: );

Line 913: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

909:
910: WHEN OTHERS THEN
911: --dbms_output('Update_Territory PVT: OTHERS - ' || SQLERRM);
912: ROLLBACK TO UPDATE_TERRITORY_PVT;
913: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
914: FND_MSG_PUB.Count_And_Get
915: ( p_count => x_msg_count,
916: p_data => x_msg_data
917: );

Line 941: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE

937: -- p_Terr_Id NUMBER
938: --
939: -- Optional
940: -- Parameter Name Data Type Default
941: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
942: -- p_Commit VARCHAR2 FND_API.G_FALSE
943: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
944: --
945: -- OUT :

Line 942: -- p_Commit VARCHAR2 FND_API.G_FALSE

938: --
939: -- Optional
940: -- Parameter Name Data Type Default
941: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
942: -- p_Commit VARCHAR2 FND_API.G_FALSE
943: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
944: --
945: -- OUT :
946: -- Parameter Name Data Type

Line 943: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,

939: -- Optional
940: -- Parameter Name Data Type Default
941: -- p_Init_Msg_List VARCHAR2 FND_API.G_FALSE
942: -- p_Commit VARCHAR2 FND_API.G_FALSE
943: -- p_validation_level NUMBER FND_API.G_VALID_LEVEL_FULL,
944: --
945: -- OUT :
946: -- Parameter Name Data Type
947: -- x_Return_Status VARCHAR2(1)

Line 959: p_INit_msg_list IN VARCHAR2 := FND_API.G_FALSE,

955: -- End of Comments
956: --
957: PROCEDURE Deactivate_Territory
958: (p_api_version_number IN NUMBER,
959: p_INit_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
962: x_return_status OUT NOCOPY VARCHAR2,
963: x_msg_count OUT NOCOPY NUMBER,

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

956: --
957: PROCEDURE Deactivate_Territory
958: (p_api_version_number IN NUMBER,
959: p_INit_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
962: x_return_status OUT NOCOPY VARCHAR2,
963: x_msg_count OUT NOCOPY NUMBER,
964: x_msg_data OUT NOCOPY VARCHAR2,

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

957: PROCEDURE Deactivate_Territory
958: (p_api_version_number IN NUMBER,
959: p_INit_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
962: x_return_status OUT NOCOPY VARCHAR2,
963: x_msg_count OUT NOCOPY NUMBER,
964: x_msg_data OUT NOCOPY VARCHAR2,
965: P_terr_Id IN NUMBER)

Line 1034: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1030: -- Standard Start of API savepoint
1031: SAVEPOINT DEACTIVATE_TERRITORY_PVT;
1032:
1033: -- Standard call to check for call compatibility.
1034: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1035: p_api_version_number,
1036: l_api_name,
1037: G_PKG_NAME)
1038: THEN

Line 1039: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1035: p_api_version_number,
1036: l_api_name,
1037: G_PKG_NAME)
1038: THEN
1039: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1040: END IF;
1041:
1042: -- Initialize message list if p_init_msg_list is set to TRUE.
1043: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1043: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1039: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1040: END IF;
1041:
1042: -- Initialize message list if p_init_msg_list is set to TRUE.
1043: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1044: FND_MSG_PUB.initialize;
1045: END IF;
1046:
1047: -- Debug Message

Line 1056: x_return_status := FND_API.G_RET_STS_SUCCESS;

1052: FND_MSG_PUB.Add;
1053: END IF;
1054:
1055: -- Initialize API return status to success
1056: x_return_status := FND_API.G_RET_STS_SUCCESS;
1057: --
1058: -- API body
1059: --
1060: -- Initialize API return status to SUCCESS

Line 1061: x_return_status := FND_API.G_RET_STS_SUCCESS;

1057: --
1058: -- API body
1059: --
1060: -- Initialize API return status to SUCCESS
1061: x_return_status := FND_API.G_RET_STS_SUCCESS;
1062:
1063: --dbms_output('Deactivate_Territory PVT: opening cursor C_GetTerrTypeUsage');
1064: OPEN C_GetTerritory( P_Terr_Id);
1065: FETCH C_GetTerritory into

Line 1121: raise FND_API.G_EXC_ERROR;

1117: FND_MESSAGE.Set_Name('JTF', 'API_MISSING_UPDATE_TARGET');
1118: FND_MESSAGE.Set_Token('INFO', 'TERRITORY', FALSE);
1119: FND_MSG_PUB.Add;
1120: END IF;
1121: raise FND_API.G_EXC_ERROR;
1122: End if;
1123: CLOSE C_GetTerritory;
1124:
1125: --dbms_output('Deactivate_Territory PVT: Before Calling JTF_TERR_PKG.Update_Row');

Line 1174: X_return_status := FND_API.G_RET_STS_SUCCESS;

1170: x_org_id => l_ref_terr_all_rec.ORG_ID,
1171: x_num_winners => l_ref_terr_all_rec.NUM_WINNERS,
1172: x_num_qual => l_ref_terr_all_rec.NUM_QUAL );
1173:
1174: X_return_status := FND_API.G_RET_STS_SUCCESS;
1175:
1176: -- Debug Message
1177: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1178: THEN

Line 1191: IF FND_API.to_Boolean( p_commit )

1187: p_data => x_msg_data
1188: );
1189:
1190: -- Standard check for p_commit
1191: IF FND_API.to_Boolean( p_commit )
1192: THEN
1193: COMMIT WORK;
1194: END IF;
1195: --

Line 1198: WHEN FND_API.G_EXC_ERROR THEN

1194: END IF;
1195: --
1196: --dbms_output('Deactivate_Territory PVT: Exiting API');
1197: EXCEPTION
1198: WHEN FND_API.G_EXC_ERROR THEN
1199: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_ERROR');
1200: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1201: x_return_status := FND_API.G_RET_STS_ERROR ;
1202: FND_MSG_PUB.Count_And_Get

Line 1199: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_ERROR');

1195: --
1196: --dbms_output('Deactivate_Territory PVT: Exiting API');
1197: EXCEPTION
1198: WHEN FND_API.G_EXC_ERROR THEN
1199: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_ERROR');
1200: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1201: x_return_status := FND_API.G_RET_STS_ERROR ;
1202: FND_MSG_PUB.Count_And_Get
1203: ( p_count => x_msg_count,

Line 1201: x_return_status := FND_API.G_RET_STS_ERROR ;

1197: EXCEPTION
1198: WHEN FND_API.G_EXC_ERROR THEN
1199: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_ERROR');
1200: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1201: x_return_status := FND_API.G_RET_STS_ERROR ;
1202: FND_MSG_PUB.Count_And_Get
1203: ( p_count => x_msg_count,
1204: p_data => x_msg_data
1205: );

Line 1207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1203: ( p_count => x_msg_count,
1204: p_data => x_msg_data
1205: );
1206:
1207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1208: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1209: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1210: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1211: FND_MSG_PUB.Count_And_Get

Line 1208: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

1204: p_data => x_msg_data
1205: );
1206:
1207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1208: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1209: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1210: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1211: FND_MSG_PUB.Count_And_Get
1212: ( p_count => x_msg_count,

Line 1210: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1206:
1207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1208: --dbms_output('Deactivate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1209: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1210: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1211: FND_MSG_PUB.Count_And_Get
1212: ( p_count => x_msg_count,
1213: p_data => x_msg_data
1214: );

Line 1219: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1215:
1216: WHEN OTHERS THEN
1217: --dbms_output('Deactivate_Territory PVT: OTHERS - ' || SQLERRM);
1218: ROLLBACK TO DEACTIVATE_TERRITORY_PVT;
1219: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1220: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1221: THEN
1222: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1223: 'Others exception inside Deactivate_Territory'

Line 1250: -- P_Init_Msg_List VARCHAR2 := FND_API.G_FALSE

1246: -- P_Terr_QualTypeUsgs_Tbl Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl
1247: --
1248: -- Optional
1249: -- Parameter Name Data Type Default
1250: -- P_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
1251: -- P_Commit VARCHAR2 := FND_API.G_FALSE
1252: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: --
1254: -- OUT :

Line 1251: -- P_Commit VARCHAR2 := FND_API.G_FALSE

1247: --
1248: -- Optional
1249: -- Parameter Name Data Type Default
1250: -- P_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
1251: -- P_Commit VARCHAR2 := FND_API.G_FALSE
1252: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: --
1254: -- OUT :
1255: -- Parameter Name Data Type

Line 1252: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,

1248: -- Optional
1249: -- Parameter Name Data Type Default
1250: -- P_Init_Msg_List VARCHAR2 := FND_API.G_FALSE
1251: -- P_Commit VARCHAR2 := FND_API.G_FALSE
1252: -- p_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: --
1254: -- OUT :
1255: -- Parameter Name Data Type
1256: -- X_Return_Status VARCHAR2(1)

Line 1271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1267: -- End of Comments
1268: --
1269: PROCEDURE Create_Territory_Header
1270: (P_Api_Version_Number IN NUMBER,
1271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1273: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1274: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1275: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,

Line 1272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1268: --
1269: PROCEDURE Create_Territory_Header
1270: (P_Api_Version_Number IN NUMBER,
1271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1273: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1274: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1275: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
1276: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,

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

1269: PROCEDURE Create_Territory_Header
1270: (P_Api_Version_Number IN NUMBER,
1271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1273: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1274: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1275: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
1276: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
1277: X_Return_Status OUT NOCOPY VARCHAR2,

Line 1307: x_return_status := FND_API.G_RET_STS_SUCCESS;

1303: FND_MESSAGE.Set_Name('PROC_NAME', l_api_name);
1304: FND_MSG_PUB.Add;
1305: END IF;
1306: -- Initialize API return status to success
1307: x_return_status := FND_API.G_RET_STS_SUCCESS;
1308:
1309: --dbms_output('Create_Territory_Header PVT: Before Calling Create_Territory_Record');
1310:
1311: -- Call create_territory_record API

Line 1351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1347: --
1348: --Save the out status record
1349: X_Terr_All_Out_Rec := l_Terr_All_Out_Rec;
1350: --If there is a major error
1351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1352: RAISE FND_API.G_EXC_ERROR;
1353: END IF;
1354: --
1355: --

Line 1352: RAISE FND_API.G_EXC_ERROR;

1348: --Save the out status record
1349: X_Terr_All_Out_Rec := l_Terr_All_Out_Rec;
1350: --If there is a major error
1351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1352: RAISE FND_API.G_EXC_ERROR;
1353: END IF;
1354: --
1355: --
1356: --dbms_output('Create_Territory_Header PVT: Before Calling Create_Territory_Usages');

Line 1377: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1373: X_Terr_Usgs_Out_Tbl := l_Terr_Usgs_Out_Tbl;
1374: l_terr_usg_id := l_Terr_Usgs_Out_Tbl(1).Terr_Usg_Id;
1375: --
1376: --If there is a major error
1377: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1378: RAISE FND_API.G_EXC_ERROR;
1379: END IF;
1380: --
1381: -- Call api to insert records into jtf_terr_qualtype_usgs

Line 1378: RAISE FND_API.G_EXC_ERROR;

1374: l_terr_usg_id := l_Terr_Usgs_Out_Tbl(1).Terr_Usg_Id;
1375: --
1376: --If there is a major error
1377: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1378: RAISE FND_API.G_EXC_ERROR;
1379: END IF;
1380: --
1381: -- Call api to insert records into jtf_terr_qualtype_usgs
1382: --

Line 1403: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1399: --
1400: --Save the out status record
1401: X_Terr_QualTypeUsgs_Out_Tbl := l_Terr_QualTypeUsgs_Out_Tbl;
1402: --If there is a major error
1403: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1404: RAISE FND_API.G_EXC_ERROR;
1405: END IF;
1406: --
1407: -- Debug Message

Line 1404: RAISE FND_API.G_EXC_ERROR;

1400: --Save the out status record
1401: X_Terr_QualTypeUsgs_Out_Tbl := l_Terr_QualTypeUsgs_Out_Tbl;
1402: --If there is a major error
1403: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1404: RAISE FND_API.G_EXC_ERROR;
1405: END IF;
1406: --
1407: -- Debug Message
1408: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1417: WHEN FND_API.G_EXC_ERROR THEN

1413: END IF;
1414:
1415: --dbms_output('Create_Territory_Header PVT: Exiting API');
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1418: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_ERROR');
1419: x_return_status := FND_API.G_RET_STS_ERROR ;
1420: FND_MSG_PUB.Count_And_Get
1421: ( P_count => x_msg_count,

Line 1418: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_ERROR');

1414:
1415: --dbms_output('Create_Territory_Header PVT: Exiting API');
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1418: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_ERROR');
1419: x_return_status := FND_API.G_RET_STS_ERROR ;
1420: FND_MSG_PUB.Count_And_Get
1421: ( P_count => x_msg_count,
1422: P_data => x_msg_data

Line 1419: x_return_status := FND_API.G_RET_STS_ERROR ;

1415: --dbms_output('Create_Territory_Header PVT: Exiting API');
1416: EXCEPTION
1417: WHEN FND_API.G_EXC_ERROR THEN
1418: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_ERROR');
1419: x_return_status := FND_API.G_RET_STS_ERROR ;
1420: FND_MSG_PUB.Count_And_Get
1421: ( P_count => x_msg_count,
1422: P_data => x_msg_data
1423: );

Line 1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1421: ( P_count => x_msg_count,
1422: P_data => x_msg_data
1423: );
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: FND_MSG_PUB.Count_And_Get
1429: ( p_count => x_msg_count,

Line 1426: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

1422: P_data => x_msg_data
1423: );
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: FND_MSG_PUB.Count_And_Get
1429: ( p_count => x_msg_count,
1430: p_data => x_msg_data

Line 1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1423: );
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426: --dbms_output('Create_Territory_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: FND_MSG_PUB.Count_And_Get
1429: ( p_count => x_msg_count,
1430: p_data => x_msg_data
1431: );

Line 1435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1431: );
1432:
1433: WHEN OTHERS THEN
1434: --dbms_output('Create_Territory_Header PVT: OTHERS - ' || SQLERRM);
1435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1436: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1437: THEN
1438: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,
1439: 'Others exception inside Create_Territory_Header'

Line 1473: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1469: -- End of Comments
1470: --
1471: PROCEDURE Create_Territory_Record
1472: ( P_Api_Version_Number IN NUMBER,
1473: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1474: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1476: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1477: X_Return_Status OUT NOCOPY VARCHAR2,

Line 1474: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1470: --
1471: PROCEDURE Create_Territory_Record
1472: ( P_Api_Version_Number IN NUMBER,
1473: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1474: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1476: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1477: X_Return_Status OUT NOCOPY VARCHAR2,
1478: X_Msg_Count OUT NOCOPY NUMBER,

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

1471: PROCEDURE Create_Territory_Record
1472: ( P_Api_Version_Number IN NUMBER,
1473: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1474: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1476: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
1477: X_Return_Status OUT NOCOPY VARCHAR2,
1478: X_Msg_Count OUT NOCOPY NUMBER,
1479: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 1495: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1491: -- Standard Start of API savepoint
1492: SAVEPOINT CREATE_TERR_REC_PVT;
1493:
1494: -- Standard call to check for call compatibility.
1495: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1496: p_api_version_number,
1497: l_api_name,
1498: G_PKG_NAME)
1499: THEN

Line 1500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1496: p_api_version_number,
1497: l_api_name,
1498: G_PKG_NAME)
1499: THEN
1500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1501: END IF;
1502:
1503: -- Initialize message list if p_init_msg_list is set to TRUE.
1504: IF FND_API.to_Boolean( p_init_msg_list )

Line 1504: IF FND_API.to_Boolean( p_init_msg_list )

1500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1501: END IF;
1502:
1503: -- Initialize message list if p_init_msg_list is set to TRUE.
1504: IF FND_API.to_Boolean( p_init_msg_list )
1505: THEN
1506: FND_MSG_PUB.initialize;
1507: END IF;
1508:

Line 1518: x_return_status := FND_API.G_RET_STS_SUCCESS;

1514: FND_MSG_PUB.Add;
1515: END IF;
1516:
1517: -- Initialize API return status to success
1518: x_return_status := FND_API.G_RET_STS_SUCCESS;
1519:
1520: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1521: THEN
1522: -- Debug message

Line 1520: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

1516:
1517: -- Initialize API return status to success
1518: x_return_status := FND_API.G_RET_STS_SUCCESS;
1519:
1520: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
1521: THEN
1522: -- Debug message
1523: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1524: THEN

Line 1531: Validate_Territory_Record(p_init_msg_list => FND_API.G_FALSE,

1527: FND_MSG_PUB.Add;
1528: END IF;
1529: --
1530: -- Invoke validation procedures
1531: Validate_Territory_Record(p_init_msg_list => FND_API.G_FALSE,
1532: x_Return_Status => x_return_status,
1533: x_msg_count => x_msg_count,
1534: x_msg_data => x_msg_data,
1535: p_Terr_All_Rec => P_Terr_All_Rec);

Line 1537: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1533: x_msg_count => x_msg_count,
1534: x_msg_data => x_msg_data,
1535: p_Terr_All_Rec => P_Terr_All_Rec);
1536:
1537: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1538: RAISE FND_API.G_EXC_ERROR;
1539: END IF;
1540: END IF;
1541:

Line 1538: RAISE FND_API.G_EXC_ERROR;

1534: x_msg_data => x_msg_data,
1535: p_Terr_All_Rec => P_Terr_All_Rec);
1536:
1537: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1538: RAISE FND_API.G_EXC_ERROR;
1539: END IF;
1540: END IF;
1541:
1542: -- Call insert terr_all table handler

Line 1547: /* Intialise to NULL if FND_API.G_MISS_NUM,

1543: --
1544: --dbms_output('Create_Territory_Record PVT: Before Calling JTF_TERR_PKG.Insert_Row APP_SHORT_NAME-' || G_APP_SHORT_NAME);
1545: --dbms_output('Create_Territory_Record PVT: Before Calling JTF_TERR_PKG.Insert_Row p_terr_all_rec.APPLICATION_SHORT_NAME-' || p_terr_all_rec.APPLICATION_SHORT_NAME);
1546:
1547: /* Intialise to NULL if FND_API.G_MISS_NUM,
1548: ** otherwise use passed in value
1549: */
1550: IF (l_terr_id = FND_API.G_MISS_NUM) THEN
1551: l_terr_id := NULL;

Line 1550: IF (l_terr_id = FND_API.G_MISS_NUM) THEN

1546:
1547: /* Intialise to NULL if FND_API.G_MISS_NUM,
1548: ** otherwise use passed in value
1549: */
1550: IF (l_terr_id = FND_API.G_MISS_NUM) THEN
1551: l_terr_id := NULL;
1552: END IF;
1553:
1554: JTF_TERR_PKG.Insert_Row(x_rowid => l_rowid,

Line 1607: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

1603: --If there was no error in Table Handler Code gets here
1604: --else it goes to the exceptions block
1605: X_Terr_All_Out_Rec.Terr_id := l_terr_id;
1606: X_Terr_Id := l_terr_id;
1607: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
1608:
1609: -- Debug Message
1610: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1611: THEN

Line 1618: IF FND_API.to_Boolean( p_commit )

1614: FND_MSG_PUB.Add;
1615: END IF;
1616:
1617: -- Standard check for p_commit
1618: IF FND_API.to_Boolean( p_commit )
1619: THEN
1620: COMMIT WORK;
1621: END IF;
1622:

Line 1633: WHEN FND_API.G_EXC_ERROR THEN

1629:
1630: --dbms_output('Create_Territory_Record PVT: Exiting API');
1631:
1632: EXCEPTION
1633: WHEN FND_API.G_EXC_ERROR THEN
1634: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1635: ROLLBACK TO CREATE_TERR_REC_PVT;
1636: x_return_status := FND_API.G_RET_STS_ERROR ;
1637: FND_MSG_PUB.Count_And_Get

Line 1634: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');

1630: --dbms_output('Create_Territory_Record PVT: Exiting API');
1631:
1632: EXCEPTION
1633: WHEN FND_API.G_EXC_ERROR THEN
1634: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1635: ROLLBACK TO CREATE_TERR_REC_PVT;
1636: x_return_status := FND_API.G_RET_STS_ERROR ;
1637: FND_MSG_PUB.Count_And_Get
1638: ( p_count => x_msg_count,

Line 1636: x_return_status := FND_API.G_RET_STS_ERROR ;

1632: EXCEPTION
1633: WHEN FND_API.G_EXC_ERROR THEN
1634: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1635: ROLLBACK TO CREATE_TERR_REC_PVT;
1636: x_return_status := FND_API.G_RET_STS_ERROR ;
1637: FND_MSG_PUB.Count_And_Get
1638: ( p_count => x_msg_count,
1639: p_data => x_msg_data
1640: );

Line 1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1638: ( p_count => x_msg_count,
1639: p_data => x_msg_data
1640: );
1641:
1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1643: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1644: ROLLBACK TO CREATE_TERR_REC_PVT;
1645: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1646: FND_MSG_PUB.Count_And_Get

Line 1643: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

1639: p_data => x_msg_data
1640: );
1641:
1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1643: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1644: ROLLBACK TO CREATE_TERR_REC_PVT;
1645: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1646: FND_MSG_PUB.Count_And_Get
1647: ( p_count => x_msg_count,

Line 1645: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1641:
1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1643: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1644: ROLLBACK TO CREATE_TERR_REC_PVT;
1645: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1646: FND_MSG_PUB.Count_And_Get
1647: ( p_count => x_msg_count,
1648: p_data => x_msg_data
1649: );

Line 1654: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1650:
1651:
1652: WHEN OTHERS THEN
1653: --dbms_output('Create_Territory_Record PVT: OTHERS - ' || SQLERRM);
1654: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1655: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1656: ROLLBACK TO CREATE_TERR_REC_PVT;
1657: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1658: THEN

Line 1655: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1651:
1652: WHEN OTHERS THEN
1653: --dbms_output('Create_Territory_Record PVT: OTHERS - ' || SQLERRM);
1654: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1655: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1656: ROLLBACK TO CREATE_TERR_REC_PVT;
1657: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1658: THEN
1659: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Others exception in Create_Territory_Record');

Line 1692: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1688: -- End of Comments
1689: --
1690: PROCEDURE Create_Territory_Usages
1691: ( P_Api_Version_Number IN NUMBER,
1692: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1693: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1694: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1695: P_Terr_Id IN NUMBER,
1696: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,

Line 1693: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1689: --
1690: PROCEDURE Create_Territory_Usages
1691: ( P_Api_Version_Number IN NUMBER,
1692: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1693: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1694: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1695: P_Terr_Id IN NUMBER,
1696: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
1697: X_Return_Status OUT NOCOPY VARCHAR2,

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

1690: PROCEDURE Create_Territory_Usages
1691: ( P_Api_Version_Number IN NUMBER,
1692: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1693: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1694: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1695: P_Terr_Id IN NUMBER,
1696: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
1697: X_Return_Status OUT NOCOPY VARCHAR2,
1698: X_Msg_Count OUT NOCOPY NUMBER,

Line 1718: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1714: -- Standard Start of API savepoint
1715: SAVEPOINT CREATE_TERR_USG_PVT;
1716:
1717: -- Standard call to check for call compatibility.
1718: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1719: p_api_version_number,
1720: l_api_name,
1721: G_PKG_NAME)
1722: THEN

Line 1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1719: p_api_version_number,
1720: l_api_name,
1721: G_PKG_NAME)
1722: THEN
1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;
1725:
1726: -- Initialize message list if p_init_msg_list is set to TRUE.
1727: IF FND_API.to_Boolean( p_init_msg_list )

Line 1727: IF FND_API.to_Boolean( p_init_msg_list )

1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;
1725:
1726: -- Initialize message list if p_init_msg_list is set to TRUE.
1727: IF FND_API.to_Boolean( p_init_msg_list )
1728: THEN
1729: FND_MSG_PUB.initialize;
1730: END IF;
1731:

Line 1741: x_return_status := FND_API.G_RET_STS_SUCCESS;

1737: FND_MSG_PUB.Add;
1738: END IF;
1739:
1740: -- Initialize API return status to success
1741: x_return_status := FND_API.G_RET_STS_SUCCESS;
1742:
1743: --
1744: If (p_Terr_Usgs_Tbl.count = 0 ) Then
1745: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 1749: x_return_status := FND_API.G_RET_STS_ERROR;

1745: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1746: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
1747: FND_MSG_PUB.ADD;
1748: END IF;
1749: x_return_status := FND_API.G_RET_STS_ERROR;
1750: RAISE FND_API.G_EXC_ERROR;
1751: END IF;
1752:
1753: --

Line 1750: RAISE FND_API.G_EXC_ERROR;

1746: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_USAGE');
1747: FND_MSG_PUB.ADD;
1748: END IF;
1749: x_return_status := FND_API.G_RET_STS_ERROR;
1750: RAISE FND_API.G_EXC_ERROR;
1751: END IF;
1752:
1753: --
1754: FOR l_Counter IN 1 .. l_Terr_Usgs_Tbl_Count LOOP

Line 1761: x_return_status := FND_API.G_RET_STS_SUCCESS;

1757:
1758: --dbms_output('Create_Territory_Usages PVT: Before Calling JTF_TERR_USGS_PKG.Insert_Row');
1759:
1760: -- Initialize API return status to success
1761: x_return_status := FND_API.G_RET_STS_SUCCESS;
1762:
1763: IF ( P_validation_level <> FND_API.G_VALID_LEVEL_NONE) THEN
1764:
1765: -- Debug message

Line 1763: IF ( P_validation_level <> FND_API.G_VALID_LEVEL_NONE) THEN

1759:
1760: -- Initialize API return status to success
1761: x_return_status := FND_API.G_RET_STS_SUCCESS;
1762:
1763: IF ( P_validation_level <> FND_API.G_VALID_LEVEL_NONE) THEN
1764:
1765: -- Debug message
1766: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1767: THEN

Line 1773: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,

1769: FND_MSG_PUB.Add;
1770: END IF;
1771: --
1772: -- Invoke validation procedures
1773: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,
1774: x_Return_Status => x_return_status,
1775: x_msg_count => x_msg_count,
1776: x_msg_data => x_msg_data,
1777: p_Terr_Id => p_Terr_Id,

Line 1780: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1776: x_msg_data => x_msg_data,
1777: p_Terr_Id => p_Terr_Id,
1778: p_Terr_Usgs_Rec => P_Terr_Usgs_Tbl(l_Counter));
1779: --
1780: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1781: RAISE FND_API.G_EXC_ERROR;
1782: END IF;
1783: --
1784:

Line 1781: RAISE FND_API.G_EXC_ERROR;

1777: p_Terr_Id => p_Terr_Id,
1778: p_Terr_Usgs_Rec => P_Terr_Usgs_Tbl(l_Counter));
1779: --
1780: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1781: RAISE FND_API.G_EXC_ERROR;
1782: END IF;
1783: --
1784:
1785: -- jdochert 09/09

Line 1789: p_init_msg_list => FND_API.G_FALSE,

1785: -- jdochert 09/09
1786: -- check for Unique Key constraint violation
1787: validate_terr_usgs_UK( p_Terr_Id => p_Terr_Id,
1788: p_Source_Id => P_Terr_Usgs_Tbl(l_counter).source_id,
1789: p_init_msg_list => FND_API.G_FALSE,
1790: x_Return_Status => x_return_status,
1791: x_msg_count => x_msg_count,
1792: x_msg_data => x_msg_data );
1793:

Line 1794: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1790: x_Return_Status => x_return_status,
1791: x_msg_count => x_msg_count,
1792: x_msg_data => x_msg_data );
1793:
1794: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1795: RAISE FND_API.G_EXC_ERROR;
1796: END IF;
1797:
1798: END IF;

Line 1795: RAISE FND_API.G_EXC_ERROR;

1791: x_msg_count => x_msg_count,
1792: x_msg_data => x_msg_data );
1793:
1794: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1795: RAISE FND_API.G_EXC_ERROR;
1796: END IF;
1797:
1798: END IF;
1799:

Line 1802: /* Intialise to NULL if FND_API.G_MISS_NUM,

1798: END IF;
1799:
1800: l_terr_usg_id := P_Terr_Usgs_Tbl(l_Counter).terr_usg_id;
1801:
1802: /* Intialise to NULL if FND_API.G_MISS_NUM,
1803: ** otherwise used passed in value
1804: */
1805: IF (l_terr_usg_id = FND_API.G_MISS_NUM) THEN
1806: l_terr_usg_id := NULL;

Line 1805: IF (l_terr_usg_id = FND_API.G_MISS_NUM) THEN

1801:
1802: /* Intialise to NULL if FND_API.G_MISS_NUM,
1803: ** otherwise used passed in value
1804: */
1805: IF (l_terr_usg_id = FND_API.G_MISS_NUM) THEN
1806: l_terr_usg_id := NULL;
1807: END IF;
1808:
1809: JTF_TERR_USGS_PKG.Insert_Row(x_Rowid => l_rowid,

Line 1823: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := FND_API.G_RET_STS_SUCCESS;

1819:
1820: -- Save the terr_usg_id and
1821: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := l_terr_usg_id;
1822: -- If successful then save the success status for the record
1823: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');

Line 1826: WHEN FND_API.G_EXC_ERROR THEN

1822: -- If successful then save the success status for the record
1823: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1828: ROLLBACK TO CREATE_TERR_USG_PVT;
1829: x_return_status := FND_API.G_RET_STS_ERROR ;
1830: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;

Line 1827: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');

1823: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1828: ROLLBACK TO CREATE_TERR_USG_PVT;
1829: x_return_status := FND_API.G_RET_STS_ERROR ;
1830: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1831: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;

Line 1829: x_return_status := FND_API.G_RET_STS_ERROR ;

1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
1828: ROLLBACK TO CREATE_TERR_USG_PVT;
1829: x_return_status := FND_API.G_RET_STS_ERROR ;
1830: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1831: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1832: FND_MSG_PUB.Count_And_Get
1833: ( p_count => x_msg_count,

Line 1837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1833: ( p_count => x_msg_count,
1834: p_data => x_msg_data
1835: );
1836:
1837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1838: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1839: ROLLBACK TO CREATE_TERR_USG_PVT;
1840: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1841: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;

Line 1838: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

1834: p_data => x_msg_data
1835: );
1836:
1837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1838: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1839: ROLLBACK TO CREATE_TERR_USG_PVT;
1840: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1841: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1842: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;

Line 1840: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1836:
1837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1838: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1839: ROLLBACK TO CREATE_TERR_USG_PVT;
1840: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1841: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1842: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1843: FND_MSG_PUB.Count_And_Get
1844: ( p_count => x_msg_count,

Line 1850: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1846: );
1847:
1848: WHEN OTHERS THEN
1849: --dbms_output('Create_Territory_Usages PVT: OTHERS - ' || SQLERRM);
1850: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1851: X_Terr_Usgs_Out_Tbl(l_Counter).terr_usg_id := NULL;
1852: X_Terr_Usgs_Out_Tbl(l_Counter).return_status := X_return_status;
1853: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1854: THEN

Line 1863: x_return_status := FND_API.G_RET_STS_SUCCESS;

1859: END LOOP;
1860:
1861: -- Get the API overall return status
1862: -- Initialize API return status to success
1863: x_return_status := FND_API.G_RET_STS_SUCCESS;
1864: --Get number of records in the ouput table
1865: l_Terr_Usgs_Out_Tbl_Count := X_Terr_Usgs_Out_Tbl.Count;
1866: l_Terr_Usgs_Out_Tbl := X_Terr_Usgs_Out_Tbl;
1867:

Line 1869: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

1865: l_Terr_Usgs_Out_Tbl_Count := X_Terr_Usgs_Out_Tbl.Count;
1866: l_Terr_Usgs_Out_Tbl := X_Terr_Usgs_Out_Tbl;
1867:
1868: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
1869: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1870: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1871: THEN
1872: X_return_status := FND_API.G_RET_STS_ERROR;
1873: END IF;

Line 1870: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

1866: l_Terr_Usgs_Out_Tbl := X_Terr_Usgs_Out_Tbl;
1867:
1868: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
1869: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1870: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1871: THEN
1872: X_return_status := FND_API.G_RET_STS_ERROR;
1873: END IF;
1874: END LOOP;

Line 1872: X_return_status := FND_API.G_RET_STS_ERROR;

1868: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
1869: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
1870: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
1871: THEN
1872: X_return_status := FND_API.G_RET_STS_ERROR;
1873: END IF;
1874: END LOOP;
1875: --
1876: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1884: IF FND_API.to_Boolean( p_commit )

1880: FND_MSG_PUB.Add;
1881: END IF;
1882: --
1883: -- Standard check for p_commit
1884: IF FND_API.to_Boolean( p_commit )
1885: THEN
1886: COMMIT WORK;
1887: END IF;
1888:

Line 1928: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1924: -- End of Comments
1925: --
1926: PROCEDURE Create_Terr_QualType_Usage
1927: ( P_Api_Version_Number IN NUMBER,
1928: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1929: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1930: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1931: P_Terr_Id IN NUMBER,
1932: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,

Line 1929: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1925: --
1926: PROCEDURE Create_Terr_QualType_Usage
1927: ( P_Api_Version_Number IN NUMBER,
1928: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1929: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1930: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1931: P_Terr_Id IN NUMBER,
1932: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,
1933: X_Return_Status OUT NOCOPY VARCHAR2,

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

1926: PROCEDURE Create_Terr_QualType_Usage
1927: ( P_Api_Version_Number IN NUMBER,
1928: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1929: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1930: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1931: P_Terr_Id IN NUMBER,
1932: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,
1933: X_Return_Status OUT NOCOPY VARCHAR2,
1934: X_Msg_Count OUT NOCOPY NUMBER,

Line 1951: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1947: -- Standard Start of API savepoint
1948: SAVEPOINT CREATE_TERR_QTYPE_USG_PVT;
1949:
1950: -- Standard call to check for call compatibility.
1951: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1952: p_api_version_number,
1953: l_api_name,
1954: G_PKG_NAME)
1955: THEN

Line 1956: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1952: p_api_version_number,
1953: l_api_name,
1954: G_PKG_NAME)
1955: THEN
1956: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1957: END IF;
1958:
1959: -- Initialize message list if p_init_msg_list is set to TRUE.
1960: IF FND_API.to_Boolean( p_init_msg_list )

Line 1960: IF FND_API.to_Boolean( p_init_msg_list )

1956: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1957: END IF;
1958:
1959: -- Initialize message list if p_init_msg_list is set to TRUE.
1960: IF FND_API.to_Boolean( p_init_msg_list )
1961: THEN
1962: FND_MSG_PUB.initialize;
1963: END IF;
1964:

Line 1974: x_return_status := FND_API.G_RET_STS_SUCCESS;

1970: FND_MSG_PUB.Add;
1971: END IF;
1972:
1973: -- Initialize API return status to success
1974: x_return_status := FND_API.G_RET_STS_SUCCESS;
1975:
1976:
1977: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
1978:

Line 1977: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN

1973: -- Initialize API return status to success
1974: x_return_status := FND_API.G_RET_STS_SUCCESS;
1975:
1976:
1977: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
1978:
1979: -- Debug message
1980: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1981: THEN

Line 1988: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,

1984: FND_MSG_PUB.Add;
1985: END IF;
1986:
1987: -- Invoke validation procedures
1988: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,
1989: x_Return_Status => x_return_status,
1990: x_msg_count => x_msg_count,
1991: x_msg_data => x_msg_data,
1992: p_Terr_Id => p_Terr_Id,

Line 1994: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1990: x_msg_count => x_msg_count,
1991: x_msg_data => x_msg_data,
1992: p_Terr_Id => p_Terr_Id,
1993: P_Terr_QualTypeUsgs_Rec => P_Terr_QualTypeUsgs_Rec);
1994: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1995: RAISE FND_API.G_EXC_ERROR;
1996: END IF;
1997:
1998:

Line 1995: RAISE FND_API.G_EXC_ERROR;

1991: x_msg_data => x_msg_data,
1992: p_Terr_Id => p_Terr_Id,
1993: P_Terr_QualTypeUsgs_Rec => P_Terr_QualTypeUsgs_Rec);
1994: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1995: RAISE FND_API.G_EXC_ERROR;
1996: END IF;
1997:
1998:
1999: -- jdochert 09/09

Line 2003: p_init_msg_list => FND_API.G_FALSE,

1999: -- jdochert 09/09
2000: -- check for Unique Key constraint violation
2001: validate_terr_qtype_usgs_UK( p_Terr_Id => p_Terr_Id,
2002: p_Qual_Type_Usg_id => p_Terr_QualTypeUsgs_Rec.qual_type_usg_id,
2003: p_init_msg_list => FND_API.G_FALSE,
2004: x_Return_Status => x_return_status,
2005: x_msg_count => x_msg_count,
2006: x_msg_data => x_msg_data );
2007:

Line 2008: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2004: x_Return_Status => x_return_status,
2005: x_msg_count => x_msg_count,
2006: x_msg_data => x_msg_data );
2007:
2008: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2009: RAISE FND_API.G_EXC_ERROR;
2010: END IF;
2011:
2012: END IF;

Line 2009: RAISE FND_API.G_EXC_ERROR;

2005: x_msg_count => x_msg_count,
2006: x_msg_data => x_msg_data );
2007:
2008: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2009: RAISE FND_API.G_EXC_ERROR;
2010: END IF;
2011:
2012: END IF;
2013: --dbms_output('Create_Terr_QualType_Usage PVT(REC): Before Calling JTF_TERR_QTYPE_USGS_PKG.Insert_Row');

Line 2015: /* Intialise to NULL if FND_API.G_MISS_NUM,

2011:
2012: END IF;
2013: --dbms_output('Create_Terr_QualType_Usage PVT(REC): Before Calling JTF_TERR_QTYPE_USGS_PKG.Insert_Row');
2014:
2015: /* Intialise to NULL if FND_API.G_MISS_NUM,
2016: ** otherwise used passed in value
2017: */
2018: IF (l_TERR_QUAL_TYPE_USG_ID = FND_API.G_MISS_NUM) THEN
2019: l_TERR_QUAL_TYPE_USG_ID := NULL;

Line 2018: IF (l_TERR_QUAL_TYPE_USG_ID = FND_API.G_MISS_NUM) THEN

2014:
2015: /* Intialise to NULL if FND_API.G_MISS_NUM,
2016: ** otherwise used passed in value
2017: */
2018: IF (l_TERR_QUAL_TYPE_USG_ID = FND_API.G_MISS_NUM) THEN
2019: l_TERR_QUAL_TYPE_USG_ID := NULL;
2020: END IF;
2021:
2022:

Line 2040: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

2036: X_Terr_QualTypeUsgs_Id := l_TERR_QUAL_TYPE_USG_ID;
2037: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := l_TERR_QUAL_TYPE_USG_ID;
2038:
2039: -- If successful then save the success status for the record
2040: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
2041: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2042:
2043: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2044: THEN

Line 2041: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

2037: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := l_TERR_QUAL_TYPE_USG_ID;
2038:
2039: -- If successful then save the success status for the record
2040: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
2041: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2042:
2043: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2044: THEN
2045: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');

Line 2051: IF FND_API.to_Boolean( p_commit )

2047: FND_MSG_PUB.Add;
2048: END IF;
2049:
2050: -- Standard check for p_commit
2051: IF FND_API.to_Boolean( p_commit )
2052: THEN
2053: COMMIT WORK;
2054: END IF;
2055:

Line 2065: WHEN FND_API.G_EXC_ERROR THEN

2061:
2062: --dbms_output('Create_Terr_QualType_Usage PVT(REC): Exiting API');
2063:
2064: EXCEPTION
2065: WHEN FND_API.G_EXC_ERROR THEN
2066: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_ERROR');
2067: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2069: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;

Line 2066: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_ERROR');

2062: --dbms_output('Create_Terr_QualType_Usage PVT(REC): Exiting API');
2063:
2064: EXCEPTION
2065: WHEN FND_API.G_EXC_ERROR THEN
2066: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_ERROR');
2067: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2069: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2070: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;

Line 2068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2064: EXCEPTION
2065: WHEN FND_API.G_EXC_ERROR THEN
2066: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_ERROR');
2067: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2069: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2070: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2071: FND_MSG_PUB.Count_And_Get
2072: ( p_count => x_msg_count,

Line 2076: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2072: ( p_count => x_msg_count,
2073: p_data => x_msg_data
2074: );
2075:
2076: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2077: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_UNEXPECTED_ERROR');
2078: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2080: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;

Line 2077: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_UNEXPECTED_ERROR');

2073: p_data => x_msg_data
2074: );
2075:
2076: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2077: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_UNEXPECTED_ERROR');
2078: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2080: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2081: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;

Line 2079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2075:
2076: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2077: --dbms_output('Create_Terr_QualType_Usage PVT(REC): FND_API.G_EXC_UNEXPECTED_ERROR');
2078: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2080: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2081: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2082: FND_MSG_PUB.Count_And_Get
2083: ( p_count => x_msg_count,

Line 2090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2086:
2087: WHEN OTHERS THEN
2088: --dbms_output('Create_Terr_QualType_Usage PVT(REC): OTHERS - ' || SQLERRM);
2089: ROLLBACK TO CREATE_TERR_QTYPE_USG_PVT;
2090: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2091: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := NULL;
2092: X_Terr_QualTypeUsgs_Out_Rec.return_status := x_return_status;
2093: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2094: THEN

Line 2129: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2125: -- End of Comments
2126: --
2127: PROCEDURE Create_Terr_QualType_Usage
2128: ( P_Api_Version_Number IN NUMBER,
2129: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2130: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2131: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2132: P_Terr_Id IN NUMBER,
2133: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,

Line 2130: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2126: --
2127: PROCEDURE Create_Terr_QualType_Usage
2128: ( P_Api_Version_Number IN NUMBER,
2129: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2130: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2131: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2132: P_Terr_Id IN NUMBER,
2133: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
2134: X_Return_Status OUT NOCOPY VARCHAR2,

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

2127: PROCEDURE Create_Terr_QualType_Usage
2128: ( P_Api_Version_Number IN NUMBER,
2129: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2130: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2131: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2132: P_Terr_Id IN NUMBER,
2133: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
2134: X_Return_Status OUT NOCOPY VARCHAR2,
2135: X_Msg_Count OUT NOCOPY NUMBER,

Line 2157: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2153: -- Standard Start of API savepoint
2154: SAVEPOINT CREATE_TERR_QTYPE_USG_PVT;
2155:
2156: -- Standard call to check for call compatibility.
2157: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2158: p_api_version_number,
2159: l_api_name,
2160: G_PKG_NAME)
2161: THEN

Line 2162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2158: p_api_version_number,
2159: l_api_name,
2160: G_PKG_NAME)
2161: THEN
2162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2163: END IF;
2164:
2165: -- Initialize message list if p_init_msg_list is set to TRUE.
2166: IF FND_API.to_Boolean( p_init_msg_list )

Line 2166: IF FND_API.to_Boolean( p_init_msg_list )

2162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2163: END IF;
2164:
2165: -- Initialize message list if p_init_msg_list is set to TRUE.
2166: IF FND_API.to_Boolean( p_init_msg_list )
2167: THEN
2168: FND_MSG_PUB.initialize;
2169: END IF;
2170:

Line 2180: x_return_status := FND_API.G_RET_STS_SUCCESS;

2176: FND_MSG_PUB.Add;
2177: END IF;
2178:
2179: -- Initialize API return status to success
2180: x_return_status := FND_API.G_RET_STS_SUCCESS;
2181:
2182: -- Call insert terr_Qual_Type_Usgs table handler
2183: --
2184: FOR l_Counter IN 1 .. l_Terr_QualTypeUsgs_Tbl_Count LOOP

Line 2201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2197: X_Terr_QualTypeUsgs_Id => l_terr_qual_type_usg_id,
2198: X_Terr_QualTypeUsgs_Out_Rec => l_Terr_QTypUsg_Out_Rec);
2199: --
2200: --If there is a major error
2201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2202: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status <> FND_API.G_RET_STS_SUCCESS');
2203: -- Save the terr_usg_id and
2204: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := NULL;
2205: -- If save the ERROR status for the record

Line 2202: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status <> FND_API.G_RET_STS_SUCCESS');

2198: X_Terr_QualTypeUsgs_Out_Rec => l_Terr_QTypUsg_Out_Rec);
2199: --
2200: --If there is a major error
2201: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2202: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status <> FND_API.G_RET_STS_SUCCESS');
2203: -- Save the terr_usg_id and
2204: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := NULL;
2205: -- If save the ERROR status for the record
2206: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2206: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2202: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status <> FND_API.G_RET_STS_SUCCESS');
2203: -- Save the terr_usg_id and
2204: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := NULL;
2205: -- If save the ERROR status for the record
2206: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2207: ELSE
2208: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status = FND_API.G_RET_STS_SUCCESS');
2209: -- Save the terr_usg_id and
2210: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_terr_qual_type_usg_id;

Line 2208: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status = FND_API.G_RET_STS_SUCCESS');

2204: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := NULL;
2205: -- If save the ERROR status for the record
2206: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2207: ELSE
2208: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status = FND_API.G_RET_STS_SUCCESS');
2209: -- Save the terr_usg_id and
2210: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_terr_qual_type_usg_id;
2211: -- If successful then save the success status for the record
2212: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 2212: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2208: --dbms_output('Create_Terr_QualType_Usage PVT(TBL): l_return_status = FND_API.G_RET_STS_SUCCESS');
2209: -- Save the terr_usg_id and
2210: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_terr_qual_type_usg_id;
2211: -- If successful then save the success status for the record
2212: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2213: END IF;
2214: --
2215: END LOOP;
2216:

Line 2219: x_return_status := FND_API.G_RET_STS_SUCCESS;

2215: END LOOP;
2216:
2217: -- Get the API overall return status
2218: -- Initialize API return status to success
2219: x_return_status := FND_API.G_RET_STS_SUCCESS;
2220:
2221: --Get number of records in the ouput table
2222: l_Terr_QTypUsg_Out_Tbl_Count := X_Terr_QualTypeUsgs_Out_Tbl.Count;
2223: l_Terr_QTypUsg_Out_Tbl := X_Terr_QualTypeUsgs_Out_Tbl;

Line 2226: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2222: l_Terr_QTypUsg_Out_Tbl_Count := X_Terr_QualTypeUsgs_Out_Tbl.Count;
2223: l_Terr_QTypUsg_Out_Tbl := X_Terr_QualTypeUsgs_Out_Tbl;
2224:
2225: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
2226: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2227: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2228: THEN
2229: X_return_status := FND_API.G_RET_STS_ERROR;
2230: END IF;

Line 2227: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2223: l_Terr_QTypUsg_Out_Tbl := X_Terr_QualTypeUsgs_Out_Tbl;
2224:
2225: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
2226: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2227: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2228: THEN
2229: X_return_status := FND_API.G_RET_STS_ERROR;
2230: END IF;
2231: END LOOP;

Line 2229: X_return_status := FND_API.G_RET_STS_ERROR;

2225: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
2226: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2227: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2228: THEN
2229: X_return_status := FND_API.G_RET_STS_ERROR;
2230: END IF;
2231: END LOOP;
2232:
2233: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2241: IF FND_API.to_Boolean( p_commit )

2237: FND_MSG_PUB.Add;
2238: END IF;
2239:
2240: -- Standard check for p_commit
2241: IF FND_API.to_Boolean( p_commit )
2242: THEN
2243: COMMIT WORK;
2244: END IF;
2245:

Line 2313: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2309: -- End of Comments
2310: --
2311: PROCEDURE Create_Terr_Qualifier
2312: ( P_Api_Version_Number IN NUMBER,
2313: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2314: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2315: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2316: P_Terr_Id IN NUMBER,
2317: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,

Line 2314: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2310: --
2311: PROCEDURE Create_Terr_Qualifier
2312: ( P_Api_Version_Number IN NUMBER,
2313: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2314: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2315: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2316: P_Terr_Id IN NUMBER,
2317: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
2318: X_Return_Status OUT NOCOPY VARCHAR2,

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

2311: PROCEDURE Create_Terr_Qualifier
2312: ( P_Api_Version_Number IN NUMBER,
2313: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2314: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2315: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2316: P_Terr_Id IN NUMBER,
2317: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
2318: X_Return_Status OUT NOCOPY VARCHAR2,
2319: X_Msg_Count OUT NOCOPY NUMBER,

Line 2336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2332: -- Standard Start of API savepoint
2333: SAVEPOINT CREATE_TERR_QUAL_PVT;
2334:
2335: -- Standard call to check for call compatibility.
2336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2337: p_api_version_number,
2338: l_api_name,
2339: G_PKG_NAME)
2340: THEN

Line 2341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2337: p_api_version_number,
2338: l_api_name,
2339: G_PKG_NAME)
2340: THEN
2341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2342: END IF;
2343:
2344: -- Initialize message list if p_init_msg_list is set to TRUE.
2345: IF FND_API.to_Boolean( p_init_msg_list )

Line 2345: IF FND_API.to_Boolean( p_init_msg_list )

2341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2342: END IF;
2343:
2344: -- Initialize message list if p_init_msg_list is set to TRUE.
2345: IF FND_API.to_Boolean( p_init_msg_list )
2346: THEN
2347: FND_MSG_PUB.initialize;
2348: END IF;
2349:

Line 2359: x_return_status := FND_API.G_RET_STS_SUCCESS;

2355: FND_MSG_PUB.Add;
2356: END IF;
2357:
2358: -- Initialize API return status to success
2359: x_return_status := FND_API.G_RET_STS_SUCCESS;
2360:
2361: -- Check the validation level
2362: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2363:

Line 2362: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN

2358: -- Initialize API return status to success
2359: x_return_status := FND_API.G_RET_STS_SUCCESS;
2360:
2361: -- Check the validation level
2362: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2363:
2364: -- Debug message
2365: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2366: THEN

Line 2373: Validate_Qualifier(p_init_msg_list => FND_API.G_FALSE,

2369: FND_MSG_PUB.Add;
2370: END IF;
2371: --
2372: -- Invoke validation procedures
2373: Validate_Qualifier(p_init_msg_list => FND_API.G_FALSE,
2374: x_Return_Status => x_return_status,
2375: x_msg_count => x_msg_count,
2376: x_msg_data => x_msg_data,
2377: p_Terr_Id => p_Terr_Id,

Line 2382: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2378: P_Terr_Qual_Rec => P_Terr_Qual_Rec);
2379:
2380: --dbms_output('Create_Terr_Qualifier REC: x_return_status = ' || x_return_status);
2381:
2382: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2383: RAISE FND_API.G_EXC_ERROR;
2384: END IF;
2385: --
2386: END IF;

Line 2383: RAISE FND_API.G_EXC_ERROR;

2379:
2380: --dbms_output('Create_Terr_Qualifier REC: x_return_status = ' || x_return_status);
2381:
2382: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2383: RAISE FND_API.G_EXC_ERROR;
2384: END IF;
2385: --
2386: END IF;
2387:

Line 2388: /* Intialise to NULL if FND_API.G_MISS_NUM,

2384: END IF;
2385: --
2386: END IF;
2387:
2388: /* Intialise to NULL if FND_API.G_MISS_NUM,
2389: ** otherwise used passed in value
2390: */
2391: IF (l_terr_qual_id = FND_API.G_MISS_NUM) THEN
2392: l_terr_qual_id := NULL;

Line 2391: IF (l_terr_qual_id = FND_API.G_MISS_NUM) THEN

2387:
2388: /* Intialise to NULL if FND_API.G_MISS_NUM,
2389: ** otherwise used passed in value
2390: */
2391: IF (l_terr_qual_id = FND_API.G_MISS_NUM) THEN
2392: l_terr_qual_id := NULL;
2393: END IF;
2394:
2395: -- Call insert terr_Qual_Type_Usgs table handler

Line 2417: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

2413: X_Terr_Qual_Id := l_Terr_Qual_Id;
2414: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := l_TERR_QUAL_ID;
2415:
2416: -- If successful then save the success status for the record
2417: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2418:
2419:
2420: /* update Sales territory's number of Account qualifiers
2421: */

Line 2434: IF FND_API.to_Boolean( p_commit )

2430: FND_MSG_PUB.Add;
2431: END IF;
2432:
2433: -- Standard check for p_commit
2434: IF FND_API.to_Boolean( p_commit )
2435: THEN
2436: COMMIT WORK;
2437: END IF;
2438:

Line 2448: WHEN FND_API.G_EXC_ERROR THEN

2444:
2445:
2446: --dbms_output('Create_Terr_Qualifier REC: Exiting API');
2447: EXCEPTION
2448: WHEN FND_API.G_EXC_ERROR THEN
2449: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2450: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2451: x_return_status := FND_API.G_RET_STS_ERROR ;
2452: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;

Line 2449: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');

2445:
2446: --dbms_output('Create_Terr_Qualifier REC: Exiting API');
2447: EXCEPTION
2448: WHEN FND_API.G_EXC_ERROR THEN
2449: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2450: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2451: x_return_status := FND_API.G_RET_STS_ERROR ;
2452: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2453: X_Terr_Qual_Out_Rec.return_status := x_return_status;

Line 2451: x_return_status := FND_API.G_RET_STS_ERROR ;

2447: EXCEPTION
2448: WHEN FND_API.G_EXC_ERROR THEN
2449: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2450: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2451: x_return_status := FND_API.G_RET_STS_ERROR ;
2452: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2453: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2454: FND_MSG_PUB.Count_And_Get
2455: ( p_count => x_msg_count,

Line 2459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2455: ( p_count => x_msg_count,
2456: p_data => x_msg_data
2457: );
2458:
2459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2460: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2461: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2462: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2463: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;

Line 2460: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

2456: p_data => x_msg_data
2457: );
2458:
2459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2460: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2461: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2462: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2463: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2464: X_Terr_Qual_Out_Rec.return_status := x_return_status;

Line 2462: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2458:
2459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2460: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2461: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2462: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2463: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2464: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2465: FND_MSG_PUB.Count_And_Get
2466: ( p_count => x_msg_count,

Line 2474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2470:
2471: WHEN OTHERS THEN
2472: --dbms_output('Create_Terr_Qualifier REC: OTHERS - ' || SQLERRM);
2473: ROLLBACK TO CREATE_TERR_QUAL_PVT;
2474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2475: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := NULL;
2476: X_Terr_Qual_Out_Rec.return_status := x_return_status;
2477: --
2478: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

Line 2516: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2512: -- End of Comments
2513: --
2514: PROCEDURE Create_Terr_Qualifier
2515: ( P_Api_Version_Number IN NUMBER,
2516: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2517: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2518: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2519: P_Terr_Id IN NUMBER,
2520: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,

Line 2517: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2513: --
2514: PROCEDURE Create_Terr_Qualifier
2515: ( P_Api_Version_Number IN NUMBER,
2516: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2517: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2518: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2519: P_Terr_Id IN NUMBER,
2520: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,
2521: X_Return_Status OUT NOCOPY VARCHAR2,

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

2514: PROCEDURE Create_Terr_Qualifier
2515: ( P_Api_Version_Number IN NUMBER,
2516: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2517: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2518: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2519: P_Terr_Id IN NUMBER,
2520: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,
2521: X_Return_Status OUT NOCOPY VARCHAR2,
2522: X_Msg_Count OUT NOCOPY NUMBER,

Line 2545: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2541: -- Standard Start of API savepoint
2542: SAVEPOINT CREATE_TERR_QUAL_PVT;
2543:
2544: -- Standard call to check for call compatibility.
2545: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2546: p_api_version_number,
2547: l_api_name,
2548: G_PKG_NAME)
2549: THEN

Line 2550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2546: p_api_version_number,
2547: l_api_name,
2548: G_PKG_NAME)
2549: THEN
2550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2551: END IF;
2552:
2553: -- Initialize message list if p_init_msg_list is set to TRUE.
2554: IF FND_API.to_Boolean( p_init_msg_list )

Line 2554: IF FND_API.to_Boolean( p_init_msg_list )

2550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2551: END IF;
2552:
2553: -- Initialize message list if p_init_msg_list is set to TRUE.
2554: IF FND_API.to_Boolean( p_init_msg_list )
2555: THEN
2556: FND_MSG_PUB.initialize;
2557: END IF;
2558:

Line 2568: x_return_status := FND_API.G_RET_STS_SUCCESS;

2564: FND_MSG_PUB.Add;
2565: END IF;
2566:
2567: -- Initialize API return status to success
2568: x_return_status := FND_API.G_RET_STS_SUCCESS;
2569:
2570: -- Call overloaded Create_Terr_Qualifier procedure
2571: --
2572: FOR l_Counter IN 1 .. l_Terr_Qual_Tbl_Count LOOP

Line 2589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2585: X_Terr_Qual_Id => l_Terr_qual_id,
2586: X_Terr_Qual_Out_Rec => l_Terr_Qual_Out_Rec);
2587: --
2588: --If there is a major error
2589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2590: --dbms_output('Create_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2591: -- Save the terr_usg_id and
2592: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := NULL;
2593: -- If save the ERROR status for the record

Line 2590: --dbms_output('Create_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

2586: X_Terr_Qual_Out_Rec => l_Terr_Qual_Out_Rec);
2587: --
2588: --If there is a major error
2589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2590: --dbms_output('Create_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2591: -- Save the terr_usg_id and
2592: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := NULL;
2593: -- If save the ERROR status for the record
2594: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2594: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2590: --dbms_output('Create_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2591: -- Save the terr_usg_id and
2592: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := NULL;
2593: -- If save the ERROR status for the record
2594: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2595: ELSE
2596: --dbms_output('Create_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2597: -- Save the terr_usg_id and
2598: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_TERR_QUAL_ID;

Line 2596: --dbms_output('Create_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

2592: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := NULL;
2593: -- If save the ERROR status for the record
2594: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2595: ELSE
2596: --dbms_output('Create_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2597: -- Save the terr_usg_id and
2598: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_TERR_QUAL_ID;
2599: -- If successful then save the success status for the record
2600: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 2600: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2596: --dbms_output('Create_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2597: -- Save the terr_usg_id and
2598: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_TERR_QUAL_ID;
2599: -- If successful then save the success status for the record
2600: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2601: END IF;
2602: --
2603: END LOOP;
2604:

Line 2606: x_return_status := FND_API.G_RET_STS_SUCCESS;

2602: --
2603: END LOOP;
2604:
2605: -- Initialize API return status to success
2606: x_return_status := FND_API.G_RET_STS_SUCCESS;
2607:
2608: --Get number of records in the ouput table
2609: l_Terr_Qual_Out_Tbl_Count := X_Terr_Qual_Out_Tbl.Count;
2610: l_Terr_Qual_Out_Tbl := X_Terr_Qual_Out_Tbl;

Line 2614: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2610: l_Terr_Qual_Out_Tbl := X_Terr_Qual_Out_Tbl;
2611:
2612: -- Get the API overall return status
2613: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
2614: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2615: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2616: THEN
2617: X_return_status := FND_API.G_RET_STS_ERROR;
2618: END IF;

Line 2615: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2611:
2612: -- Get the API overall return status
2613: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
2614: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2615: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2616: THEN
2617: X_return_status := FND_API.G_RET_STS_ERROR;
2618: END IF;
2619: END LOOP;

Line 2617: X_return_status := FND_API.G_RET_STS_ERROR;

2613: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
2614: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2615: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2616: THEN
2617: X_return_status := FND_API.G_RET_STS_ERROR;
2618: END IF;
2619: END LOOP;
2620: --
2621: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 2629: IF FND_API.to_Boolean( p_commit )

2625: FND_MSG_PUB.Add;
2626: END IF;
2627:
2628: -- Standard check for p_commit
2629: IF FND_API.to_Boolean( p_commit )
2630: THEN
2631: COMMIT WORK;
2632: END IF;
2633:

Line 2675: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2671: -- End of Comments
2672: --
2673: PROCEDURE Create_Terr_Value
2674: (P_Api_Version_Number IN NUMBER,
2675: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2676: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2677: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2678: P_Terr_Id IN NUMBER,
2679: p_terr_qual_id IN NUMBER,

Line 2676: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2672: --
2673: PROCEDURE Create_Terr_Value
2674: (P_Api_Version_Number IN NUMBER,
2675: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2676: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2677: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2678: P_Terr_Id IN NUMBER,
2679: p_terr_qual_id IN NUMBER,
2680: P_Terr_Value_Rec IN Terr_Values_Rec_Type := G_Miss_Terr_Values_Rec,

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

2673: PROCEDURE Create_Terr_Value
2674: (P_Api_Version_Number IN NUMBER,
2675: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2676: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2677: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2678: P_Terr_Id IN NUMBER,
2679: p_terr_qual_id IN NUMBER,
2680: P_Terr_Value_Rec IN Terr_Values_Rec_Type := G_Miss_Terr_Values_Rec,
2681: X_Return_Status OUT NOCOPY VARCHAR2,

Line 2698: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2694: -- Standard Start of API savepoint
2695: SAVEPOINT CREATE_TERR_VALUE_PVT;
2696:
2697: -- Standard call to check for call compatibility.
2698: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2699: p_api_version_number,
2700: l_api_name,
2701: G_PKG_NAME)
2702: THEN

Line 2703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2699: p_api_version_number,
2700: l_api_name,
2701: G_PKG_NAME)
2702: THEN
2703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2704: END IF;
2705:
2706: -- Initialize message list if p_init_msg_list is set to TRUE.
2707: IF FND_API.to_Boolean( p_init_msg_list )

Line 2707: IF FND_API.to_Boolean( p_init_msg_list )

2703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2704: END IF;
2705:
2706: -- Initialize message list if p_init_msg_list is set to TRUE.
2707: IF FND_API.to_Boolean( p_init_msg_list )
2708: THEN
2709: FND_MSG_PUB.initialize;
2710: END IF;
2711:

Line 2721: x_return_status := FND_API.G_RET_STS_SUCCESS;

2717: FND_MSG_PUB.Add;
2718: END IF;
2719:
2720: -- Initialize API return status to success
2721: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722:
2723: -- Check the validation level
2724: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2725: -- Debug message

Line 2724: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN

2720: -- Initialize API return status to success
2721: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722:
2723: -- Check the validation level
2724: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
2725: -- Debug message
2726: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2727: THEN
2728: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_VALIDATE_MSG');

Line 2734: Validate_Terr_Value_Rec(p_init_msg_list => FND_API.G_FALSE,

2730: FND_MSG_PUB.Add;
2731: END IF;
2732:
2733: -- Invoke validation procedures
2734: Validate_Terr_Value_Rec(p_init_msg_list => FND_API.G_FALSE,
2735: x_return_status => x_return_status,
2736: x_msg_count => x_msg_count,
2737: x_msg_data => x_msg_data,
2738: p_terr_qual_id => p_terr_qual_id,

Line 2741: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2737: x_msg_data => x_msg_data,
2738: p_terr_qual_id => p_terr_qual_id,
2739: p_Terr_Value_Rec => P_Terr_Value_Rec);
2740:
2741: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2742: RAISE FND_API.G_EXC_ERROR;
2743: END IF;
2744: END IF;
2745:

Line 2742: RAISE FND_API.G_EXC_ERROR;

2738: p_terr_qual_id => p_terr_qual_id,
2739: p_Terr_Value_Rec => P_Terr_Value_Rec);
2740:
2741: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2742: RAISE FND_API.G_EXC_ERROR;
2743: END IF;
2744: END IF;
2745:
2746: --

Line 2747: /* Intialise to NULL if FND_API.G_MISS_NUM,

2743: END IF;
2744: END IF;
2745:
2746: --
2747: /* Intialise to NULL if FND_API.G_MISS_NUM,
2748: ** otherwise used passed in value
2749: */
2750: IF (l_terr_value_id = FND_API.G_MISS_NUM) THEN
2751: l_terr_value_id := NULL;

Line 2750: IF (l_terr_value_id = FND_API.G_MISS_NUM) THEN

2746: --
2747: /* Intialise to NULL if FND_API.G_MISS_NUM,
2748: ** otherwise used passed in value
2749: */
2750: IF (l_terr_value_id = FND_API.G_MISS_NUM) THEN
2751: l_terr_value_id := NULL;
2752: END IF;
2753:
2754: --

Line 2790: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

2786: X_Terr_Value_Id := l_Terr_Value_Id;
2787: X_Terr_Value_Out_Rec.TERR_VALUE_ID := l_TERR_VALUE_ID;
2788:
2789: -- If successful then save the success status for the record
2790: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
2791:
2792: --
2793: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2794: THEN

Line 2801: IF FND_API.to_Boolean( p_commit )

2797: FND_MSG_PUB.Add;
2798: END IF;
2799:
2800: -- Standard check for p_commit
2801: IF FND_API.to_Boolean( p_commit )
2802: THEN
2803: COMMIT WORK;
2804: END IF;
2805:

Line 2814: WHEN FND_API.G_EXC_ERROR THEN

2810: );
2811:
2812: --dbms_output('Create_Terr_Value PVT: Exiting API');
2813: EXCEPTION
2814: WHEN FND_API.G_EXC_ERROR THEN
2815: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2816: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2817: x_return_status := FND_API.G_RET_STS_ERROR ;
2818: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;

Line 2815: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');

2811:
2812: --dbms_output('Create_Terr_Value PVT: Exiting API');
2813: EXCEPTION
2814: WHEN FND_API.G_EXC_ERROR THEN
2815: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2816: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2817: x_return_status := FND_API.G_RET_STS_ERROR ;
2818: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
2819: X_Terr_Value_Out_Rec.return_status := x_return_status;

Line 2817: x_return_status := FND_API.G_RET_STS_ERROR ;

2813: EXCEPTION
2814: WHEN FND_API.G_EXC_ERROR THEN
2815: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_ERROR');
2816: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2817: x_return_status := FND_API.G_RET_STS_ERROR ;
2818: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
2819: X_Terr_Value_Out_Rec.return_status := x_return_status;
2820: FND_MSG_PUB.Count_And_Get
2821: ( p_count => x_msg_count,

Line 2825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2821: ( p_count => x_msg_count,
2822: p_data => x_msg_data
2823: );
2824:
2825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2826: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2827: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;

Line 2826: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

2822: p_data => x_msg_data
2823: );
2824:
2825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2826: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2827: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
2830: X_Terr_Value_Out_Rec.return_status := x_return_status;

Line 2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2824:
2825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2826: --dbms_output('Create_Territory_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2827: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
2830: X_Terr_Value_Out_Rec.return_status := x_return_status;
2831:
2832: FND_MSG_PUB.Count_And_Get

Line 2840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2836:
2837: WHEN OTHERS THEN
2838: --dbms_output('Create_Terr_Value PVT: OTHERS - ' || SQLERRM);
2839: ROLLBACK TO CREATE_TERR_VALUE_PVT;
2840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2841: X_Terr_Value_Out_Rec.TERR_VALUE_ID := NULL;
2842: X_Terr_Value_Out_Rec.return_status := x_return_status;
2843: --
2844: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

Line 2884: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

2880: -- End of Comments
2881: --
2882: PROCEDURE Create_Terr_Value
2883: (P_Api_Version_Number IN NUMBER,
2884: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2885: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2886: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2887: P_Terr_Id IN NUMBER,
2888: p_terr_qual_id IN NUMBER,

Line 2885: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

2881: --
2882: PROCEDURE Create_Terr_Value
2883: (P_Api_Version_Number IN NUMBER,
2884: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2885: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2886: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2887: P_Terr_Id IN NUMBER,
2888: p_terr_qual_id IN NUMBER,
2889: P_Terr_Value_Tbl IN Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl,

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

2882: PROCEDURE Create_Terr_Value
2883: (P_Api_Version_Number IN NUMBER,
2884: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2885: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2886: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2887: P_Terr_Id IN NUMBER,
2888: p_terr_qual_id IN NUMBER,
2889: P_Terr_Value_Tbl IN Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl,
2890: X_Return_Status OUT NOCOPY VARCHAR2,

Line 2914: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2910: -- Standard Start of API savepoint
2911: SAVEPOINT CREATE_TERR_VALUE_PVT;
2912:
2913: -- Standard call to check for call compatibility.
2914: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2915: p_api_version_number,
2916: l_api_name,
2917: G_PKG_NAME)
2918: THEN

Line 2919: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2915: p_api_version_number,
2916: l_api_name,
2917: G_PKG_NAME)
2918: THEN
2919: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: -- Initialize message list if p_init_msg_list is set to TRUE.
2923: IF FND_API.to_Boolean( p_init_msg_list )

Line 2923: IF FND_API.to_Boolean( p_init_msg_list )

2919: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: -- Initialize message list if p_init_msg_list is set to TRUE.
2923: IF FND_API.to_Boolean( p_init_msg_list )
2924: THEN
2925: FND_MSG_PUB.initialize;
2926: END IF;
2927:

Line 2937: x_return_status := FND_API.G_RET_STS_SUCCESS;

2933: FND_MSG_PUB.Add;
2934: END IF;
2935:
2936: -- Initialize API return status to success
2937: x_return_status := FND_API.G_RET_STS_SUCCESS;
2938:
2939: -- Call overloaded Create_Terr_Qualifier procedure
2940: --
2941: FOR l_Counter IN 1 .. l_Terr_Value_Tbl_Count LOOP

Line 2959: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2955: X_Terr_Value_Id => l_Terr_Value_id,
2956: X_Terr_Value_Out_Rec => l_Terr_Value_Out_Rec);
2957: --
2958: --If there is a major error
2959: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2960: --dbms_output('Create_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2961: -- Save the terr_usg_id and
2962: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := NULL;
2963: -- If save the ERROR status for the record

Line 2960: --dbms_output('Create_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

2956: X_Terr_Value_Out_Rec => l_Terr_Value_Out_Rec);
2957: --
2958: --If there is a major error
2959: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2960: --dbms_output('Create_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2961: -- Save the terr_usg_id and
2962: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := NULL;
2963: -- If save the ERROR status for the record
2964: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2964: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2960: --dbms_output('Create_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
2961: -- Save the terr_usg_id and
2962: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := NULL;
2963: -- If save the ERROR status for the record
2964: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2965: ELSE
2966: --dbms_output('Create_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2967: -- Save the terr_usg_id and
2968: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_TERR_VALUE_ID;

Line 2966: --dbms_output('Create_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

2962: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := NULL;
2963: -- If save the ERROR status for the record
2964: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2965: ELSE
2966: --dbms_output('Create_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2967: -- Save the terr_usg_id and
2968: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_TERR_VALUE_ID;
2969: -- If successful then save the success status for the record
2970: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 2970: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

2966: --dbms_output('Create_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
2967: -- Save the terr_usg_id and
2968: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_TERR_VALUE_ID;
2969: -- If successful then save the success status for the record
2970: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
2971: END IF;
2972: --
2973: END LOOP;
2974:

Line 2977: x_return_status := FND_API.G_RET_STS_SUCCESS;

2973: END LOOP;
2974:
2975: -- Get the API overall return status
2976: -- Initialize API return status to success
2977: x_return_status := FND_API.G_RET_STS_SUCCESS;
2978:
2979: --Get number of records in the ouput table
2980: l_Terr_Value_Out_Tbl_Count := X_Terr_Value_Out_Tbl.Count;
2981: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;

Line 2984: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

2980: l_Terr_Value_Out_Tbl_Count := X_Terr_Value_Out_Tbl.Count;
2981: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;
2982:
2983: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
2984: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2985: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2986: THEN
2987: X_return_status := FND_API.G_RET_STS_ERROR;
2988: END IF;

Line 2985: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

2981: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;
2982:
2983: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
2984: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2985: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2986: THEN
2987: X_return_status := FND_API.G_RET_STS_ERROR;
2988: END IF;
2989: END LOOP;

Line 2987: X_return_status := FND_API.G_RET_STS_ERROR;

2983: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
2984: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
2985: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
2986: THEN
2987: X_return_status := FND_API.G_RET_STS_ERROR;
2988: END IF;
2989: END LOOP;
2990: --
2991: --

Line 3002: IF FND_API.to_Boolean( p_commit )

2998: END IF;
2999:
3000: --
3001: -- Standard check for p_commit
3002: IF FND_API.to_Boolean( p_commit )
3003: THEN
3004: COMMIT WORK;
3005: END IF;
3006:

Line 3042: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3038: -- End of Comments
3039: --
3040: PROCEDURE Update_Territory_Record
3041: ( P_Api_Version_Number IN NUMBER,
3042: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3043: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3044: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3045: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
3046: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3043: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3039: --
3040: PROCEDURE Update_Territory_Record
3041: ( P_Api_Version_Number IN NUMBER,
3042: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3043: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3044: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3045: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
3046: X_Return_Status OUT NOCOPY VARCHAR2,
3047: X_Msg_Count OUT NOCOPY NUMBER,

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

3040: PROCEDURE Update_Territory_Record
3041: ( P_Api_Version_Number IN NUMBER,
3042: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3043: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3044: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3045: P_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
3046: X_Return_Status OUT NOCOPY VARCHAR2,
3047: X_Msg_Count OUT NOCOPY NUMBER,
3048: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3122: x_return_status := FND_API.G_RET_STS_SUCCESS;

3118: FND_MSG_PUB.Add;
3119: END IF;
3120:
3121: -- Initialize API return status to SUCCESS
3122: x_return_status := FND_API.G_RET_STS_SUCCESS;
3123:
3124: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
3125: THEN
3126: -- Debug message

Line 3124: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)

3120:
3121: -- Initialize API return status to SUCCESS
3122: x_return_status := FND_API.G_RET_STS_SUCCESS;
3123:
3124: IF ( P_validation_level > FND_API.G_VALID_LEVEL_NONE)
3125: THEN
3126: -- Debug message
3127: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3128: THEN

Line 3135: Validate_Territory_Record(p_init_msg_list => FND_API.G_FALSE,

3131: FND_MSG_PUB.Add;
3132: END IF;
3133: --
3134: -- Invoke validation procedures
3135: Validate_Territory_Record(p_init_msg_list => FND_API.G_FALSE,
3136: x_Return_Status => x_return_status,
3137: x_msg_count => x_msg_count,
3138: x_msg_data => x_msg_data,
3139: p_Terr_All_Rec => P_Terr_All_Rec);

Line 3141: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3137: x_msg_count => x_msg_count,
3138: x_msg_data => x_msg_data,
3139: p_Terr_All_Rec => P_Terr_All_Rec);
3140:
3141: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3142: RAISE FND_API.G_EXC_ERROR;
3143: END IF;
3144: END IF;
3145:

Line 3142: RAISE FND_API.G_EXC_ERROR;

3138: x_msg_data => x_msg_data,
3139: p_Terr_All_Rec => P_Terr_All_Rec);
3140:
3141: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3142: RAISE FND_API.G_EXC_ERROR;
3143: END IF;
3144: END IF;
3145:
3146: --dbms_output('Update_territory_Record: opening cursor C_GetTerritory');

Line 3207: raise FND_API.G_EXC_ERROR;

3203: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3204: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(p_terr_all_rec.terr_id));
3205: FND_MSG_PUB.Add;
3206: END IF;
3207: raise FND_API.G_EXC_ERROR;
3208: End if;
3209: CLOSE C_GetTerritory;
3210:
3211: --dbms_output('Update_territory_Record: Before Calling JTF_TERR_PKG.Update_Row');

Line 3261: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

3257: x_num_winners => p_terr_all_rec.NUM_WINNERS,
3258: x_num_qual => p_terr_all_rec.NUM_QUAL);
3259:
3260: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3261: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3262:
3263: -- Debug Message
3264: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3265: THEN

Line 3273: WHEN FND_API.G_EXC_ERROR THEN

3269: END IF;
3270:
3271: --dbms_output('Update_territory_Record PVT: Exiting API');
3272: EXCEPTION
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,

Line 3274: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');

3270:
3271: --dbms_output('Update_territory_Record PVT: Exiting API');
3272: EXCEPTION
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,
3278: P_data => x_msg_data

Line 3275: x_return_status := FND_API.G_RET_STS_ERROR ;

3271: --dbms_output('Update_territory_Record PVT: Exiting API');
3272: EXCEPTION
3273: WHEN FND_API.G_EXC_ERROR THEN
3274: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
3275: x_return_status := FND_API.G_RET_STS_ERROR ;
3276: FND_MSG_PUB.Count_And_Get
3277: ( P_count => x_msg_count,
3278: P_data => x_msg_data
3279: );

Line 3284: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3280:
3281:
3282: WHEN OTHERS THEN
3283: --dbms_output('Update_territory_Record PVT: OTHERS - ' || SQLERRM);
3284: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3285: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3286: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3287: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3288: THEN

Line 3286: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3282: WHEN OTHERS THEN
3283: --dbms_output('Update_territory_Record PVT: OTHERS - ' || SQLERRM);
3284: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3285: X_Terr_All_Out_Rec.Terr_id := P_Terr_All_Rec.Terr_Id;
3286: X_Terr_All_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3287: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3288: THEN
3289: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Record');
3290: END IF;

Line 3320: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3316: -- End of Comments
3317: --
3318: PROCEDURE Update_Territory_Usages
3319: ( P_Api_Version_Number IN NUMBER,
3320: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3321: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3323: P_Terr_Usgs_Rec IN Terr_Usgs_Rec_Type := G_MISS_TERR_USGS_REC,
3324: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3321: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3317: --
3318: PROCEDURE Update_Territory_Usages
3319: ( P_Api_Version_Number IN NUMBER,
3320: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3321: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3323: P_Terr_Usgs_Rec IN Terr_Usgs_Rec_Type := G_MISS_TERR_USGS_REC,
3324: X_Return_Status OUT NOCOPY VARCHAR2,
3325: X_Msg_Count OUT NOCOPY NUMBER,

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

3318: PROCEDURE Update_Territory_Usages
3319: ( P_Api_Version_Number IN NUMBER,
3320: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3321: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3323: P_Terr_Usgs_Rec IN Terr_Usgs_Rec_Type := G_MISS_TERR_USGS_REC,
3324: X_Return_Status OUT NOCOPY VARCHAR2,
3325: X_Msg_Count OUT NOCOPY NUMBER,
3326: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3359: x_return_status := FND_API.G_RET_STS_SUCCESS;

3355: FND_MSG_PUB.Add;
3356: END IF;
3357:
3358: -- Initialize API return status to SUCCESS
3359: x_return_status := FND_API.G_RET_STS_SUCCESS;
3360:
3361: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3362: THEN
3363: -- Debug message

Line 3361: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

3357:
3358: -- Initialize API return status to SUCCESS
3359: x_return_status := FND_API.G_RET_STS_SUCCESS;
3360:
3361: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3362: THEN
3363: -- Debug message
3364: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3365: THEN

Line 3372: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,

3368: FND_MSG_PUB.Add;
3369: END IF;
3370: --
3371: -- Invoke validation procedures
3372: Validate_Territory_Usage(p_init_msg_list => FND_API.G_FALSE,
3373: x_Return_Status => x_return_status,
3374: x_msg_count => x_msg_count,
3375: x_msg_data => x_msg_data,
3376: p_Terr_Id => P_Terr_Usgs_Rec.Terr_Id,

Line 3379: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3375: x_msg_data => x_msg_data,
3376: p_Terr_Id => P_Terr_Usgs_Rec.Terr_Id,
3377: P_Terr_Usgs_Rec => P_Terr_Usgs_Rec);
3378: --
3379: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3380: RAISE FND_API.G_EXC_ERROR;
3381: END IF;
3382: --
3383: END IF;

Line 3380: RAISE FND_API.G_EXC_ERROR;

3376: p_Terr_Id => P_Terr_Usgs_Rec.Terr_Id,
3377: P_Terr_Usgs_Rec => P_Terr_Usgs_Rec);
3378: --
3379: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3380: RAISE FND_API.G_EXC_ERROR;
3381: END IF;
3382: --
3383: END IF;
3384:

Line 3409: raise FND_API.G_EXC_ERROR;

3405: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3406: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Usgs_Rec.terr_usg_id));
3407: FND_MSG_PUB.Add;
3408: END IF;
3409: raise FND_API.G_EXC_ERROR;
3410: End if;
3411: CLOSE C_GetTerritoryUsage;
3412:
3413: --dbms_output('Update_Territory_Usages PVT: Before Calling JTF_TERR_USGS_PKG.Update_Row');

Line 3427: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

3423: x_SOURCE_ID => P_Terr_Usgs_Rec.source_id,
3424: x_ORG_ID => P_Terr_Usgs_Rec.org_id);
3425:
3426: X_Terr_Usgs_Out_Rec.TERR_USG_ID := P_Terr_Usgs_Rec.Terr_Usg_Id;
3427: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3428:
3429: -- Debug Message
3430: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3431: THEN

Line 3439: WHEN FND_API.G_EXC_ERROR THEN

3435: END IF;
3436:
3437: --dbms_output('Update_Territory_Usages PVT: Exiting API');
3438: EXCEPTION
3439: WHEN FND_API.G_EXC_ERROR THEN
3440: --dbms_output('Update_Territory_Usages: FND_API.G_EXC_ERROR');
3441: x_return_status := FND_API.G_RET_STS_ERROR ;
3442: FND_MSG_PUB.Count_And_Get
3443: ( P_count => x_msg_count,

Line 3440: --dbms_output('Update_Territory_Usages: FND_API.G_EXC_ERROR');

3436:
3437: --dbms_output('Update_Territory_Usages PVT: Exiting API');
3438: EXCEPTION
3439: WHEN FND_API.G_EXC_ERROR THEN
3440: --dbms_output('Update_Territory_Usages: FND_API.G_EXC_ERROR');
3441: x_return_status := FND_API.G_RET_STS_ERROR ;
3442: FND_MSG_PUB.Count_And_Get
3443: ( P_count => x_msg_count,
3444: P_data => x_msg_data

Line 3441: x_return_status := FND_API.G_RET_STS_ERROR ;

3437: --dbms_output('Update_Territory_Usages PVT: Exiting API');
3438: EXCEPTION
3439: WHEN FND_API.G_EXC_ERROR THEN
3440: --dbms_output('Update_Territory_Usages: FND_API.G_EXC_ERROR');
3441: x_return_status := FND_API.G_RET_STS_ERROR ;
3442: FND_MSG_PUB.Count_And_Get
3443: ( P_count => x_msg_count,
3444: P_data => x_msg_data
3445: );

Line 3450: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3446:
3447:
3448: WHEN OTHERS THEN
3449: --dbms_output('Update_Territory_Usages PVT: OTHERS - ' || SQLERRM);
3450: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3451: X_Terr_Usgs_Out_Rec.Terr_Usg_Id := P_Terr_Usgs_Rec.Terr_Usg_Id;
3452: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3453: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3454: THEN

Line 3452: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3448: WHEN OTHERS THEN
3449: --dbms_output('Update_Territory_Usages PVT: OTHERS - ' || SQLERRM);
3450: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3451: X_Terr_Usgs_Out_Rec.Terr_Usg_Id := P_Terr_Usgs_Rec.Terr_Usg_Id;
3452: X_Terr_Usgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3453: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3454: THEN
3455: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Territory_Usages');
3456: END IF;

Line 3485: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3481: -- End of Comments
3482: --
3483: PROCEDURE Update_Territory_Usages
3484: ( P_Api_Version_Number IN NUMBER,
3485: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3486: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3488: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
3489: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3486: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3482: --
3483: PROCEDURE Update_Territory_Usages
3484: ( P_Api_Version_Number IN NUMBER,
3485: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3486: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3488: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
3489: X_Return_Status OUT NOCOPY VARCHAR2,
3490: X_Msg_Count OUT NOCOPY NUMBER,

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

3483: PROCEDURE Update_Territory_Usages
3484: ( P_Api_Version_Number IN NUMBER,
3485: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3486: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3487: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3488: P_Terr_Usgs_Tbl IN Terr_Usgs_Tbl_Type := G_MISS_Terr_Usgs_Tbl,
3489: X_Return_Status OUT NOCOPY VARCHAR2,
3490: X_Msg_Count OUT NOCOPY NUMBER,
3491: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3516: x_return_status := FND_API.G_RET_STS_SUCCESS;

3512: FND_MSG_PUB.Add;
3513: END IF;
3514:
3515: -- Initialize API return status to success
3516: x_return_status := FND_API.G_RET_STS_SUCCESS;
3517:
3518: -- Call insert terr_Qual_Type_Usgs table handler
3519: --
3520: FOR l_Counter IN 1 .. l_Terr_Usgs_Tbl_Count LOOP

Line 3534: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3530: X_Msg_Data => X_Msg_Data,
3531: X_Terr_Usgs_Out_Rec => l_Terr_Usg_Out_Rec);
3532: --
3533: --If there is a major error
3534: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3535: --dbms_output('Update_Territory_Usages TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3536: -- Save the terr_usg_id and
3537: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3538: -- If save the ERROR status for the record

Line 3535: --dbms_output('Update_Territory_Usages TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

3531: X_Terr_Usgs_Out_Rec => l_Terr_Usg_Out_Rec);
3532: --
3533: --If there is a major error
3534: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3535: --dbms_output('Update_Territory_Usages TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3536: -- Save the terr_usg_id and
3537: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3538: -- If save the ERROR status for the record
3539: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3539: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3535: --dbms_output('Update_Territory_Usages TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3536: -- Save the terr_usg_id and
3537: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3538: -- If save the ERROR status for the record
3539: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3540: ELSE
3541: --dbms_output('Update_Territory_Usages TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3542: -- Save the terr_usg_id and
3543: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;

Line 3541: --dbms_output('Update_Territory_Usages TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

3537: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3538: -- If save the ERROR status for the record
3539: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3540: ELSE
3541: --dbms_output('Update_Territory_Usages TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3542: -- Save the terr_usg_id and
3543: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3544: -- If successful then save the success status for the record
3545: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 3545: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

3541: --dbms_output('Update_Territory_Usages TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3542: -- Save the terr_usg_id and
3543: X_Terr_Usgs_Out_Tbl(l_counter).TERR_USG_ID := l_Terr_Usg_Out_Rec.terr_usg_id;
3544: -- If successful then save the success status for the record
3545: X_Terr_Usgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
3546: END IF;
3547: --
3548: END LOOP;
3549:

Line 3551: x_return_status := FND_API.G_RET_STS_SUCCESS;

3547: --
3548: END LOOP;
3549:
3550: -- Initialize API return status to success
3551: x_return_status := FND_API.G_RET_STS_SUCCESS;
3552: --
3553: --Get number of records in the ouput table
3554: l_Terr_Usgs_Out_Tbl_Count := X_Terr_Usgs_Out_Tbl.Count;
3555: l_Terr_Usgs_Out_Tbl := X_Terr_Usgs_Out_Tbl;

Line 3560: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

3556:
3557: --
3558: -- Get the API overall return status
3559: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
3560: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3561: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3562: THEN
3563: X_return_status := FND_API.G_RET_STS_ERROR;
3564: END IF;

Line 3561: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

3557: --
3558: -- Get the API overall return status
3559: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
3560: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3561: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3562: THEN
3563: X_return_status := FND_API.G_RET_STS_ERROR;
3564: END IF;
3565: END LOOP;

Line 3563: X_return_status := FND_API.G_RET_STS_ERROR;

3559: FOR l_Counter IN 1 .. l_Terr_Usgs_Out_Tbl_Count LOOP
3560: If l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3561: l_Terr_Usgs_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3562: THEN
3563: X_return_status := FND_API.G_RET_STS_ERROR;
3564: END IF;
3565: END LOOP;
3566:
3567: -- Debug Message

Line 3602: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3598: -- End of Comments
3599: --
3600: PROCEDURE Update_Terr_QualType_Usage
3601: ( P_Api_Version_Number IN NUMBER,
3602: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3603: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3604: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3605: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,
3606: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3603: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3599: --
3600: PROCEDURE Update_Terr_QualType_Usage
3601: ( P_Api_Version_Number IN NUMBER,
3602: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3603: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3604: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3605: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,
3606: X_Return_Status OUT NOCOPY VARCHAR2,
3607: X_Msg_Count OUT NOCOPY NUMBER,

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

3600: PROCEDURE Update_Terr_QualType_Usage
3601: ( P_Api_Version_Number IN NUMBER,
3602: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3603: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3604: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3605: P_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,
3606: X_Return_Status OUT NOCOPY VARCHAR2,
3607: X_Msg_Count OUT NOCOPY NUMBER,
3608: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3643: x_return_status := FND_API.G_RET_STS_SUCCESS;

3639: FND_MSG_PUB.Add;
3640: END IF;
3641:
3642: -- Initialize API return status to SUCCESS
3643: x_return_status := FND_API.G_RET_STS_SUCCESS;
3644:
3645: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3646: THEN
3647: -- Debug message

Line 3645: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

3641:
3642: -- Initialize API return status to SUCCESS
3643: x_return_status := FND_API.G_RET_STS_SUCCESS;
3644:
3645: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3646: THEN
3647: -- Debug message
3648: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3649: THEN

Line 3655: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,

3651: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage');
3652: FND_MSG_PUB.Add;
3653: END IF;
3654: -- Invoke validation procedures
3655: Validate_Terr_Qtype_Usage(p_init_msg_list => FND_API.G_FALSE,
3656: x_Return_Status => x_return_status,
3657: x_msg_count => x_msg_count,
3658: x_msg_data => x_msg_data,
3659: p_Terr_Id => P_Terr_QualTypeUsgs_Rec.Terr_Id,

Line 3661: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3657: x_msg_count => x_msg_count,
3658: x_msg_data => x_msg_data,
3659: p_Terr_Id => P_Terr_QualTypeUsgs_Rec.Terr_Id,
3660: P_Terr_QualTypeUsgs_Rec => P_Terr_QualTypeUsgs_Rec);
3661: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3662: RAISE FND_API.G_EXC_ERROR;
3663: END IF;
3664: --
3665: END IF;

Line 3662: RAISE FND_API.G_EXC_ERROR;

3658: x_msg_data => x_msg_data,
3659: p_Terr_Id => P_Terr_QualTypeUsgs_Rec.Terr_Id,
3660: P_Terr_QualTypeUsgs_Rec => P_Terr_QualTypeUsgs_Rec);
3661: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3662: RAISE FND_API.G_EXC_ERROR;
3663: END IF;
3664: --
3665: END IF;
3666:

Line 3688: raise FND_API.G_EXC_ERROR;

3684: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QTYPE_USGS');
3685: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID));
3686: FND_MSG_PUB.Add;
3687: END IF;
3688: raise FND_API.G_EXC_ERROR;
3689: End if;
3690: CLOSE C_GetTerrQualTypeUsgs;
3691:
3692: --dbms_output('Update_Terr_QualType_Usage REC: Before Calling JTF_TERR_QTYPE_USGS_PKG.Update_Row');

Line 3705: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

3701: x_QUAL_TYPE_USG_ID => P_Terr_QualTypeUsgs_Rec.QUAL_TYPE_USG_ID,
3702: x_ORG_ID => P_Terr_QualTypeUsgs_Rec.ORG_ID);
3703: --
3704: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
3705: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3706:
3707: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3708: THEN
3709: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_END_MSG');

Line 3716: WHEN FND_API.G_EXC_ERROR THEN

3712: END IF;
3713:
3714: --dbms_output('Update_Terr_QualType_Usage REC: Exiting API');
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: --dbms_output('Update_Terr_QualType_Usage: FND_API.G_EXC_ERROR');
3718: x_return_status := FND_API.G_RET_STS_ERROR ;
3719: FND_MSG_PUB.Count_And_Get
3720: ( P_count => x_msg_count,

Line 3717: --dbms_output('Update_Terr_QualType_Usage: FND_API.G_EXC_ERROR');

3713:
3714: --dbms_output('Update_Terr_QualType_Usage REC: Exiting API');
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: --dbms_output('Update_Terr_QualType_Usage: FND_API.G_EXC_ERROR');
3718: x_return_status := FND_API.G_RET_STS_ERROR ;
3719: FND_MSG_PUB.Count_And_Get
3720: ( P_count => x_msg_count,
3721: P_data => x_msg_data

Line 3718: x_return_status := FND_API.G_RET_STS_ERROR ;

3714: --dbms_output('Update_Terr_QualType_Usage REC: Exiting API');
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: --dbms_output('Update_Terr_QualType_Usage: FND_API.G_EXC_ERROR');
3718: x_return_status := FND_API.G_RET_STS_ERROR ;
3719: FND_MSG_PUB.Count_And_Get
3720: ( P_count => x_msg_count,
3721: P_data => x_msg_data
3722: );

Line 3726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3722: );
3723:
3724: WHEN OTHERS THEN
3725: --dbms_output('Update_Terr_QualType_Usage REC: OTHERS - ' || SQLERRM);
3726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3727: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
3728: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3729: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3730: THEN

Line 3728: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3724: WHEN OTHERS THEN
3725: --dbms_output('Update_Terr_QualType_Usage REC: OTHERS - ' || SQLERRM);
3726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3727: X_Terr_QualTypeUsgs_Out_Rec.TERR_QUAL_TYPE_USG_ID := P_Terr_QualTypeUsgs_Rec.TERR_QUAL_TYPE_USG_ID;
3728: X_Terr_QualTypeUsgs_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3729: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3730: THEN
3731: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Error: Inside Update_Terr_QualType_Usage');
3732: END IF;

Line 3761: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3757: -- End of Comments
3758: --
3759: PROCEDURE Update_Terr_QualType_Usage
3760: ( P_Api_Version_Number IN NUMBER,
3761: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3762: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3763: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3764: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
3765: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3762: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3758: --
3759: PROCEDURE Update_Terr_QualType_Usage
3760: ( P_Api_Version_Number IN NUMBER,
3761: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3762: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3763: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3764: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
3765: X_Return_Status OUT NOCOPY VARCHAR2,
3766: X_Msg_Count OUT NOCOPY NUMBER,

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

3759: PROCEDURE Update_Terr_QualType_Usage
3760: ( P_Api_Version_Number IN NUMBER,
3761: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3762: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3763: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3764: P_Terr_QualTypeUsgs_Tbl IN Terr_QualTypeUsgs_Tbl_Type := G_Miss_Terr_QualTypeUsgs_Tbl,
3765: X_Return_Status OUT NOCOPY VARCHAR2,
3766: X_Msg_Count OUT NOCOPY NUMBER,
3767: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3792: x_return_status := FND_API.G_RET_STS_SUCCESS;

3788: FND_MSG_PUB.Add;
3789: END IF;
3790:
3791: -- Initialize API return status to success
3792: x_return_status := FND_API.G_RET_STS_SUCCESS;
3793: -- Call insert terr_Qual_Type_Usgs table handler
3794: --
3795: FOR l_Counter IN 1 .. l_Terr_QualTypeUsgs_Tbl_Count LOOP
3796: --

Line 3809: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3805: X_Msg_Data => X_Msg_Data,
3806: X_Terr_QualTypeUsgs_Out_Rec => l_Terr_QTypUsg_Out_Rec);
3807: --
3808: --If there is a major error
3809: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3810: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3811: -- Save the terr_usg_id and
3812: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3813: -- If save the ERROR status for the record

Line 3810: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

3806: X_Terr_QualTypeUsgs_Out_Rec => l_Terr_QTypUsg_Out_Rec);
3807: --
3808: --If there is a major error
3809: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3810: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3811: -- Save the terr_usg_id and
3812: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3813: -- If save the ERROR status for the record
3814: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3814: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3810: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
3811: -- Save the terr_usg_id and
3812: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3813: -- If save the ERROR status for the record
3814: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3815: ELSE
3816: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3817: -- Save the terr_usg_id and
3818: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;

Line 3816: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

3812: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3813: -- If save the ERROR status for the record
3814: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3815: ELSE
3816: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3817: -- Save the terr_usg_id and
3818: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3819: -- If successful then save the success status for the record
3820: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 3820: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

3816: --dbms_output('Update_Terr_QualType_Usage TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
3817: -- Save the terr_usg_id and
3818: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).TERR_QUAL_TYPE_USG_ID := l_Terr_QTypUsg_Out_Rec.terr_qual_type_usg_id;
3819: -- If successful then save the success status for the record
3820: X_Terr_QualTypeUsgs_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
3821: END IF;
3822: --
3823: END LOOP;
3824:

Line 3826: x_return_status := FND_API.G_RET_STS_SUCCESS;

3822: --
3823: END LOOP;
3824:
3825: -- Initialize API return status to success
3826: x_return_status := FND_API.G_RET_STS_SUCCESS;
3827:
3828: --Get number of records in the ouput table
3829: l_Terr_QTypUsg_Out_Tbl_Count := X_Terr_QualTypeUsgs_Out_Tbl.Count;
3830: l_Terr_QTypUsg_Out_Tbl := X_Terr_QualTypeUsgs_Out_Tbl;

Line 3834: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

3830: l_Terr_QTypUsg_Out_Tbl := X_Terr_QualTypeUsgs_Out_Tbl;
3831:
3832: --Get the API overall return status
3833: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
3834: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3835: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3836: THEN
3837: X_return_status := FND_API.G_RET_STS_ERROR;
3838: END IF;

Line 3835: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

3831:
3832: --Get the API overall return status
3833: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
3834: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3835: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3836: THEN
3837: X_return_status := FND_API.G_RET_STS_ERROR;
3838: END IF;
3839: END LOOP;

Line 3837: X_return_status := FND_API.G_RET_STS_ERROR;

3833: FOR l_Counter IN 1 .. l_Terr_QTypUsg_Out_Tbl_Count LOOP
3834: If l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
3835: l_Terr_QTypUsg_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
3836: THEN
3837: X_return_status := FND_API.G_RET_STS_ERROR;
3838: END IF;
3839: END LOOP;
3840:
3841: -- Debug Message

Line 3876: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

3872: -- End of Comments
3873: --
3874: PROCEDURE Update_Terr_Qualifier
3875: ( P_Api_Version_Number IN NUMBER,
3876: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3877: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3878: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3879: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
3880: X_Return_Status OUT NOCOPY VARCHAR2,

Line 3877: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

3873: --
3874: PROCEDURE Update_Terr_Qualifier
3875: ( P_Api_Version_Number IN NUMBER,
3876: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3877: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3878: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3879: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
3880: X_Return_Status OUT NOCOPY VARCHAR2,
3881: X_Msg_Count OUT NOCOPY NUMBER,

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

3874: PROCEDURE Update_Terr_Qualifier
3875: ( P_Api_Version_Number IN NUMBER,
3876: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
3877: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
3878: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3879: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
3880: X_Return_Status OUT NOCOPY VARCHAR2,
3881: X_Msg_Count OUT NOCOPY NUMBER,
3882: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 3920: x_return_status := FND_API.G_RET_STS_SUCCESS;

3916: FND_MSG_PUB.Add;
3917: END IF;
3918:
3919: -- Initialize API return status to SUCCESS
3920: x_return_status := FND_API.G_RET_STS_SUCCESS;
3921:
3922: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3923: THEN
3924: -- Debug message

Line 3922: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

3918:
3919: -- Initialize API return status to SUCCESS
3920: x_return_status := FND_API.G_RET_STS_SUCCESS;
3921:
3922: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
3923: THEN
3924: -- Debug message
3925: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3926: THEN

Line 3933: Validate_Qualifier(p_init_msg_list => FND_API.G_FALSE,

3929: FND_MSG_PUB.Add;
3930: END IF;
3931: --
3932: -- Invoke validation procedures
3933: Validate_Qualifier(p_init_msg_list => FND_API.G_FALSE,
3934: x_Return_Status => x_return_status,
3935: x_msg_count => x_msg_count,
3936: x_msg_data => x_msg_data,
3937: p_Terr_Id => P_Terr_Qual_Rec.Terr_Id,

Line 3940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3936: x_msg_data => x_msg_data,
3937: p_Terr_Id => P_Terr_Qual_Rec.Terr_Id,
3938: P_Terr_Qual_Rec => P_Terr_Qual_Rec);
3939:
3940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3941: RAISE FND_API.G_EXC_ERROR;
3942: END IF;
3943: --
3944: END IF;

Line 3941: RAISE FND_API.G_EXC_ERROR;

3937: p_Terr_Id => P_Terr_Qual_Rec.Terr_Id,
3938: P_Terr_Qual_Rec => P_Terr_Qual_Rec);
3939:
3940: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3941: RAISE FND_API.G_EXC_ERROR;
3942: END IF;
3943: --
3944: END IF;
3945:

Line 3971: raise FND_API.G_EXC_ERROR;

3967: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_QUAL');
3968: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Qual_Rec.terr_qual_id));
3969: FND_MSG_PUB.Add;
3970: END IF;
3971: raise FND_API.G_EXC_ERROR;
3972: End if;
3973: CLOSE C_GetTerrQualifier;
3974:
3975: --dbms_output('Update_Terr_Qualifier REC: Before Calling JTF_TERR_QUAL_PKG.Update_Row');

Line 3993: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

3989: x_ORG_ID => P_Terr_Qual_Rec.ORG_ID );
3990:
3991: --Call the update table handler
3992: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
3993: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
3994:
3995: -- Debug Message
3996: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
3997: THEN

Line 4005: WHEN FND_API.G_EXC_ERROR THEN

4001: END IF;
4002:
4003: --dbms_output('Update_Terr_Qualifier REC: Exiting API');
4004: EXCEPTION
4005: WHEN FND_API.G_EXC_ERROR THEN
4006: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4007: x_return_status := FND_API.G_RET_STS_ERROR ;
4008: FND_MSG_PUB.Count_And_Get
4009: ( P_count => x_msg_count,

Line 4006: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');

4002:
4003: --dbms_output('Update_Terr_Qualifier REC: Exiting API');
4004: EXCEPTION
4005: WHEN FND_API.G_EXC_ERROR THEN
4006: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4007: x_return_status := FND_API.G_RET_STS_ERROR ;
4008: FND_MSG_PUB.Count_And_Get
4009: ( P_count => x_msg_count,
4010: P_data => x_msg_data

Line 4007: x_return_status := FND_API.G_RET_STS_ERROR ;

4003: --dbms_output('Update_Terr_Qualifier REC: Exiting API');
4004: EXCEPTION
4005: WHEN FND_API.G_EXC_ERROR THEN
4006: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4007: x_return_status := FND_API.G_RET_STS_ERROR ;
4008: FND_MSG_PUB.Count_And_Get
4009: ( P_count => x_msg_count,
4010: P_data => x_msg_data
4011: );

Line 4015: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4011: );
4012:
4013: WHEN OTHERS THEN
4014: --dbms_output('Update_Terr_Qualifier REC: OTHERS - ' || SQLERRM);
4015: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4016: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
4017: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4019: THEN

Line 4017: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4013: WHEN OTHERS THEN
4014: --dbms_output('Update_Terr_Qualifier REC: OTHERS - ' || SQLERRM);
4015: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4016: X_Terr_Qual_Out_Rec.TERR_QUAL_ID := P_Terr_Qual_Rec.TERR_QUAL_ID;
4017: X_Terr_Qual_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4019: THEN
4020: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Qualifier');
4021: END IF;

Line 4048: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4044: -- End of Comments
4045: --
4046: PROCEDURE Update_Terr_Qualifier
4047: ( P_Api_Version_Number IN NUMBER,
4048: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4049: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4050: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4051: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,
4052: X_Return_Status OUT NOCOPY VARCHAR2,

Line 4049: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4045: --
4046: PROCEDURE Update_Terr_Qualifier
4047: ( P_Api_Version_Number IN NUMBER,
4048: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4049: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4050: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4051: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,
4052: X_Return_Status OUT NOCOPY VARCHAR2,
4053: X_Msg_Count OUT NOCOPY NUMBER,

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

4046: PROCEDURE Update_Terr_Qualifier
4047: ( P_Api_Version_Number IN NUMBER,
4048: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4049: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4050: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4051: P_Terr_Qual_Tbl IN Terr_Qual_Tbl_Type := G_Miss_Terr_Qual_Tbl,
4052: X_Return_Status OUT NOCOPY VARCHAR2,
4053: X_Msg_Count OUT NOCOPY NUMBER,
4054: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 4078: x_return_status := FND_API.G_RET_STS_SUCCESS;

4074: FND_MSG_PUB.Add;
4075: END IF;
4076:
4077: -- Initialize API return status to success
4078: x_return_status := FND_API.G_RET_STS_SUCCESS;
4079: -- Call overloaded Create_Terr_Qualifier procedure
4080: --
4081: FOR l_Counter IN 1 .. l_Terr_Qual_Tbl_Count LOOP
4082: --

Line 4095: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4091: X_Msg_Data => X_Msg_Data,
4092: X_Terr_Qual_Out_Rec => l_Terr_Qual_Out_Rec);
4093: --
4094: --If there is a major error
4095: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4096: --dbms_output('Update_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4097: -- Save the terr_usg_id and
4098: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4099: -- If save the ERROR status for the record

Line 4096: --dbms_output('Update_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

4092: X_Terr_Qual_Out_Rec => l_Terr_Qual_Out_Rec);
4093: --
4094: --If there is a major error
4095: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4096: --dbms_output('Update_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4097: -- Save the terr_usg_id and
4098: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4099: -- If save the ERROR status for the record
4100: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4100: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4096: --dbms_output('Update_Terr_Qualifier TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4097: -- Save the terr_usg_id and
4098: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4099: -- If save the ERROR status for the record
4100: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4101: ELSE
4102: --dbms_output('Update_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4103: -- Save the terr_usg_id and
4104: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;

Line 4102: --dbms_output('Update_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

4098: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4099: -- If save the ERROR status for the record
4100: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4101: ELSE
4102: --dbms_output('Update_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4103: -- Save the terr_usg_id and
4104: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4105: -- If successful then save the success status for the record
4106: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 4106: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

4102: --dbms_output('Update_Terr_Qualifier TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4103: -- Save the terr_usg_id and
4104: X_Terr_Qual_Out_Tbl(l_counter).TERR_QUAL_ID := l_Terr_Qual_Out_Rec.TERR_QUAL_ID;
4105: -- If successful then save the success status for the record
4106: X_Terr_Qual_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
4107: END IF;
4108: --
4109: END LOOP;
4110: --Get the API overall return status

Line 4112: x_return_status := FND_API.G_RET_STS_SUCCESS;

4108: --
4109: END LOOP;
4110: --Get the API overall return status
4111: -- Initialize API return status to success
4112: x_return_status := FND_API.G_RET_STS_SUCCESS;
4113: --Get number of records in the ouput table
4114: l_Terr_Qual_Out_Tbl_Count := X_Terr_Qual_Out_Tbl.Count;
4115: l_Terr_Qual_Out_Tbl := X_Terr_Qual_Out_Tbl;
4116: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP

Line 4117: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

4113: --Get number of records in the ouput table
4114: l_Terr_Qual_Out_Tbl_Count := X_Terr_Qual_Out_Tbl.Count;
4115: l_Terr_Qual_Out_Tbl := X_Terr_Qual_Out_Tbl;
4116: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
4117: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4118: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4119: THEN
4120: X_return_status := FND_API.G_RET_STS_ERROR;
4121: END IF;

Line 4118: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

4114: l_Terr_Qual_Out_Tbl_Count := X_Terr_Qual_Out_Tbl.Count;
4115: l_Terr_Qual_Out_Tbl := X_Terr_Qual_Out_Tbl;
4116: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
4117: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4118: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4119: THEN
4120: X_return_status := FND_API.G_RET_STS_ERROR;
4121: END IF;
4122: END LOOP;

Line 4120: X_return_status := FND_API.G_RET_STS_ERROR;

4116: FOR l_Counter IN 1 .. l_Terr_Qual_Out_Tbl_Count LOOP
4117: If l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4118: l_Terr_Qual_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4119: THEN
4120: X_return_status := FND_API.G_RET_STS_ERROR;
4121: END IF;
4122: END LOOP;
4123:
4124: -- Debug Message

Line 4159: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4155: -- End of Comments
4156: --
4157: PROCEDURE Update_Terr_Value
4158: ( P_Api_Version_Number IN NUMBER,
4159: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4160: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4161: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4162: P_Terr_Value_Rec IN Terr_Values_Rec_Type := G_Miss_Terr_Values_Rec,
4163: X_Return_Status OUT NOCOPY VARCHAR2,

Line 4160: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4156: --
4157: PROCEDURE Update_Terr_Value
4158: ( P_Api_Version_Number IN NUMBER,
4159: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4160: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4161: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4162: P_Terr_Value_Rec IN Terr_Values_Rec_Type := G_Miss_Terr_Values_Rec,
4163: X_Return_Status OUT NOCOPY VARCHAR2,
4164: X_Msg_Count OUT NOCOPY NUMBER,

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

4157: PROCEDURE Update_Terr_Value
4158: ( P_Api_Version_Number IN NUMBER,
4159: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4160: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4161: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4162: P_Terr_Value_Rec IN Terr_Values_Rec_Type := G_Miss_Terr_Values_Rec,
4163: X_Return_Status OUT NOCOPY VARCHAR2,
4164: X_Msg_Count OUT NOCOPY NUMBER,
4165: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 4215: x_return_status := FND_API.G_RET_STS_SUCCESS;

4211: FND_MSG_PUB.Add;
4212: END IF;
4213:
4214: -- Initialize API return status to SUCCESS
4215: x_return_status := FND_API.G_RET_STS_SUCCESS;
4216:
4217: -- Check the validation level
4218: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
4219: THEN

Line 4218: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

4214: -- Initialize API return status to SUCCESS
4215: x_return_status := FND_API.G_RET_STS_SUCCESS;
4216:
4217: -- Check the validation level
4218: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
4219: THEN
4220: -- Debug message
4221: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4222: THEN

Line 4229: Validate_Terr_Value_Rec(p_init_msg_list => FND_API.G_FALSE,

4225: FND_MSG_PUB.Add;
4226: END IF;
4227:
4228: -- Invoke validation procedures
4229: Validate_Terr_Value_Rec(p_init_msg_list => FND_API.G_FALSE,
4230: x_return_status => x_return_status,
4231: x_msg_count => x_msg_count,
4232: x_msg_data => x_msg_data,
4233: p_terr_qual_id => P_Terr_Value_Rec.terr_qual_id,

Line 4236: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

4232: x_msg_data => x_msg_data,
4233: p_terr_qual_id => P_Terr_Value_Rec.terr_qual_id,
4234: p_Terr_Value_Rec => P_Terr_Value_Rec);
4235:
4236: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
4237: RAISE FND_API.G_EXC_ERROR;
4238: END IF;
4239: END IF;
4240:

Line 4237: RAISE FND_API.G_EXC_ERROR;

4233: p_terr_qual_id => P_Terr_Value_Rec.terr_qual_id,
4234: p_Terr_Value_Rec => P_Terr_Value_Rec);
4235:
4236: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
4237: RAISE FND_API.G_EXC_ERROR;
4238: END IF;
4239: END IF;
4240:
4241: --dbms_output('Update_Terr_Value REC: opening cursor C_GetTerritoryValue');

Line 4279: raise FND_API.G_EXC_ERROR;

4275: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR_VALUES');
4276: FND_MESSAGE.Set_Token('PK_ID', TO_CHAR(P_Terr_Value_Rec.TERR_VALUE_ID));
4277: FND_MSG_PUB.Add;
4278: END IF;
4279: raise FND_API.G_EXC_ERROR;
4280:
4281: End if;
4282: CLOSE C_GetTerritoryValue;
4283: --

Line 4317: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;

4313: x_VALUE3_ID => p_terr_value_rec.VALUE3_ID,
4314: x_VALUE4_ID => p_terr_value_rec.VALUE4_ID );
4315:
4316: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4317: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_SUCCESS;
4318:
4319: -- Debug Message
4320: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
4321: THEN

Line 4329: WHEN FND_API.G_EXC_ERROR THEN

4325: END IF;
4326:
4327: --dbms_output('Update_Terr_Value REC: Exiting API');
4328: EXCEPTION
4329: WHEN FND_API.G_EXC_ERROR THEN
4330: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4331: x_return_status := FND_API.G_RET_STS_ERROR ;
4332: FND_MSG_PUB.Count_And_Get
4333: ( P_count => x_msg_count,

Line 4330: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');

4326:
4327: --dbms_output('Update_Terr_Value REC: Exiting API');
4328: EXCEPTION
4329: WHEN FND_API.G_EXC_ERROR THEN
4330: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4331: x_return_status := FND_API.G_RET_STS_ERROR ;
4332: FND_MSG_PUB.Count_And_Get
4333: ( P_count => x_msg_count,
4334: P_data => x_msg_data

Line 4331: x_return_status := FND_API.G_RET_STS_ERROR ;

4327: --dbms_output('Update_Terr_Value REC: Exiting API');
4328: EXCEPTION
4329: WHEN FND_API.G_EXC_ERROR THEN
4330: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
4331: x_return_status := FND_API.G_RET_STS_ERROR ;
4332: FND_MSG_PUB.Count_And_Get
4333: ( P_count => x_msg_count,
4334: P_data => x_msg_data
4335: );

Line 4339: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4335: );
4336:
4337: WHEN OTHERS THEN
4338: --dbms_output('Update_Terr_Value REC: OTHERS - ' || SQLERRM);
4339: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4340: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4341: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4342: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4343: THEN

Line 4341: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4337: WHEN OTHERS THEN
4338: --dbms_output('Update_Terr_Value REC: OTHERS - ' || SQLERRM);
4339: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4340: X_Terr_Value_Out_Rec.TERR_VALUE_ID := P_Terr_Value_Rec.TERR_VALUE_ID;
4341: X_Terr_Value_Out_Rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4342: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4343: THEN
4344: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Update error inside Update_Terr_Value');
4345: END IF;

Line 4377: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4373: -- End of Comments
4374: --
4375: PROCEDURE Update_Terr_Value
4376: ( P_Api_Version_Number IN NUMBER,
4377: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4378: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4379: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4380: P_Terr_Value_Tbl IN Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl,
4381: X_Return_Status OUT NOCOPY VARCHAR2,

Line 4378: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4374: --
4375: PROCEDURE Update_Terr_Value
4376: ( P_Api_Version_Number IN NUMBER,
4377: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4378: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4379: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4380: P_Terr_Value_Tbl IN Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl,
4381: X_Return_Status OUT NOCOPY VARCHAR2,
4382: X_Msg_Count OUT NOCOPY NUMBER,

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

4375: PROCEDURE Update_Terr_Value
4376: ( P_Api_Version_Number IN NUMBER,
4377: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4378: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4379: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4380: P_Terr_Value_Tbl IN Terr_Values_Tbl_Type := G_Miss_Terr_Values_Tbl,
4381: X_Return_Status OUT NOCOPY VARCHAR2,
4382: X_Msg_Count OUT NOCOPY NUMBER,
4383: X_Msg_Data OUT NOCOPY VARCHAR2,

Line 4407: x_return_status := FND_API.G_RET_STS_SUCCESS;

4403: FND_MSG_PUB.Add;
4404: END IF;
4405:
4406: -- Initialize API return status to success
4407: x_return_status := FND_API.G_RET_STS_SUCCESS;
4408: -- -- Call overloaded Create_Terr_Qualifier procedure
4409: --
4410: FOR l_Counter IN 1 .. l_Terr_Value_Tbl_Count LOOP
4411: --

Line 4424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4420: X_Msg_Data => X_Msg_Data,
4421: X_Terr_Value_Out_Rec => l_Terr_Value_Out_Rec);
4422: --
4423: --If there is a major error
4424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4425: --dbms_output('Update_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4426: -- Save the terr_usg_id and
4427: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4428: -- If save the ERROR status for the record

Line 4425: --dbms_output('Update_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');

4421: X_Terr_Value_Out_Rec => l_Terr_Value_Out_Rec);
4422: --
4423: --If there is a major error
4424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4425: --dbms_output('Update_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4426: -- Save the terr_usg_id and
4427: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4428: -- If save the ERROR status for the record
4429: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4429: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4425: --dbms_output('Update_Terr_Value TBL: l_return_status <> FND_API.G_RET_STS_SUCCESS');
4426: -- Save the terr_usg_id and
4427: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4428: -- If save the ERROR status for the record
4429: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4430: ELSE
4431: --dbms_output('Update_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4432: -- Save the terr_usg_id and
4433: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;

Line 4431: --dbms_output('Update_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');

4427: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4428: -- If save the ERROR status for the record
4429: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4430: ELSE
4431: --dbms_output('Update_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4432: -- Save the terr_usg_id and
4433: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4434: -- If successful then save the success status for the record
4435: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

Line 4435: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;

4431: --dbms_output('Update_Terr_Value TBL: l_return_status = FND_API.G_RET_STS_SUCCESS');
4432: -- Save the terr_usg_id and
4433: X_Terr_Value_Out_Tbl(l_counter).TERR_VALUE_ID := l_Terr_Value_Out_Rec.TERR_VALUE_ID;
4434: -- If successful then save the success status for the record
4435: X_Terr_Value_Out_Tbl(l_counter).return_status := FND_API.G_RET_STS_SUCCESS;
4436: END IF;
4437: --
4438: END LOOP;
4439:

Line 4442: x_return_status := FND_API.G_RET_STS_SUCCESS;

4438: END LOOP;
4439:
4440: --Get the API overall return status
4441: -- Initialize API return status to success
4442: x_return_status := FND_API.G_RET_STS_SUCCESS;
4443:
4444: --Get number of records in the ouput table
4445: l_Terr_Value_Out_Tbl_Count := X_Terr_Value_Out_Tbl.Count;
4446: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;

Line 4448: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

4444: --Get number of records in the ouput table
4445: l_Terr_Value_Out_Tbl_Count := X_Terr_Value_Out_Tbl.Count;
4446: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;
4447: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
4448: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4449: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4450: THEN
4451: X_return_status := FND_API.G_RET_STS_ERROR;
4452: END IF;

Line 4449: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR

4445: l_Terr_Value_Out_Tbl_Count := X_Terr_Value_Out_Tbl.Count;
4446: l_Terr_Value_Out_Tbl := X_Terr_Value_Out_Tbl;
4447: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
4448: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4449: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4450: THEN
4451: X_return_status := FND_API.G_RET_STS_ERROR;
4452: END IF;
4453: END LOOP;

Line 4451: X_return_status := FND_API.G_RET_STS_ERROR;

4447: FOR l_Counter IN 1 .. l_Terr_Value_Out_Tbl_Count LOOP
4448: If l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4449: l_Terr_Value_Out_Tbl(l_Counter).return_status = FND_API.G_RET_STS_ERROR
4450: THEN
4451: X_return_status := FND_API.G_RET_STS_ERROR;
4452: END IF;
4453: END LOOP;
4454:
4455: -- Debug Message

Line 4494: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4490: -- End of Comments
4491: --
4492: PROCEDURE Delete_territory_Record
4493: (P_Api_Version_Number IN NUMBER,
4494: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4495: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4496: P_Terr_Id IN NUMBER,
4497: X_Return_Status OUT NOCOPY VARCHAR2,
4498: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 4495: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4491: --
4492: PROCEDURE Delete_territory_Record
4493: (P_Api_Version_Number IN NUMBER,
4494: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4495: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4496: P_Terr_Id IN NUMBER,
4497: X_Return_Status OUT NOCOPY VARCHAR2,
4498: X_Msg_Count OUT NOCOPY VARCHAR2,
4499: X_Msg_Data OUT NOCOPY VARCHAR2)

Line 4512: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4508: -- Standard start of PAI savepoint
4509: SAVEPOINT Delete_territory_Record_Pvt;
4510:
4511: -- Standard call to check for call compatibility.
4512: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4513: p_api_version_number,
4514: l_api_name,
4515: G_PKG_NAME)
4516: THEN

Line 4517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4513: p_api_version_number,
4514: l_api_name,
4515: G_PKG_NAME)
4516: THEN
4517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4518: END IF;
4519: -- Initialize message list if p_init_msg_list is set to TRUE.
4520: IF FND_API.to_Boolean( p_init_msg_list )
4521: THEN

Line 4520: IF FND_API.to_Boolean( p_init_msg_list )

4516: THEN
4517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4518: END IF;
4519: -- Initialize message list if p_init_msg_list is set to TRUE.
4520: IF FND_API.to_Boolean( p_init_msg_list )
4521: THEN
4522: FND_MSG_PUB.initialize;
4523: END IF;
4524:

Line 4534: x_return_status := FND_API.G_RET_STS_SUCCESS;

4530: FND_MSG_PUB.Add;
4531: END IF;
4532:
4533: --Initialize the return status to success
4534: x_return_status := FND_API.G_RET_STS_SUCCESS;
4535: --
4536: --dbms_output('Delete_territory_Record: Before Calling Create_TerrType_Qualifier TBL');
4537: --
4538: JTF_TERR_PKG.Delete_Row(x_terr_Id => P_Terr_Id);

Line 4545: x_return_status := FND_API.G_RET_STS_SUCCESS;

4541: FND_MESSAGE.SET_NAME('JTF','JTF_TERR_RECORD_DELETED');
4542:
4543: IF SQL%FOUND THEN
4544: --dbms_output('Delete_territory_Record: # Records deleted -' || to_char(SQL%ROWCOUNT));
4545: x_return_status := FND_API.G_RET_STS_SUCCESS;
4546: l_row_count := SQL%ROWCOUNT;
4547: END IF;
4548: --prepare the message
4549: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));

Line 4568: IF FND_API.to_Boolean( p_commit )

4564: p_data => x_msg_data
4565: );
4566:
4567: -- Standard check for p_commit
4568: IF FND_API.to_Boolean( p_commit )
4569: THEN
4570: COMMIT WORK;
4571: END IF;
4572: --dbms_output('Delete_territory_Record: Exiting API');

Line 4576: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4572: --dbms_output('Delete_territory_Record: Exiting API');
4573: --
4574: EXCEPTION
4575: WHEN NO_DATA_FOUND THEN
4576: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4577: l_row_count := 0;
4578: --Prepare message token
4579: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
4580: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR');

Line 4588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4584: ( p_count => x_msg_count,
4585: p_data => x_msg_data
4586: );
4587:
4588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4589: --dbms_output('Delete_territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
4590: ROLLBACK TO Delete_territory_Record_Pvt;
4591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4592: FND_MSG_PUB.Count_And_Get

Line 4589: --dbms_output('Delete_territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');

4585: p_data => x_msg_data
4586: );
4587:
4588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4589: --dbms_output('Delete_territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
4590: ROLLBACK TO Delete_territory_Record_Pvt;
4591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4592: FND_MSG_PUB.Count_And_Get
4593: ( p_count => x_msg_count,

Line 4591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4587:
4588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4589: --dbms_output('Delete_territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
4590: ROLLBACK TO Delete_territory_Record_Pvt;
4591: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4592: FND_MSG_PUB.Count_And_Get
4593: ( p_count => x_msg_count,
4594: p_data => x_msg_data
4595: );

Line 4599: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4595: );
4596:
4597: WHEN OTHERS THEN
4598: --dbms_output('Delete_territory_Record: OTHERS - ' || SQLERRM);
4599: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4600: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4601: THEN
4602: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_territory_Record');
4603: END IF;

Line 4630: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4626: -- End of Comments
4627: --
4628: PROCEDURE Delete_Territory_Usages
4629: (P_Api_Version_Number IN NUMBER,
4630: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4631: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4632: P_Terr_usg_Id IN NUMBER,
4633: X_Return_Status OUT NOCOPY VARCHAR2,
4634: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 4631: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4627: --
4628: PROCEDURE Delete_Territory_Usages
4629: (P_Api_Version_Number IN NUMBER,
4630: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4631: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4632: P_Terr_usg_Id IN NUMBER,
4633: X_Return_Status OUT NOCOPY VARCHAR2,
4634: X_Msg_Count OUT NOCOPY VARCHAR2,
4635: X_Msg_Data OUT NOCOPY VARCHAR2)

Line 4648: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4644: -- Standard start of PAI savepoint
4645: SAVEPOINT Delete_Territory_Usages_Pvt;
4646:
4647: -- Standard call to check for call compatibility.
4648: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4649: p_api_version_number,
4650: l_api_name,
4651: G_PKG_NAME)
4652: THEN

Line 4653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4649: p_api_version_number,
4650: l_api_name,
4651: G_PKG_NAME)
4652: THEN
4653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4654: END IF;
4655: -- Initialize message list if p_init_msg_list is set to TRUE.
4656: IF FND_API.to_Boolean( p_init_msg_list )
4657: THEN

Line 4656: IF FND_API.to_Boolean( p_init_msg_list )

4652: THEN
4653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4654: END IF;
4655: -- Initialize message list if p_init_msg_list is set to TRUE.
4656: IF FND_API.to_Boolean( p_init_msg_list )
4657: THEN
4658: FND_MSG_PUB.initialize;
4659: END IF;
4660:

Line 4670: x_return_status := FND_API.G_RET_STS_SUCCESS;

4666: FND_MSG_PUB.Add;
4667: END IF;
4668:
4669: --Initialize the return status to success
4670: x_return_status := FND_API.G_RET_STS_SUCCESS;
4671: --
4672: --dbms_output('Delete_Territory_Usages: Before Calling Create_TerrType_Qualifier TBL');
4673: --
4674: JTF_TERR_USGS_PKG.Delete_Row(x_TERR_USG_ID => P_Terr_usg_Id);

Line 4680: x_return_status := FND_API.G_RET_STS_SUCCESS;

4676: --Prepare message name
4677: FND_MESSAGE.SET_NAME('JTF','JTF_TERR_RECORD_DELETED');
4678: IF SQL%FOUND THEN
4679: --dbms_output('Delete_Territory_Usages: # Records deleted -' || to_char(SQL%ROWCOUNT));
4680: x_return_status := FND_API.G_RET_STS_SUCCESS;
4681: l_row_count := SQL%ROWCOUNT;
4682: END IF;
4683: --Prepare message token
4684: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));

Line 4703: IF FND_API.to_Boolean( p_commit )

4699: p_data => x_msg_data
4700: );
4701:
4702: -- Standard check for p_commit
4703: IF FND_API.to_Boolean( p_commit )
4704: THEN
4705: COMMIT WORK;
4706: END IF;
4707: --dbms_output('Delete_Territory_Usages: Exiting API');

Line 4711: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4707: --dbms_output('Delete_Territory_Usages: Exiting API');
4708: --
4709: EXCEPTION
4710: WHEN NO_DATA_FOUND THEN
4711: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4712: l_row_count := 0;
4713: --Prepare message token
4714: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
4715: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_USGS');

Line 4723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4719: ( p_count => x_msg_count,
4720: p_data => x_msg_data
4721: );
4722:
4723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4724: --dbms_output('Delete_Territory_Usages: FND_API.G_EXC_UNEXPECTED_ERROR');
4725: ROLLBACK TO Delete_Territory_Usages_Pvt;
4726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4727: FND_MSG_PUB.Count_And_Get

Line 4724: --dbms_output('Delete_Territory_Usages: FND_API.G_EXC_UNEXPECTED_ERROR');

4720: p_data => x_msg_data
4721: );
4722:
4723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4724: --dbms_output('Delete_Territory_Usages: FND_API.G_EXC_UNEXPECTED_ERROR');
4725: ROLLBACK TO Delete_Territory_Usages_Pvt;
4726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4727: FND_MSG_PUB.Count_And_Get
4728: ( p_count => x_msg_count,

Line 4726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4722:
4723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4724: --dbms_output('Delete_Territory_Usages: FND_API.G_EXC_UNEXPECTED_ERROR');
4725: ROLLBACK TO Delete_Territory_Usages_Pvt;
4726: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4727: FND_MSG_PUB.Count_And_Get
4728: ( p_count => x_msg_count,
4729: p_data => x_msg_data
4730: );

Line 4734: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4730: );
4731:
4732: WHEN OTHERS THEN
4733: --dbms_output('Delete_Territory_Usages: OTHERS - ' || SQLERRM);
4734: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4735: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4736: THEN
4737: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Territory_Usages');
4738: END IF;

Line 4764: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4760: -- End of Comments
4761: --
4762: PROCEDURE Delete_Terr_QualType_Usage
4763: (P_Api_Version_Number IN NUMBER,
4764: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4765: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4766: P_Terr_Qual_Type_Usg_Id IN NUMBER,
4767: X_Return_Status OUT NOCOPY VARCHAR2,
4768: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 4765: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4761: --
4762: PROCEDURE Delete_Terr_QualType_Usage
4763: (P_Api_Version_Number IN NUMBER,
4764: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4765: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4766: P_Terr_Qual_Type_Usg_Id IN NUMBER,
4767: X_Return_Status OUT NOCOPY VARCHAR2,
4768: X_Msg_Count OUT NOCOPY VARCHAR2,
4769: X_Msg_Data OUT NOCOPY VARCHAR2)

Line 4783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4779: -- Standard start of PAI savepoint
4780: SAVEPOINT Delete_Terr_QualType_Usage_Pvt;
4781:
4782: -- Standard call to check for call compatibility.
4783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4784: p_api_version_number,
4785: l_api_name,
4786: G_PKG_NAME)
4787: THEN

Line 4788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4784: p_api_version_number,
4785: l_api_name,
4786: G_PKG_NAME)
4787: THEN
4788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4789: END IF;
4790: -- Initialize message list if p_init_msg_list is set to TRUE.
4791: IF FND_API.to_Boolean( p_init_msg_list )
4792: THEN

Line 4791: IF FND_API.to_Boolean( p_init_msg_list )

4787: THEN
4788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4789: END IF;
4790: -- Initialize message list if p_init_msg_list is set to TRUE.
4791: IF FND_API.to_Boolean( p_init_msg_list )
4792: THEN
4793: FND_MSG_PUB.initialize;
4794: END IF;
4795:

Line 4805: x_return_status := FND_API.G_RET_STS_SUCCESS;

4801: FND_MSG_PUB.Add;
4802: END IF;
4803:
4804: --Initialize the return status to success
4805: x_return_status := FND_API.G_RET_STS_SUCCESS;
4806:
4807: --dbms_output('Delete_Terr_QualType_Usage: Before Calling JTF_TERR_QTYPE_USGS_PKG.Delete_Row');
4808: --
4809: JTF_TERR_QTYPE_USGS_PKG.Delete_Row(x_terr_qtype_usg_id => P_Terr_Qual_Type_Usg_Id);

Line 4817: x_return_status := FND_API.G_RET_STS_SUCCESS;

4813: FND_MESSAGE.SET_NAME('JTF','JTF_TERR_RECORD_DELETED');
4814:
4815: IF SQL%FOUND THEN
4816: --dbms_output('Delete_Terr_QualType_Usage: # Records deleted -' || to_char(SQL%ROWCOUNT));
4817: x_return_status := FND_API.G_RET_STS_SUCCESS;
4818: l_row_count := SQL%ROWCOUNT;
4819: END IF;
4820:
4821: --Prepare message token

Line 4841: IF FND_API.to_Boolean( p_commit )

4837: p_data => x_msg_data
4838: );
4839:
4840: -- Standard check for p_commit
4841: IF FND_API.to_Boolean( p_commit )
4842: THEN
4843: COMMIT WORK;
4844: END IF;
4845: --dbms_output('Delete_Terr_QualType_Usage: Exiting API');

Line 4850: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4846: --
4847: EXCEPTION
4848: WHEN NO_DATA_FOUND THEN
4849: --dbms_output('Delete_Terr_QualType_Usage: NO_DATA_FOUND');
4850: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4851: l_row_count := 0;
4852:
4853: --Prepare message token
4854: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));

Line 4863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4859: ( p_count => x_msg_count,
4860: p_data => x_msg_data
4861: );
4862:
4863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4864: --dbms_output('Delete_Terr_QualType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
4865: ROLLBACK TO Delete_Terr_QualType_Usage_Pvt;
4866: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4867: FND_MSG_PUB.Count_And_Get

Line 4864: --dbms_output('Delete_Terr_QualType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

4860: p_data => x_msg_data
4861: );
4862:
4863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4864: --dbms_output('Delete_Terr_QualType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
4865: ROLLBACK TO Delete_Terr_QualType_Usage_Pvt;
4866: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4867: FND_MSG_PUB.Count_And_Get
4868: ( p_count => x_msg_count,

Line 4866: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4862:
4863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4864: --dbms_output('Delete_Terr_QualType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
4865: ROLLBACK TO Delete_Terr_QualType_Usage_Pvt;
4866: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4867: FND_MSG_PUB.Count_And_Get
4868: ( p_count => x_msg_count,
4869: p_data => x_msg_data
4870: );

Line 4874: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4870: );
4871:
4872: WHEN OTHERS THEN
4873: --dbms_output('Delete_Terr_QualType_Usage: OTHERS - ' || SQLERRM);
4874: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4875:
4876: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4877: THEN
4878: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_QualType_Usage');

Line 4905: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

4901: -- End of Comments
4902: --
4903: PROCEDURE Delete_Terr_Qualifier
4904: (P_Api_Version_Number IN NUMBER,
4905: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4906: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4907: P_Terr_Qual_Id IN NUMBER,
4908: X_Return_Status OUT NOCOPY VARCHAR2,
4909: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 4906: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

4902: --
4903: PROCEDURE Delete_Terr_Qualifier
4904: (P_Api_Version_Number IN NUMBER,
4905: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
4906: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
4907: P_Terr_Qual_Id IN NUMBER,
4908: X_Return_Status OUT NOCOPY VARCHAR2,
4909: X_Msg_Count OUT NOCOPY VARCHAR2,
4910: X_Msg_Data OUT NOCOPY VARCHAR2)

Line 4931: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4927: -- Standard start of PAI savepoint
4928: SAVEPOINT Delete_Terr_Qualifier_Pvt;
4929:
4930: -- Standard call to check for call compatibility.
4931: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4932: p_api_version_number,
4933: l_api_name,
4934: G_PKG_NAME)
4935: THEN

Line 4936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4932: p_api_version_number,
4933: l_api_name,
4934: G_PKG_NAME)
4935: THEN
4936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4937: END IF;
4938: -- Initialize message list if p_init_msg_list is set to TRUE.
4939: IF FND_API.to_Boolean( p_init_msg_list )
4940: THEN

Line 4939: IF FND_API.to_Boolean( p_init_msg_list )

4935: THEN
4936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4937: END IF;
4938: -- Initialize message list if p_init_msg_list is set to TRUE.
4939: IF FND_API.to_Boolean( p_init_msg_list )
4940: THEN
4941: FND_MSG_PUB.initialize;
4942: END IF;
4943:

Line 4953: x_return_status := FND_API.G_RET_STS_SUCCESS;

4949: FND_MSG_PUB.Add;
4950: END IF;
4951:
4952: --Initialize the return status to success
4953: x_return_status := FND_API.G_RET_STS_SUCCESS;
4954: --
4955: --dbms_output('Delete_Terr_Qualifier: Before Calling Create_TerrType_Qualifier TBL');
4956: --
4957:

Line 4983: x_return_status := FND_API.G_RET_STS_SUCCESS;

4979: --Prepare message name
4980: FND_MESSAGE.SET_NAME('JTF','JTF_TERR_RECORD_DELETED');
4981: IF SQL%FOUND THEN
4982: --dbms_output('Delete_Terr_Qualifier: # Records deleted -' || to_char(SQL%ROWCOUNT));
4983: x_return_status := FND_API.G_RET_STS_SUCCESS;
4984: l_row_count := SQL%ROWCOUNT;
4985: END IF;
4986:
4987: /* update Sales territory's number of Account qualifiers

Line 5011: IF FND_API.to_Boolean( p_commit )

5007: p_data => x_msg_data
5008: );
5009:
5010: -- Standard check for p_commit
5011: IF FND_API.to_Boolean( p_commit )
5012: THEN
5013: COMMIT WORK;
5014: END IF;
5015: --

Line 5020: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5016: --dbms_output('Delete_Terr_Qualifier: Exiting API');
5017: --
5018: EXCEPTION
5019: WHEN NO_DATA_FOUND THEN
5020: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5021: l_row_count := 0;
5022: --Prepare message token
5023: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5024: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_QUALIFIERS');

Line 5033: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5029: ( p_count => x_msg_count,
5030: p_data => x_msg_data
5031: );
5032:
5033: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5034: --dbms_output('Delete_Terr_Qualifier: FND_API.G_EXC_UNEXPECTED_ERROR');
5035: ROLLBACK TO Delete_Terr_Qualifier_Pvt;
5036: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5037: FND_MSG_PUB.Count_And_Get

Line 5034: --dbms_output('Delete_Terr_Qualifier: FND_API.G_EXC_UNEXPECTED_ERROR');

5030: p_data => x_msg_data
5031: );
5032:
5033: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5034: --dbms_output('Delete_Terr_Qualifier: FND_API.G_EXC_UNEXPECTED_ERROR');
5035: ROLLBACK TO Delete_Terr_Qualifier_Pvt;
5036: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5037: FND_MSG_PUB.Count_And_Get
5038: ( p_count => x_msg_count,

Line 5036: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5032:
5033: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5034: --dbms_output('Delete_Terr_Qualifier: FND_API.G_EXC_UNEXPECTED_ERROR');
5035: ROLLBACK TO Delete_Terr_Qualifier_Pvt;
5036: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5037: FND_MSG_PUB.Count_And_Get
5038: ( p_count => x_msg_count,
5039: p_data => x_msg_data
5040: );

Line 5044: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5040: );
5041:
5042: WHEN OTHERS THEN
5043: --dbms_output('Delete_Terr_Qualifier: OTHERS - ' || SQLERRM);
5044: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5045: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5046: THEN
5047: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Qualifier');
5048: END IF;

Line 5074: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

5070: -- End of Comments
5071: --
5072: PROCEDURE Delete_Terr_Value
5073: (P_Api_Version_Number IN NUMBER,
5074: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
5075: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
5076: P_Terr_Value_Id IN NUMBER,
5077: X_Return_Status OUT NOCOPY VARCHAR2,
5078: X_Msg_Count OUT NOCOPY VARCHAR2,

Line 5075: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

5071: --
5072: PROCEDURE Delete_Terr_Value
5073: (P_Api_Version_Number IN NUMBER,
5074: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
5075: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
5076: P_Terr_Value_Id IN NUMBER,
5077: X_Return_Status OUT NOCOPY VARCHAR2,
5078: X_Msg_Count OUT NOCOPY VARCHAR2,
5079: X_Msg_Data OUT NOCOPY VARCHAR2)

Line 5092: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

5088: -- Standard start of PAI savepoint
5089: SAVEPOINT Delete_Terr_Value_Pvt;
5090:
5091: -- Standard call to check for call compatibility.
5092: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5093: p_api_version_number,
5094: l_api_name,
5095: G_PKG_NAME)
5096: THEN

Line 5097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5093: p_api_version_number,
5094: l_api_name,
5095: G_PKG_NAME)
5096: THEN
5097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5098: END IF;
5099: -- Initialize message list if p_init_msg_list is set to TRUE.
5100: IF FND_API.to_Boolean( p_init_msg_list )
5101: THEN

Line 5100: IF FND_API.to_Boolean( p_init_msg_list )

5096: THEN
5097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5098: END IF;
5099: -- Initialize message list if p_init_msg_list is set to TRUE.
5100: IF FND_API.to_Boolean( p_init_msg_list )
5101: THEN
5102: FND_MSG_PUB.initialize;
5103: END IF;
5104:

Line 5114: x_return_status := FND_API.G_RET_STS_SUCCESS;

5110: FND_MSG_PUB.Add;
5111: END IF;
5112:
5113: --Initialize the return status to success
5114: x_return_status := FND_API.G_RET_STS_SUCCESS;
5115: --
5116: --dbms_output('Delete_Terr_Value: Before Calling JTF_TERR_VALUES_PKG.Delete_Row');
5117:
5118: JTF_TERR_VALUES_PKG.Delete_Row(X_TERR_VALUE_ID => P_Terr_Value_Id);

Line 5124: x_return_status := FND_API.G_RET_STS_SUCCESS;

5120: --Prepare message name
5121: FND_MESSAGE.SET_NAME('JTF','JTF_TERR_RECORD_DELETED');
5122: IF SQL%FOUND THEN
5123: --dbms_output('Delete_Terr_Value: # Records deleted -' || to_char(SQL%ROWCOUNT));
5124: x_return_status := FND_API.G_RET_STS_SUCCESS;
5125: l_row_count := SQL%ROWCOUNT;
5126: END IF;
5127: --Prepare message token
5128: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));

Line 5147: IF FND_API.to_Boolean( p_commit )

5143: p_data => x_msg_data
5144: );
5145:
5146: -- Standard check for p_commit
5147: IF FND_API.to_Boolean( p_commit )
5148: THEN
5149: COMMIT WORK;
5150: END IF;
5151: --

Line 5157: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5153: --
5154: EXCEPTION
5155: WHEN NO_DATA_FOUND THEN
5156: --dbms_output('Delete_Terr_Value: NO-DATA-FOUND');
5157: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5158: l_row_count := 0;
5159: --Prepare message token
5160: FND_MESSAGE.SET_TOKEN('NO_OF_REC', TO_CHAR(l_row_count));
5161: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'JTF_TERR_VALUES');

Line 5170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5166: ( p_count => x_msg_count,
5167: p_data => x_msg_data
5168: );
5169:
5170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5171: --dbms_output('Delete_Terr_Value: FND_API.G_EXC_UNEXPECTED_ERROR');
5172: ROLLBACK TO Delete_Terr_Value_Pvt;
5173: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5174: FND_MSG_PUB.Count_And_Get

Line 5171: --dbms_output('Delete_Terr_Value: FND_API.G_EXC_UNEXPECTED_ERROR');

5167: p_data => x_msg_data
5168: );
5169:
5170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5171: --dbms_output('Delete_Terr_Value: FND_API.G_EXC_UNEXPECTED_ERROR');
5172: ROLLBACK TO Delete_Terr_Value_Pvt;
5173: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5174: FND_MSG_PUB.Count_And_Get
5175: ( p_count => x_msg_count,

Line 5173: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5169:
5170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5171: --dbms_output('Delete_Terr_Value: FND_API.G_EXC_UNEXPECTED_ERROR');
5172: ROLLBACK TO Delete_Terr_Value_Pvt;
5173: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5174: FND_MSG_PUB.Count_And_Get
5175: ( p_count => x_msg_count,
5176: p_data => x_msg_data
5177: );

Line 5181: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5177: );
5178:
5179: WHEN OTHERS THEN
5180: --dbms_output('Delete_Terr_Value: OTHERS - ' || SQLERRM);
5181: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5182: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
5183: THEN
5184: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Delete error inside Delete_Terr_Value');
5185: END IF;

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

5190: --
5191: PROCEDURE Validate_Qualifier
5192: (p_Terr_Id IN NUMBER,
5193: P_Terr_Qual_Rec IN Terr_Qual_Rec_Type := G_Miss_Terr_Qual_Rec,
5194: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5195: x_Return_Status OUT NOCOPY VARCHAR2,
5196: x_msg_count OUT NOCOPY NUMBER,
5197: x_msg_data OUT NOCOPY VARCHAR2 )
5198: AS

Line 5204: x_return_status := FND_API.G_RET_STS_SUCCESS;

5200: BEGIN
5201: --dbms_output('Validate_Qualifier: Entering API');
5202:
5203: -- Initialize the status to success
5204: x_return_status := FND_API.G_RET_STS_SUCCESS;
5205: --
5206: --dbms_output('Validate P_Terr_Qual_Rec.Qual_Usg_Id - ' || to_char(P_Terr_Qual_Rec.Qual_Usg_Id));
5207: --
5208: -- Check whether the qualfier is enabled and

Line 5228: x_return_status := FND_API.G_RET_STS_ERROR ;

5224: End If;
5225: EXCEPTION
5226: WHEN NO_DATA_FOUND THEN
5227: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5228: x_return_status := FND_API.G_RET_STS_ERROR ;
5229: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5230: FND_MSG_PUB.ADD;
5231: FND_MSG_PUB.Count_And_Get
5232: ( P_count => x_msg_count,

Line 5240: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN

5236:
5237: /* org_id is optional
5238: -- Check for ORG_ID - obsolete: org_id is optional
5239: IF (P_Terr_Qual_Rec.ORG_ID is NULL OR
5240: P_Terr_Qual_Rec.ORG_ID = FND_API.G_MISS_NUM ) THEN
5241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5242: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5243: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5244: FND_MSG_PUB.ADD;

Line 5246: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5242: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5243: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5244: FND_MSG_PUB.ADD;
5245: END IF;
5246: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5247: End If;
5248: */
5249:
5250: --Check created by

Line 5252: P_Terr_Qual_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

5248: */
5249:
5250: --Check created by
5251: IF ( P_Terr_Qual_Rec.CREATED_BY is NULL OR
5252: P_Terr_Qual_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5253: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5254: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5255: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5256: FND_MSG_PUB.ADD;

Line 5258: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5254: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5255: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5256: FND_MSG_PUB.ADD;
5257: END IF;
5258: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5259: End If;
5260:
5261: --Check creation date
5262: If ( P_Terr_Qual_Rec.CREATION_DATE is NULL OR

Line 5263: P_Terr_Qual_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

5259: End If;
5260:
5261: --Check creation date
5262: If ( P_Terr_Qual_Rec.CREATION_DATE is NULL OR
5263: P_Terr_Qual_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5264: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5265: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5266: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5267: FND_MSG_PUB.ADD;

Line 5269: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5265: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5266: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5267: FND_MSG_PUB.ADD;
5268: END IF;
5269: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5270: End If;
5271:
5272: -- Validate last updated by
5273: IF ( P_Terr_Qual_Rec.LAST_UPDATED_BY is NULL OR

Line 5274: P_Terr_Qual_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

5270: End If;
5271:
5272: -- Validate last updated by
5273: IF ( P_Terr_Qual_Rec.LAST_UPDATED_BY is NULL OR
5274: P_Terr_Qual_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5275: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5276: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5277: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5278: FND_MSG_PUB.ADD;

Line 5280: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5276: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5277: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5278: FND_MSG_PUB.ADD;
5279: END IF;
5280: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5281: End If;
5282:
5283: -- Check last update date
5284: If ( P_Terr_Qual_Rec.LAST_UPDATE_DATE IS NULL OR

Line 5285: P_Terr_Qual_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

5281: End If;
5282:
5283: -- Check last update date
5284: If ( P_Terr_Qual_Rec.LAST_UPDATE_DATE IS NULL OR
5285: P_Terr_Qual_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5286: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5287: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5288: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5289: FND_MSG_PUB.ADD;

Line 5291: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5287: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5288: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5289: FND_MSG_PUB.ADD;
5290: END IF;
5291: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5292: End If;
5293:
5294: --
5295: --Check last update login

Line 5297: -- P_Terr_Qual_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

5293:
5294: --
5295: --Check last update login
5296: --If ( P_Terr_Qual_Rec.LAST_UPDATE_LOGIN is NULL OR
5297: -- P_Terr_Qual_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5298: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5299: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5300: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5301: -- FND_MSG_PUB.ADD;

Line 5303: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;

5299: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5300: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5301: -- FND_MSG_PUB.ADD;
5302: -- END IF;
5303: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
5304: --End If;
5305: --
5306:
5307: --

Line 5316: x_return_status := FND_API.G_RET_STS_ERROR ;

5312: EXCEPTION
5313: --
5314: WHEN NO_DATA_FOUND THEN
5315: --dbms_output('Validate_Qualifier: NO_DATA_FOUND Exception');
5316: x_return_status := FND_API.G_RET_STS_ERROR ;
5317: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
5318: FND_MSG_PUB.ADD;
5319: FND_MSG_PUB.Count_And_Get
5320: ( P_count => x_msg_count,

Line 5326: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5322: );
5323:
5324: WHEN OTHERS THEN
5325: --dbms_output('Validate_Qualifier: Others Exception');
5326: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5327: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5328: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Qualifer' );
5329: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5330: FND_MSG_PUB.ADD;

Line 5342: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

5338: -- Validate the Territory RECORD
5339: -- Validate Territory Name is specified and also check for not null columns
5340: -- If Parent Territory_id, ESCALATION_TERRITORY_ID, territory_type_id is specified
5341: PROCEDURE Validate_Territory_Record
5342: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5343: x_Return_Status OUT NOCOPY VARCHAR2,
5344: x_msg_count OUT NOCOPY NUMBER,
5345: x_msg_data OUT NOCOPY VARCHAR2,
5346: p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec)

Line 5356: x_return_status := FND_API.G_RET_STS_SUCCESS;

5352: BEGIN
5353: --dbms_output('Validate_Territory_Record: Entering API');
5354:
5355: -- Initialize the status to success
5356: x_return_status := FND_API.G_RET_STS_SUCCESS;
5357:
5358: -- Check whether the territory Name is specified
5359: --
5360: IF (p_Terr_All_Rec.NAME is NULL) OR (p_Terr_All_Rec.NAME = FND_API.G_MISS_CHAR) THEN

Line 5360: IF (p_Terr_All_Rec.NAME is NULL) OR (p_Terr_All_Rec.NAME = FND_API.G_MISS_CHAR) THEN

5356: x_return_status := FND_API.G_RET_STS_SUCCESS;
5357:
5358: -- Check whether the territory Name is specified
5359: --
5360: IF (p_Terr_All_Rec.NAME is NULL) OR (p_Terr_All_Rec.NAME = FND_API.G_MISS_CHAR) THEN
5361: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5362: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5363: FND_MESSAGE.Set_Token('COL_NAME', 'NAME' );
5364: FND_MSG_PUB.ADD;

Line 5366: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5362: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5363: FND_MESSAGE.Set_Token('COL_NAME', 'NAME' );
5364: FND_MSG_PUB.ADD;
5365: END IF;
5366: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5367: End If;
5368:
5369: -- Check whether application short name is specified
5370: --

Line 5372: (p_Terr_All_Rec.APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR) THEN

5368:
5369: -- Check whether application short name is specified
5370: --
5371: IF (p_Terr_All_Rec.APPLICATION_SHORT_NAME is NULL) OR
5372: (p_Terr_All_Rec.APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR) THEN
5373: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5374: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5375: FND_MESSAGE.Set_Token('COL_NAME', 'APPLICATION_SHORT_NAME' );
5376: FND_MSG_PUB.ADD;

Line 5378: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5374: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5375: FND_MESSAGE.Set_Token('COL_NAME', 'APPLICATION_SHORT_NAME' );
5376: FND_MSG_PUB.ADD;
5377: END IF;
5378: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5379: End If;
5380:
5381: /* Check whether the enabled_flag is specified
5382: -- Obsolete: use date effectivity to determine

Line 5385: (p_Terr_All_Rec.ENABLED_FLAG = FND_API.G_MISS_CHAR) THEN

5381: /* Check whether the enabled_flag is specified
5382: -- Obsolete: use date effectivity to determine
5383: -- whether territory is enabled
5384: IF (p_Terr_All_Rec.ENABLED_FLAG is NULL) OR
5385: (p_Terr_All_Rec.ENABLED_FLAG = FND_API.G_MISS_CHAR) THEN
5386: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5387: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5388: FND_MESSAGE.Set_Token('COL_NAME', 'ENABLED_FLAG' );
5389: FND_MSG_PUB.ADD;

Line 5391: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5387: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5388: FND_MESSAGE.Set_Token('COL_NAME', 'ENABLED_FLAG' );
5389: FND_MSG_PUB.ADD;
5390: END IF;
5391: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5392: End If;
5393: */
5394:
5395: /*-- Check for ORG_ID - obsolete org_id is optional

Line 5397: (p_Terr_All_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN

5393: */
5394:
5395: /*-- Check for ORG_ID - obsolete org_id is optional
5396: IF (p_Terr_All_Rec.ORG_ID is NULL) OR
5397: (p_Terr_All_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
5398: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5399: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5400: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5401: FND_MSG_PUB.ADD;

Line 5403: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5399: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5400: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5401: FND_MSG_PUB.ADD;
5402: END IF;
5403: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5404: End If;
5405: */
5406:
5407: If (p_Terr_All_Rec.ESCALATION_TERRITORY_FLAG = 'Y' and

Line 5413: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5409: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5410: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_OVERLAPPING_FLAG');
5411: FND_MSG_PUB.ADD;
5412: END IF;
5413: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5414: End If;
5415:
5416: --Check created by
5417: IF ( p_Terr_All_Rec.CREATED_BY is NULL OR

Line 5418: p_Terr_All_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

5414: End If;
5415:
5416: --Check created by
5417: IF ( p_Terr_All_Rec.CREATED_BY is NULL OR
5418: p_Terr_All_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5419: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5420: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5421: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5422: FND_MSG_PUB.ADD;

Line 5424: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5420: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5421: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5422: FND_MSG_PUB.ADD;
5423: END IF;
5424: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5425: End If;
5426:
5427: --Check creation date
5428: If ( p_Terr_All_Rec.CREATION_DATE is NULL OR

Line 5429: p_Terr_All_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

5425: End If;
5426:
5427: --Check creation date
5428: If ( p_Terr_All_Rec.CREATION_DATE is NULL OR
5429: p_Terr_All_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5430: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5431: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5432: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5433: FND_MSG_PUB.ADD;

Line 5435: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5431: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5432: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5433: FND_MSG_PUB.ADD;
5434: END IF;
5435: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5436: End If;
5437:
5438: -- Validate last updated by
5439: IF ( p_Terr_All_Rec.LAST_UPDATED_BY is NULL OR

Line 5440: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

5436: End If;
5437:
5438: -- Validate last updated by
5439: IF ( p_Terr_All_Rec.LAST_UPDATED_BY is NULL OR
5440: p_Terr_All_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5441: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5442: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5443: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5444: FND_MSG_PUB.ADD;

Line 5446: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5442: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5443: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5444: FND_MSG_PUB.ADD;
5445: END IF;
5446: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5447: End If;
5448:
5449: -- Check last update date
5450: If ( p_Terr_All_Rec.LAST_UPDATE_DATE IS NULL OR

Line 5451: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

5447: End If;
5448:
5449: -- Check last update date
5450: If ( p_Terr_All_Rec.LAST_UPDATE_DATE IS NULL OR
5451: p_Terr_All_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5453: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5454: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5455: FND_MSG_PUB.ADD;

Line 5457: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5453: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5454: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5455: FND_MSG_PUB.ADD;
5456: END IF;
5457: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5458: End If;
5459:
5460: --Check last update login
5461: --If ( p_Terr_All_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 5462: -- p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

5458: End If;
5459:
5460: --Check last update login
5461: --If ( p_Terr_All_Rec.LAST_UPDATE_LOGIN is NULL OR
5462: -- p_Terr_All_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5463: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5464: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5465: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5466: -- FND_MSG_PUB.ADD;

Line 5468: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;

5464: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5465: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5466: -- FND_MSG_PUB.ADD;
5467: -- END IF;
5468: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
5469: --End If;
5470:
5471: --Check start date active
5472: If ( p_Terr_All_Rec.START_DATE_ACTIVE IS NULL OR

Line 5473: p_Terr_All_Rec.START_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN

5469: --End If;
5470:
5471: --Check start date active
5472: If ( p_Terr_All_Rec.START_DATE_ACTIVE IS NULL OR
5473: p_Terr_All_Rec.START_DATE_ACTIVE = FND_API.G_MISS_DATE ) THEN
5474: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5475: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5476: FND_MESSAGE.Set_Token('COL_NAME', 'START_DATE_ACTIVE' );
5477: FND_MSG_PUB.ADD;

Line 5479: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5475: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5476: FND_MESSAGE.Set_Token('COL_NAME', 'START_DATE_ACTIVE' );
5477: FND_MSG_PUB.ADD;
5478: END IF;
5479: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5480: End If;
5481:
5482:
5483: /* Check Number Of Winners not set at

Line 5489: p_terr_all_rec.NUM_WINNERS <> FND_API.G_MISS_NUM ) THEN

5485: ** 10/04/00 JDOCHERT
5486: */
5487: /* JDOCHERT: 06/27/03: bug#3020630
5488: IF ( p_terr_all_rec.NUM_WINNERS IS NOT NULL AND
5489: p_terr_all_rec.NUM_WINNERS <> FND_API.G_MISS_NUM ) THEN
5490:
5491: validate_num_winners(
5492: p_terr_all_rec => p_terr_all_rec,
5493: p_init_msg_list => p_init_msg_list,

Line 5500: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

5496: x_msg_data => x_msg_data,
5497: x_Reason => l_reason );
5498:
5499:
5500: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
5501: x_Return_Status := l_return_Status;
5502: End If;
5503:
5504: End If;

Line 5516: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5512: x_Return_Status => l_Return_Status,
5513: x_msg_count => x_msg_count,
5514: x_msg_data => x_msg_data);
5515:
5516: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5517: x_Return_Status := l_return_Status;
5518: End If;
5519:
5520: -- Since the message stack is already set

Line 5527: WHEN FND_API.G_EXC_ERROR THEN

5523: p_data => x_msg_data);
5524:
5525: EXCEPTION
5526: --
5527: WHEN FND_API.G_EXC_ERROR THEN
5528: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
5529: x_return_status := FND_API.G_RET_STS_ERROR ;
5530: FND_MSG_PUB.Count_And_Get
5531: ( P_count => x_msg_count,

Line 5528: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');

5524:
5525: EXCEPTION
5526: --
5527: WHEN FND_API.G_EXC_ERROR THEN
5528: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
5529: x_return_status := FND_API.G_RET_STS_ERROR ;
5530: FND_MSG_PUB.Count_And_Get
5531: ( P_count => x_msg_count,
5532: P_data => x_msg_data

Line 5529: x_return_status := FND_API.G_RET_STS_ERROR ;

5525: EXCEPTION
5526: --
5527: WHEN FND_API.G_EXC_ERROR THEN
5528: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_ERROR');
5529: x_return_status := FND_API.G_RET_STS_ERROR ;
5530: FND_MSG_PUB.Count_And_Get
5531: ( P_count => x_msg_count,
5532: P_data => x_msg_data
5533: );

Line 5535: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5531: ( P_count => x_msg_count,
5532: P_data => x_msg_data
5533: );
5534:
5535: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5536: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
5537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5538: FND_MSG_PUB.Count_And_Get
5539: ( P_count => x_msg_count,

Line 5536: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');

5532: P_data => x_msg_data
5533: );
5534:
5535: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5536: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
5537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5538: FND_MSG_PUB.Count_And_Get
5539: ( P_count => x_msg_count,
5540: P_data => x_msg_data

Line 5537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5533: );
5534:
5535: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5536: --dbms_output('Validate_Territory_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
5537: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5538: FND_MSG_PUB.Count_And_Get
5539: ( P_count => x_msg_count,
5540: P_data => x_msg_data
5541: );

Line 5545: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5541: );
5542:
5543: WHEN OTHERS THEN
5544: --dbms_output('Validate_Territory_Record: OTHERS - ' || SQLERRM);
5545: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5546: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5547: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Record' );
5548: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5549: FND_MSG_PUB.ADD;

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

5558: --
5559: -- Validate Foreign Key references
5560: PROCEDURE Validate_Foreign_Key
5561: (p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
5562: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5563: x_Return_Status OUT NOCOPY VARCHAR2,
5564: x_msg_count OUT NOCOPY NUMBER,
5565: x_msg_data OUT NOCOPY VARCHAR2 )
5566: AS

Line 5572: x_return_status := FND_API.G_RET_STS_SUCCESS;

5568: l_parent_terr_id NUMBER;
5569: BEGIN
5570: --dbms_output('Validate_Foreign_Key: Entering API');
5571: -- Initialize the status to success
5572: x_return_status := FND_API.G_RET_STS_SUCCESS;
5573: --
5574: --dbms_output('Validate_Foreign_Key: Checking for PARENT Territory' || TO_CHAR(p_Terr_All_Rec.parent_territory_Id));
5575: If (p_Terr_All_Rec.PARENT_TERRITORY_ID is not null) AND
5576: (p_Terr_All_Rec.PARENT_TERRITORY_ID <> FND_API.G_MISS_NUM)

Line 5576: (p_Terr_All_Rec.PARENT_TERRITORY_ID <> FND_API.G_MISS_NUM)

5572: x_return_status := FND_API.G_RET_STS_SUCCESS;
5573: --
5574: --dbms_output('Validate_Foreign_Key: Checking for PARENT Territory' || TO_CHAR(p_Terr_All_Rec.parent_territory_Id));
5575: If (p_Terr_All_Rec.PARENT_TERRITORY_ID is not null) AND
5576: (p_Terr_All_Rec.PARENT_TERRITORY_ID <> FND_API.G_MISS_NUM)
5577: Then
5578: --
5579: l_parent_terr_id := p_Terr_All_Rec.parent_territory_Id;
5580: --dbms_output('Validate_Foreign_Key: Returned from JTF_CTM_UTILITY_PVT.fk_id_is_valid');

Line 5581: IF JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_parent_terr_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then

5577: Then
5578: --
5579: l_parent_terr_id := p_Terr_All_Rec.parent_territory_Id;
5580: --dbms_output('Validate_Foreign_Key: Returned from JTF_CTM_UTILITY_PVT.fk_id_is_valid');
5581: IF JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_parent_terr_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5582: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5583: --dbms_output('PARENT Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5584: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
5585: FND_MESSAGE.Set_Token('TERR_ID', to_char(l_parent_terr_id));

Line 5583: --dbms_output('PARENT Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

5579: l_parent_terr_id := p_Terr_All_Rec.parent_territory_Id;
5580: --dbms_output('Validate_Foreign_Key: Returned from JTF_CTM_UTILITY_PVT.fk_id_is_valid');
5581: IF JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_parent_terr_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5582: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5583: --dbms_output('PARENT Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5584: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
5585: FND_MESSAGE.Set_Token('TERR_ID', to_char(l_parent_terr_id));
5586: FND_MSG_PUB.ADD;
5587: End If;

Line 5588: x_return_status := FND_API.G_RET_STS_ERROR;

5584: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_PARENT_TERR');
5585: FND_MESSAGE.Set_Token('TERR_ID', to_char(l_parent_terr_id));
5586: FND_MSG_PUB.ADD;
5587: End If;
5588: x_return_status := FND_API.G_RET_STS_ERROR;
5589: End If;
5590: End If;
5591:
5592: --

Line 5596: (p_Terr_All_Rec.TERRITORY_TYPE_ID <> FND_API.G_MISS_NUM)

5592: --
5593: --dbms_output('Validate_Foreign_Key: Checking for Territory Type Id');
5594: --
5595: If (p_Terr_All_Rec.TERRITORY_TYPE_ID is not null) AND
5596: (p_Terr_All_Rec.TERRITORY_TYPE_ID <> FND_API.G_MISS_NUM)
5597: then
5598: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TERRITORY_TYPE_ID, 'TERR_TYPE_ID', 'JTF_TERR_TYPES_ALL');
5599: If l_status <> FND_API.G_TRUE Then
5600: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5599: If l_status <> FND_API.G_TRUE Then

5595: If (p_Terr_All_Rec.TERRITORY_TYPE_ID is not null) AND
5596: (p_Terr_All_Rec.TERRITORY_TYPE_ID <> FND_API.G_MISS_NUM)
5597: then
5598: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TERRITORY_TYPE_ID, 'TERR_TYPE_ID', 'JTF_TERR_TYPES_ALL');
5599: If l_status <> FND_API.G_TRUE Then
5600: x_return_status := FND_API.G_RET_STS_ERROR;
5601: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5602: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5603: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');

Line 5600: x_return_status := FND_API.G_RET_STS_ERROR;

5596: (p_Terr_All_Rec.TERRITORY_TYPE_ID <> FND_API.G_MISS_NUM)
5597: then
5598: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TERRITORY_TYPE_ID, 'TERR_TYPE_ID', 'JTF_TERR_TYPES_ALL');
5599: If l_status <> FND_API.G_TRUE Then
5600: x_return_status := FND_API.G_RET_STS_ERROR;
5601: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5602: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5603: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
5604: FND_MESSAGE.Set_Token('TERR_TYPE_ID', to_char(p_Terr_All_Rec.TERRITORY_TYPE_ID));

Line 5602: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

5598: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TERRITORY_TYPE_ID, 'TERR_TYPE_ID', 'JTF_TERR_TYPES_ALL');
5599: If l_status <> FND_API.G_TRUE Then
5600: x_return_status := FND_API.G_RET_STS_ERROR;
5601: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5602: --dbms_output('TERR TYPE: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5603: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TERR_TYPE');
5604: FND_MESSAGE.Set_Token('TERR_TYPE_ID', to_char(p_Terr_All_Rec.TERRITORY_TYPE_ID));
5605: FND_MSG_PUB.ADD;
5606: End If;

Line 5613: (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID <> FND_API.G_MISS_NUM) Then

5609: --
5610: --dbms_output('Validate_Foreign_Key: Checking for TEMPLATE_TERRITORY_ID');
5611: --
5612: iF (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID is not null) AND
5613: (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5614: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID, 'TERR_ID', 'JTF_TERR_ALL');
5615: if l_status <> FND_API.G_TRUE Then
5616: x_return_status := FND_API.G_RET_STS_ERROR;
5617: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 5615: if l_status <> FND_API.G_TRUE Then

5611: --
5612: iF (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID is not null) AND
5613: (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5614: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID, 'TERR_ID', 'JTF_TERR_ALL');
5615: if l_status <> FND_API.G_TRUE Then
5616: x_return_status := FND_API.G_RET_STS_ERROR;
5617: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5618: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5619: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TEMP_TERR');

Line 5616: x_return_status := FND_API.G_RET_STS_ERROR;

5612: iF (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID is not null) AND
5613: (p_Terr_All_Rec.TEMPLATE_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5614: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID, 'TERR_ID', 'JTF_TERR_ALL');
5615: if l_status <> FND_API.G_TRUE Then
5616: x_return_status := FND_API.G_RET_STS_ERROR;
5617: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5618: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5619: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TEMP_TERR');
5620: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID));

Line 5618: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

5614: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID, 'TERR_ID', 'JTF_TERR_ALL');
5615: if l_status <> FND_API.G_TRUE Then
5616: x_return_status := FND_API.G_RET_STS_ERROR;
5617: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5618: --dbms_output('TEMP: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5619: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_TEMP_TERR');
5620: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.TEMPLATE_TERRITORY_ID));
5621: FND_MSG_PUB.ADD;
5622: End If;

Line 5629: (p_Terr_All_Rec.ESCALATION_TERRITORY_ID <> FND_API.G_MISS_NUM) Then

5625: --
5626: --dbms_output('Validate_Foreign_Key: Checking for ESCALATION_TERRITORY_ID');
5627: --
5628: If (p_Terr_All_Rec.ESCALATION_TERRITORY_ID is not null) AND
5629: (p_Terr_All_Rec.ESCALATION_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5630: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.escalation_territory_id, 'TERR_ID', 'JTF_TERR_ALL');
5631: if l_status <> FND_API.G_TRUE Then
5632: x_return_status := FND_API.G_RET_STS_ERROR;
5633: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 5631: if l_status <> FND_API.G_TRUE Then

5627: --
5628: If (p_Terr_All_Rec.ESCALATION_TERRITORY_ID is not null) AND
5629: (p_Terr_All_Rec.ESCALATION_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5630: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.escalation_territory_id, 'TERR_ID', 'JTF_TERR_ALL');
5631: if l_status <> FND_API.G_TRUE Then
5632: x_return_status := FND_API.G_RET_STS_ERROR;
5633: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5634: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5635: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_ESC_TERR');

Line 5632: x_return_status := FND_API.G_RET_STS_ERROR;

5628: If (p_Terr_All_Rec.ESCALATION_TERRITORY_ID is not null) AND
5629: (p_Terr_All_Rec.ESCALATION_TERRITORY_ID <> FND_API.G_MISS_NUM) Then
5630: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.escalation_territory_id, 'TERR_ID', 'JTF_TERR_ALL');
5631: if l_status <> FND_API.G_TRUE Then
5632: x_return_status := FND_API.G_RET_STS_ERROR;
5633: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5634: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5635: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_ESC_TERR');
5636: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.terr_Id));

Line 5634: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

5630: l_status := JTF_CTM_UTILITY_PVT.fk_id_is_valid(p_Terr_All_Rec.escalation_territory_id, 'TERR_ID', 'JTF_TERR_ALL');
5631: if l_status <> FND_API.G_TRUE Then
5632: x_return_status := FND_API.G_RET_STS_ERROR;
5633: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5634: --dbms_output('ESC TERR: Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5635: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_ESC_TERR');
5636: FND_MESSAGE.Set_Token('TERR_ID', to_char(p_Terr_All_Rec.terr_Id));
5637: FND_MSG_PUB.ADD;
5638: End If;

Line 5649: X_return_status := FND_API.G_RET_STS_ERROR;

5645: EXCEPTION
5646: --
5647: WHEN OTHERS THEN
5648: --dbms_output('Validate_Foreign_Key: Others exception' || SQLERRM);
5649: X_return_status := FND_API.G_RET_STS_ERROR;
5650: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5651: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Foreign_Key' );
5652: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5653: FND_MSG_PUB.ADD;

Line 5671: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

5667: -- Make sure the Territory Id is valid
5668: -- Make sure the territory usage Id is Valid
5669: ---------------------------------------------------------------------
5670: PROCEDURE Validate_Territory_Usage
5671: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5672: x_Return_Status OUT NOCOPY VARCHAR2,
5673: x_msg_count OUT NOCOPY NUMBER,
5674: x_msg_data OUT NOCOPY VARCHAR2,
5675: p_Terr_Usgs_Rec IN Terr_Usgs_Rec_Type := G_MISS_Terr_Usgs_Rec,

Line 5684: x_return_status := FND_API.G_RET_STS_SUCCESS;

5680: BEGIN
5681: --dbms_output('Validate_Territory_Usage: Entering API');
5682:
5683: -- Initialize the status to success
5684: x_return_status := FND_API.G_RET_STS_SUCCESS;
5685:
5686: -- Validate the territory Id
5687: If p_Terr_Id IS NOT NULL THEN
5688: l_Validate_id := p_Terr_Id;

Line 5689: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then

5685:
5686: -- Validate the territory Id
5687: If p_Terr_Id IS NOT NULL THEN
5688: l_Validate_id := p_Terr_Id;
5689: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5690: --dbms_output('Validate_Territory_Usage: l_status <> FND_API.G_TRUE');
5691: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5692: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
5693: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');

Line 5690: --dbms_output('Validate_Territory_Usage: l_status <> FND_API.G_TRUE');

5686: -- Validate the territory Id
5687: If p_Terr_Id IS NOT NULL THEN
5688: l_Validate_id := p_Terr_Id;
5689: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5690: --dbms_output('Validate_Territory_Usage: l_status <> FND_API.G_TRUE');
5691: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5692: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
5693: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
5694: FND_MSG_PUB.ADD;

Line 5695: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5691: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5692: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
5693: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
5694: FND_MSG_PUB.ADD;
5695: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5696: End If;
5697: --dbms_output('Validate_Territory_Usage: TERR_ID(' || to_char(l_Validate_id) || ') is valid');
5698: End If;
5699:

Line 5704: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'SOURCE_ID', 'JTF_SOURCES_ALL') <> FND_API.G_TRUE Then

5700: -- Validate the source_id
5701: l_Validate_id := p_Terr_Usgs_rec.SOURCE_ID;
5702:
5703: -- Make sure the foreign key source_id is valid
5704: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'SOURCE_ID', 'JTF_SOURCES_ALL') <> FND_API.G_TRUE Then
5705: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5706: --dbms_output('Validate_Territory_Usage: FND_MSG_PUB.ADD');
5707: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5708: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_SOURCES');

Line 5712: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5708: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_SOURCES');
5709: FND_MESSAGE.Set_Token('COLUMN_NAME', 'SOURCE_ID');
5710: FND_MSG_PUB.ADD;
5711: End If;
5712: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5713: End If;
5714:
5715:
5716: /*-- Check for ORG_ID - obsolete: org_id is optional

Line 5718: (p_Terr_Usgs_rec.ORG_ID = FND_API.G_MISS_NUM) THEN

5714:
5715:
5716: /*-- Check for ORG_ID - obsolete: org_id is optional
5717: IF (p_Terr_Usgs_rec.ORG_ID is NULL) OR
5718: (p_Terr_Usgs_rec.ORG_ID = FND_API.G_MISS_NUM) THEN
5719: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5720: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5721: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5722: FND_MSG_PUB.ADD;

Line 5724: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5720: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5721: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5722: FND_MSG_PUB.ADD;
5723: END IF;
5724: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5725: End If;
5726: */
5727:
5728: --Check created by

Line 5730: p_Terr_Usgs_rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

5726: */
5727:
5728: --Check created by
5729: IF ( p_Terr_Usgs_rec.CREATED_BY is NULL OR
5730: p_Terr_Usgs_rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5731: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5732: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5733: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5734: FND_MSG_PUB.ADD;

Line 5736: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5732: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5733: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5734: FND_MSG_PUB.ADD;
5735: END IF;
5736: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5737: End If;
5738:
5739: --Check creation date
5740: If ( p_Terr_Usgs_rec.CREATION_DATE is NULL OR

Line 5741: p_Terr_Usgs_rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

5737: End If;
5738:
5739: --Check creation date
5740: If ( p_Terr_Usgs_rec.CREATION_DATE is NULL OR
5741: p_Terr_Usgs_rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5742: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5743: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5744: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5745: FND_MSG_PUB.ADD;

Line 5747: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5743: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5744: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5745: FND_MSG_PUB.ADD;
5746: END IF;
5747: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5748: End If;
5749:
5750: -- Validate last updated by
5751: IF ( p_Terr_Usgs_rec.LAST_UPDATED_BY is NULL OR

Line 5752: p_Terr_Usgs_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

5748: End If;
5749:
5750: -- Validate last updated by
5751: IF ( p_Terr_Usgs_rec.LAST_UPDATED_BY is NULL OR
5752: p_Terr_Usgs_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5753: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5754: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5755: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5756: FND_MSG_PUB.ADD;

Line 5758: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5754: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5755: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5756: FND_MSG_PUB.ADD;
5757: END IF;
5758: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5759: End If;
5760:
5761: -- Check last update date
5762: If ( p_Terr_Usgs_rec.LAST_UPDATE_DATE IS NULL OR

Line 5763: p_Terr_Usgs_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

5759: End If;
5760:
5761: -- Check last update date
5762: If ( p_Terr_Usgs_rec.LAST_UPDATE_DATE IS NULL OR
5763: p_Terr_Usgs_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5764: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5765: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5766: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5767: FND_MSG_PUB.ADD;

Line 5769: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5765: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5766: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5767: FND_MSG_PUB.ADD;
5768: END IF;
5769: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5770: End If;
5771:
5772: --Check last update login
5773: --If ( p_Terr_Usgs_rec.LAST_UPDATE_LOGIN is NULL OR

Line 5774: -- p_Terr_Usgs_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

5770: End If;
5771:
5772: --Check last update login
5773: --If ( p_Terr_Usgs_rec.LAST_UPDATE_LOGIN is NULL OR
5774: -- p_Terr_Usgs_rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5775: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5776: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5777: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5778: -- FND_MSG_PUB.ADD;

Line 5780: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;

5776: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5777: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5778: -- FND_MSG_PUB.ADD;
5779: -- END IF;
5780: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
5781: --End If;
5782:
5783: --
5784: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 5789: WHEN FND_API.G_EXC_ERROR THEN

5785: p_data => x_msg_data);
5786:
5787: EXCEPTION
5788: --
5789: WHEN FND_API.G_EXC_ERROR THEN
5790: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_ERROR');
5791: x_return_status := FND_API.G_RET_STS_ERROR ;
5792: FND_MSG_PUB.Count_And_Get
5793: ( P_count => x_msg_count,

Line 5790: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_ERROR');

5786:
5787: EXCEPTION
5788: --
5789: WHEN FND_API.G_EXC_ERROR THEN
5790: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_ERROR');
5791: x_return_status := FND_API.G_RET_STS_ERROR ;
5792: FND_MSG_PUB.Count_And_Get
5793: ( P_count => x_msg_count,
5794: P_data => x_msg_data

Line 5791: x_return_status := FND_API.G_RET_STS_ERROR ;

5787: EXCEPTION
5788: --
5789: WHEN FND_API.G_EXC_ERROR THEN
5790: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_ERROR');
5791: x_return_status := FND_API.G_RET_STS_ERROR ;
5792: FND_MSG_PUB.Count_And_Get
5793: ( P_count => x_msg_count,
5794: P_data => x_msg_data
5795: );

Line 5797: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5793: ( P_count => x_msg_count,
5794: P_data => x_msg_data
5795: );
5796:
5797: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5798: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5799: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5800: FND_MSG_PUB.Count_And_Get
5801: ( P_count => x_msg_count,

Line 5798: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

5794: P_data => x_msg_data
5795: );
5796:
5797: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5798: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5799: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5800: FND_MSG_PUB.Count_And_Get
5801: ( P_count => x_msg_count,
5802: P_data => x_msg_data

Line 5799: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5795: );
5796:
5797: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5798: --dbms_output('Validate_Territory_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5799: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5800: FND_MSG_PUB.Count_And_Get
5801: ( P_count => x_msg_count,
5802: P_data => x_msg_data
5803: );

Line 5807: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5803: );
5804:
5805: WHEN OTHERS THEN
5806: --dbms_output('Validate_Territory_Usage: OTHERS - ' || SQLERRM);
5807: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5808: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5809: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Territory_Usage' );
5810: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
5811: FND_MSG_PUB.ADD;

Line 5828: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

5824: -- Make sure the Territory Id is valid
5825: -- Make sure the QUAL_TYPE_USG_ID is valid
5826: ---------------------------------------------------------------------
5827: PROCEDURE Validate_Terr_Qtype_Usage
5828: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5829: x_Return_Status OUT NOCOPY VARCHAR2,
5830: x_msg_count OUT NOCOPY NUMBER,
5831: x_msg_data OUT NOCOPY VARCHAR2,
5832: p_Terr_QualTypeUsgs_Rec IN Terr_QualTypeUsgs_Rec_Type := G_Miss_Terr_QualTypeUsgs_Rec,

Line 5844: x_return_status := FND_API.G_RET_STS_SUCCESS;

5840: BEGIN
5841: --dbms_output('Validate_Terr_Qtype_Usage: Entering API');
5842:
5843: -- Initialize the status to success
5844: x_return_status := FND_API.G_RET_STS_SUCCESS;
5845:
5846: -- This block will validate territory
5847: -- qual_Type_Usg_id specified
5848: BEGIN

Line 5862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5858: EXCEPTION
5859: WHEN NO_DATA_FOUND THEN
5860: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_QTYPE');
5861: FND_MSG_PUB.ADD;
5862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5863: END;
5864:
5865: -- Validate the territory Id
5866: l_Validate_id := p_Terr_Id;

Line 5869: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then

5865: -- Validate the territory Id
5866: l_Validate_id := p_Terr_Id;
5867: If p_Terr_Id IS NOT NULL Then
5868: --dbms_output('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
5869: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5870: --dbms_output('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5871: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5872: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5873: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');

Line 5870: --dbms_output('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');

5866: l_Validate_id := p_Terr_Id;
5867: If p_Terr_Id IS NOT NULL Then
5868: --dbms_output('Validate_Terr_Qtype_Usage: TERR_ID(' || to_char(l_Validate_id) || ')');
5869: If JTF_CTM_UTILITY_PVT.fk_id_is_valid(l_Validate_id, 'TERR_ID', 'JTF_TERR_ALL') <> FND_API.G_TRUE Then
5870: --dbms_output('Validate_Foreign_Key: l_status <> FND_API.G_TRUE');
5871: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5872: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5873: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
5874: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');

Line 5877: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5873: FND_MESSAGE.Set_Token('TABLE_NAME', 'JTF_TERR');
5874: FND_MESSAGE.Set_Token('COLUMN_NAME', 'TERR_ID');
5875: FND_MSG_PUB.ADD;
5876: END IF;
5877: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5878: End If;
5879: End If;
5880:
5881: --

Line 5885: (p_Terr_QualTypeUsgs_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN

5881: --
5882: --
5883: /*-- Check for ORG_ID - obsolete: org_id is optional
5884: IF (p_Terr_QualTypeUsgs_Rec.ORG_ID is NULL) OR
5885: (p_Terr_QualTypeUsgs_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
5886: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5887: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5888: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5889: FND_MSG_PUB.ADD;

Line 5891: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5887: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5888: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
5889: FND_MSG_PUB.ADD;
5890: END IF;
5891: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5892: End If;
5893: */
5894:
5895: --Check created by

Line 5897: p_Terr_QualTypeUsgs_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

5893: */
5894:
5895: --Check created by
5896: IF ( p_Terr_QualTypeUsgs_Rec.CREATED_BY is NULL OR
5897: p_Terr_QualTypeUsgs_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
5898: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5899: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5900: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5901: FND_MSG_PUB.ADD;

Line 5903: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5899: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5900: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
5901: FND_MSG_PUB.ADD;
5902: END IF;
5903: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5904: End If;
5905:
5906: --Check creation date
5907: If ( p_Terr_QualTypeUsgs_Rec.CREATION_DATE is NULL OR

Line 5908: p_Terr_QualTypeUsgs_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

5904: End If;
5905:
5906: --Check creation date
5907: If ( p_Terr_QualTypeUsgs_Rec.CREATION_DATE is NULL OR
5908: p_Terr_QualTypeUsgs_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
5909: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5910: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5911: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5912: FND_MSG_PUB.ADD;

Line 5914: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5910: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5911: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
5912: FND_MSG_PUB.ADD;
5913: END IF;
5914: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5915: End If;
5916:
5917: -- Validate last updated by
5918: IF ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY is NULL OR

Line 5919: p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

5915: End If;
5916:
5917: -- Validate last updated by
5918: IF ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY is NULL OR
5919: p_Terr_QualTypeUsgs_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
5920: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5921: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5922: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5923: FND_MSG_PUB.ADD;

Line 5925: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5921: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5922: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
5923: FND_MSG_PUB.ADD;
5924: END IF;
5925: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5926: End If;
5927:
5928: -- Check last update date
5929: If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE IS NULL OR

Line 5930: p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

5926: End If;
5927:
5928: -- Check last update date
5929: If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE IS NULL OR
5930: p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
5931: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5932: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5933: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5934: FND_MSG_PUB.ADD;

Line 5936: x_Return_Status := FND_API.G_RET_STS_ERROR ;

5932: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5933: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
5934: FND_MSG_PUB.ADD;
5935: END IF;
5936: x_Return_Status := FND_API.G_RET_STS_ERROR ;
5937: End If;
5938:
5939: --Check last update login
5940: --If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 5941: -- p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

5937: End If;
5938:
5939: --Check last update login
5940: --If ( p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN is NULL OR
5941: -- p_Terr_QualTypeUsgs_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
5942: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5943: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5944: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5945: -- FND_MSG_PUB.ADD;

Line 5947: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;

5943: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5944: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
5945: -- FND_MSG_PUB.ADD;
5946: -- END IF;
5947: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
5948: --End If;
5949:
5950: --
5951: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 5955: WHEN FND_API.G_EXC_ERROR THEN

5951: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
5952: p_data => x_msg_data);
5953: EXCEPTION
5954: --
5955: WHEN FND_API.G_EXC_ERROR THEN
5956: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
5957: x_return_status := FND_API.G_RET_STS_ERROR ;
5958: FND_MSG_PUB.Count_And_Get
5959: ( P_count => x_msg_count,

Line 5956: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');

5952: p_data => x_msg_data);
5953: EXCEPTION
5954: --
5955: WHEN FND_API.G_EXC_ERROR THEN
5956: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
5957: x_return_status := FND_API.G_RET_STS_ERROR ;
5958: FND_MSG_PUB.Count_And_Get
5959: ( P_count => x_msg_count,
5960: P_data => x_msg_data

Line 5957: x_return_status := FND_API.G_RET_STS_ERROR ;

5953: EXCEPTION
5954: --
5955: WHEN FND_API.G_EXC_ERROR THEN
5956: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
5957: x_return_status := FND_API.G_RET_STS_ERROR ;
5958: FND_MSG_PUB.Count_And_Get
5959: ( P_count => x_msg_count,
5960: P_data => x_msg_data
5961: );

Line 5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5959: ( P_count => x_msg_count,
5960: P_data => x_msg_data
5961: );
5962:
5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5964: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5965: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5966: FND_MSG_PUB.Count_And_Get
5967: ( P_count => x_msg_count,

Line 5964: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

5960: P_data => x_msg_data
5961: );
5962:
5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5964: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5965: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5966: FND_MSG_PUB.Count_And_Get
5967: ( P_count => x_msg_count,
5968: P_data => x_msg_data

Line 5965: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5961: );
5962:
5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5964: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
5965: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5966: FND_MSG_PUB.Count_And_Get
5967: ( P_count => x_msg_count,
5968: P_data => x_msg_data
5969: );

Line 5973: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5969: );
5970:
5971: WHEN OTHERS THEN
5972: --dbms_output.put_line('Validate_Terr_Qtype_Usage: OTHERS - ' || SQLERRM);
5973: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5974:
5975: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
5976: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Terr_Qtype_Usage' );
5977: FND_MESSAGE.Set_Token('ERROR', sqlerrm );

Line 6001: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

5997: --
5998: --
5999: ---------------------------------------------------------------------
6000: PROCEDURE Validate_terr_Value_Rec
6001: (p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
6002: x_Return_Status OUT NOCOPY VARCHAR2,
6003: x_msg_count OUT NOCOPY NUMBER,
6004: x_msg_data OUT NOCOPY VARCHAR2,
6005: p_Terr_Qual_Id IN NUMBER,

Line 6023: x_return_status := FND_API.G_RET_STS_SUCCESS;

6019: BEGIN
6020: --dbms_output('Validate_terr_Value_Rec: - terr_qual_id' || to_char(p_Terr_Qual_Id) );
6021:
6022: -- Initialize the status to success
6023: x_return_status := FND_API.G_RET_STS_SUCCESS;
6024:
6025: OPEN C_QualDef1;
6026: FETCH C_QualDef1 INTO l_qual_col1_datatype, l_display_type, l_convert_to_id_flag;
6027: CLOSE C_QualDef1;

Line 6035: (p_Terr_Value_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN

6031: --dbms_output('l_convert_to_id_flag - ' || l_convert_to_id_flag );
6032:
6033: /*-- Check for ORG_ID - obsolete: org_id is optional
6034: IF (p_Terr_Value_Rec.ORG_ID is NULL) OR
6035: (p_Terr_Value_Rec.ORG_ID = FND_API.G_MISS_NUM) THEN
6036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6037: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6038: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6039: FND_MSG_PUB.ADD;

Line 6041: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6037: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6038: FND_MESSAGE.Set_Token('COL_NAME', 'ORG_ID' );
6039: FND_MSG_PUB.ADD;
6040: END IF;
6041: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6042: End If;
6043: */
6044:
6045:

Line 6049: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR ) Then

6045:
6046: /* ----- ARPATEL 041101 Bug#1508750 FIX -----------------------------------
6047:
6048: If ( p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR
6049: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR ) Then
6050: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6051: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6052: FND_MESSAGE.Set_Token('COL_NAME', 'ID_USED_FLAG' );
6053: FND_MSG_PUB.ADD;

Line 6055: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6051: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6052: FND_MESSAGE.Set_Token('COL_NAME', 'ID_USED_FLAG' );
6053: FND_MSG_PUB.ADD;
6054: END IF;
6055: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6056: End If;
6057: -------------------------------------------------------------------------*/
6058:
6059:

Line 6062: p_Terr_Value_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN

6058:
6059:
6060: --Check created by
6061: IF ( p_Terr_Value_Rec.CREATED_BY is NULL OR
6062: p_Terr_Value_Rec.CREATED_BY = FND_API.G_MISS_NUM ) THEN
6063: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6064: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6065: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6066: FND_MSG_PUB.ADD;

Line 6068: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6064: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6065: FND_MESSAGE.Set_Token('COL_NAME', 'CREATED_BY' );
6066: FND_MSG_PUB.ADD;
6067: END IF;
6068: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6069: End If;
6070:
6071: --Check creation date
6072: If ( p_Terr_Value_Rec.CREATION_DATE is NULL OR

Line 6073: p_Terr_Value_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN

6069: End If;
6070:
6071: --Check creation date
6072: If ( p_Terr_Value_Rec.CREATION_DATE is NULL OR
6073: p_Terr_Value_Rec.CREATION_DATE = FND_API.G_MISS_DATE ) THEN
6074: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6075: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6076: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6077: FND_MSG_PUB.ADD;

Line 6079: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6075: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6076: FND_MESSAGE.Set_Token('COL_NAME', 'CREATION_DATE' );
6077: FND_MSG_PUB.ADD;
6078: END IF;
6079: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6080: End If;
6081:
6082: -- Validate last updated by
6083: IF ( p_Terr_Value_Rec.LAST_UPDATED_BY is NULL OR

Line 6084: p_Terr_Value_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then

6080: End If;
6081:
6082: -- Validate last updated by
6083: IF ( p_Terr_Value_Rec.LAST_UPDATED_BY is NULL OR
6084: p_Terr_Value_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) Then
6085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6086: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6087: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6088: FND_MSG_PUB.ADD;

Line 6090: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6086: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6087: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATED_BY' );
6088: FND_MSG_PUB.ADD;
6089: END IF;
6090: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6091: End If;
6092:
6093: -- Check last update date
6094: If ( p_Terr_Value_Rec.LAST_UPDATE_DATE IS NULL OR

Line 6095: p_Terr_Value_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN

6091: End If;
6092:
6093: -- Check last update date
6094: If ( p_Terr_Value_Rec.LAST_UPDATE_DATE IS NULL OR
6095: p_Terr_Value_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE ) THEN
6096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6097: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6098: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6099: FND_MSG_PUB.ADD;

Line 6101: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6097: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6098: FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_DATE' );
6099: FND_MSG_PUB.ADD;
6100: END IF;
6101: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6102: End If;
6103:
6104: --Check last update login
6105: --If ( p_Terr_Value_Rec.LAST_UPDATE_LOGIN is NULL OR

Line 6106: -- p_Terr_Value_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN

6102: End If;
6103:
6104: --Check last update login
6105: --If ( p_Terr_Value_Rec.LAST_UPDATE_LOGIN is NULL OR
6106: -- p_Terr_Value_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM ) THEN
6107: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6108: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6109: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6110: -- FND_MSG_PUB.ADD;

Line 6112: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;

6108: -- FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_MISSING_COL_VALUE');
6109: -- FND_MESSAGE.Set_Token('COL_NAME', 'LAST_UPDATE_LOGIN' );
6110: -- FND_MSG_PUB.ADD;
6111: -- END IF;
6112: -- x_Return_Status := FND_API.G_RET_STS_ERROR ;
6113: --End If;
6114:
6115: --dbms_output('Before the main validation.');
6116:

Line 6123: p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR ) OR

6119: ( l_convert_to_id_flag = 'N' or l_convert_to_id_flag is NULL ) ) THEN
6120:
6121: --dbms_output('Inside first if statement');
6122: If ( ( p_Terr_Value_Rec.LOW_VALUE_CHAR IS NULL or
6123: p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR ) OR
6124: p_Terr_Value_Rec.ID_USED_FLAG = 'Y' OR
6125: ( p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6126: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6127: ( p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NOT NULL and

Line 6126: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR

6122: If ( ( p_Terr_Value_Rec.LOW_VALUE_CHAR IS NULL or
6123: p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR ) OR
6124: p_Terr_Value_Rec.ID_USED_FLAG = 'Y' OR
6125: ( p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6126: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6127: ( p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NOT NULL and
6128: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID <> FND_API.G_MISS_NUM ) OR
6129: ( p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

Line 6128: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID <> FND_API.G_MISS_NUM ) OR

6124: p_Terr_Value_Rec.ID_USED_FLAG = 'Y' OR
6125: ( p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6126: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6127: ( p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NOT NULL and
6128: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID <> FND_API.G_MISS_NUM ) OR
6129: ( p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6131: ( p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6132: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

Line 6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

6126: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6127: ( p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NOT NULL and
6128: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID <> FND_API.G_MISS_NUM ) OR
6129: ( p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6131: ( p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6132: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6133: ( p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6134: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

Line 6132: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

6128: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID <> FND_API.G_MISS_NUM ) OR
6129: ( p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6131: ( p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6132: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6133: ( p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6134: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6135:
6136: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 6134: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

6130: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6131: ( p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6132: p_Terr_Value_Rec.HIGH_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6133: ( p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6134: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6135:
6136: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6137: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6138: FND_MSG_PUB.ADD;

Line 6141: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6137: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6138: FND_MSG_PUB.ADD;
6139: END IF;
6140:
6141: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6142:
6143: END IF;
6144:
6145: -- Numeric with CHAR dsiplay as in Customer Name

Line 6154: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID = FND_API.G_MISS_NUM ) OR

6150: -- If the Id is not specified in low_value_char_id or
6151: -- id_used_flag is not null or the operation is not
6152: -- specified, then flag exception
6153: If ( (p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NULL or
6154: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID = FND_API.G_MISS_NUM ) OR
6155: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6156: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6157: -- Description may be null
6158: -- 08/08/00 Change jdochert

Line 6156: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR

6152: -- specified, then flag exception
6153: If ( (p_Terr_Value_Rec.LOW_VALUE_CHAR_ID IS NULL or
6154: p_Terr_Value_Rec.LOW_VALUE_CHAR_ID = FND_API.G_MISS_NUM ) OR
6155: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6156: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6157: -- Description may be null
6158: -- 08/08/00 Change jdochert
6159: --p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR OR
6160: (p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR

Line 6159: --p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR OR

6155: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6156: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6157: -- Description may be null
6158: -- 08/08/00 Change jdochert
6159: --p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR OR
6160: (p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR
6161: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR OR
6162: p_Terr_Value_Rec.ID_USED_FLAG <> 'Y' ) OR
6163: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and

Line 6161: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR OR

6157: -- Description may be null
6158: -- 08/08/00 Change jdochert
6159: --p_Terr_Value_Rec.LOW_VALUE_CHAR = FND_API.G_MISS_CHAR OR
6160: (p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR
6161: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR OR
6162: p_Terr_Value_Rec.ID_USED_FLAG <> 'Y' ) OR
6163: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6164: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6165: (p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and

Line 6164: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

6160: (p_Terr_Value_Rec.ID_USED_FLAG IS NULL OR
6161: p_Terr_Value_Rec.ID_USED_FLAG = FND_API.G_MISS_CHAR OR
6162: p_Terr_Value_Rec.ID_USED_FLAG <> 'Y' ) OR
6163: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6164: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6165: (p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6166: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6167: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6168: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

Line 6166: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

6162: p_Terr_Value_Rec.ID_USED_FLAG <> 'Y' ) OR
6163: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6164: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6165: (p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6166: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6167: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6168: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6169:
6170: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 6168: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

6164: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6165: (p_Terr_Value_Rec.HIGH_VALUE_NUMBER IS NOT NULL and
6166: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6167: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6168: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6169:
6170: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6171: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6172: FND_MSG_PUB.ADD;

Line 6175: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6171: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6172: FND_MSG_PUB.ADD;
6173: END IF;
6174:
6175: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6176:
6177: END IF;
6178:
6179: ElsIf ( l_display_type = 'NUMERIC' ) Then

Line 6185: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR

6181: --dbms_output('Inside NUMERIC');
6182: -- Check whether the atleast LOW_VALUE_NUMBER, operator
6183: -- is specified
6184: If ( (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NULL OR
6185: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
6186: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6187: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
6188:
6189: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 6187: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN

6183: -- is specified
6184: If ( (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NULL OR
6185: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
6186: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6187: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) ) THEN
6188:
6189: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6190: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6191: FND_MSG_PUB.ADD;

Line 6194: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6190: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6191: FND_MSG_PUB.ADD;
6192: END IF;
6193:
6194: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6195:
6196: END IF;
6197:
6198: ElsIf ( l_display_type = 'CURRENCY' ) Then

Line 6204: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR

6200: --dbms_output('Inside CURRENCY');
6201: -- Check whether the atleast LOW_VALUE_NUMBER, operator
6202: -- is specified
6203: If ( (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NULL OR
6204: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
6205: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6206: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6207: (p_Terr_Value_Rec.CURRENCY_CODE IS NULL OR
6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR

Line 6206: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR

6202: -- is specified
6203: If ( (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NULL OR
6204: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
6205: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6206: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6207: (p_Terr_Value_Rec.CURRENCY_CODE IS NULL OR
6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR
6209: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6210: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR

Line 6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR

6204: p_Terr_Value_Rec.LOW_VALUE_NUMBER = FND_API.G_MISS_NUM ) OR
6205: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6206: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6207: (p_Terr_Value_Rec.CURRENCY_CODE IS NULL OR
6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR
6209: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6210: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR
6211: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6212: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

Line 6210: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR

6206: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6207: (p_Terr_Value_Rec.CURRENCY_CODE IS NULL OR
6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR
6209: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6210: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR
6211: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6212: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6213:
6214: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 6212: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN

6208: p_Terr_Value_Rec.CURRENCY_CODE = FND_API.G_MISS_CHAR ) OR
6209: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6210: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) OR
6211: (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NOT NULL and
6212: p_Terr_Value_Rec.INTEREST_TYPE_ID <> FND_API.G_MISS_NUM ) ) THEN
6213:
6214: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6215: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6216: FND_MSG_PUB.ADD;

Line 6219: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6215: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6216: FND_MSG_PUB.ADD;
6217: END IF;
6218:
6219: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6220:
6221: END IF;
6222:
6223: ElsIf ( l_display_type = 'INTEREST_TYPE' ) Then

Line 6229: p_Terr_Value_Rec.INTEREST_TYPE_ID = FND_API.G_MISS_NUM ) OR

6225: --dbms_output('Inside INTEREST_TYPE');
6226: -- Check whether the atleast LOW_VALUE_NUMBER, operator
6227: -- is specified
6228: If ( (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NULL OR
6229: p_Terr_Value_Rec.INTEREST_TYPE_ID = FND_API.G_MISS_NUM ) OR
6230: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6231: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6232: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6233: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

Line 6231: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR

6227: -- is specified
6228: If ( (p_Terr_Value_Rec.INTEREST_TYPE_ID IS NULL OR
6229: p_Terr_Value_Rec.INTEREST_TYPE_ID = FND_API.G_MISS_NUM ) OR
6230: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6231: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6232: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6233: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6234: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6235: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN

Line 6233: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR

6229: p_Terr_Value_Rec.INTEREST_TYPE_ID = FND_API.G_MISS_NUM ) OR
6230: (p_Terr_Value_Rec.COMPARISON_OPERATOR IS NULL OR
6231: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6232: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6233: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6234: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6235: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN
6236:
6237: --dbms_output('Error INTEREST_TYPE');

Line 6235: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN

6231: p_Terr_Value_Rec.COMPARISON_OPERATOR = FND_API.G_MISS_CHAR ) OR
6232: (p_Terr_Value_Rec.LOW_VALUE_NUMBER IS NOT NULL and
6233: p_Terr_Value_Rec.LOW_VALUE_NUMBER <> FND_API.G_MISS_NUM ) OR
6234: (p_Terr_Value_Rec.LOW_VALUE_CHAR IS NOT NULL and
6235: p_Terr_Value_Rec.LOW_VALUE_CHAR <> FND_API.G_MISS_CHAR ) ) THEN
6236:
6237: --dbms_output('Error INTEREST_TYPE');
6238: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6239: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');

Line 6243: x_Return_Status := FND_API.G_RET_STS_ERROR ;

6239: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_INVALID_TERR_VALUE');
6240: FND_MSG_PUB.ADD;
6241: END IF;
6242:
6243: x_Return_Status := FND_API.G_RET_STS_ERROR ;
6244:
6245: END IF;
6246: End If;
6247:

Line 6254: WHEN FND_API.G_EXC_ERROR THEN

6250: p_data => x_msg_data);
6251:
6252: EXCEPTION
6253: --
6254: WHEN FND_API.G_EXC_ERROR THEN
6255: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
6256: x_return_status := FND_API.G_RET_STS_ERROR ;
6257: FND_MSG_PUB.Count_And_Get
6258: ( P_count => x_msg_count,

Line 6255: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');

6251:
6252: EXCEPTION
6253: --
6254: WHEN FND_API.G_EXC_ERROR THEN
6255: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
6256: x_return_status := FND_API.G_RET_STS_ERROR ;
6257: FND_MSG_PUB.Count_And_Get
6258: ( P_count => x_msg_count,
6259: P_data => x_msg_data

Line 6256: x_return_status := FND_API.G_RET_STS_ERROR ;

6252: EXCEPTION
6253: --
6254: WHEN FND_API.G_EXC_ERROR THEN
6255: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_ERROR');
6256: x_return_status := FND_API.G_RET_STS_ERROR ;
6257: FND_MSG_PUB.Count_And_Get
6258: ( P_count => x_msg_count,
6259: P_data => x_msg_data
6260: );

Line 6262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6258: ( P_count => x_msg_count,
6259: P_data => x_msg_data
6260: );
6261:
6262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6263: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
6264: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6265: FND_MSG_PUB.Count_And_Get
6266: ( P_count => x_msg_count,

Line 6263: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');

6259: P_data => x_msg_data
6260: );
6261:
6262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6263: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
6264: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6265: FND_MSG_PUB.Count_And_Get
6266: ( P_count => x_msg_count,
6267: P_data => x_msg_data

Line 6264: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6260: );
6261:
6262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6263: --dbms_output('Validate_Terr_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR');
6264: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6265: FND_MSG_PUB.Count_And_Get
6266: ( P_count => x_msg_count,
6267: P_data => x_msg_data
6268: );

Line 6272: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6268: );
6269:
6270: WHEN OTHERS THEN
6271: --dbms_output('Validate_Terr_Qtype_Usage: OTHERS - ' || SQLERRM);
6272: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6273:
6274: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
6275: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_terr_Value_Rec' );
6276: FND_MESSAGE.Set_Token('ERROR', sqlerrm );

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

6328: ** 3. lock the template so that no other user can use that template for
6329: ** generation or update the template.
6330: */
6331: PROCEDURE Validate_Template_Record (
6332: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
6333: p_template_terr_id IN NUMBER,
6334: x_Return_Status OUT NOCOPY VARCHAR2,
6335: x_msg_count OUT NOCOPY NUMBER,
6336: x_msg_data OUT NOCOPY VARCHAR2

Line 6368: x_return_status := FND_API.G_RET_STS_SUCCESS;

6364:
6365: --dbms_output('Validate_Template_Record: Entering API');
6366:
6367: -- Initialize the status to success
6368: x_return_status := FND_API.G_RET_STS_SUCCESS;
6369:
6370: /* (1) check template exists */
6371: OPEN c_chk_template (p_template_terr_id);
6372: FETCH c_chk_template INTO l_csr_rtn;

Line 6377: x_return_status := FND_API.G_RET_STS_ERROR;

6373: IF (c_chk_template%NOTFOUND) THEN
6374:
6375: fnd_message.set_name('JTF', 'JTF_TERR_INVALID_TEMPLATE');
6376: --fnd_msg_pub.add;
6377: x_return_status := FND_API.G_RET_STS_ERROR;
6378:
6379: END IF;
6380: CLOSE c_chk_template;
6381:

Line 6392: x_return_status := FND_API.G_RET_STS_ERROR;

6388:
6389: IF (l_dynamic_qual_count = 0) THEN
6390: fnd_message.set_name ('JTF', 'JTF_TERR_NO_DYNAMIC_QUALIFIERS');
6391: fnd_msg_pub.add;
6392: x_return_status := FND_API.G_RET_STS_ERROR;
6393:
6394: END IF;
6395: CLOSE c_chk_qual_mode;
6396:

Line 6413: x_return_status := FND_API.G_RET_STS_ERROR;

6409:
6410: EXCEPTION
6411: WHEN OTHERS THEN
6412: fnd_message.set_name('JTF','JTF_TERR_TEMPLATE_LOCKED');
6413: x_return_status := FND_API.G_RET_STS_ERROR;
6414: END; /* block for validation (4) */
6415:
6416: --dbms_output('Validate_Template_Record: x_return_status = '|| x_return_status);
6417:

Line 6418: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

6414: END; /* block for validation (4) */
6415:
6416: --dbms_output('Validate_Template_Record: x_return_status = '|| x_return_status);
6417:
6418: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6419: RAISE FND_API.G_EXC_ERROR;
6420: END IF;
6421:
6422: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 6419: RAISE FND_API.G_EXC_ERROR;

6415:
6416: --dbms_output('Validate_Template_Record: x_return_status = '|| x_return_status);
6417:
6418: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6419: RAISE FND_API.G_EXC_ERROR;
6420: END IF;
6421:
6422: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6423: p_data => x_msg_data);

Line 6426: WHEN FND_API.G_EXC_ERROR THEN

6422: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6423: p_data => x_msg_data);
6424:
6425: EXCEPTION
6426: WHEN FND_API.G_EXC_ERROR THEN
6427: --dbms_output('Validate_Template_Record: FND_API.G_EXC_ERROR');
6428: x_return_status := FND_API.G_RET_STS_ERROR ;
6429: FND_MSG_PUB.Count_And_Get
6430: ( P_count => x_msg_count,

Line 6427: --dbms_output('Validate_Template_Record: FND_API.G_EXC_ERROR');

6423: p_data => x_msg_data);
6424:
6425: EXCEPTION
6426: WHEN FND_API.G_EXC_ERROR THEN
6427: --dbms_output('Validate_Template_Record: FND_API.G_EXC_ERROR');
6428: x_return_status := FND_API.G_RET_STS_ERROR ;
6429: FND_MSG_PUB.Count_And_Get
6430: ( P_count => x_msg_count,
6431: P_data => x_msg_data

Line 6428: x_return_status := FND_API.G_RET_STS_ERROR ;

6424:
6425: EXCEPTION
6426: WHEN FND_API.G_EXC_ERROR THEN
6427: --dbms_output('Validate_Template_Record: FND_API.G_EXC_ERROR');
6428: x_return_status := FND_API.G_RET_STS_ERROR ;
6429: FND_MSG_PUB.Count_And_Get
6430: ( P_count => x_msg_count,
6431: P_data => x_msg_data
6432: );

Line 6434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6430: ( P_count => x_msg_count,
6431: P_data => x_msg_data
6432: );
6433:
6434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6435: --dbms_output('Validate_Template_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
6436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6437: FND_MSG_PUB.Count_And_Get
6438: ( P_count => x_msg_count,

Line 6435: --dbms_output('Validate_Template_Record: FND_API.G_EXC_UNEXPECTED_ERROR');

6431: P_data => x_msg_data
6432: );
6433:
6434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6435: --dbms_output('Validate_Template_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
6436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6437: FND_MSG_PUB.Count_And_Get
6438: ( P_count => x_msg_count,
6439: P_data => x_msg_data

Line 6436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6432: );
6433:
6434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6435: --dbms_output('Validate_Template_Record: FND_API.G_EXC_UNEXPECTED_ERROR');
6436: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6437: FND_MSG_PUB.Count_And_Get
6438: ( P_count => x_msg_count,
6439: P_data => x_msg_data
6440: );

Line 6444: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6440: );
6441:
6442: WHEN OTHERS THEN
6443: --dbms_output('Validate_Template_Record: OTHERS - ' || SQLERRM);
6444: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6445: FND_MSG_PUB.Count_And_Get
6446: ( P_count => x_msg_count,
6447: P_data => x_msg_data
6448: );

Line 6700: l_new_terr_rec.TERR_ID := FND_API.G_MISS_NUM;

6696: BEGIN
6697:
6698: --dbms_output('create_new_terr START');
6699:
6700: l_new_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
6701: l_new_terr_rec.LAST_UPDATE_DATE := SYSDATE;
6702: l_new_terr_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
6703: l_new_terr_rec.CREATION_DATE := SYSDATE;
6704: l_new_terr_rec.CREATED_BY := FND_GLOBAL.USER_ID;

Line 6713: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;

6709: l_new_terr_rec.NAME := p_template_terr_rec.name ||
6710: ' - ' || ' #';
6711:
6712: l_new_terr_rec.ENABLED_FLAG := 'Y';
6713: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6714: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6715: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6716: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6717: l_new_terr_rec.START_DATE_ACTIVE := p_template_terr_rec.start_date_active;

Line 6714: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;

6710: ' - ' || ' #';
6711:
6712: l_new_terr_rec.ENABLED_FLAG := 'Y';
6713: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6714: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6715: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6716: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6717: l_new_terr_rec.START_DATE_ACTIVE := p_template_terr_rec.start_date_active;
6718: l_new_terr_rec.RANK := p_template_terr_rec.rank;

Line 6715: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;

6711:
6712: l_new_terr_rec.ENABLED_FLAG := 'Y';
6713: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6714: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6715: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6716: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6717: l_new_terr_rec.START_DATE_ACTIVE := p_template_terr_rec.start_date_active;
6718: l_new_terr_rec.RANK := p_template_terr_rec.rank;
6719: l_new_terr_rec.END_DATE_ACTIVE := p_template_terr_rec.end_date_active;

Line 6716: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;

6712: l_new_terr_rec.ENABLED_FLAG := 'Y';
6713: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6714: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6715: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6716: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6717: l_new_terr_rec.START_DATE_ACTIVE := p_template_terr_rec.start_date_active;
6718: l_new_terr_rec.RANK := p_template_terr_rec.rank;
6719: l_new_terr_rec.END_DATE_ACTIVE := p_template_terr_rec.end_date_active;
6720: l_new_terr_rec.DESCRIPTION := p_template_terr_rec.description;

Line 6754: P_Init_Msg_List => FND_API.G_TRUE,

6750:
6751: /* create the territory record */
6752: create_territory_record (
6753: P_Api_Version_Number => 1.0,
6754: P_Init_Msg_List => FND_API.G_TRUE,
6755: P_Commit => FND_API.G_FALSE,
6756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6757: P_Terr_All_Rec => l_new_terr_rec,
6758: X_Return_Status => l_return_status,

Line 6755: P_Commit => FND_API.G_FALSE,

6751: /* create the territory record */
6752: create_territory_record (
6753: P_Api_Version_Number => 1.0,
6754: P_Init_Msg_List => FND_API.G_TRUE,
6755: P_Commit => FND_API.G_FALSE,
6756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6757: P_Terr_All_Rec => l_new_terr_rec,
6758: X_Return_Status => l_return_status,
6759: X_Msg_Count => l_msg_count,

Line 6756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6752: create_territory_record (
6753: P_Api_Version_Number => 1.0,
6754: P_Init_Msg_List => FND_API.G_TRUE,
6755: P_Commit => FND_API.G_FALSE,
6756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6757: P_Terr_All_Rec => l_new_terr_rec,
6758: X_Return_Status => l_return_status,
6759: X_Msg_Count => l_msg_count,
6760: X_Msg_Data => l_msg_data,

Line 6771: P_Init_Msg_List => FND_API.G_TRUE,

6767: l_new_terr_rec.NAME := l_new_terr_rec.name || TO_CHAR(l_new_terr_id);
6768:
6769: update_territory_record (
6770: P_Api_Version_Number => 1.0,
6771: P_Init_Msg_List => FND_API.G_TRUE,
6772: P_Commit => FND_API.G_FALSE,
6773: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6774: P_Terr_All_Rec => l_new_terr_rec,
6775: X_Return_Status => l_return_status,

Line 6772: P_Commit => FND_API.G_FALSE,

6768:
6769: update_territory_record (
6770: P_Api_Version_Number => 1.0,
6771: P_Init_Msg_List => FND_API.G_TRUE,
6772: P_Commit => FND_API.G_FALSE,
6773: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6774: P_Terr_All_Rec => l_new_terr_rec,
6775: X_Return_Status => l_return_status,
6776: X_Msg_Count => l_msg_count,

Line 6773: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6769: update_territory_record (
6770: P_Api_Version_Number => 1.0,
6771: P_Init_Msg_List => FND_API.G_TRUE,
6772: P_Commit => FND_API.G_FALSE,
6773: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6774: P_Terr_All_Rec => l_new_terr_rec,
6775: X_Return_Status => l_return_status,
6776: X_Msg_Count => l_msg_count,
6777: X_Msg_Data => l_msg_data,

Line 6809: l_new_terr_rec.TERR_ID := FND_API.G_MISS_NUM;

6805: BEGIN
6806:
6807: --dbms_output('create_copied_terr START');
6808:
6809: l_new_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
6810: l_new_terr_rec.LAST_UPDATE_DATE := SYSDATE;
6811: l_new_terr_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
6812: l_new_terr_rec.CREATION_DATE := SYSDATE;
6813: l_new_terr_rec.CREATED_BY := FND_GLOBAL.USER_ID;

Line 6848: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;

6844: END IF;
6845: -- 04/06/01 ARPATEL - END
6846:
6847: l_new_terr_rec.ENABLED_FLAG := 'Y';
6848: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6849: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6850: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6851: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6852:

Line 6849: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;

6845: -- 04/06/01 ARPATEL - END
6846:
6847: l_new_terr_rec.ENABLED_FLAG := 'Y';
6848: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6849: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6850: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6851: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6852:
6853: l_new_terr_rec.ORG_ID := p_copied_terr_rec.org_id;

Line 6850: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;

6846:
6847: l_new_terr_rec.ENABLED_FLAG := 'Y';
6848: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6849: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6850: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6851: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6852:
6853: l_new_terr_rec.ORG_ID := p_copied_terr_rec.org_id;
6854: l_new_terr_rec.UPDATE_FLAG := 'Y'; --- p_copied_terr_rec.update_flag;

Line 6851: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;

6847: l_new_terr_rec.ENABLED_FLAG := 'Y';
6848: l_new_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
6849: l_new_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
6850: l_new_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
6851: l_new_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
6852:
6853: l_new_terr_rec.ORG_ID := p_copied_terr_rec.org_id;
6854: l_new_terr_rec.UPDATE_FLAG := 'Y'; --- p_copied_terr_rec.update_flag;
6855: l_new_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := p_copied_terr_rec.auto_assign_resources_flag;

Line 6860: l_new_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;

6856: l_new_terr_rec.PLANNED_FLAG := p_copied_terr_rec.planned_flag;
6857: l_new_terr_rec.TERRITORY_TYPE_ID := p_copied_terr_rec.territory_type_id;
6858: l_new_terr_rec.PARENT_TERRITORY_ID := p_copied_terr_rec.parent_territory_id;
6859: l_new_terr_rec.TEMPLATE_FLAG := p_copied_terr_rec.template_flag;
6860: l_new_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
6861: l_new_terr_rec.ESCALATION_TERRITORY_FLAG := p_copied_terr_rec.escalation_territory_flag;
6862: l_new_terr_rec.ESCALATION_TERRITORY_ID := p_copied_terr_rec.escalation_territory_id;
6863: l_new_terr_rec.OVERLAP_ALLOWED_FLAG := p_copied_terr_rec.overlap_allowed_flag;
6864: l_new_terr_rec.ATTRIBUTE_CATEGORY := p_copied_terr_rec.attribute_category;

Line 6886: P_Init_Msg_List => FND_API.G_TRUE,

6882:
6883: /* create the territory record */
6884: create_territory_record (
6885: P_Api_Version_Number => 1.0,
6886: P_Init_Msg_List => FND_API.G_TRUE,
6887: P_Commit => FND_API.G_FALSE,
6888: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6889: P_Terr_All_Rec => l_new_terr_rec,
6890: X_Return_Status => l_return_status,

Line 6887: P_Commit => FND_API.G_FALSE,

6883: /* create the territory record */
6884: create_territory_record (
6885: P_Api_Version_Number => 1.0,
6886: P_Init_Msg_List => FND_API.G_TRUE,
6887: P_Commit => FND_API.G_FALSE,
6888: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6889: P_Terr_All_Rec => l_new_terr_rec,
6890: X_Return_Status => l_return_status,
6891: X_Msg_Count => l_msg_count,

Line 6888: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6884: create_territory_record (
6885: P_Api_Version_Number => 1.0,
6886: P_Init_Msg_List => FND_API.G_TRUE,
6887: P_Commit => FND_API.G_FALSE,
6888: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6889: P_Terr_All_Rec => l_new_terr_rec,
6890: X_Return_Status => l_return_status,
6891: X_Msg_Count => l_msg_count,
6892: X_Msg_Data => l_msg_data,

Line 6929: l_terr_usgs_rec.TERR_USG_ID := FND_API.G_MISS_NUM;

6925:
6926: FOR i IN 0..p_terr_usgs_tbl.COUNT-1 LOOP
6927:
6928: /* Instantiate record items from FORM items */
6929: l_terr_usgs_rec.TERR_USG_ID := FND_API.G_MISS_NUM;
6930: l_terr_usgs_rec.LAST_UPDATE_DATE := SYSDATE;
6931: l_terr_usgs_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
6932: l_terr_usgs_rec.CREATION_DATE := SYSDATE;
6933: l_terr_usgs_rec.CREATED_BY := FND_GLOBAL.USER_ID;

Line 6947: P_Init_Msg_List => FND_API.G_TRUE,

6943:
6944: /* 11i - territory can only have one usage */
6945: create_territory_usages (
6946: P_Api_Version_Number => l_api_version_number,
6947: P_Init_Msg_List => FND_API.G_TRUE,
6948: P_Commit => FND_API.G_FALSE,
6949: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6950: P_Terr_id => p_new_terr_id,
6951: P_Terr_Usgs_Tbl => l_terr_usgs_tbl,

Line 6948: P_Commit => FND_API.G_FALSE,

6944: /* 11i - territory can only have one usage */
6945: create_territory_usages (
6946: P_Api_Version_Number => l_api_version_number,
6947: P_Init_Msg_List => FND_API.G_TRUE,
6948: P_Commit => FND_API.G_FALSE,
6949: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6950: P_Terr_id => p_new_terr_id,
6951: P_Terr_Usgs_Tbl => l_terr_usgs_tbl,
6952: X_Return_Status => l_return_status,

Line 6949: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6945: create_territory_usages (
6946: P_Api_Version_Number => l_api_version_number,
6947: P_Init_Msg_List => FND_API.G_TRUE,
6948: P_Commit => FND_API.G_FALSE,
6949: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6950: P_Terr_id => p_new_terr_id,
6951: P_Terr_Usgs_Tbl => l_terr_usgs_tbl,
6952: X_Return_Status => l_return_status,
6953: X_Msg_Count => l_msg_count,

Line 6986: l_terr_qtype_usgs_rec.TERR_QUAL_TYPE_USG_ID := FND_API.G_MISS_NUM;

6982:
6983: FOR i IN 0..p_terr_qtype_usgs_tbl.COUNT-1 LOOP
6984:
6985: /* Instantiate record items from appropriate items */
6986: l_terr_qtype_usgs_rec.TERR_QUAL_TYPE_USG_ID := FND_API.G_MISS_NUM;
6987: l_terr_qtype_usgs_rec.TERR_ID := p_new_terr_id;
6988: l_terr_qtype_usgs_rec.QUAL_TYPE_USG_ID := p_terr_qtype_usgs_tbl(i).qual_type_usg_id;
6989: l_terr_qtype_usgs_rec.LAST_UPDATE_DATE := SYSDATE;
6990: l_terr_qtype_usgs_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line 6999: P_Init_Msg_List => FND_API.G_TRUE,

6995:
6996:
6997: create_terr_qualtype_usage(
6998: P_Api_Version_Number => l_api_version_number,
6999: P_Init_Msg_List => FND_API.G_TRUE,
7000: P_Commit => FND_API.G_FALSE,
7001: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7002: P_Terr_Id => p_new_terr_id,
7003: P_Terr_QualTypeUsgs_Rec => l_terr_qtype_usgs_rec,

Line 7000: P_Commit => FND_API.G_FALSE,

6996:
6997: create_terr_qualtype_usage(
6998: P_Api_Version_Number => l_api_version_number,
6999: P_Init_Msg_List => FND_API.G_TRUE,
7000: P_Commit => FND_API.G_FALSE,
7001: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7002: P_Terr_Id => p_new_terr_id,
7003: P_Terr_QualTypeUsgs_Rec => l_terr_qtype_usgs_rec,
7004: X_Return_Status => l_return_status,

Line 7001: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6997: create_terr_qualtype_usage(
6998: P_Api_Version_Number => l_api_version_number,
6999: P_Init_Msg_List => FND_API.G_TRUE,
7000: P_Commit => FND_API.G_FALSE,
7001: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7002: P_Terr_Id => p_new_terr_id,
7003: P_Terr_QualTypeUsgs_Rec => l_terr_qtype_usgs_rec,
7004: X_Return_Status => l_return_status,
7005: X_Msg_Count => l_msg_count,

Line 7051: l_new_terr_qual_rec.TERR_QUAL_ID := FND_API.G_MISS_NUM;

7047: --dbms_output('create_new_terr_qual_rec START');
7048:
7049: /* Instantiate record items from appropriate template items */
7050: l_new_terr_qual_rec.Rowid := NULL;
7051: l_new_terr_qual_rec.TERR_QUAL_ID := FND_API.G_MISS_NUM;
7052: l_new_terr_qual_rec.LAST_UPDATE_DATE := SYSDATE;
7053: l_new_terr_qual_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
7054: l_new_terr_qual_rec.CREATION_DATE := SYSDATE;
7055: l_new_terr_qual_rec.CREATED_BY := FND_GLOBAL.USER_ID;

Line 7083: P_Init_Msg_List => FND_API.G_TRUE,

7079: /* END OF 1520656 BUG FIX - JDOCHERT 12/07 */
7080:
7081: create_terr_qualifier(
7082: P_Api_Version_Number => l_api_version_number,
7083: P_Init_Msg_List => FND_API.G_TRUE,
7084: P_Commit => FND_API.G_FALSE,
7085: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7086: P_Terr_Id => l_new_terr_qual_rec.terr_id,
7087: P_Terr_Qual_rec => l_new_terr_qual_rec,

Line 7084: P_Commit => FND_API.G_FALSE,

7080:
7081: create_terr_qualifier(
7082: P_Api_Version_Number => l_api_version_number,
7083: P_Init_Msg_List => FND_API.G_TRUE,
7084: P_Commit => FND_API.G_FALSE,
7085: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7086: P_Terr_Id => l_new_terr_qual_rec.terr_id,
7087: P_Terr_Qual_rec => l_new_terr_qual_rec,
7088: X_Return_Status => l_return_status,

Line 7085: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

7081: create_terr_qualifier(
7082: P_Api_Version_Number => l_api_version_number,
7083: P_Init_Msg_List => FND_API.G_TRUE,
7084: P_Commit => FND_API.G_FALSE,
7085: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7086: P_Terr_Id => l_new_terr_qual_rec.terr_id,
7087: P_Terr_Qual_rec => l_new_terr_qual_rec,
7088: X_Return_Status => l_return_status,
7089: X_Msg_Count => l_msg_count,

Line 7184: P_Init_Msg_List => FND_API.G_TRUE,

7180:
7181: /* insert value */
7182: create_terr_value(
7183: P_Api_Version_Number => 1.0,
7184: P_Init_Msg_List => FND_API.G_TRUE,
7185: P_Commit => FND_API.G_FALSE,
7186: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7187: P_Terr_Id => p_new_terr_id,
7188: P_Terr_Qual_id => l_new_terr_value_rec.terr_qual_id,

Line 7185: P_Commit => FND_API.G_FALSE,

7181: /* insert value */
7182: create_terr_value(
7183: P_Api_Version_Number => 1.0,
7184: P_Init_Msg_List => FND_API.G_TRUE,
7185: P_Commit => FND_API.G_FALSE,
7186: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7187: P_Terr_Id => p_new_terr_id,
7188: P_Terr_Qual_id => l_new_terr_value_rec.terr_qual_id,
7189: P_Terr_Value_Rec => l_new_terr_value_rec,

Line 7186: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

7182: create_terr_value(
7183: P_Api_Version_Number => 1.0,
7184: P_Init_Msg_List => FND_API.G_TRUE,
7185: P_Commit => FND_API.G_FALSE,
7186: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7187: P_Terr_Id => p_new_terr_id,
7188: P_Terr_Qual_id => l_new_terr_value_rec.terr_qual_id,
7189: P_Terr_Value_Rec => l_new_terr_value_rec,
7190: X_Return_Status => l_return_status,

Line 7777: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

7773:
7774: /*--------------------------------------------------------------------------------------*/
7775: PROCEDURE Gen_Template_Territories (
7776: p_Api_Version_Number IN NUMBER,
7777: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
7778: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
7779: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7780: p_Template_Terr_Id IN NUMBER,
7781: x_Return_Status OUT NOCOPY VARCHAR2,

Line 7778: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

7774: /*--------------------------------------------------------------------------------------*/
7775: PROCEDURE Gen_Template_Territories (
7776: p_Api_Version_Number IN NUMBER,
7777: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
7778: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
7779: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7780: p_Template_Terr_Id IN NUMBER,
7781: x_Return_Status OUT NOCOPY VARCHAR2,
7782: x_Msg_Count OUT NOCOPY NUMBER,

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

7775: PROCEDURE Gen_Template_Territories (
7776: p_Api_Version_Number IN NUMBER,
7777: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
7778: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
7779: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7780: p_Template_Terr_Id IN NUMBER,
7781: x_Return_Status OUT NOCOPY VARCHAR2,
7782: x_Msg_Count OUT NOCOPY NUMBER,
7783: x_Msg_Data OUT NOCOPY VARCHAR2,

Line 7820: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

7816: -- Standard Start of API savepoint
7817: SAVEPOINT GEN_TEMPLATE_TERR_PVT;
7818:
7819: -- Standard call to check for call compatibility.
7820: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
7821: p_api_version_number,
7822: l_api_name,
7823: G_PKG_NAME)
7824: THEN

Line 7825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7821: p_api_version_number,
7822: l_api_name,
7823: G_PKG_NAME)
7824: THEN
7825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7826: END IF;
7827:
7828: -- Initialize message list if p_init_msg_list is set to TRUE.
7829: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 7829: IF FND_API.to_Boolean( p_init_msg_list ) THEN

7825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7826: END IF;
7827:
7828: -- Initialize message list if p_init_msg_list is set to TRUE.
7829: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7830: FND_MSG_PUB.initialize;
7831: END IF;
7832:
7833: -- Debug Message

Line 7842: x_return_status := FND_API.G_RET_STS_SUCCESS;

7838: FND_MSG_PUB.Add;
7839: END IF;
7840:
7841: -- Initialize API return status to success
7842: x_return_status := FND_API.G_RET_STS_SUCCESS;
7843:
7844:
7845: /* ===================== */
7846: /* API BODY START */

Line 7850: --IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN

7846: /* API BODY START */
7847: /* ======================*/
7848:
7849: --arpatel 07/13 bug#1872642
7850: --IF (p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
7851:
7852: /* Debug message */
7853: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
7854: THEN

Line 7861: Validate_Template_Record( p_init_msg_list => FND_API.G_FALSE

7857: FND_MSG_PUB.Add;
7858: END IF;
7859:
7860: /* Invoke validation procedures */
7861: Validate_Template_Record( p_init_msg_list => FND_API.G_FALSE
7862: , p_Template_Terr_Id => p_template_terr_id
7863: , x_Return_Status => x_return_status
7864: , x_msg_count => x_msg_count
7865: , x_msg_data => x_msg_data );

Line 7867: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

7863: , x_Return_Status => x_return_status
7864: , x_msg_count => x_msg_count
7865: , x_msg_data => x_msg_data );
7866:
7867: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
7868: RAISE FND_API.G_EXC_ERROR;
7869: END IF;
7870:
7871: --END IF;

Line 7868: RAISE FND_API.G_EXC_ERROR;

7864: , x_msg_count => x_msg_count
7865: , x_msg_data => x_msg_data );
7866:
7867: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
7868: RAISE FND_API.G_EXC_ERROR;
7869: END IF;
7870:
7871: --END IF;
7872:

Line 7990: x_return_status := FND_API.G_RET_STS_ERROR ;

7986: */
7987: x_num_gen_terr := l_terr_count;
7988:
7989: IF (l_terr_count <> l_num_gen_terr) THEN
7990: x_return_status := FND_API.G_RET_STS_ERROR ;
7991: END IF;
7992:
7993: /* ===================== */
7994: /* API BODY END */

Line 8005: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8001: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
8002: FND_MSG_PUB.Add;
8003: END IF;
8004:
8005: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8006: RAISE FND_API.G_EXC_ERROR;
8007: END IF;
8008:
8009: FND_MSG_PUB.Count_And_Get

Line 8006: RAISE FND_API.G_EXC_ERROR;

8002: FND_MSG_PUB.Add;
8003: END IF;
8004:
8005: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8006: RAISE FND_API.G_EXC_ERROR;
8007: END IF;
8008:
8009: FND_MSG_PUB.Count_And_Get
8010: ( p_count => x_msg_count,

Line 8015: IF FND_API.to_Boolean( p_commit )

8011: p_data => x_msg_data
8012: );
8013:
8014: -- Standard check for p_commit
8015: IF FND_API.to_Boolean( p_commit )
8016: THEN
8017: COMMIT WORK;
8018: END IF;
8019: EXCEPTION

Line 8021: WHEN FND_API.G_EXC_ERROR THEN

8017: COMMIT WORK;
8018: END IF;
8019: EXCEPTION
8020:
8021: WHEN FND_API.G_EXC_ERROR THEN
8022: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_ERROR');
8023: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8024: x_return_status := FND_API.G_RET_STS_ERROR ;
8025: FND_MSG_PUB.Count_And_Get

Line 8022: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_ERROR');

8018: END IF;
8019: EXCEPTION
8020:
8021: WHEN FND_API.G_EXC_ERROR THEN
8022: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_ERROR');
8023: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8024: x_return_status := FND_API.G_RET_STS_ERROR ;
8025: FND_MSG_PUB.Count_And_Get
8026: ( p_count => x_msg_count,

Line 8024: x_return_status := FND_API.G_RET_STS_ERROR ;

8020:
8021: WHEN FND_API.G_EXC_ERROR THEN
8022: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_ERROR');
8023: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8024: x_return_status := FND_API.G_RET_STS_ERROR ;
8025: FND_MSG_PUB.Count_And_Get
8026: ( p_count => x_msg_count,
8027: p_data => x_msg_data
8028: );

Line 8030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8026: ( p_count => x_msg_count,
8027: p_data => x_msg_data
8028: );
8029:
8030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8031: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8032: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8033: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8034: FND_MSG_PUB.Count_And_Get

Line 8031: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

8027: p_data => x_msg_data
8028: );
8029:
8030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8031: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8032: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8033: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8034: FND_MSG_PUB.Count_And_Get
8035: ( p_count => x_msg_count,

Line 8033: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8029:
8030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8031: --dbms_output('Generate_Template_Territories PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8032: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8033: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8034: FND_MSG_PUB.Count_And_Get
8035: ( p_count => x_msg_count,
8036: p_data => x_msg_data
8037: );

Line 8042: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8038:
8039: WHEN OTHERS THEN
8040: --dbms_output('Generate_Template_Territories PVT: OTHERS - ' || SQLERRM);
8041: ROLLBACK TO GEN_TEMPLATE_TERR_PVT;
8042: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8043: FND_MSG_PUB.Count_And_Get
8044: ( p_count => x_msg_count,
8045: p_data => x_msg_data
8046: );

Line 8056: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

8052: /*--------------------------------------------------------------------------------------*/
8053: -- eihsu100
8054: PROCEDURE Copy_Territory (
8055: p_Api_Version_Number IN NUMBER,
8056: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
8057: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
8058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
8059: p_copy_source_terr_Id IN NUMBER,
8060: p_new_terr_rec IN Terr_All_Rec_Type,

Line 8057: p_Commit IN VARCHAR2 := FND_API.G_FALSE,

8053: -- eihsu100
8054: PROCEDURE Copy_Territory (
8055: p_Api_Version_Number IN NUMBER,
8056: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
8057: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
8058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
8059: p_copy_source_terr_Id IN NUMBER,
8060: p_new_terr_rec IN Terr_All_Rec_Type,
8061: p_copy_rsc_flag IN VARCHAR2 := 'N',

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

8054: PROCEDURE Copy_Territory (
8055: p_Api_Version_Number IN NUMBER,
8056: p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
8057: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
8058: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
8059: p_copy_source_terr_Id IN NUMBER,
8060: p_new_terr_rec IN Terr_All_Rec_Type,
8061: p_copy_rsc_flag IN VARCHAR2 := 'N',
8062: p_copy_hierarchy_flag IN VARCHAR2 := 'N',

Line 8108: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

8104: -- Standard Start of API savepoint
8105: SAVEPOINT COPY_TERR_PVT;
8106:
8107: -- Standard call to check for call compatibility.
8108: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
8109: p_api_version_number,
8110: l_api_name,
8111: G_PKG_NAME)
8112: THEN

Line 8113: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8109: p_api_version_number,
8110: l_api_name,
8111: G_PKG_NAME)
8112: THEN
8113: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8114: END IF;
8115:
8116: -- Initialize message list if p_init_msg_list is set to TRUE.
8117: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 8117: IF FND_API.to_Boolean( p_init_msg_list ) THEN

8113: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8114: END IF;
8115:
8116: -- Initialize message list if p_init_msg_list is set to TRUE.
8117: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8118: FND_MSG_PUB.initialize;
8119: END IF;
8120:
8121: -- Debug Message

Line 8130: x_return_status := FND_API.G_RET_STS_SUCCESS;

8126: FND_MSG_PUB.Add;
8127: END IF;
8128:
8129: -- Initialize API return status to success
8130: x_return_status := FND_API.G_RET_STS_SUCCESS;
8131:
8132:
8133: /* ===================== */
8134: /* API BODY START */

Line 8169: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

8165:
8166: JTF_TERRITORY_RESOURCE_PVT.copy_terr_resources( p_Api_Version_Number => p_Api_Version_Number,
8167: p_Init_Msg_List => p_Init_Msg_List,
8168: p_Commit => p_Commit,
8169: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
8170: p_source_terr_id => p_copy_source_terr_id,
8171: p_dest_terr_id => l_new_terr_id,
8172: x_msg_count => x_msg_count,
8173: x_msg_data => x_msg_data,

Line 8228: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8224: FND_MESSAGE.Set_Token('PROC_NAME', l_api_name);
8225: FND_MSG_PUB.Add;
8226: END IF;
8227:
8228: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8229: RAISE FND_API.G_EXC_ERROR;
8230: END IF;
8231:
8232: FND_MSG_PUB.Count_And_Get

Line 8229: RAISE FND_API.G_EXC_ERROR;

8225: FND_MSG_PUB.Add;
8226: END IF;
8227:
8228: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8229: RAISE FND_API.G_EXC_ERROR;
8230: END IF;
8231:
8232: FND_MSG_PUB.Count_And_Get
8233: ( p_count => x_msg_count,

Line 8238: IF FND_API.to_Boolean( p_commit )

8234: p_data => x_msg_data
8235: );
8236:
8237: -- Standard check for p_commit
8238: IF FND_API.to_Boolean( p_commit )
8239: THEN
8240: COMMIT WORK;
8241: END IF;
8242: EXCEPTION

Line 8244: WHEN FND_API.G_EXC_ERROR THEN

8240: COMMIT WORK;
8241: END IF;
8242: EXCEPTION
8243:
8244: WHEN FND_API.G_EXC_ERROR THEN
8245: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_ERROR');
8246: ROLLBACK TO COPY_TERR_PVT;
8247: x_return_status := FND_API.G_RET_STS_ERROR ;
8248: FND_MSG_PUB.Count_And_Get

Line 8245: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_ERROR');

8241: END IF;
8242: EXCEPTION
8243:
8244: WHEN FND_API.G_EXC_ERROR THEN
8245: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_ERROR');
8246: ROLLBACK TO COPY_TERR_PVT;
8247: x_return_status := FND_API.G_RET_STS_ERROR ;
8248: FND_MSG_PUB.Count_And_Get
8249: ( p_count => x_msg_count,

Line 8247: x_return_status := FND_API.G_RET_STS_ERROR ;

8243:
8244: WHEN FND_API.G_EXC_ERROR THEN
8245: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_ERROR');
8246: ROLLBACK TO COPY_TERR_PVT;
8247: x_return_status := FND_API.G_RET_STS_ERROR ;
8248: FND_MSG_PUB.Count_And_Get
8249: ( p_count => x_msg_count,
8250: p_data => x_msg_data
8251: );

Line 8253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8249: ( p_count => x_msg_count,
8250: p_data => x_msg_data
8251: );
8252:
8253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8254: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8255: ROLLBACK TO COPY_TERR_PVT;
8256: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8257: FND_MSG_PUB.Count_And_Get

Line 8254: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');

8250: p_data => x_msg_data
8251: );
8252:
8253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8254: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8255: ROLLBACK TO COPY_TERR_PVT;
8256: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8257: FND_MSG_PUB.Count_And_Get
8258: ( p_count => x_msg_count,

Line 8256: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8252:
8253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8254: --dbms_output('Generate_Duplicate_Territory PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
8255: ROLLBACK TO COPY_TERR_PVT;
8256: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8257: FND_MSG_PUB.Count_And_Get
8258: ( p_count => x_msg_count,
8259: p_data => x_msg_data
8260: );

Line 8265: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8261:
8262: WHEN OTHERS THEN
8263: --dbms_output('Generate_Duplicate_Territory PVT: OTHERS - ' || SQLERRM);
8264: ROLLBACK TO COPY_TERR_PVT;
8265: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8266: FND_MSG_PUB.Count_And_Get
8267: ( p_count => x_msg_count,
8268: p_data => x_msg_data
8269: );

Line 8303: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) or

8299: -- Character
8300: -- low value char
8301: IF ( l_display_type = 'CHAR' and
8302: l_qual_col1_datatype = 'VARCHAR2' and
8303: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) or
8304: l_convert_to_id_flag is NULL ) )
8305: Then
8306: If p_terr_value_record.low_value_char is NOT NULL Then
8307: Select count(*)

Line 8428: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) OR

8424: End If;
8425:
8426: ElsIf ( l_qual_col1_datatype = 'NUMBER' AND
8427: l_display_type = 'CURRENCY' AND
8428: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) OR
8429: l_convert_to_id_flag is NULL ) )
8430: Then
8431:
8432: If p_terr_value_record.low_value_number is NOT NULL Then

Line 8478: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) OR

8474: End If;
8475:
8476: ElsIf ( l_qual_col1_datatype = 'NUMBER' AND
8477: l_display_type = 'INTEREST_TYPE'AND
8478: ( l_convert_to_id_flag IN ('N', FND_API.G_MISS_CHAR) OR
8479: l_convert_to_id_flag is NULL ) )
8480: Then
8481: Select count(*)
8482: into dummy

Line 8500: RETURN FND_API.G_TRUE;

8496: End If;
8497: End If;
8498:
8499: If l_found > 0 Then
8500: RETURN FND_API.G_TRUE;
8501: Else
8502: RETURN FND_API.G_FALSE;
8503: End If;
8504: EXCEPTION

Line 8502: RETURN FND_API.G_FALSE;

8498:
8499: If l_found > 0 Then
8500: RETURN FND_API.G_TRUE;
8501: Else
8502: RETURN FND_API.G_FALSE;
8503: End If;
8504: EXCEPTION
8505: WHEN NO_DATA_FOUND Then
8506: RETURN FND_API.G_FALSE;

Line 8506: RETURN FND_API.G_FALSE;

8502: RETURN FND_API.G_FALSE;
8503: End If;
8504: EXCEPTION
8505: WHEN NO_DATA_FOUND Then
8506: RETURN FND_API.G_FALSE;
8507:
8508: WHEN OTHERS THEN
8509: RETURN FND_API.G_FALSE;
8510:

Line 8509: RETURN FND_API.G_FALSE;

8505: WHEN NO_DATA_FOUND Then
8506: RETURN FND_API.G_FALSE;
8507:
8508: WHEN OTHERS THEN
8509: RETURN FND_API.G_FALSE;
8510:
8511: END Overlap_Exists;
8512:
8513: -- jdochert 09/09

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

8514: -- check for Unique Key constraint violation on JTF_TERR_USGS table
8515: PROCEDURE validate_terr_usgs_UK(
8516: p_Terr_Id IN NUMBER,
8517: p_Source_Id IN NUMBER,
8518: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
8519: x_Return_Status OUT NOCOPY VARCHAR2,
8520: x_msg_count OUT NOCOPY NUMBER,
8521: x_msg_data OUT NOCOPY VARCHAR2 )
8522: AS

Line 8538: x_return_status := FND_API.G_RET_STS_SUCCESS;

8534: BEGIN
8535:
8536: --dbms_output.put_line('Validate TERR USGS Unique_Key: Entering API ' || p_terr_id || ' ' || p_source_id);
8537: -- Initialize the status to success
8538: x_return_status := FND_API.G_RET_STS_SUCCESS;
8539:
8540: /* check that Unique Key constraint not violated */
8541: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8542: p_source_id IS NOT NULL AND p_source_id <> FND_API.G_MISS_NUM ) THEN

Line 8541: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND

8537: -- Initialize the status to success
8538: x_return_status := FND_API.G_RET_STS_SUCCESS;
8539:
8540: /* check that Unique Key constraint not violated */
8541: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8542: p_source_id IS NOT NULL AND p_source_id <> FND_API.G_MISS_NUM ) THEN
8543:
8544: /* check if rec already exists */
8545: OPEN csr_chk_uk_violation (p_terr_id, p_source_id);

Line 8542: p_source_id IS NOT NULL AND p_source_id <> FND_API.G_MISS_NUM ) THEN

8538: x_return_status := FND_API.G_RET_STS_SUCCESS;
8539:
8540: /* check that Unique Key constraint not violated */
8541: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8542: p_source_id IS NOT NULL AND p_source_id <> FND_API.G_MISS_NUM ) THEN
8543:
8544: /* check if rec already exists */
8545: OPEN csr_chk_uk_violation (p_terr_id, p_source_id);
8546: FETCH csr_chk_uk_violation INTO l_return_csr;

Line 8552: x_return_status := FND_API.G_RET_STS_ERROR;

8548: IF csr_chk_uk_violation%FOUND THEN
8549:
8550: --dbms_output.put_line('Validate_Unique_Key: jtf_terr_usgs: VIOLATION');
8551:
8552: x_return_status := FND_API.G_RET_STS_ERROR;
8553:
8554: /* Debug message */
8555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
8556: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_USGS_UK_CON');

Line 8572: X_return_status := FND_API.G_RET_STS_ERROR;

8568: EXCEPTION
8569:
8570: WHEN OTHERS THEN
8571: --dbms_output('Validate_Foreign_Key: Others exception' || SQLERRM);
8572: X_return_status := FND_API.G_RET_STS_ERROR;
8573: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
8574: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
8575: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
8576: FND_MSG_PUB.ADD;

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

8585: -- check for Unique Key constraint violation on JTF_TERR_QTYPE_USGS table
8586: PROCEDURE validate_terr_qtype_usgs_UK(
8587: p_Terr_Id IN NUMBER,
8588: p_Qual_Type_Usg_Id IN NUMBER,
8589: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
8590: x_Return_Status OUT NOCOPY VARCHAR2,
8591: x_msg_count OUT NOCOPY NUMBER,
8592: x_msg_data OUT NOCOPY VARCHAR2 )
8593: AS

Line 8609: x_return_status := FND_API.G_RET_STS_SUCCESS;

8605: BEGIN
8606:
8607: --dbms_output.put_line('Validate QUAL_TYPE_USGS Unique_Key: Entering API');
8608: -- Initialize the status to success
8609: x_return_status := FND_API.G_RET_STS_SUCCESS;
8610:
8611: /* check that Unique Key constraint not violated */
8612: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8613: p_qual_type_usg_id IS NOT NULL AND p_qual_type_usg_id <> FND_API.G_MISS_NUM ) THEN

Line 8612: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND

8608: -- Initialize the status to success
8609: x_return_status := FND_API.G_RET_STS_SUCCESS;
8610:
8611: /* check that Unique Key constraint not violated */
8612: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8613: p_qual_type_usg_id IS NOT NULL AND p_qual_type_usg_id <> FND_API.G_MISS_NUM ) THEN
8614:
8615: /* check if rec already exists */
8616: OPEN csr_chk_uk_violation ( p_terr_id

Line 8613: p_qual_type_usg_id IS NOT NULL AND p_qual_type_usg_id <> FND_API.G_MISS_NUM ) THEN

8609: x_return_status := FND_API.G_RET_STS_SUCCESS;
8610:
8611: /* check that Unique Key constraint not violated */
8612: IF ( p_terr_id IS NOT NULL AND p_terr_id <> FND_API.G_MISS_NUM AND
8613: p_qual_type_usg_id IS NOT NULL AND p_qual_type_usg_id <> FND_API.G_MISS_NUM ) THEN
8614:
8615: /* check if rec already exists */
8616: OPEN csr_chk_uk_violation ( p_terr_id
8617: , p_qual_type_usg_id);

Line 8623: x_return_status := FND_API.G_RET_STS_ERROR;

8619:
8620: IF csr_chk_uk_violation%FOUND THEN
8621: --dbms_output.put_line('Validate QUAL_TYPE_USGS Unique_Key Violation');
8622:
8623: x_return_status := FND_API.G_RET_STS_ERROR;
8624:
8625: /* Debug message */
8626: --arpatel 09/18 - set message for form to pick up.
8627: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 8648: X_return_status := FND_API.G_RET_STS_ERROR;

8644: EXCEPTION
8645:
8646: WHEN OTHERS THEN
8647: --dbms_output('Validate_Foreign_Key: Others exception' || SQLERRM);
8648: X_return_status := FND_API.G_RET_STS_ERROR;
8649: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
8650: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Unique_Key' );
8651: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
8652: FND_MSG_PUB.ADD;

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

8661: -- jdochert 10/04
8662: -- check that Number of Winners is valid for this territory
8663: PROCEDURE validate_num_winners(
8664: p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
8665: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
8666: x_Return_Status OUT NOCOPY VARCHAR2,
8667: x_msg_count OUT NOCOPY NUMBER,
8668: x_msg_data OUT NOCOPY VARCHAR2,
8669: x_reason OUT NOCOPY VARCHAR2 )

Line 8688: x_return_status := FND_API.G_RET_STS_SUCCESS;

8684: BEGIN
8685:
8686: --dbms_output.put_line('Validate_Num_Winners: Entering API ' || p_terr_id || ' ' || p_source_id);
8687: -- Initialize the status to success
8688: x_return_status := FND_API.G_RET_STS_SUCCESS;
8689:
8690: If ( p_terr_all_rec.parent_territory_id <> 1 AND
8691: p_terr_all_rec.num_winners IS NOT NULL AND
8692: p_terr_all_rec.num_winners <> FND_API.G_MISS_NUM ) THEN

Line 8692: p_terr_all_rec.num_winners <> FND_API.G_MISS_NUM ) THEN

8688: x_return_status := FND_API.G_RET_STS_SUCCESS;
8689:
8690: If ( p_terr_all_rec.parent_territory_id <> 1 AND
8691: p_terr_all_rec.num_winners IS NOT NULL AND
8692: p_terr_all_rec.num_winners <> FND_API.G_MISS_NUM ) THEN
8693:
8694: IF ( p_terr_all_rec.template_flag = 'Y' OR
8695: p_terr_all_rec.escalation_territory_flag = 'Y' ) THEN
8696:

Line 8705: x_return_status := FND_API.G_RET_STS_ERROR;

8701: x_reason := 'A';
8702:
8703: END IF;
8704:
8705: x_return_status := FND_API.G_RET_STS_ERROR;
8706:
8707: /* Debug message */
8708: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
8709: FND_MESSAGE.Set_Name ('JTF', 'JTF_TERR_NUM_WINNERS_TOP_LEVEL');

Line 8722: X_return_status := FND_API.G_RET_STS_ERROR;

8718: EXCEPTION
8719:
8720: WHEN OTHERS THEN
8721: --dbms_output('Validate_Num_Winners: Others exception' || SQLERRM);
8722: X_return_status := FND_API.G_RET_STS_ERROR;
8723: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
8724: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Num_Winners' );
8725: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
8726: FND_MSG_PUB.ADD;

Line 8755: x_return_status := FND_API.G_RET_STS_SUCCESS;

8751: BEGIN
8752:
8753: --dbms_output.put_line('chk_num_copy_terr: Entering API ' || p_terr_id );
8754: -- Initialize the status to success
8755: x_return_status := FND_API.G_RET_STS_SUCCESS;
8756:
8757: OPEN csr_get_terr_num(p_node_terr_id);
8758: FETCH csr_get_terr_num INTO x_terr_num;
8759: CLOSE csr_get_terr_num;

Line 8763: x_copy_status := FND_API.G_TRUE;

8759: CLOSE csr_get_terr_num;
8760:
8761: IF (x_terr_num <= p_limit_num) THEN
8762:
8763: x_copy_status := FND_API.G_TRUE;
8764:
8765: ELSE
8766: x_copy_status := FND_API.G_FALSE;
8767:

Line 8766: x_copy_status := FND_API.G_FALSE;

8762:
8763: x_copy_status := FND_API.G_TRUE;
8764:
8765: ELSE
8766: x_copy_status := FND_API.G_FALSE;
8767:
8768: END IF;
8769:
8770:

Line 8783: X_return_status := FND_API.G_RET_STS_ERROR;

8779:
8780: EXCEPTION
8781: WHEN OTHERS THEN
8782: --dbms_output('chk_num_copy_terr: Others exception' || SQLERRM);
8783: X_return_status := FND_API.G_RET_STS_ERROR;
8784: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
8785: FND_MESSAGE.Set_Token('PROC_NAME', 'chk_num_copy_terr' );
8786: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
8787: FND_MSG_PUB.ADD;

Line 8800: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,

8796: errbuf OUT NOCOPY VARCHAR2,
8797: retcode OUT NOCOPY VARCHAR2,
8798: p_copy_source_terr_Id IN NUMBER,
8799: p_name IN VARCHAR2,
8800: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
8801: p_rank IN NUMBER := FND_API.G_MISS_NUM,
8802: p_start_date IN DATE,
8803: p_end_date IN DATE := FND_API.G_MISS_DATE,
8804: p_copy_rsc_flag IN VARCHAR2 := 'N',

Line 8801: p_rank IN NUMBER := FND_API.G_MISS_NUM,

8797: retcode OUT NOCOPY VARCHAR2,
8798: p_copy_source_terr_Id IN NUMBER,
8799: p_name IN VARCHAR2,
8800: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
8801: p_rank IN NUMBER := FND_API.G_MISS_NUM,
8802: p_start_date IN DATE,
8803: p_end_date IN DATE := FND_API.G_MISS_DATE,
8804: p_copy_rsc_flag IN VARCHAR2 := 'N',
8805: p_copy_hierarchy_flag IN VARCHAR2 := 'N',

Line 8803: p_end_date IN DATE := FND_API.G_MISS_DATE,

8799: p_name IN VARCHAR2,
8800: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
8801: p_rank IN NUMBER := FND_API.G_MISS_NUM,
8802: p_start_date IN DATE,
8803: p_end_date IN DATE := FND_API.G_MISS_DATE,
8804: p_copy_rsc_flag IN VARCHAR2 := 'N',
8805: p_copy_hierarchy_flag IN VARCHAR2 := 'N',
8806: p_first_terr_node_flag IN VARCHAR2 := 'N',
8807: p_debug_flag IN VARCHAR2 := 'N',

Line 8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;

8857: l_terr_rec.START_DATE_ACTIVE := p_start_date;
8858: l_terr_rec.END_DATE_ACTIVE := p_end_date;
8859:
8860: l_terr_rec.ENABLED_FLAG := 'Y';
8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;

Line 8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;

8858: l_terr_rec.END_DATE_ACTIVE := p_end_date;
8859:
8860: l_terr_rec.ENABLED_FLAG := 'Y';
8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;

Line 8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;

8859:
8860: l_terr_rec.ENABLED_FLAG := 'Y';
8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;

Line 8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;

8860: l_terr_rec.ENABLED_FLAG := 'Y';
8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;

Line 8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;

8861: l_terr_rec.TERR_ID := FND_API.G_MISS_NUM;
8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;

Line 8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;

8862: l_terr_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;

Line 8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;

8863: l_terr_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;

Line 8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;

8864: l_terr_rec.CREATION_DATE := FND_API.G_MISS_DATE;
8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;

Line 8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;

8865: l_terr_rec.CREATED_BY := FND_API.G_MISS_NUM;
8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;

Line 8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;

8866: l_terr_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;

Line 8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;

8867: l_terr_rec.APPLICATION_SHORT_NAME := FND_API.G_MISS_CHAR;
8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;

Line 8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;

8868: l_terr_rec.REQUEST_ID := FND_API.G_MISS_NUM;
8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;

Line 8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;

8869: l_terr_rec.PROGRAM_APPLICATION_ID := FND_API.G_MISS_NUM;
8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;

Line 8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;

8870: l_terr_rec.PROGRAM_ID := FND_API.G_MISS_NUM;
8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;

Line 8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;

8871: l_terr_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;

Line 8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;

8872: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;

Line 8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;

8873: l_terr_rec.UPDATE_FLAG := FND_API.G_MISS_CHAR;
8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;

Line 8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;

8874: l_terr_rec.AUTO_ASSIGN_RESOURCES_FLAG := FND_API.G_MISS_CHAR;
8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;

Line 8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;

8875: l_terr_rec.PLANNED_FLAG := FND_API.G_MISS_CHAR;
8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;

Line 8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;

8876: l_terr_rec.TERRITORY_TYPE_ID := FND_API.G_MISS_NUM;
8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;

Line 8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;

8877: l_terr_rec.PARENT_TERRITORY_ID := FND_API.G_MISS_NUM;
8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;

Line 8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;

8878: l_terr_rec.TEMPLATE_FLAG := FND_API.G_MISS_CHAR;
8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;

Line 8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;

8879: l_terr_rec.TEMPLATE_TERRITORY_ID := FND_API.G_MISS_NUM;
8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;

Line 8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;

8880: l_terr_rec.ESCALATION_TERRITORY_FLAG := FND_API.G_MISS_CHAR;
8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;

Line 8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;

8881: l_terr_rec.ESCALATION_TERRITORY_ID := FND_API.G_MISS_NUM;
8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;

Line 8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;

8882: l_terr_rec.OVERLAP_ALLOWED_FLAG := FND_API.G_MISS_CHAR;
8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;

Line 8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;

8883: l_terr_rec.ATTRIBUTE_CATEGORY := FND_API.G_MISS_CHAR;
8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;

Line 8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;

8884: l_terr_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;

Line 8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;

8885: l_terr_rec.ATTRIBUTE2 := FND_API.G_MISS_CHAR;
8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;

Line 8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;

8886: l_terr_rec.ATTRIBUTE3 := FND_API.G_MISS_CHAR;
8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;

Line 8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;

8887: l_terr_rec.ATTRIBUTE4 := FND_API.G_MISS_CHAR;
8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;

Line 8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;

8888: l_terr_rec.ATTRIBUTE5 := FND_API.G_MISS_CHAR;
8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;

Line 8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;

8889: l_terr_rec.ATTRIBUTE6 := FND_API.G_MISS_CHAR;
8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;

Line 8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;

8890: l_terr_rec.ATTRIBUTE7 := FND_API.G_MISS_CHAR;
8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;

Line 8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;

8891: l_terr_rec.ATTRIBUTE8 := FND_API.G_MISS_CHAR;
8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;

Line 8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;

8892: l_terr_rec.ATTRIBUTE9 := FND_API.G_MISS_CHAR;
8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;

Line 8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;

8893: l_terr_rec.ATTRIBUTE10 := FND_API.G_MISS_CHAR;
8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;
8901:

Line 8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;

8894: l_terr_rec.ATTRIBUTE11 := FND_API.G_MISS_CHAR;
8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;
8901:
8902: JTF_TERRITORY_PVT.Copy_Territory (

Line 8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;

8895: l_terr_rec.ATTRIBUTE12 := FND_API.G_MISS_CHAR;
8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;
8901:
8902: JTF_TERRITORY_PVT.Copy_Territory (
8903: p_Api_Version_Number => l_Api_Version_Number,

Line 8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;

8896: l_terr_rec.ATTRIBUTE13 := FND_API.G_MISS_CHAR;
8897: l_terr_rec.ATTRIBUTE14 := FND_API.G_MISS_CHAR;
8898: l_terr_rec.ATTRIBUTE15 := FND_API.G_MISS_CHAR;
8899: l_terr_rec.ORG_ID := FND_API.G_MISS_NUM;
8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;
8901:
8902: JTF_TERRITORY_PVT.Copy_Territory (
8903: p_Api_Version_Number => l_Api_Version_Number,
8904: p_Init_Msg_List => FND_API.G_TRUE,

Line 8904: p_Init_Msg_List => FND_API.G_TRUE,

8900: l_terr_rec.NUM_WINNERS := FND_API.G_MISS_NUM;
8901:
8902: JTF_TERRITORY_PVT.Copy_Territory (
8903: p_Api_Version_Number => l_Api_Version_Number,
8904: p_Init_Msg_List => FND_API.G_TRUE,
8905: p_Commit => FND_API.G_TRUE,
8906: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
8907: p_copy_source_terr_Id => p_copy_source_terr_Id,
8908: p_new_terr_rec => l_terr_rec,

Line 8905: p_Commit => FND_API.G_TRUE,

8901:
8902: JTF_TERRITORY_PVT.Copy_Territory (
8903: p_Api_Version_Number => l_Api_Version_Number,
8904: p_Init_Msg_List => FND_API.G_TRUE,
8905: p_Commit => FND_API.G_TRUE,
8906: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
8907: p_copy_source_terr_Id => p_copy_source_terr_Id,
8908: p_new_terr_rec => l_terr_rec,
8909: p_copy_rsc_flag => p_copy_rsc_flag,

Line 8906: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

8902: JTF_TERRITORY_PVT.Copy_Territory (
8903: p_Api_Version_Number => l_Api_Version_Number,
8904: p_Init_Msg_List => FND_API.G_TRUE,
8905: p_Commit => FND_API.G_TRUE,
8906: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
8907: p_copy_source_terr_Id => p_copy_source_terr_Id,
8908: p_new_terr_rec => l_terr_rec,
8909: p_copy_rsc_flag => p_copy_rsc_flag,
8910: p_copy_hierarchy_flag => p_copy_hierarchy_flag,

Line 8919: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

8915: x_terr_id => l_terr_id );
8916:
8917: --dbms_output.put_line('***l_return_status ' ||l_return_status);
8918:
8919: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
8920:
8921: IF (G_Debug) THEN
8922: Write_Log(2, 'Copy Territories hierarchy has NOT completed successfully');
8923: errbuf := 'Program completed with errors';

Line 9006: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,

9002:
9003: FUNCTION conc_req_copy_terr (
9004: p_copy_source_terr_Id IN NUMBER,
9005: p_name IN VARCHAR2,
9006: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
9007: p_rank IN NUMBER := FND_API.G_MISS_NUM,
9008: p_start_date IN DATE,
9009: p_end_date IN DATE := FND_API.G_MISS_DATE,
9010: p_copy_rsc_flag IN VARCHAR2 := 'N',

Line 9007: p_rank IN NUMBER := FND_API.G_MISS_NUM,

9003: FUNCTION conc_req_copy_terr (
9004: p_copy_source_terr_Id IN NUMBER,
9005: p_name IN VARCHAR2,
9006: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
9007: p_rank IN NUMBER := FND_API.G_MISS_NUM,
9008: p_start_date IN DATE,
9009: p_end_date IN DATE := FND_API.G_MISS_DATE,
9010: p_copy_rsc_flag IN VARCHAR2 := 'N',
9011: p_copy_hierarchy_flag IN VARCHAR2 := 'N',

Line 9009: p_end_date IN DATE := FND_API.G_MISS_DATE,

9005: p_name IN VARCHAR2,
9006: p_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
9007: p_rank IN NUMBER := FND_API.G_MISS_NUM,
9008: p_start_date IN DATE,
9009: p_end_date IN DATE := FND_API.G_MISS_DATE,
9010: p_copy_rsc_flag IN VARCHAR2 := 'N',
9011: p_copy_hierarchy_flag IN VARCHAR2 := 'N',
9012: p_first_terr_node_flag IN VARCHAR2 := 'N'
9013: )

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

9048: -- check that parent territory is not already a child of this territory
9049: -- circular reference check
9050: PROCEDURE validate_parent(
9051: p_Terr_All_Rec IN Terr_All_Rec_Type := G_Miss_Terr_All_Rec,
9052: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
9053: x_Return_Status OUT NOCOPY VARCHAR2,
9054: x_msg_count OUT NOCOPY NUMBER,
9055: x_msg_data OUT NOCOPY VARCHAR2 )
9056: AS

Line 9068: x_return_status := FND_API.G_RET_STS_SUCCESS;

9064: BEGIN
9065:
9066: --dbms_output.put_line('[1]Validate_Parent: Entering API ');
9067: -- Initialize the status to success
9068: x_return_status := FND_API.G_RET_STS_SUCCESS;
9069:
9070: --dbms_output.put_line('[2]Validate_Parent: Entering API ');
9071:
9072: BEGIN

Line 9119: X_return_status := FND_API.G_RET_STS_ERROR;

9115:
9116: WHEN e_Circular_Reference THEN
9117: --dbms_output.put_line('Validate_Parent: e_Circular_Reference exception' || SQLERRM);
9118:
9119: X_return_status := FND_API.G_RET_STS_ERROR;
9120:
9121: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_EXPECTED_ERROR');
9122: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
9123: FND_MESSAGE.Set_Token('ERROR', sqlerrm );

Line 9131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

9127: ( p_count => x_msg_count,
9128: p_data => x_msg_data
9129: );
9130:
9131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9132: --dbms_output.put_line('Validate_Parent: FND_API.G_EXC_UNEXPECTED_ERROR');
9133: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9134: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
9135: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );

Line 9132: --dbms_output.put_line('Validate_Parent: FND_API.G_EXC_UNEXPECTED_ERROR');

9128: p_data => x_msg_data
9129: );
9130:
9131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9132: --dbms_output.put_line('Validate_Parent: FND_API.G_EXC_UNEXPECTED_ERROR');
9133: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9134: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
9135: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
9136: FND_MSG_PUB.Count_And_Get

Line 9133: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9129: );
9130:
9131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9132: --dbms_output.put_line('Validate_Parent: FND_API.G_EXC_UNEXPECTED_ERROR');
9133: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9134: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
9135: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
9136: FND_MSG_PUB.Count_And_Get
9137: ( P_count => x_msg_count,

Line 9143: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9139: );
9140:
9141: WHEN OTHERS THEN
9142: --dbms_output.put_line('Validate_Parent: Others exception' || SQLERRM);
9143: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9144: FND_MESSAGE.Set_Name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
9145: FND_MESSAGE.Set_Token('PROC_NAME', 'Validate_Parent' );
9146: FND_MESSAGE.Set_Token('ERROR', sqlerrm );
9147: FND_MSG_PUB.ADD;

Line 9161: , p_column_count NUMBER := FND_API.G_MISS_NUM

9157: */
9158: FUNCTION get_terr_value_desc (
9159: p_convert_to_id_flag VARCHAR2
9160: , p_display_type VARCHAR2
9161: , p_column_count NUMBER := FND_API.G_MISS_NUM
9162: , p_display_sql VARCHAR2 := FND_API.G_MISS_CHAR
9163: , p_terr_value1 VARCHAR2
9164: , p_terr_value2 VARCHAR2 := FND_API.G_MISS_CHAR
9165: )

Line 9162: , p_display_sql VARCHAR2 := FND_API.G_MISS_CHAR

9158: FUNCTION get_terr_value_desc (
9159: p_convert_to_id_flag VARCHAR2
9160: , p_display_type VARCHAR2
9161: , p_column_count NUMBER := FND_API.G_MISS_NUM
9162: , p_display_sql VARCHAR2 := FND_API.G_MISS_CHAR
9163: , p_terr_value1 VARCHAR2
9164: , p_terr_value2 VARCHAR2 := FND_API.G_MISS_CHAR
9165: )
9166: RETURN VARCHAR2 IS

Line 9164: , p_terr_value2 VARCHAR2 := FND_API.G_MISS_CHAR

9160: , p_display_type VARCHAR2
9161: , p_column_count NUMBER := FND_API.G_MISS_NUM
9162: , p_display_sql VARCHAR2 := FND_API.G_MISS_CHAR
9163: , p_terr_value1 VARCHAR2
9164: , p_terr_value2 VARCHAR2 := FND_API.G_MISS_CHAR
9165: )
9166: RETURN VARCHAR2 IS
9167:
9168: query_str VARCHAR2(1000);

Line 9175: IF ( p_display_sql = FND_API.G_MISS_CHAR OR

9171: l_terr_value2 VARCHAR2(360);
9172:
9173: BEGIN
9174:
9175: IF ( p_display_sql = FND_API.G_MISS_CHAR OR
9176: p_display_sql IS NULL) THEN
9177:
9178: --dbms_output( 'LOV_SQL IS NULL, returning value = ' || p_terr_value);
9179: