[Home] [Help]
49:
50: -- Initialize message list if p_init_msg_list is set to TRUE.
51: IF FND_API.to_Boolean( p_init_msg_list )
52: THEN
53: FND_MSG_PUB.initialize;
54: END IF;
55:
56:
57: -- Debug Message
54: END IF;
55:
56:
57: -- Debug Message
58: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'start');
59:
60:
61: -- Initialize API return status to SUCCESS
62: x_return_status := FND_API.G_RET_STS_SUCCESS;
86: -- Validate Environment
87: -- ******************************************************************
88: IF FND_GLOBAL.User_Id IS NULL
89: THEN
90: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
91: THEN
92: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
93: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
94: FND_MSG_PUB.ADD;
90: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
91: THEN
92: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
93: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
94: FND_MSG_PUB.ADD;
95: END IF;
96: RAISE FND_API.G_EXC_ERROR;
97: END IF;
98:
112: */
113: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
114: THEN
115: -- Debug message
116: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Validate_packlist_lines');
117:
118: -- Invoke validation procedures
119: Validate_packlist_lines(
120: p_init_msg_list => FND_API.G_FALSE,
132:
133: -- Hint: Add corresponding Master-Detail business logic here if necessary.
134:
135: -- Debug Message
136: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Calling create table handler');
137:
138: -- Invoke table handler(CSP_PACKLIST_LINES_PKG.Insert_Row)
139: CSP_PACKLIST_LINES_PKG.Insert_Row(
140: px_PACKLIST_LINE_ID => x_PACKLIST_LINE_ID,
189: END IF;
190:
191:
192: -- Debug Message
193: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
194:
195:
196: -- Standard call to get message count and if count is 1, get message info.
197: FND_MSG_PUB.Count_And_Get
193: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
194:
195:
196: -- Standard call to get message count and if count is 1, get message info.
197: FND_MSG_PUB.Count_And_Get
198: ( p_count => x_msg_count,
199: p_data => x_msg_data
200: );
201:
220: WHEN FND_API.G_EXC_ERROR THEN
221: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
222: P_API_NAME => L_API_NAME
223: ,P_PKG_NAME => G_PKG_NAME
224: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
225: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
226: ,X_MSG_COUNT => X_MSG_COUNT
227: ,X_MSG_DATA => X_MSG_DATA
228: ,X_RETURN_STATUS => X_RETURN_STATUS);
230: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
231: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
232: P_API_NAME => L_API_NAME
233: ,P_PKG_NAME => G_PKG_NAME
234: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
235: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
236: ,X_MSG_COUNT => X_MSG_COUNT
237: ,X_MSG_DATA => X_MSG_DATA
238: ,X_RETURN_STATUS => X_RETURN_STATUS);
327:
328: -- Initialize message list if p_init_msg_list is set to TRUE.
329: IF FND_API.to_Boolean( p_init_msg_list )
330: THEN
331: FND_MSG_PUB.initialize;
332: END IF;
333:
334:
335: -- Debug Message
332: END IF;
333:
334:
335: -- Debug Message
336: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'start');
337:
338:
339: -- Initialize API return status to SUCCESS
340: x_return_status := FND_API.G_RET_STS_SUCCESS;
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
375: */
376: -- Debug Message
377: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: - Open Cursor to Select');
378:
379: /*
380: Open C_Get_packlist_lines( l_tar_PLL_rec.PACKLIST_LINE_ID);
381:
416: l_ref_PLL_rec.UOM_CODE,
417: l_ref_PLL_rec.LINE_ID;
418:
419: If ( C_Get_packlist_lines%NOTFOUND) Then
420: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
421: THEN
422: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_UPDATE_TARGET');
423: FND_MESSAGE.Set_Token ('INFO', 'packlist_lines', FALSE);
424: FND_MSG_PUB.Add;
420: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
421: THEN
422: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_UPDATE_TARGET');
423: FND_MESSAGE.Set_Token ('INFO', 'packlist_lines', FALSE);
424: FND_MSG_PUB.Add;
425: END IF;
426: raise FND_API.G_EXC_ERROR;
427: END IF;
428: -- Debug Message
425: END IF;
426: raise FND_API.G_EXC_ERROR;
427: END IF;
428: -- Debug Message
429: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: - Close Cursor');
430: Close C_Get_packlist_lines;
431:
432:
433:
432:
433:
434: If (l_tar_PLL_rec.last_update_date is NULL or
435: l_tar_PLL_rec.last_update_date = FND_API.G_MISS_Date ) Then
436: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
437: THEN
438: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
439: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
440: FND_MSG_PUB.ADD;
436: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
437: THEN
438: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
439: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
440: FND_MSG_PUB.ADD;
441: END IF;
442: raise FND_API.G_EXC_ERROR;
443: End if;
444: -- Check Whether record has been changed by someone else
442: raise FND_API.G_EXC_ERROR;
443: End if;
444: -- Check Whether record has been changed by someone else
445: If (l_tar_PLL_rec.last_update_date <> l_ref_PLL_rec.last_update_date) Then
446: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
447: THEN
448: FND_MESSAGE.Set_Name('CSP', 'API_RECORD_CHANGED');
449: FND_MESSAGE.Set_Token('INFO', 'packlist_lines', FALSE);
450: FND_MSG_PUB.ADD;
446: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
447: THEN
448: FND_MESSAGE.Set_Name('CSP', 'API_RECORD_CHANGED');
449: FND_MESSAGE.Set_Token('INFO', 'packlist_lines', FALSE);
450: FND_MSG_PUB.ADD;
451: END IF;
452: raise FND_API.G_EXC_ERROR;
453: End if;
454: */
454: */
455: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
456: THEN
457: -- Debug message
458: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Validate_packlist_lines');
459:
460: -- Invoke validation procedures
461: Validate_packlist_lines(
462: p_init_msg_list => FND_API.G_FALSE,
474:
475: -- Hint: Add corresponding Master-Detail business logic here if necessary.
476:
477: -- Debug Message
478: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Calling update table handler');
479:
480: -- Invoke table handler(CSP_PACKLIST_LINES_PKG.Update_Row)
481: CSP_PACKLIST_LINES_PKG.Update_Row(
482: p_PACKLIST_LINE_ID => p_PLL_rec.PACKLIST_LINE_ID,
524: END IF;
525:
526:
527: -- Debug Message
528: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
529:
530:
531: -- Standard call to get message count and if count is 1, get message info.
532: FND_MSG_PUB.Count_And_Get
528: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
529:
530:
531: -- Standard call to get message count and if count is 1, get message info.
532: FND_MSG_PUB.Count_And_Get
533: ( p_count => x_msg_count,
534: p_data => x_msg_data
535: );
536:
556: WHEN FND_API.G_EXC_ERROR THEN
557: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
558: P_API_NAME => L_API_NAME
559: ,P_PKG_NAME => G_PKG_NAME
560: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
561: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
562: ,X_MSG_COUNT => X_MSG_COUNT
563: ,X_MSG_DATA => X_MSG_DATA
564: ,X_RETURN_STATUS => X_RETURN_STATUS);
566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
567: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
568: P_API_NAME => L_API_NAME
569: ,P_PKG_NAME => G_PKG_NAME
570: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
571: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
572: ,X_MSG_COUNT => X_MSG_COUNT
573: ,X_MSG_DATA => X_MSG_DATA
574: ,X_RETURN_STATUS => X_RETURN_STATUS);
619:
620: -- Initialize message list if p_init_msg_list is set to TRUE.
621: IF FND_API.to_Boolean( p_init_msg_list )
622: THEN
623: FND_MSG_PUB.initialize;
624: END IF;
625:
626:
627: -- Debug Message
624: END IF;
625:
626:
627: -- Debug Message
628: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'start');
629:
630:
631: -- Initialize API return status to SUCCESS
632: x_return_status := FND_API.G_RET_STS_SUCCESS;
665: RAISE FND_API.G_EXC_ERROR;
666: END IF;
667: */
668: -- Debug Message
669: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Calling delete table handler');
670:
671: -- Invoke table handler(CSP_PACKLIST_LINES_PKG.Delete_Row)
672: CSP_PACKLIST_LINES_PKG.Delete_Row(
673: p_PACKLIST_LINE_ID => p_PLL_rec.PACKLIST_LINE_ID);
682: END IF;
683:
684:
685: -- Debug Message
686: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
687:
688:
689: -- Standard call to get message count and if count is 1, get message info.
690: FND_MSG_PUB.Count_And_Get
686: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
687:
688:
689: -- Standard call to get message count and if count is 1, get message info.
690: FND_MSG_PUB.Count_And_Get
691: ( p_count => x_msg_count,
692: p_data => x_msg_data
693: );
694:
714: WHEN FND_API.G_EXC_ERROR THEN
715: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
716: P_API_NAME => L_API_NAME
717: ,P_PKG_NAME => G_PKG_NAME
718: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
719: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
720: ,X_MSG_COUNT => X_MSG_COUNT
721: ,X_MSG_DATA => X_MSG_DATA
722: ,X_RETURN_STATUS => X_RETURN_STATUS);
724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
725: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
726: P_API_NAME => L_API_NAME
727: ,P_PKG_NAME => G_PKG_NAME
728: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
729: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
730: ,X_MSG_COUNT => X_MSG_COUNT
731: ,X_MSG_DATA => X_MSG_DATA
732: ,X_RETURN_STATUS => X_RETURN_STATUS);
750: )
751: IS
752: BEGIN
753: -- Debug Message
754: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Define Columns Begins');
755:
756: -- define all columns for CSP_PACKLIST_LINES_V view
757: dbms_sql.define_column(p_cur_get_PLL, 1, P_PLL_Rec.PACKLIST_LINE_ID);
758: dbms_sql.define_column(p_cur_get_PLL, 2, P_PLL_Rec.ORGANIZATION_ID);
784: dbms_sql.define_column(p_cur_get_PLL, 28, P_PLL_Rec.UOM_CODE, 3);
785: dbms_sql.define_column(p_cur_get_PLL, 29, P_PLL_Rec.LINE_ID);
786:
787: -- Debug Message
788: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Define Columns Ends');
789: END Define_Columns;
790:
791: -- This procudure gets column values by the Dynamic SQL.
792: PROCEDURE Get_Column_Values(
795: )
796: IS
797: BEGIN
798: -- Debug Message
799: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Get Column Values Begins');
800:
801: -- get all column values for CSP_PACKLIST_LINES_V table
802: dbms_sql.column_value(p_cur_get_PLL, 1, X_PLL_Rec.PACKLIST_LINE_ID);
803: dbms_sql.column_value(p_cur_get_PLL, 2, X_PLL_Rec.ORGANIZATION_ID);
829: dbms_sql.column_value(p_cur_get_PLL, 28, X_PLL_Rec.UOM_CODE);
830: dbms_sql.column_value(p_cur_get_PLL, 29, X_PLL_Rec.LINE_ID);
831:
832: -- Debug Message
833: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Get Column Values Ends');
834: END Get_Column_Values;
835:
836: PROCEDURE Gen_PLL_order_cl(
837: p_order_by_rec IN CSP_PACKLIST_LINES_PUB.PLL_sort_rec_type,
844: l_order_by_cl VARCHAR2(1000) := NULL;
845: l_util_order_by_tbl JTF_PLSQL_API.Util_order_by_tbl_type;
846: BEGIN
847: -- Debug Message
848: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Order by Begins');
849:
850: -- Hint: Developer should add more statements according to CSP_sort_rec_type
851: -- Ex:
852: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
852: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
853: -- l_util_order_by_tbl(1).col_name := 'Customer_Name';
854:
855: -- Debug Message
856: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Invoke JTF_PLSQL_API.Translate_OrderBy');
857:
858: JTF_PLSQL_API.Translate_OrderBy(
859: p_api_version_number => 1.0
860: ,p_init_msg_list => FND_API.G_FALSE
871: x_order_by_cl := NULL;
872: END IF;
873:
874: -- Debug Message
875: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Order by Ends');
876: END Gen_PLL_order_cl;
877:
878: -- This procedure bind the variables for the Dynamic SQL
879: PROCEDURE Bind(
885: BEGIN
886: -- Bind variables
887: -- Only those that are not NULL
888: -- Debug Message
889: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Bind Variables Begins');
890:
891: -- The following example applies to all columns,
892: -- developers can copy and paste them.
893: IF( (P_PLL_Rec.PACKLIST_LINE_ID IS NOT NULL) AND (P_PLL_Rec.PACKLIST_LINE_ID <> FND_API.G_MISS_NUM) )
895: DBMS_SQL.BIND_VARIABLE(p_cur_get_PLL, ':p_PACKLIST_LINE_ID', P_PLL_Rec.PACKLIST_LINE_ID);
896: END IF;
897:
898: -- Debug Message
899: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Bind Variables Ends');
900: END Bind;
901:
902: PROCEDURE Gen_Select(
903: x_select_cl OUT NOCOPY VARCHAR2
904: )
905: IS
906: BEGIN
907: -- Debug Message
908: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Select Begins');
909:
910: x_select_cl := 'Select ' ||
911: 'CSP_PACKLIST_LINES_V.PACKLIST_LINE_ID,' ||
912: 'CSP_PACKLIST_LINES_V.CREATED_BY,' ||
943: 'CSP_PACKLIST_LINES_V.UOM_CODE,' ||
944: 'CSP_PACKLIST_LINES_V.LINE_ID,' ||
945: 'from CSP_PACKLIST_LINES_V';
946: -- Debug Message
947: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Select Ends');
948:
949: END Gen_Select;
950:
951: PROCEDURE Gen_PLL_Where(
967: str_csr2 NUMBER;
968: l_operator VARCHAR2(10);
969: BEGIN
970: -- Debug Message
971: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Where Begins');
972:
973: -- There are three examples for each kind of datatype:
974: -- NUMBER, DATE, VARCHAR2.
975: -- Developer can copy and paste the following codes for your own record.
1053:
1054: -- Add more IF statements for each column below
1055:
1056: -- Debug Message
1057: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: Generate Where Ends');
1058:
1059: END Gen_PLL_Where;
1060:
1061: -- Item-level validation procedures
1073:
1074: -- Initialize message list if p_init_msg_list is set to TRUE.
1075: IF FND_API.to_Boolean( p_init_msg_list )
1076: THEN
1077: FND_MSG_PUB.initialize;
1078: END IF;
1079:
1080:
1081: -- Initialize API return status to SUCCESS
1083:
1084: -- validate NOT NULL column
1085: IF(p_PACKLIST_LINE_ID is NULL)
1086: THEN
1087: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(PACKLIST_LINE_ID)');
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089: END IF;
1090:
1091: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1104: NULL;
1105: END IF;
1106:
1107: -- Standard call to get message count and if count is 1, get message info.
1108: FND_MSG_PUB.Count_And_Get
1109: ( p_count => x_msg_count,
1110: p_data => x_msg_data
1111: );
1112:
1127:
1128: -- Initialize message list if p_init_msg_list is set to TRUE.
1129: IF FND_API.to_Boolean( p_init_msg_list )
1130: THEN
1131: FND_MSG_PUB.initialize;
1132: END IF;
1133:
1134:
1135: -- Initialize API return status to SUCCESS
1137:
1138: -- validate NOT NULL column
1139: IF(p_ORGANIZATION_ID is NULL)
1140: THEN
1141: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(ORGANIZATION_ID)');
1142: x_return_status := FND_API.G_RET_STS_ERROR;
1143: END IF;
1144:
1145: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1158: NULL;
1159: END IF;
1160:
1161: -- Standard call to get message count and if count is 1, get message info.
1162: FND_MSG_PUB.Count_And_Get
1163: ( p_count => x_msg_count,
1164: p_data => x_msg_data
1165: );
1166:
1181:
1182: -- Initialize message list if p_init_msg_list is set to TRUE.
1183: IF FND_API.to_Boolean( p_init_msg_list )
1184: THEN
1185: FND_MSG_PUB.initialize;
1186: END IF;
1187:
1188:
1189: -- Initialize API return status to SUCCESS
1191:
1192: -- validate NOT NULL column
1193: IF(p_PACKLIST_LINE_NUMBER is NULL)
1194: THEN
1195: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(PACKLIST_LINE_NUMBER)');
1196: x_return_status := FND_API.G_RET_STS_ERROR;
1197: END IF;
1198:
1199: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1212: NULL;
1213: END IF;
1214:
1215: -- Standard call to get message count and if count is 1, get message info.
1216: FND_MSG_PUB.Count_And_Get
1217: ( p_count => x_msg_count,
1218: p_data => x_msg_data
1219: );
1220:
1235:
1236: -- Initialize message list if p_init_msg_list is set to TRUE.
1237: IF FND_API.to_Boolean( p_init_msg_list )
1238: THEN
1239: FND_MSG_PUB.initialize;
1240: END IF;
1241:
1242:
1243: -- Initialize API return status to SUCCESS
1245:
1246: -- validate NOT NULL column
1247: IF(p_PACKLIST_HEADER_ID is NULL)
1248: THEN
1249: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(PACKLIST_HEADER_ID)');
1250: x_return_status := FND_API.G_RET_STS_ERROR;
1251: END IF;
1252:
1253: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1266: NULL;
1267: END IF;
1268:
1269: -- Standard call to get message count and if count is 1, get message info.
1270: FND_MSG_PUB.Count_And_Get
1271: ( p_count => x_msg_count,
1272: p_data => x_msg_data
1273: );
1274:
1289:
1290: -- Initialize message list if p_init_msg_list is set to TRUE.
1291: IF FND_API.to_Boolean( p_init_msg_list )
1292: THEN
1293: FND_MSG_PUB.initialize;
1294: END IF;
1295:
1296:
1297: -- Initialize API return status to SUCCESS
1299:
1300: -- validate NOT NULL column
1301: IF(p_BOX_ID is NULL)
1302: THEN
1303: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(BOX_ID)');
1304: x_return_status := FND_API.G_RET_STS_ERROR;
1305: END IF;
1306:
1307: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1320: NULL;
1321: END IF;
1322:
1323: -- Standard call to get message count and if count is 1, get message info.
1324: FND_MSG_PUB.Count_And_Get
1325: ( p_count => x_msg_count,
1326: p_data => x_msg_data
1327: );
1328:
1343:
1344: -- Initialize message list if p_init_msg_list is set to TRUE.
1345: IF FND_API.to_Boolean( p_init_msg_list )
1346: THEN
1347: FND_MSG_PUB.initialize;
1348: END IF;
1349:
1350:
1351: -- Initialize API return status to SUCCESS
1367: NULL;
1368: END IF;
1369:
1370: -- Standard call to get message count and if count is 1, get message info.
1371: FND_MSG_PUB.Count_And_Get
1372: ( p_count => x_msg_count,
1373: p_data => x_msg_data
1374: );
1375:
1390:
1391: -- Initialize message list if p_init_msg_list is set to TRUE.
1392: IF FND_API.to_Boolean( p_init_msg_list )
1393: THEN
1394: FND_MSG_PUB.initialize;
1395: END IF;
1396:
1397:
1398: -- Initialize API return status to SUCCESS
1400:
1401: -- validate NOT NULL column
1402: IF(p_PACKLIST_LINE_STATUS is NULL)
1403: THEN
1404: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(PACKLIST_LINE_STATUS)');
1405: x_return_status := FND_API.G_RET_STS_ERROR;
1406: END IF;
1407:
1408: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1421: NULL;
1422: END IF;
1423:
1424: -- Standard call to get message count and if count is 1, get message info.
1425: FND_MSG_PUB.Count_And_Get
1426: ( p_count => x_msg_count,
1427: p_data => x_msg_data
1428: );
1429:
1444:
1445: -- Initialize message list if p_init_msg_list is set to TRUE.
1446: IF FND_API.to_Boolean( p_init_msg_list )
1447: THEN
1448: FND_MSG_PUB.initialize;
1449: END IF;
1450:
1451:
1452: -- Initialize API return status to SUCCESS
1454:
1455: -- validate NOT NULL column
1456: IF(p_INVENTORY_ITEM_ID is NULL)
1457: THEN
1458: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(INVENTORY_ITEM_ID)');
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460: END IF;
1461:
1462: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1475: NULL;
1476: END IF;
1477:
1478: -- Standard call to get message count and if count is 1, get message info.
1479: FND_MSG_PUB.Count_And_Get
1480: ( p_count => x_msg_count,
1481: p_data => x_msg_data
1482: );
1483:
1498:
1499: -- Initialize message list if p_init_msg_list is set to TRUE.
1500: IF FND_API.to_Boolean( p_init_msg_list )
1501: THEN
1502: FND_MSG_PUB.initialize;
1503: END IF;
1504:
1505:
1506: -- Initialize API return status to SUCCESS
1508:
1509: -- validate NOT NULL column
1510: IF(p_QUANTITY_PACKED is NULL)
1511: THEN
1512: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(QUANTITY_PACKED)');
1513: x_return_status := FND_API.G_RET_STS_ERROR;
1514: END IF;
1515:
1516: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1529: NULL;
1530: END IF;
1531:
1532: -- Standard call to get message count and if count is 1, get message info.
1533: FND_MSG_PUB.Count_And_Get
1534: ( p_count => x_msg_count,
1535: p_data => x_msg_data
1536: );
1537:
1552:
1553: -- Initialize message list if p_init_msg_list is set to TRUE.
1554: IF FND_API.to_Boolean( p_init_msg_list )
1555: THEN
1556: FND_MSG_PUB.initialize;
1557: END IF;
1558:
1559:
1560: -- Initialize API return status to SUCCESS
1576: NULL;
1577: END IF;
1578:
1579: -- Standard call to get message count and if count is 1, get message info.
1580: FND_MSG_PUB.Count_And_Get
1581: ( p_count => x_msg_count,
1582: p_data => x_msg_data
1583: );
1584:
1599:
1600: -- Initialize message list if p_init_msg_list is set to TRUE.
1601: IF FND_API.to_Boolean( p_init_msg_list )
1602: THEN
1603: FND_MSG_PUB.initialize;
1604: END IF;
1605:
1606:
1607: -- Initialize API return status to SUCCESS
1623: NULL;
1624: END IF;
1625:
1626: -- Standard call to get message count and if count is 1, get message info.
1627: FND_MSG_PUB.Count_And_Get
1628: ( p_count => x_msg_count,
1629: p_data => x_msg_data
1630: );
1631:
1646:
1647: -- Initialize message list if p_init_msg_list is set to TRUE.
1648: IF FND_API.to_Boolean( p_init_msg_list )
1649: THEN
1650: FND_MSG_PUB.initialize;
1651: END IF;
1652:
1653:
1654: -- Initialize API return status to SUCCESS
1656:
1657: -- validate NOT NULL column
1658: IF(p_UOM_CODE is NULL)
1659: THEN
1660: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'CSP', 'Private packlist_lines API: -Violate NOT NULL constraint(UOM_CODE)');
1661: x_return_status := FND_API.G_RET_STS_ERROR;
1662: END IF;
1663:
1664: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1677: NULL;
1678: END IF;
1679:
1680: -- Standard call to get message count and if count is 1, get message info.
1681: FND_MSG_PUB.Count_And_Get
1682: ( p_count => x_msg_count,
1683: p_data => x_msg_data
1684: );
1685:
1700:
1701: -- Initialize message list if p_init_msg_list is set to TRUE.
1702: IF FND_API.to_Boolean( p_init_msg_list )
1703: THEN
1704: FND_MSG_PUB.initialize;
1705: END IF;
1706:
1707:
1708: -- Initialize API return status to SUCCESS
1724: NULL;
1725: END IF;
1726:
1727: -- Standard call to get message count and if count is 1, get message info.
1728: FND_MSG_PUB.Count_And_Get
1729: ( p_count => x_msg_count,
1730: p_data => x_msg_data
1731: );
1732:
1750:
1751: -- Initialize message list if p_init_msg_list is set to TRUE.
1752: IF FND_API.to_Boolean( p_init_msg_list )
1753: THEN
1754: FND_MSG_PUB.initialize;
1755: END IF;
1756:
1757:
1758: -- Initialize API return status to SUCCESS
1763: -- THEN
1764: -- x_return_status := FND_API.G_RET_STS_ERROR;
1765:
1766: -- Debug Message
1767: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'API_INVALID_RECORD');
1768:
1769: -- Standard call to get message count and if count is 1, get message info.
1770: FND_MSG_PUB.Count_And_Get
1771: ( p_count => x_msg_count,
1766: -- Debug Message
1767: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'API_INVALID_RECORD');
1768:
1769: -- Standard call to get message count and if count is 1, get message info.
1770: FND_MSG_PUB.Count_And_Get
1771: ( p_count => x_msg_count,
1772: p_data => x_msg_data
1773: );
1774:
1787: l_api_name CONSTANT VARCHAR2(30) := 'Validate_packlist_lines';
1788: BEGIN
1789:
1790: -- Debug Message
1791: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'start');
1792:
1793:
1794: -- Initialize API return status to SUCCESS
1795: x_return_status := FND_API.G_RET_STS_SUCCESS;
1982: END IF;
1983:
1984:
1985: -- Debug Message
1986: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Private API: ' || l_api_name || 'end');
1987:
1988: END Validate_packlist_lines;
1989:
1990: End CSP_PACKLIST_LINES_PVT;