[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, 'Error', '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,'Error','Private API: Validate_picklist_lines');
117:
118: -- Invoke validation procedures
119: Validate_picklist_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, 'Error','Private API: Calling create table handler');
137:
138: -- assign p_picklist_line_rec.picklist_line_id to x_picklist_line_id (by klou)
139: x_picklist_line_id := p_picklist_line_rec.picklist_line_id;
140:
188: END IF;
189:
190:
191: -- Debug Message
192: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
193:
194:
195: -- Standard call to get message count and if count is 1, get message info.
196: FND_MSG_PUB.Count_And_Get
192: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
193:
194:
195: -- Standard call to get message count and if count is 1, get message info.
196: FND_MSG_PUB.Count_And_Get
197: ( p_count => x_msg_count,
198: p_data => x_msg_data
199: );
200:
219: WHEN FND_API.G_EXC_ERROR THEN
220: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
221: P_API_NAME => L_API_NAME
222: ,P_PKG_NAME => G_PKG_NAME
223: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
224: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
225: ,X_MSG_COUNT => X_MSG_COUNT
226: ,X_MSG_DATA => X_MSG_DATA
227: ,X_RETURN_STATUS => X_RETURN_STATUS);
229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
230: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
231: P_API_NAME => L_API_NAME
232: ,P_PKG_NAME => G_PKG_NAME
233: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
234: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
235: ,X_MSG_COUNT => X_MSG_COUNT
236: ,X_MSG_DATA => X_MSG_DATA
237: ,X_RETURN_STATUS => X_RETURN_STATUS);
322:
323: -- Initialize message list if p_init_msg_list is set to TRUE.
324: IF FND_API.to_Boolean( p_init_msg_list )
325: THEN
326: FND_MSG_PUB.initialize;
327: END IF;
328:
329:
330: -- Debug Message
327: END IF;
328:
329:
330: -- Debug Message
331: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'start');
332:
333:
334: -- Initialize API return status to SUCCESS
335: x_return_status := FND_API.G_RET_STS_SUCCESS;
368: RAISE FND_API.G_EXC_ERROR;
369: END IF;
370: */
371: -- Debug Message
372: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Error','Private API: - Open Cursor to Select');
373:
374: /*
375: Open C_Get_picklist_lines( l_tar_picklist_line_rec.picklist_line_id);
376:
407: l_ref_picklist_line_rec.ATTRIBUTE14,
408: l_ref_picklist_line_rec.ATTRIBUTE15;
409:
410: If ( C_Get_picklist_lines%NOTFOUND) Then
411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
412: THEN
413: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_UPDATE_TARGET');
414: FND_MESSAGE.Set_Token ('INFO', 'picklist_lines', FALSE);
415: FND_MSG_PUB.Add;
411: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
412: THEN
413: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_UPDATE_TARGET');
414: FND_MESSAGE.Set_Token ('INFO', 'picklist_lines', FALSE);
415: FND_MSG_PUB.Add;
416: END IF;
417: raise FND_API.G_EXC_ERROR;
418: END IF;
419: -- Debug Message
416: END IF;
417: raise FND_API.G_EXC_ERROR;
418: END IF;
419: -- Debug Message
420: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Close Cursor');
421: Close C_Get_picklist_lines;
422: */
423:
424:
423:
424:
425: /* If (l_tar_picklist_line_rec.last_update_date is NULL or
426: l_tar_picklist_line_rec.last_update_date = FND_API.G_MISS_Date ) Then
427: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
428: THEN
429: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
430: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
431: FND_MSG_PUB.ADD;
427: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
428: THEN
429: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
430: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
431: FND_MSG_PUB.ADD;
432: END IF;
433: raise FND_API.G_EXC_ERROR;
434: End if;
435: -- Check Whether record has been changed by someone else
433: raise FND_API.G_EXC_ERROR;
434: End if;
435: -- Check Whether record has been changed by someone else
436: If (l_tar_picklist_line_rec.last_update_date <> l_ref_picklist_line_rec.last_update_date) Then
437: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
438: THEN
439: FND_MESSAGE.Set_Name('CSP', 'API_RECORD_CHANGED');
440: FND_MESSAGE.Set_Token('INFO', 'picklist_lines', FALSE);
441: FND_MSG_PUB.ADD;
437: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
438: THEN
439: FND_MESSAGE.Set_Name('CSP', 'API_RECORD_CHANGED');
440: FND_MESSAGE.Set_Token('INFO', 'picklist_lines', FALSE);
441: FND_MSG_PUB.ADD;
442: END IF;
443: raise FND_API.G_EXC_ERROR;
444: End if;
445: */
445: */
446: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
447: THEN
448: -- Debug message
449: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Error','Private API: Validate_picklist_lines');
450:
451: -- Invoke validation procedures
452: Validate_picklist_lines(
453: p_init_msg_list => FND_API.G_FALSE,
465:
466: -- Hint: Add corresponding Master-Detail business logic here if necessary.
467:
468: -- Debug Message
469: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: Calling update table handler');
470: -- Invoke table handler(CSP_PICKLIST_LINES_PKG.Update_Row)
471: CSP_PICKLIST_LINES_PKG.Update_Row(
472: p_picklist_line_id => p_picklist_line_rec.picklist_line_id,
473: p_CREATED_BY => p_picklist_line_rec.CREATED_BY,
509: END IF;
510:
511:
512: -- Debug Message
513: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
514:
515:
516: -- Standard call to get message count and if count is 1, get message info.
517: FND_MSG_PUB.Count_And_Get
513: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
514:
515:
516: -- Standard call to get message count and if count is 1, get message info.
517: FND_MSG_PUB.Count_And_Get
518: ( p_count => x_msg_count,
519: p_data => x_msg_data
520: );
521:
541: WHEN FND_API.G_EXC_ERROR THEN
542: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
543: P_API_NAME => L_API_NAME
544: ,P_PKG_NAME => G_PKG_NAME
545: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
546: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
547: ,X_MSG_COUNT => X_MSG_COUNT
548: ,X_MSG_DATA => X_MSG_DATA
549: ,X_RETURN_STATUS => X_RETURN_STATUS);
551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
552: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
553: P_API_NAME => L_API_NAME
554: ,P_PKG_NAME => G_PKG_NAME
555: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
556: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
557: ,X_MSG_COUNT => X_MSG_COUNT
558: ,X_MSG_DATA => X_MSG_DATA
559: ,X_RETURN_STATUS => X_RETURN_STATUS);
604:
605: -- Initialize message list if p_init_msg_list is set to TRUE.
606: IF FND_API.to_Boolean( p_init_msg_list )
607: THEN
608: FND_MSG_PUB.initialize;
609: END IF;
610:
611:
612: -- Debug Message
609: END IF;
610:
611:
612: -- Debug Message
613: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'start');
614:
615:
616: -- Initialize API return status to SUCCESS
617: x_return_status := FND_API.G_RET_STS_SUCCESS;
650: RAISE FND_API.G_EXC_ERROR;
651: END IF;
652: */
653: -- Debug Message
654: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: Calling delete table handler');
655:
656: -- Invoke table handler(CSP_PICKLIST_LINES_PKG.Delete_Row)
657: CSP_PICKLIST_LINES_PKG.Delete_Row(
658: p_picklist_line_id => p_picklist_line_rec.picklist_line_id);
667: END IF;
668:
669:
670: -- Debug Message
671: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
672:
673:
674: -- Standard call to get message count and if count is 1, get message info.
675: FND_MSG_PUB.Count_And_Get
671: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Error','Private API: ' || l_api_name || 'end');
672:
673:
674: -- Standard call to get message count and if count is 1, get message info.
675: FND_MSG_PUB.Count_And_Get
676: ( p_count => x_msg_count,
677: p_data => x_msg_data
678: );
679:
699: WHEN FND_API.G_EXC_ERROR THEN
700: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
701: P_API_NAME => L_API_NAME
702: ,P_PKG_NAME => G_PKG_NAME
703: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
704: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
705: ,X_MSG_COUNT => X_MSG_COUNT
706: ,X_MSG_DATA => X_MSG_DATA
707: ,X_RETURN_STATUS => X_RETURN_STATUS);
709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
710: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
711: P_API_NAME => L_API_NAME
712: ,P_PKG_NAME => G_PKG_NAME
713: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
714: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
715: ,X_MSG_COUNT => X_MSG_COUNT
716: ,X_MSG_DATA => X_MSG_DATA
717: ,X_RETURN_STATUS => X_RETURN_STATUS);
735: )
736: IS
737: BEGIN
738: -- Debug Message
739: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Define Columns Begins');
740:
741: -- define all columns for CSP_PICKLIST_LINES_V view
742: dbms_sql.define_column(p_cur_get_picklist_line, 1, P_picklist_line_Rec.picklist_line_id);
743: dbms_sql.define_column(p_cur_get_picklist_line, 2, P_picklist_line_Rec.PICKLIST_LINE_NUMBER);
765: dbms_sql.define_column(p_cur_get_picklist_line, 24, P_picklist_line_Rec.ATTRIBUTE14, 150);
766: dbms_sql.define_column(p_cur_get_picklist_line, 25, P_picklist_line_Rec.ATTRIBUTE15, 150);
767:
768: -- Debug Message
769: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Define Columns Ends');
770: END Define_Columns;
771:
772: -- This procudure gets column values by the Dynamic SQL.
773: PROCEDURE Get_Column_Values(
776: )
777: IS
778: BEGIN
779: -- Debug Message
780: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Get Column Values Begins');
781:
782: -- get all column values for CSP_PICKLIST_LINES_V table
783: dbms_sql.column_value(p_cur_get_picklist_line, 1, X_picklist_line_Rec.picklist_line_id);
784: dbms_sql.column_value(p_cur_get_picklist_line, 2, X_picklist_line_Rec.PICKLIST_LINE_NUMBER);
806: dbms_sql.column_value(p_cur_get_picklist_line, 24, X_picklist_line_Rec.ATTRIBUTE14);
807: dbms_sql.column_value(p_cur_get_picklist_line, 25, X_picklist_line_Rec.ATTRIBUTE15);
808:
809: -- Debug Message
810: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Get Column Values Ends');
811: END Get_Column_Values;
812:
813: PROCEDURE Gen_picklist_line_order_cl(
814: p_order_by_rec IN CSP_picklist_lines_PUB.picklist_line_sort_rec_type,
821: l_order_by_cl VARCHAR2(1000) := NULL;
822: l_util_order_by_tbl JTF_PLSQL_API.Util_order_by_tbl_type;
823: BEGIN
824: -- Debug Message
825: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Order by Begins');
826:
827: -- Hint: Developer should add more statements according to CSP_sort_rec_type
828: -- Ex:
829: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
829: -- l_util_order_by_tbl(1).col_choice := p_order_by_rec.customer_name;
830: -- l_util_order_by_tbl(1).col_name := 'Customer_Name';
831:
832: -- Debug Message
833: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Invoke JTF_PLSQL_API.Translate_OrderBy');
834:
835: JTF_PLSQL_API.Translate_OrderBy(
836: p_api_version_number => 1.0
837: ,p_init_msg_list => FND_API.G_FALSE
848: x_order_by_cl := NULL;
849: END IF;
850:
851: -- Debug Message
852: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Order by Ends');
853: END Gen_picklist_line_order_cl;
854:
855: -- This procedure bind the variables for the Dynamic SQL
856: PROCEDURE Bind(
862: BEGIN
863: -- Bind variables
864: -- Only those that are not NULL
865: -- Debug Message
866: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Bind Variables Begins');
867:
868: -- The following example applies to all columns,
869: -- developers can copy and paste them.
870: IF( (P_picklist_line_Rec.picklist_line_id IS NOT NULL) AND (P_picklist_line_Rec.picklist_line_id <> FND_API.G_MISS_NUM) )
872: DBMS_SQL.BIND_VARIABLE(p_cur_get_picklist_line, ':p_picklist_line_id', P_picklist_line_Rec.picklist_line_id);
873: END IF;
874:
875: -- Debug Message
876: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Bind Variables Ends');
877: END Bind;
878:
879: PROCEDURE Gen_Select(
880: x_select_cl OUT NOCOPY VARCHAR2
881: )
882: IS
883: BEGIN
884: -- Debug Message
885: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Select Begins');
886:
887: x_select_cl := 'Select ' ||
888: 'CSP_PICKLIST_LINES_V.picklist_line_id,' ||
889: 'CSP_PICKLIST_LINES_V.CREATED_BY,' ||
916: 'CSP_PICKLIST_LINES_V.ATTRIBUTE14,' ||
917: 'CSP_PICKLIST_LINES_V.ATTRIBUTE15,' ||
918: 'from CSP_PICKLIST_LINES_V';
919: -- Debug Message
920: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Select Ends');
921:
922: END Gen_Select;
923:
924: PROCEDURE Gen_picklist_line_Where(
940: str_csr2 NUMBER;
941: l_operator VARCHAR2(10);
942: BEGIN
943: -- Debug Message
944: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Where Begins');
945:
946: -- There are three examples for each kind of datatype:
947: -- NUMBER, DATE, VARCHAR2.
948: -- Developer can copy and paste the following codes for your own record.
1026:
1027: -- Add more IF statements for each column below
1028:
1029: -- Debug Message
1030: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Generate Where Ends');
1031:
1032: END Gen_picklist_line_Where;
1033:
1034: */
1048:
1049: -- Initialize message list if p_init_msg_list is set to TRUE.
1050: IF FND_API.to_Boolean( p_init_msg_list )
1051: THEN
1052: FND_MSG_PUB.initialize;
1053: END IF;
1054:
1055:
1056: -- Initialize API return status to SUCCESS
1058:
1059: -- validate NOT NULL column
1060: IF(p_picklist_line_id is NULL)
1061: THEN
1062: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(picklist_line_id)');
1063: x_return_status := FND_API.G_RET_STS_ERROR;
1064: END IF;
1065:
1066: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1079: NULL;
1080: END IF;
1081:
1082: -- Standard call to get message count and if count is 1, get message info.
1083: FND_MSG_PUB.Count_And_Get
1084: ( p_count => x_msg_count,
1085: p_data => x_msg_data
1086: );
1087:
1102:
1103: -- Initialize message list if p_init_msg_list is set to TRUE.
1104: IF FND_API.to_Boolean( p_init_msg_list )
1105: THEN
1106: FND_MSG_PUB.initialize;
1107: END IF;
1108:
1109:
1110: -- Initialize API return status to SUCCESS
1112:
1113: -- validate NOT NULL column
1114: IF(p_PICKLIST_LINE_NUMBER is NULL)
1115: THEN
1116: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(PICKLIST_LINE_NUMBER)');
1117: x_return_status := FND_API.G_RET_STS_ERROR;
1118: END IF;
1119:
1120: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1133: NULL;
1134: END IF;
1135:
1136: -- Standard call to get message count and if count is 1, get message info.
1137: FND_MSG_PUB.Count_And_Get
1138: ( p_count => x_msg_count,
1139: p_data => x_msg_data
1140: );
1141:
1156:
1157: -- Initialize message list if p_init_msg_list is set to TRUE.
1158: IF FND_API.to_Boolean( p_init_msg_list )
1159: THEN
1160: FND_MSG_PUB.initialize;
1161: END IF;
1162:
1163:
1164: -- Initialize API return status to SUCCESS
1166:
1167: -- validate NOT NULL column
1168: IF(p_picklist_header_id is NULL)
1169: THEN
1170: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(picklist_header_id)');
1171: x_return_status := FND_API.G_RET_STS_ERROR;
1172: END IF;
1173:
1174: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1187: NULL;
1188: END IF;
1189:
1190: -- Standard call to get message count and if count is 1, get message info.
1191: FND_MSG_PUB.Count_And_Get
1192: ( p_count => x_msg_count,
1193: p_data => x_msg_data
1194: );
1195:
1210:
1211: -- Initialize message list if p_init_msg_list is set to TRUE.
1212: IF FND_API.to_Boolean( p_init_msg_list )
1213: THEN
1214: FND_MSG_PUB.initialize;
1215: END IF;
1216:
1217:
1218: -- Initialize API return status to SUCCESS
1220:
1221: -- validate NOT NULL column
1222: IF(p_LINE_ID is NULL)
1223: THEN
1224: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(LINE_ID)');
1225: x_return_status := FND_API.G_RET_STS_ERROR;
1226: END IF;
1227:
1228: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1241: NULL;
1242: END IF;
1243:
1244: -- Standard call to get message count and if count is 1, get message info.
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_count => x_msg_count,
1247: p_data => x_msg_data
1248: );
1249:
1264:
1265: -- Initialize message list if p_init_msg_list is set to TRUE.
1266: IF FND_API.to_Boolean( p_init_msg_list )
1267: THEN
1268: FND_MSG_PUB.initialize;
1269: END IF;
1270:
1271:
1272: -- Initialize API return status to SUCCESS
1274:
1275: -- validate NOT NULL column
1276: IF(p_INVENTORY_ITEM_ID is NULL)
1277: THEN
1278: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(INVENTORY_ITEM_ID)');
1279: x_return_status := FND_API.G_RET_STS_ERROR;
1280: END IF;
1281:
1282: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1295: NULL;
1296: END IF;
1297:
1298: -- Standard call to get message count and if count is 1, get message info.
1299: FND_MSG_PUB.Count_And_Get
1300: ( p_count => x_msg_count,
1301: p_data => x_msg_data
1302: );
1303:
1318:
1319: -- Initialize message list if p_init_msg_list is set to TRUE.
1320: IF FND_API.to_Boolean( p_init_msg_list )
1321: THEN
1322: FND_MSG_PUB.initialize;
1323: END IF;
1324:
1325:
1326: -- Initialize API return status to SUCCESS
1328:
1329: -- validate NOT NULL column
1330: IF(p_UOM_CODE is NULL)
1331: THEN
1332: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(UOM_CODE)');
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: END IF;
1335:
1336: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1349: NULL;
1350: END IF;
1351:
1352: -- Standard call to get message count and if count is 1, get message info.
1353: FND_MSG_PUB.Count_And_Get
1354: ( p_count => x_msg_count,
1355: p_data => x_msg_data
1356: );
1357:
1372:
1373: -- Initialize message list if p_init_msg_list is set to TRUE.
1374: IF FND_API.to_Boolean( p_init_msg_list )
1375: THEN
1376: FND_MSG_PUB.initialize;
1377: END IF;
1378:
1379:
1380: -- Initialize API return status to SUCCESS
1396: NULL;
1397: END IF;
1398:
1399: -- Standard call to get message count and if count is 1, get message info.
1400: FND_MSG_PUB.Count_And_Get
1401: ( p_count => x_msg_count,
1402: p_data => x_msg_data
1403: );
1404:
1419:
1420: -- Initialize message list if p_init_msg_list is set to TRUE.
1421: IF FND_API.to_Boolean( p_init_msg_list )
1422: THEN
1423: FND_MSG_PUB.initialize;
1424: END IF;
1425:
1426:
1427: -- Initialize API return status to SUCCESS
1429:
1430: -- validate NOT NULL column
1431: IF(p_QUANTITY_PICKED is NULL)
1432: THEN
1433: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(QUANTITY_PICKED)');
1434: x_return_status := FND_API.G_RET_STS_ERROR;
1435: END IF;
1436:
1437: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1450: NULL;
1451: END IF;
1452:
1453: -- Standard call to get message count and if count is 1, get message info.
1454: FND_MSG_PUB.Count_And_Get
1455: ( p_count => x_msg_count,
1456: p_data => x_msg_data
1457: );
1458:
1473:
1474: -- Initialize message list if p_init_msg_list is set to TRUE.
1475: IF FND_API.to_Boolean( p_init_msg_list )
1476: THEN
1477: FND_MSG_PUB.initialize;
1478: END IF;
1479:
1480:
1481: -- Initialize API return status to SUCCESS
1483:
1484: -- validate NOT NULL column
1485: IF(p_TRANSACTION_TEMP_ID is NULL)
1486: THEN
1487: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'ERROR', 'Private picklist_lines API: -Violate NOT NULL constraint(TRANSACTION_TEMP_ID)');
1488: x_return_status := FND_API.G_RET_STS_ERROR;
1489: END IF;
1490:
1491: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1504: NULL;
1505: END IF;
1506:
1507: -- Standard call to get message count and if count is 1, get message info.
1508: FND_MSG_PUB.Count_And_Get
1509: ( p_count => x_msg_count,
1510: p_data => x_msg_data
1511: );
1512:
1530:
1531: -- Initialize message list if p_init_msg_list is set to TRUE.
1532: IF FND_API.to_Boolean( p_init_msg_list )
1533: THEN
1534: FND_MSG_PUB.initialize;
1535: END IF;
1536:
1537:
1538: -- Initialize API return status to SUCCESS
1543: -- THEN
1544: -- x_return_status := FND_API.G_RET_STS_ERROR;
1545:
1546: -- Debug Message
1547: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ERROR', 'API_INVALID_RECORD');
1548:
1549: -- Standard call to get message count and if count is 1, get message info.
1550: FND_MSG_PUB.Count_And_Get
1551: ( p_count => x_msg_count,
1546: -- Debug Message
1547: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ERROR', 'API_INVALID_RECORD');
1548:
1549: -- Standard call to get message count and if count is 1, get message info.
1550: FND_MSG_PUB.Count_And_Get
1551: ( p_count => x_msg_count,
1552: p_data => x_msg_data
1553: );
1554:
1567: l_api_name CONSTANT VARCHAR2(30) := 'Validate_picklist_lines';
1568: BEGIN
1569:
1570: -- Debug Message
1571: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ERROR', 'Private API: ' || l_api_name || 'start');
1572:
1573:
1574: -- Initialize API return status to SUCCESS
1575: x_return_status := FND_API.G_RET_STS_SUCCESS;
1714: END IF;
1715:
1716:
1717: -- Debug Message
1718: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ERROR','Private API: ' || l_api_name || 'end');
1719:
1720: END Validate_picklist_lines;
1721:
1722: End CSP_picklist_lines_PVT;