[Home] [Help]
54:
55: -- Initialize message list if p_init_msg_list is set to TRUE.
56: IF FND_API.to_Boolean( p_init_msg_list )
57: THEN
58: FND_MSG_PUB.initialize;
59: END IF;
60:
61:
62: -- Debug Message
59: END IF;
60:
61:
62: -- Debug Message
63: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'start');
64:
65:
66: -- Initialize API return status to SUCCESS
67: x_return_status := FND_API.G_RET_STS_SUCCESS;
91: -- Validate Environment
92: -- ******************************************************************
93: IF FND_GLOBAL.User_Id IS NULL
94: THEN
95: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
96: THEN
97: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
98: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
99: FND_MSG_PUB.ADD;
95: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
96: THEN
97: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
98: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
99: FND_MSG_PUB.ADD;
100: END IF;
101: RAISE FND_API.G_EXC_ERROR;
102: END IF;
103: /*
118:
119: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
120: THEN
121: -- Debug message
122: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Validate_repjobxref');
123:
124: -- Invoke validation procedures
125: Validate_repjobxref(
126: p_init_msg_list => FND_API.G_FALSE,
138:
139: -- Hint: Add corresponding Master-Detail business logic here if necessary.
140:
141: -- Debug Message
142: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Calling create table handler');
143:
144: -- Invoke table handler(CSD_REPAIR_JOB_XREF_PKG.Insert_Row)
145: CSD_REPAIR_JOB_XREF_PKG.Insert_Row(
146: px_REPAIR_JOB_XREF_ID => x_REPAIR_JOB_XREF_ID,
196: END IF;
197:
198:
199: -- Debug Message
200: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
201:
202:
203: -- Standard call to get message count and if count is 1, get message info.
204: FND_MSG_PUB.Count_And_Get
200: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
201:
202:
203: -- Standard call to get message count and if count is 1, get message info.
204: FND_MSG_PUB.Count_And_Get
205: ( p_count => x_msg_count,
206: p_data => x_msg_data
207: );
208:
227: WHEN FND_API.G_EXC_ERROR THEN
228: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
229: P_API_NAME => L_API_NAME
230: ,P_PKG_NAME => G_PKG_NAME
231: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
232: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
233: ,X_MSG_COUNT => X_MSG_COUNT
234: ,X_MSG_DATA => X_MSG_DATA
235: ,X_RETURN_STATUS => X_RETURN_STATUS);
238: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
239: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
240: P_API_NAME => L_API_NAME
241: ,P_PKG_NAME => G_PKG_NAME
242: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
243: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
244: ,X_MSG_COUNT => X_MSG_COUNT
245: ,X_MSG_DATA => X_MSG_DATA
246: ,X_RETURN_STATUS => X_RETURN_STATUS);
334:
335: -- Initialize message list if p_init_msg_list is set to TRUE.
336: IF FND_API.to_Boolean( p_init_msg_list )
337: THEN
338: FND_MSG_PUB.initialize;
339: END IF;
340:
341:
342: -- Debug Message
339: END IF;
340:
341:
342: -- Debug Message
343: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'start');
344:
345:
346: -- Initialize API return status to SUCCESS
347: x_return_status := FND_API.G_RET_STS_SUCCESS;
381: END IF;
382: */
383:
384: -- Debug Message
385: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: - Open Cursor to Select');
386:
387: /*
388: Open C_Get_repjobxref( l_tar_REPJOBXREF_rec.REPAIR_JOB_XREF_ID);
389:
422: l_ref_REPJOBXREF_rec.ATTRIBUTE15,
423: l_ref_REPJOBXREF_rec.QUANTITY_COMPLETED;
424:
425: If ( C_Get_repjobxref%NOTFOUND) Then
426: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
427: THEN
428: FND_MESSAGE.Set_Name('CSD', 'API_MISSING_UPDATE_TARGET');
429: FND_MESSAGE.Set_Token ('INFO', 'repjobxref', FALSE);
430: FND_MSG_PUB.Add;
426: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
427: THEN
428: FND_MESSAGE.Set_Name('CSD', 'API_MISSING_UPDATE_TARGET');
429: FND_MESSAGE.Set_Token ('INFO', 'repjobxref', FALSE);
430: FND_MSG_PUB.Add;
431: END IF;
432: raise FND_API.G_EXC_ERROR;
433: END IF;
434: -- Debug Message
431: END IF;
432: raise FND_API.G_EXC_ERROR;
433: END IF;
434: -- Debug Message
435: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: - Close Cursor');
436: Close C_Get_repjobxref;
437: */
438:
439:
438:
439:
440: If (l_tar_REPJOBXREF_rec.last_update_date is NULL or
441: l_tar_REPJOBXREF_rec.last_update_date = FND_API.G_MISS_Date ) Then
442: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
443: THEN
444: FND_MESSAGE.Set_Name('CSD', 'API_MISSING_ID');
445: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
446: FND_MSG_PUB.ADD;
442: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
443: THEN
444: FND_MESSAGE.Set_Name('CSD', 'API_MISSING_ID');
445: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
446: FND_MSG_PUB.ADD;
447: END IF;
448: raise FND_API.G_EXC_ERROR;
449: End if;
450: -- Check Whether record has been changed by someone else
448: raise FND_API.G_EXC_ERROR;
449: End if;
450: -- Check Whether record has been changed by someone else
451: If (l_tar_REPJOBXREF_rec.last_update_date <> l_ref_REPJOBXREF_rec.last_update_date) Then
452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
453: THEN
454: FND_MESSAGE.Set_Name('CSD', 'API_RECORD_CHANGED');
455: FND_MESSAGE.Set_Token('INFO', 'repjobxref', FALSE);
456: FND_MSG_PUB.ADD;
452: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
453: THEN
454: FND_MESSAGE.Set_Name('CSD', 'API_RECORD_CHANGED');
455: FND_MESSAGE.Set_Token('INFO', 'repjobxref', FALSE);
456: FND_MSG_PUB.ADD;
457: END IF;
458: raise FND_API.G_EXC_ERROR;
459: End if;
460:
460:
461: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
462: THEN
463: -- Debug message
464: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Validate_repjobxref');
465:
466: -- Invoke validation procedures
467: Validate_repjobxref(
468: p_init_msg_list => FND_API.G_FALSE,
480:
481: -- Hint: Add corresponding Master-Detail business logic here if necessary.
482:
483: -- Debug Message
484: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Calling update table handler');
485:
486: -- travi changes
487: -- Invoke table handler(CSD_REPAIR_JOB_XREF_PKG.Update_Row)
488: CSD_REPAIR_JOB_XREF_PKG.Update_Row(
528: END IF;
529:
530:
531: -- Debug Message
532: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
533:
534:
535: -- Standard call to get message count and if count is 1, get message info.
536: FND_MSG_PUB.Count_And_Get
532: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
533:
534:
535: -- Standard call to get message count and if count is 1, get message info.
536: FND_MSG_PUB.Count_And_Get
537: ( p_count => x_msg_count,
538: p_data => x_msg_data
539: );
540:
560: WHEN FND_API.G_EXC_ERROR THEN
561: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
562: P_API_NAME => L_API_NAME
563: ,P_PKG_NAME => G_PKG_NAME
564: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
565: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
566: ,X_MSG_COUNT => X_MSG_COUNT
567: ,X_MSG_DATA => X_MSG_DATA
568: ,X_RETURN_STATUS => X_RETURN_STATUS);
571: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
572: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
573: P_API_NAME => L_API_NAME
574: ,P_PKG_NAME => G_PKG_NAME
575: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
576: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
577: ,X_MSG_COUNT => X_MSG_COUNT
578: ,X_MSG_DATA => X_MSG_DATA
579: ,X_RETURN_STATUS => X_RETURN_STATUS);
625:
626: -- Initialize message list if p_init_msg_list is set to TRUE.
627: IF FND_API.to_Boolean( p_init_msg_list )
628: THEN
629: FND_MSG_PUB.initialize;
630: END IF;
631:
632:
633: -- Debug Message
630: END IF;
631:
632:
633: -- Debug Message
634: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'start');
635:
636:
637: -- Initialize API return status to SUCCESS
638: x_return_status := FND_API.G_RET_STS_SUCCESS;
672: RAISE FND_API.G_EXC_ERROR;
673: END IF;
674: */
675: -- Debug Message
676: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Calling delete table handler');
677:
678: -- Invoke table handler(CSD_REPAIR_JOB_XREF_PKG.Delete_Row)
679: CSD_REPAIR_JOB_XREF_PKG.Delete_Row(
680: p_REPAIR_JOB_XREF_ID => p_REPJOBXREF_rec.REPAIR_JOB_XREF_ID);
689: END IF;
690:
691:
692: -- Debug Message
693: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
694:
695:
696: -- Standard call to get message count and if count is 1, get message info.
697: FND_MSG_PUB.Count_And_Get
693: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
694:
695:
696: -- Standard call to get message count and if count is 1, get message info.
697: FND_MSG_PUB.Count_And_Get
698: ( p_count => x_msg_count,
699: p_data => x_msg_data
700: );
701:
721: WHEN FND_API.G_EXC_ERROR THEN
722: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
723: P_API_NAME => L_API_NAME
724: ,P_PKG_NAME => G_PKG_NAME
725: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
726: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
727: ,X_MSG_COUNT => X_MSG_COUNT
728: ,X_MSG_DATA => X_MSG_DATA
729: ,X_RETURN_STATUS => X_RETURN_STATUS);
732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
733: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
734: P_API_NAME => L_API_NAME
735: ,P_PKG_NAME => G_PKG_NAME
736: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
737: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
738: ,X_MSG_COUNT => X_MSG_COUNT
739: ,X_MSG_DATA => X_MSG_DATA
740: ,X_RETURN_STATUS => X_RETURN_STATUS);
760: )
761: IS
762: BEGIN
763: -- Debug Message
764: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Define Columns Begins');
765:
766: -- travi changes
767: -- define all columns for CSD_REPAIR_JOB_XREF_V view
768: dbms_sql.define_column(p_cur_get_REPJOBXREF, 1, P_REPJOBXREF_Rec.REPAIR_JOB_XREF_ID);
793:
794: dbms_sql.define_column(p_cur_get_REPJOBXREF, 26, P_REPJOBXREF_Rec.QUANTITY_COMPLETED);
795:
796: -- Debug Message
797: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Define Columns Ends');
798: END Define_Columns;
799:
800: -- This procudure gets column values by the Dynamic SQL.
801: PROCEDURE Get_Column_Values(
804: )
805: IS
806: BEGIN
807: -- Debug Message
808: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Get Column Values Begins');
809:
810: -- travi changes
811: -- get all column values for CSD_REPAIR_JOB_XREF_V table
812: dbms_sql.column_value(p_cur_get_REPJOBXREF, 1, X_REPJOBXREF_Rec.REPAIR_JOB_XREF_ID);
837:
838: dbms_sql.column_value(p_cur_get_REPJOBXREF, 26, X_REPJOBXREF_Rec.QUANTITY_COMPLETED);
839:
840: -- Debug Message
841: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Get Column Values Ends');
842: END Get_Column_Values;
843:
844: PROCEDURE Gen_REPJOBXREF_order_cl(
845: p_order_by_rec IN REPJOBXREF_sort_rec_type,
852: l_order_by_cl VARCHAR2(1000) := NULL;
853: l_util_order_by_tbl JTF_PLSQL_API.Util_order_by_tbl_type;
854: BEGIN
855: -- Debug Message
856: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Order by Begins');
857:
858: -- Hint: Developer should add more statements according to CSD_sort_rec_type
859: -- Ex:
860: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
860: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
861: -- l_util_order_by_tbl(1).col_name := 'Customer_Name';
862:
863: -- Debug Message
864: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Invoke JTF_PLSQL_API.Translate_OrderBy');
865:
866: JTF_PLSQL_API.Translate_OrderBy(
867: p_api_version_number => 1.0
868: ,p_init_msg_list => FND_API.G_FALSE
879: x_order_by_cl := NULL;
880: END IF;
881:
882: -- Debug Message
883: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Order by Ends');
884: END Gen_REPJOBXREF_order_cl;
885:
886: -- This procedure bind the variables for the Dynamic SQL
887: PROCEDURE Bind(
893: BEGIN
894: -- Bind variables
895: -- Only those that are not NULL
896: -- Debug Message
897: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Bind Variables Begins');
898:
899: -- The following example applies to all columns,
900: -- developers can copy and paste them.
901: IF( (P_REPJOBXREF_Rec.REPAIR_JOB_XREF_ID IS NOT NULL) AND (P_REPJOBXREF_Rec.REPAIR_JOB_XREF_ID <> FND_API.G_MISS_NUM) )
903: DBMS_SQL.BIND_VARIABLE(p_cur_get_REPJOBXREF, ':p_REPAIR_JOB_XREF_ID', P_REPJOBXREF_Rec.REPAIR_JOB_XREF_ID);
904: END IF;
905:
906: -- Debug Message
907: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Bind Variables Ends');
908: END Bind;
909:
910: PROCEDURE Gen_Select(
911: x_select_cl OUT NOCOPY VARCHAR2
912: )
913: IS
914: BEGIN
915: -- Debug Message
916: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Select Begins');
917:
918: -- travi changes
919: x_select_cl := 'Select ' ||
920: 'CSD_REPAIR_JOB_XREF_V.REPAIR_JOB_XREF_ID,' ||
949: 'CSD_REPAIR_JOB_XREF_V.ATTRIBUTE15,' ||
950: 'CSD_REPAIR_JOB_XREF_V.QUANTITY_COMPLETED,' ||
951: 'from CSD_REPAIR_JOB_XREF_V';
952: -- Debug Message
953: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Select Ends');
954:
955: END Gen_Select;
956:
957: PROCEDURE Gen_REPJOBXREF_Where(
973: str_csr2 NUMBER;
974: l_operator VARCHAR2(10);
975: BEGIN
976: -- Debug Message
977: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Where Begins');
978:
979: -- There are three examples for each kind of datatype:
980: -- NUMBER, DATE, VARCHAR2.
981: -- Developer can copy and paste the following codes for your own record.
1059:
1060: -- Add more IF statements for each column below
1061:
1062: -- Debug Message
1063: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generate Where Ends');
1064:
1065: END Gen_REPJOBXREF_Where;
1066:
1067: PROCEDURE Get_repjobxref(
1137:
1138: -- Initialize message list if p_init_msg_list is set to TRUE.
1139: IF FND_API.to_Boolean( p_init_msg_list )
1140: THEN
1141: FND_MSG_PUB.initialize;
1142: END IF;
1143:
1144:
1145: -- Debug Message
1142: END IF;
1143:
1144:
1145: -- Debug Message
1146: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'start');
1147:
1148:
1149: -- Initialize API return status to SUCCESS
1150: x_return_status := FND_API.G_RET_STS_SUCCESS;
1169: -- Generate Dynamic SQL based on criteria passed in.
1170: -- Doing this for performance. Indexes are disabled when using NVL within static SQL statement.
1171: -- Ignore condition when criteria is NULL
1172: -- Debug Message
1173: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Generating Dsql');
1174: -- Generate Select clause and From clause
1175: -- Hint: Developer should modify Gen_Select procedure.
1176: Gen_Select(l_select_cl);
1177:
1212: -- Generate order by clause
1213: Gen_REPJOBXREF_order_cl(p_order_by_rec, l_order_by_cl, l_return_status, x_msg_count, x_msg_data);
1214:
1215: -- Debug Message
1216: JTF_PLSQL_API.Debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Open and Parse Cursor');
1217:
1218: l_cur_get_REPJOBXREF := dbms_sql.open_cursor;
1219:
1220: -- Hint: concatenate all where clause (include flex field/line level if any applies)
1238: Define_Columns(l_crit_REPJOBXREF_rec, l_cur_get_REPJOBXREF);
1239:
1240: -- Execute
1241: -- Debug Message
1242: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Execute Dsql');
1243:
1244: l_ignore := dbms_sql.execute(l_cur_get_REPJOBXREF);
1245:
1246: -- Debug Message
1243:
1244: l_ignore := dbms_sql.execute(l_cur_get_REPJOBXREF);
1245:
1246: -- Debug Message
1247: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: Fetch Results');
1248:
1249: -- This loop is here to avoid calling a function in the main
1250: -- cursor. Basically, calling this function seems to disable
1251: -- index, but verification is needed. This is a good
1258: IF((dbms_sql.fetch_rows(l_cur_get_REPJOBXREF)>0) AND ((p_return_tot_count = FND_API.G_TRUE)
1259: OR (l_returned_rec_count
1261: -- Debug Message
1262: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: found');
1263:
1264: -- Hint: Developer need to implement this part
1265: -- dbms_sql.column_value(l_cur_get_opp, 1, l_opp_rec.lead_id);
1266: -- dbms_sql.column_value(l_cur_get_opp, 7, l_opp_rec.customer_id);
1290: -- End of API body
1291: --
1292:
1293: -- Debug Message
1294: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
1295:
1296:
1297: -- Standard call to get message count and if count is 1, get message info.
1298: FND_MSG_PUB.Count_And_Get
1294: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
1295:
1296:
1297: -- Standard call to get message count and if count is 1, get message info.
1298: FND_MSG_PUB.Count_And_Get
1299: ( p_count => x_msg_count,
1300: p_data => x_msg_data
1301: );
1302:
1304: WHEN FND_API.G_EXC_ERROR THEN
1305: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1306: P_API_NAME => L_API_NAME
1307: ,P_PKG_NAME => G_PKG_NAME
1308: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1309: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1310: ,X_MSG_COUNT => X_MSG_COUNT
1311: ,X_MSG_DATA => X_MSG_DATA
1312: ,X_RETURN_STATUS => X_RETURN_STATUS);
1315: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1316: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1317: P_API_NAME => L_API_NAME
1318: ,P_PKG_NAME => G_PKG_NAME
1319: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1320: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1321: ,X_MSG_COUNT => X_MSG_COUNT
1322: ,X_MSG_DATA => X_MSG_DATA
1323: ,X_RETURN_STATUS => X_RETURN_STATUS);
1351:
1352: -- Initialize message list if p_init_msg_list is set to TRUE.
1353: IF FND_API.to_Boolean( p_init_msg_list )
1354: THEN
1355: FND_MSG_PUB.initialize;
1356: END IF;
1357:
1358:
1359: -- Initialize API return status to SUCCESS
1361:
1362: -- validate NOT NULL column
1363: IF(p_REPAIR_JOB_XREF_ID is NULL)
1364: THEN
1365: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(REPAIR_JOB_XREF_ID)');
1366: x_return_status := FND_API.G_RET_STS_ERROR;
1367: END IF;
1368:
1369: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1382: NULL;
1383: END IF;
1384:
1385: -- Standard call to get message count and if count is 1, get message info.
1386: FND_MSG_PUB.Count_And_Get
1387: ( p_count => x_msg_count,
1388: p_data => x_msg_data
1389: );
1390:
1405:
1406: -- Initialize message list if p_init_msg_list is set to TRUE.
1407: IF FND_API.to_Boolean( p_init_msg_list )
1408: THEN
1409: FND_MSG_PUB.initialize;
1410: END IF;
1411:
1412:
1413: -- Initialize API return status to SUCCESS
1415:
1416: -- validate NOT NULL column
1417: IF(p_REPAIR_LINE_ID is NULL)
1418: THEN
1419: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(REPAIR_LINE_ID)');
1420: x_return_status := FND_API.G_RET_STS_ERROR;
1421: END IF;
1422:
1423: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1436: NULL;
1437: END IF;
1438:
1439: -- Standard call to get message count and if count is 1, get message info.
1440: FND_MSG_PUB.Count_And_Get
1441: ( p_count => x_msg_count,
1442: p_data => x_msg_data
1443: );
1444:
1459:
1460: -- Initialize message list if p_init_msg_list is set to TRUE.
1461: IF FND_API.to_Boolean( p_init_msg_list )
1462: THEN
1463: FND_MSG_PUB.initialize;
1464: END IF;
1465:
1466:
1467: -- Initialize API return status to SUCCESS
1469:
1470: -- validate NOT NULL column
1471: IF(p_WIP_ENTITY_ID is NULL)
1472: THEN
1473: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(WIP_ENTITY_ID)');
1474: x_return_status := FND_API.G_RET_STS_ERROR;
1475: END IF;
1476:
1477: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1490: NULL;
1491: END IF;
1492:
1493: -- Standard call to get message count and if count is 1, get message info.
1494: FND_MSG_PUB.Count_And_Get
1495: ( p_count => x_msg_count,
1496: p_data => x_msg_data
1497: );
1498:
1513:
1514: -- Initialize message list if p_init_msg_list is set to TRUE.
1515: IF FND_API.to_Boolean( p_init_msg_list )
1516: THEN
1517: FND_MSG_PUB.initialize;
1518: END IF;
1519:
1520:
1521: -- Initialize API return status to SUCCESS
1523:
1524: -- validate NOT NULL column
1525: IF(p_GROUP_ID is NULL)
1526: THEN
1527: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(GROUP_ID)');
1528: x_return_status := FND_API.G_RET_STS_ERROR;
1529: END IF;
1530:
1531: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1544: NULL;
1545: END IF;
1546:
1547: -- Standard call to get message count and if count is 1, get message info.
1548: FND_MSG_PUB.Count_And_Get
1549: ( p_count => x_msg_count,
1550: p_data => x_msg_data
1551: );
1552:
1567:
1568: -- Initialize message list if p_init_msg_list is set to TRUE.
1569: IF FND_API.to_Boolean( p_init_msg_list )
1570: THEN
1571: FND_MSG_PUB.initialize;
1572: END IF;
1573:
1574:
1575: -- Initialize API return status to SUCCESS
1577:
1578: -- validate NOT NULL column
1579: IF(p_ORGANIZATION_ID is NULL)
1580: THEN
1581: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(ORGANIZATION_ID)');
1582: x_return_status := FND_API.G_RET_STS_ERROR;
1583: END IF;
1584:
1585: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1598: NULL;
1599: END IF;
1600:
1601: -- Standard call to get message count and if count is 1, get message info.
1602: FND_MSG_PUB.Count_And_Get
1603: ( p_count => x_msg_count,
1604: p_data => x_msg_data
1605: );
1606:
1621:
1622: -- Initialize message list if p_init_msg_list is set to TRUE.
1623: IF FND_API.to_Boolean( p_init_msg_list )
1624: THEN
1625: FND_MSG_PUB.initialize;
1626: END IF;
1627:
1628:
1629: -- Initialize API return status to SUCCESS
1631:
1632: -- validate NOT NULL column
1633: IF(p_QUANTITY is NULL)
1634: THEN
1635: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSD', 'Private repjobxref API: -Violate NOT NULL constraint(QUANTITY)');
1636: x_return_status := FND_API.G_RET_STS_ERROR;
1637: END IF;
1638:
1639: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1652: NULL;
1653: END IF;
1654:
1655: -- Standard call to get message count and if count is 1, get message info.
1656: FND_MSG_PUB.Count_And_Get
1657: ( p_count => x_msg_count,
1658: p_data => x_msg_data
1659: );
1660:
1684:
1685: -- Initialize message list if p_init_msg_list is set to TRUE.
1686: IF FND_API.to_Boolean( p_init_msg_list )
1687: THEN
1688: FND_MSG_PUB.initialize;
1689: END IF;
1690:
1691:
1692: -- Initialize API return status to SUCCESS
1746:
1747: END IF;
1748:
1749: -- Standard call to get message count and if count is 1, get message info.
1750: FND_MSG_PUB.Count_And_Get
1751: ( p_count => x_msg_count,
1752: p_data => x_msg_data
1753: );
1754:
1771:
1772: -- Initialize message list if p_init_msg_list is set to TRUE.
1773: IF FND_API.to_Boolean( p_init_msg_list )
1774: THEN
1775: FND_MSG_PUB.initialize;
1776: END IF;
1777:
1778:
1779: -- Initialize API return status to SUCCESS
1784: -- THEN
1785: -- x_return_status := FND_API.G_RET_STS_ERROR;
1786:
1787: -- Debug Message
1788: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'API_INVALID_RECORD');
1789:
1790: -- Standard call to get message count and if count is 1, get message info.
1791: FND_MSG_PUB.Count_And_Get
1792: ( p_count => x_msg_count,
1787: -- Debug Message
1788: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'API_INVALID_RECORD');
1789:
1790: -- Standard call to get message count and if count is 1, get message info.
1791: FND_MSG_PUB.Count_And_Get
1792: ( p_count => x_msg_count,
1793: p_data => x_msg_data
1794: );
1795:
1808: l_api_name CONSTANT VARCHAR2(30) := 'Validate_repjobxref';
1809: BEGIN
1810:
1811: -- Debug Message
1812: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'start');
1813:
1814:
1815: -- Initialize API return status to SUCCESS
1816: x_return_status := FND_API.G_RET_STS_SUCCESS;
1933: END IF;
1934:
1935:
1936: -- Debug Message
1937: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSD', 'Private API: ' || l_api_name || 'end');
1938:
1939: END Validate_repjobxref;
1940:
1941: End CSD_REPair_JOB_XREF_PVT;