81:
82: BEGIN
83:
84: IF p_party_site_id IS NULL THEN
85: x_account_id := FND_API.G_MISS_NUM;
86: ELSE
87: SELECT party_id
88: INTO l_party_id
89: FROM HZ_PARTY_SITES
92: IF l_party_id = p_sold_to_customer_party THEN
93: IF p_sold_to_customer_account is not null then
94: x_account_id := p_sold_to_customer_account;
95: ELSE
96: x_account_id := FND_API.G_MISS_NUM;
97: END IF;
98: ELSIF l_party_id <> p_sold_to_customer_party THEN
99: BEGIN
100:
169: FND_MESSAGE.Set_Name('CS','CS_SR_NO_VALID_ACCT_SITE_USE');
170: FND_MESSAGE.Set_Token('BILL_SHIP_ADDR',l_bill_ship_addr);
171: FND_MESSAGE.Set_Token('OPER_UNIT',l_inv_org_name);
172: FND_MSG_PUB.Add;
173: RAISE FND_API.G_EXC_ERROR;
174: End if;
175: End if;
176: EXCEPTION
177: WHEN NO_DATA_FOUND THEN
174: End if;
175: End if;
176: EXCEPTION
177: WHEN NO_DATA_FOUND THEN
178: x_account_id := FND_API.G_MISS_NUM;
179: END;
180:
181: IF x_account_id is null THEN
182: x_account_id := FND_API.G_MISS_NUM;
178: x_account_id := FND_API.G_MISS_NUM;
179: END;
180:
181: IF x_account_id is null THEN
182: x_account_id := FND_API.G_MISS_NUM;
183: END IF;
184: END IF;
185: END IF;
186: END Get_acct_from_party_site;
230: l_inv_org_name varchar2(300);
231:
232: BEGIN
233:
234: x_return_status := FND_API.G_RET_STS_SUCCESS;
235:
236: IF p_org_id is not null and
237: p_party_site_id is not null and
238: p_account_id is not null THEN
260: FND_MESSAGE.Set_Name('CS','CS_SR_NO_VALID_ACCT_SITE_USE');
261: FND_MESSAGE.Set_Token('BILL_SHIP_ADDR',l_bill_ship_addr);
262: FND_MESSAGE.Set_Token('OPER_UNIT',l_inv_org_name);
263: FND_MSG_PUB.Add;
264: RAISE FND_API.G_EXC_ERROR;
265: End if;
266: ELSE
267: close acct_site_csr;
268: -- Raise error if active customer account site doesn't exist but an inactive
267: close acct_site_csr;
268: -- Raise error if active customer account site doesn't exist but an inactive
269: -- custoemr account site exist. Charges will raise a clear error message instead of
270: -- passing this data to OC.
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CUST_ACCT_SITE');
273: FND_MESSAGE.SET_TOKEN('ACCT_SITE_ID', l_cust_acct_site_id);
274: FND_MESSAGE.SET_TOKEN('PARTY_SITE_ID', p_party_site_id);
275: FND_MSG_PUB.Add;
272: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_CUST_ACCT_SITE');
273: FND_MESSAGE.SET_TOKEN('ACCT_SITE_ID', l_cust_acct_site_id);
274: FND_MESSAGE.SET_TOKEN('PARTY_SITE_ID', p_party_site_id);
275: FND_MSG_PUB.Add;
276: RAISE FND_API.G_EXC_ERROR;
277: END IF;
278: ELSE
279: close acct_site_csr;
280:
296: FND_MESSAGE.Set_Name('CS','CS_SR_NO_VALID_ACCT_SITE_USE');
297: FND_MESSAGE.Set_Token('BILL_SHIP_ADDR',l_bill_ship_addr);
298: FND_MESSAGE.Set_Token('OPER_UNIT',l_inv_org_name);
299: FND_MSG_PUB.Add;
300: RAISE FND_API.G_EXC_ERROR;
301: End if;
302: ELSE
303: close acct_site_use_csr;
304: -- Raise error if active bill to or ship to account site use doesn't exist but an
303: close acct_site_use_csr;
304: -- Raise error if active bill to or ship to account site use doesn't exist but an
305: -- inactive bill to or ship to account site use exist. Charges will raise a clear
306: -- error message instead of passing this data to OC.
307: x_return_status := FND_API.G_RET_STS_ERROR;
308: FND_MESSAGE.SET_NAME('CS', 'CS_CHG_INVALID_ACCT_SITE_USE');
309: FND_MESSAGE.SET_TOKEN('SITE_USE_CODE', p_site_use_code);
310: FND_MESSAGE.SET_TOKEN('ACCT_SITE_USE_ID', l_site_use_id);
311: FND_MESSAGE.SET_TOKEN('ACCT_SITE_ID', l_cust_acct_site_id);
309: FND_MESSAGE.SET_TOKEN('SITE_USE_CODE', p_site_use_code);
310: FND_MESSAGE.SET_TOKEN('ACCT_SITE_USE_ID', l_site_use_id);
311: FND_MESSAGE.SET_TOKEN('ACCT_SITE_ID', l_cust_acct_site_id);
312: FND_MSG_PUB.Add;
313: RAISE FND_API.G_EXC_ERROR;
314: END IF;
315: ELSE
316: close acct_site_use_csr;
317: END IF;
320: END IF;
321: END IF;
322:
323: EXCEPTION
324: WHEN FND_API.G_EXC_ERROR THEN
325: x_return_status := FND_API.G_RET_STS_ERROR;
326:
327: FND_MSG_PUB.Count_And_Get
328: (p_count => x_msg_count,
321: END IF;
322:
323: EXCEPTION
324: WHEN FND_API.G_EXC_ERROR THEN
325: x_return_status := FND_API.G_RET_STS_ERROR;
326:
327: FND_MSG_PUB.Count_And_Get
328: (p_count => x_msg_count,
329: p_data => x_msg_data);
438: p_validation_level IN NUMBER,
439: p_incident_id IN NUMBER,
440: p_party_id IN NUMBER,
441: p_account_id IN NUMBER,
442: p_book_order_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
443: p_submit_source IN VARCHAR2 := FND_API.G_MISS_CHAR,
444: p_submit_from_system IN VARCHAR2 := FND_API.G_MISS_CHAR,
445: x_return_status OUT NOCOPY VARCHAR2,
446: x_msg_count OUT NOCOPY NUMBER,
439: p_incident_id IN NUMBER,
440: p_party_id IN NUMBER,
441: p_account_id IN NUMBER,
442: p_book_order_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
443: p_submit_source IN VARCHAR2 := FND_API.G_MISS_CHAR,
444: p_submit_from_system IN VARCHAR2 := FND_API.G_MISS_CHAR,
445: x_return_status OUT NOCOPY VARCHAR2,
446: x_msg_count OUT NOCOPY NUMBER,
447: x_msg_data OUT NOCOPY VARCHAR2
440: p_party_id IN NUMBER,
441: p_account_id IN NUMBER,
442: p_book_order_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
443: p_submit_source IN VARCHAR2 := FND_API.G_MISS_CHAR,
444: p_submit_from_system IN VARCHAR2 := FND_API.G_MISS_CHAR,
445: x_return_status OUT NOCOPY VARCHAR2,
446: x_msg_count OUT NOCOPY NUMBER,
447: x_msg_data OUT NOCOPY VARCHAR2
448: )
842: -- Standard Start of API Savepoint
843: SAVEPOINT CS_Charge_Create_Order_PVT;
844:
845: -- Standard Call to check API compatibility
846: IF NOT FND_API.Compatible_API_Call( l_api_version,
847: p_api_version,
848: l_api_name,
849: G_PKG_NAME) THEN
850: RAISE FND_API.G_EXC_ERROR ;
846: IF NOT FND_API.Compatible_API_Call( l_api_version,
847: p_api_version,
848: l_api_name,
849: G_PKG_NAME) THEN
850: RAISE FND_API.G_EXC_ERROR ;
851: END IF;
852:
853: -- Initialize message list if p_init_msg_list is set to TRUE.
854: IF FND_API.to_Boolean( p_init_msg_list ) THEN
850: RAISE FND_API.G_EXC_ERROR ;
851: END IF;
852:
853: -- Initialize message list if p_init_msg_list is set to TRUE.
854: IF FND_API.to_Boolean( p_init_msg_list ) THEN
855: FND_MSG_PUB.initialize;
856: END IF;
857:
858: -- Initialize API return status to success
855: FND_MSG_PUB.initialize;
856: END IF;
857:
858: -- Initialize API return status to success
859: x_return_status := FND_API.G_RET_STS_SUCCESS;
860: ----------------------- FND Logging -----------------------------------
861: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
862: THEN
863: FND_LOG.String
924: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_SUBMIT_PARAMS');
925: FND_MESSAGE.Set_Token('PARAM','p_incident_id');
926: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
927: FND_MSG_PUB.Add;
928: RAISE FND_API.G_EXC_ERROR;
929: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
930: END IF;
931: IF (p_party_id is null) THEN
932: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
925: FND_MESSAGE.Set_Token('PARAM','p_incident_id');
926: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
927: FND_MSG_PUB.Add;
928: RAISE FND_API.G_EXC_ERROR;
929: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
930: END IF;
931: IF (p_party_id is null) THEN
932: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
933: THEN
939: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_SUBMIT_PARAMS');
940: FND_MESSAGE.Set_Token('PARAM','p_party_id');
941: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
942: FND_MSG_PUB.Add;
943: RAISE FND_API.G_EXC_ERROR;
944: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
945: END IF;
946:
947: -- Added validations for 11.5.10 parameters. There is no validation required
940: FND_MESSAGE.Set_Token('PARAM','p_party_id');
941: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
942: FND_MSG_PUB.Add;
943: RAISE FND_API.G_EXC_ERROR;
944: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
945: END IF;
946:
947: -- Added validations for 11.5.10 parameters. There is no validation required
948: -- for submit_from_system parameter.
946:
947: -- Added validations for 11.5.10 parameters. There is no validation required
948: -- for submit_from_system parameter.
949: --
950: IF (p_book_order_flag NOT IN ('Y','N',FND_API.G_MISS_CHAR)) THEN
951: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
952: THEN
953: FND_LOG.String
954: ( FND_LOG.level_statement, L_LOG_MODULE || 'invalid input parameter :'
958: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_SUBMIT_PARAMS');
959: FND_MESSAGE.Set_Token('PARAM','p_book_order_flag');
960: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
961: FND_MSG_PUB.Add;
962: RAISE FND_API.G_EXC_ERROR;
963: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
964: END IF;
965:
966: IF (p_submit_source NOT IN ('SR','DR','FS',FND_API.G_MISS_CHAR)) THEN
959: FND_MESSAGE.Set_Token('PARAM','p_book_order_flag');
960: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
961: FND_MSG_PUB.Add;
962: RAISE FND_API.G_EXC_ERROR;
963: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
964: END IF;
965:
966: IF (p_submit_source NOT IN ('SR','DR','FS',FND_API.G_MISS_CHAR)) THEN
967: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
962: RAISE FND_API.G_EXC_ERROR;
963: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
964: END IF;
965:
966: IF (p_submit_source NOT IN ('SR','DR','FS',FND_API.G_MISS_CHAR)) THEN
967: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
968: THEN
969: FND_LOG.String
970: ( FND_LOG.level_statement, L_LOG_MODULE || 'invalid input parameter :'
974: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_SUBMIT_PARAMS');
975: FND_MESSAGE.Set_Token('PARAM','p_submit_source');
976: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
977: FND_MSG_PUB.Add;
978: RAISE FND_API.G_EXC_ERROR;
979: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
980: END IF;
981: --- End of 11.5.10 parameter validations
982: ---
975: FND_MESSAGE.Set_Token('PARAM','p_submit_source');
976: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
977: FND_MSG_PUB.Add;
978: RAISE FND_API.G_EXC_ERROR;
979: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
980: END IF;
981: --- End of 11.5.10 parameter validations
982: ---
983: get_who_info(l_login_id,l_user_id);
997: END IF;
998: FND_MESSAGE.Set_Name('CS','CS_CHG_NO_ACCT_NUM_IN_SR');
999: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
1000: FND_MSG_PUB.Add;
1001: RAISE FND_API.G_EXC_ERROR;
1002: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003:
1004: ELSIF l_acct_no = 0 then
1005: If fnd_profile.value('CS_SR_ACTION_MISS_ACCT') = 'CHG_ABORT_SUB' Then
998: FND_MESSAGE.Set_Name('CS','CS_CHG_NO_ACCT_NUM_IN_SR');
999: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
1000: FND_MSG_PUB.Add;
1001: RAISE FND_API.G_EXC_ERROR;
1002: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003:
1004: ELSIF l_acct_no = 0 then
1005: If fnd_profile.value('CS_SR_ACTION_MISS_ACCT') = 'CHG_ABORT_SUB' Then
1006: Open Get_party_number;
1009:
1010: FND_MESSAGE.Set_Name('CS','CS_SR_NO_VALID_ACCT');
1011: FND_MESSAGE.Set_Token('SOLD_TO_PARTY',l_party_number);
1012: FND_MSG_PUB.Add;
1013: RAISE FND_API.G_EXC_ERROR;
1014: End if;
1015: END IF;
1016:
1017: -- Get modifier for OM adjustment lines
1035: EXCEPTION
1036: WHEN OTHERS THEN
1037: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_DEFAULT_MODIFIER');
1038: FND_MSG_PUB.Add;
1039: RAISE FND_API.G_EXC_ERROR;
1040: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END;
1042:
1043: --
1036: WHEN OTHERS THEN
1037: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_DEFAULT_MODIFIER');
1038: FND_MSG_PUB.Add;
1039: RAISE FND_API.G_EXC_ERROR;
1040: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END;
1042:
1043: --
1044: -- Check the value of book_order_flag.Changes for 11.5.10
1058: l_book_order_profile := 'N';
1059: END IF;
1060:
1061: IF p_book_order_flag IS NOT NULL OR
1062: p_book_order_flag = FND_API.G_MISS_CHAR THEN
1063: l_book_order_flag := p_book_order_flag;
1064:
1065: ELSIF p_book_order_flag IS NULL THEN
1066: l_book_order_flag := l_book_order_profile;
1071: FND_MESSAGE.Set_Name('CS','CS_CHG_INVALID_SUBMIT_PARAMS');
1072: FND_MESSAGE.Set_Token('PARAM','p_book_order_flag');
1073: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
1074: FND_MSG_PUB.Add;
1075: RAISE FND_API.G_EXC_ERROR;
1076: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1077:
1078: END;
1079: -- End of Book Order Flag
1072: FND_MESSAGE.Set_Token('PARAM','p_book_order_flag');
1073: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full);
1074: FND_MSG_PUB.Add;
1075: RAISE FND_API.G_EXC_ERROR;
1076: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1077:
1078: END;
1079: -- End of Book Order Flag
1080: --
1088: l_ctrl_source := NULL;
1089: ELSIF p_submit_source = 'FS' THEN
1090: l_ctrl_orig_source := 'SR';
1091: l_ctrl_source := 'SD';
1092: ELSIF p_submit_source = FND_API.G_MISS_CHAR THEN
1093: l_ctrl_orig_source := NULL;
1094: l_ctrl_source := NULL;
1095: END IF;
1096:
1135:
1136: l_record_found := 'Y';
1137: --
1138: --
1139: -- l_control_rec.calculate_price := FND_API.G_FALSE;
1140: --l_control_rec.calculate_price := EstDtlTab(i).calculate_price_flag; -- shachoud project
1141:
1142: -- Bug 12907768
1143: -- ADDED IF CONDITION FOR NO_CHARGE_FLAG : If the Calculate Price flag is Yes and No Charge is also checked then Calculate price has
1145:
1146:
1147: IF EstDtlTab(i).calculate_price_flag = 'Y' THEN
1148: if EstDtlTab(i).NO_CHARGE_FLAG = 'N' THEN
1149: l_control_rec.calculate_price := FND_API.G_TRUE;
1150: else
1151: l_control_rec.calculate_price := FND_API.G_FALSE;
1152: end if;
1153: ELSE
1147: IF EstDtlTab(i).calculate_price_flag = 'Y' THEN
1148: if EstDtlTab(i).NO_CHARGE_FLAG = 'N' THEN
1149: l_control_rec.calculate_price := FND_API.G_TRUE;
1150: else
1151: l_control_rec.calculate_price := FND_API.G_FALSE;
1152: end if;
1153: ELSE
1154: l_control_rec.calculate_price := FND_API.G_FALSE;
1155: END IF;
1150: else
1151: l_control_rec.calculate_price := FND_API.G_FALSE;
1152: end if;
1153: ELSE
1154: l_control_rec.calculate_price := FND_API.G_FALSE;
1155: END IF;
1156: -- End of bug 12907768
1157:
1158: l_org_id := EstDtlTab(i).org_id;
1203: l_order_status_flag IS NULL or
1204: l_order_status_flag = 'N') and
1205: l_book_order_flag = 'N' THEN
1206:
1207: l_control_rec.book_flag := FND_API.G_FALSE;
1208:
1209: ELSIF (l_order_status_flag = 'Y' and
1210: l_book_order_flag = 'Y') THEN
1211:
1208:
1209: ELSIF (l_order_status_flag = 'Y' and
1210: l_book_order_flag = 'Y') THEN
1211:
1212: l_control_rec.book_flag := FND_API.G_FALSE;
1213:
1214: ELSIF l_order_status_flag = 'N' and
1215: l_book_order_flag = 'Y' THEN
1216:
1213:
1214: ELSIF l_order_status_flag = 'N' and
1215: l_book_order_flag = 'Y' THEN
1216:
1217: l_control_rec.book_flag := FND_API.G_TRUE;
1218:
1219: END IF;
1220:
1221: ELSIF (EstDtlTab(i).add_to_order_flag = 'N') or
1225: --and (l_order_header_id = -999 ) --5649493
1226: THEN
1227:
1228: IF l_book_order_flag = 'Y' THEN
1229: l_control_rec.book_flag := FND_API.G_TRUE;
1230: ELSIF l_book_order_flag = 'N' THEN
1231: l_control_rec.book_flag := FND_API.G_FALSE;
1232: END IF;
1233: END IF;
1227:
1228: IF l_book_order_flag = 'Y' THEN
1229: l_control_rec.book_flag := FND_API.G_TRUE;
1230: ELSIF l_book_order_flag = 'N' THEN
1231: l_control_rec.book_flag := FND_API.G_FALSE;
1232: END IF;
1233: END IF;
1234:
1235: -- dbms_output.put_line('Book_Flag' || l_control_rec.book_flag);
1244: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1245: p_count => x_msg_count,
1246: p_data => x_msg_data);
1247:
1248: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1249:
1250: END IF;
1251:
1252: IF EstDtlTab(i).quantity_required is null
1255: FND_MSG_PUB.Add;
1256: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1257: p_count => x_msg_count,
1258: p_data => x_msg_data);
1259: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1260: END IF;
1261:
1262: -- GET ORDER_TYPE AND LINE_TYPE
1263: BEGIN
1278: FND_MSG_PUB.Add;
1279: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1280: p_count => x_msg_count,
1281: p_data => x_msg_data);
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END;
1284: --
1285: --
1286: -- dbms_output.put_line('After Order Type and Line Type');
1305:
1306: --
1307: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work.
1308: -- Passing flexfield values as g_miss_char both for new orders/add to orders.
1309: l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1306: --
1307: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work.
1308: -- Passing flexfield values as g_miss_char both for new orders/add to orders.
1309: l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1307: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work.
1308: -- Passing flexfield values as g_miss_char both for new orders/add to orders.
1309: l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1308: -- Passing flexfield values as g_miss_char both for new orders/add to orders.
1309: l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1309: l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1310: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1311: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1312: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1313: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1314: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1315: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1323: l_header_rec.attribute15 := FND_API.G_MISS_CHAR;
1316: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1323: l_header_rec.attribute15 := FND_API.G_MISS_CHAR;
1324:
1317: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1323: l_header_rec.attribute15 := FND_API.G_MISS_CHAR;
1324:
1325: -- FIX Bug:3667208
1318: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1323: l_header_rec.attribute15 := FND_API.G_MISS_CHAR;
1324:
1325: -- FIX Bug:3667208
1326: IF (EstDtlTab(i).add_to_order_flag = 'F') THEN
1319: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1320: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1321: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1322: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1323: l_header_rec.attribute15 := FND_API.G_MISS_CHAR;
1324:
1325: -- FIX Bug:3667208
1326: IF (EstDtlTab(i).add_to_order_flag = 'F') THEN
1327:
1481: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1482: p_count => x_msg_count,
1483: p_data => x_msg_data);
1484:
1485: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1486:
1487: END IF;
1488: -- This value needs to be passed for add_to_order/update_order as well.
1489: -- Fix for the bug 2123535
1502: /* Bug 8857796 */
1503: ELSE /* create a new order */
1504: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work
1505: -- Moved to before add_to_order/new_order.
1506: /* l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1503: ELSE /* create a new order */
1504: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work
1505: -- Moved to before add_to_order/new_order.
1506: /* l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1504: -- Populate Flexfiled with G_MISS_CHAR so defaulting rules will work
1505: -- Moved to before add_to_order/new_order.
1506: /* l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1505: -- Moved to before add_to_order/new_order.
1506: /* l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1506: /* l_header_rec.attribute1 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1507: l_header_rec.attribute2 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1508: l_header_rec.attribute3 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1509: l_header_rec.attribute4 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1510: l_header_rec.attribute5 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1511: l_header_rec.attribute6 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1512: l_header_rec.attribute7 := FND_API.G_MISS_CHAR;
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1520: l_header_rec.attribute15 := FND_API.G_MISS_CHAR; */
1513: l_header_rec.attribute8 := FND_API.G_MISS_CHAR;
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1520: l_header_rec.attribute15 := FND_API.G_MISS_CHAR; */
1521: --
1514: l_header_rec.attribute9 := FND_API.G_MISS_CHAR;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1520: l_header_rec.attribute15 := FND_API.G_MISS_CHAR; */
1521: --
1522: l_header_rec.order_type_id := l_order_type_id;
1515: l_header_rec.attribute10 := FND_API.G_MISS_CHAR;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1520: l_header_rec.attribute15 := FND_API.G_MISS_CHAR; */
1521: --
1522: l_header_rec.order_type_id := l_order_type_id;
1523: l_header_rec.org_id := EstDtlTab(i).org_id;
1516: l_header_rec.attribute11 := FND_API.G_MISS_CHAR;
1517: l_header_rec.attribute12 := FND_API.G_MISS_CHAR;
1518: l_header_rec.attribute13 := FND_API.G_MISS_CHAR;
1519: l_header_rec.attribute14 := FND_API.G_MISS_CHAR;
1520: l_header_rec.attribute15 := FND_API.G_MISS_CHAR; */
1521: --
1522: l_header_rec.order_type_id := l_order_type_id;
1523: l_header_rec.org_id := EstDtlTab(i).org_id;
1524: l_header_rec.quote_source_code := 'Service Billing'; -- Lookup value 7
1683: FND_MSG_PUB.Add;
1684: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1685: p_count => x_msg_count,
1686: p_data => x_msg_data);
1687: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1688:
1689: ELSE
1690: l_inv_item_id := EstDtlTab(i).rollup_item_id;
1691: END IF;
1833: FND_MSG_PUB.Add;
1834: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1835: p_count => x_msg_count,
1836: p_data => x_msg_data);
1837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1838: End If;
1839:
1840: End;
1841:
1847: FND_MSG_PUB.Add;
1848: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1849: p_count => x_msg_count,
1850: p_data => x_msg_data);
1851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1852:
1853: End If;
1854:
1855: l_before_warranty_cost := (nvl(EstDtlTab(i).selling_price, 0) * EstDtlTab(i).quantity_required );
1860: FND_MSG_PUB.Add;
1861: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1862: p_count => x_msg_count,
1863: p_data => x_msg_data);
1864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1865: END IF;
1866:
1867: IF l_before_warranty_cost = 0
1868: Then
1874: FND_MSG_PUB.Add;
1875: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
1876: p_count => x_msg_count,
1877: p_data => x_msg_data);
1878: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1879: End If;
1880: Elsif l_before_warranty_cost > 0
1881: Then
1882: If l_arith_operator = 'AMT' Then
1957: IF (EstDtlTab(i).comms_nl_trackable_flag = 'N' and
1958: EstDtlTab(i).line_category_code = 'RETURN' and
1959: EstDtlTab(i).return_serial_number IS NOT NULL) THEN
1960:
1961: l_lot_serial_tbl(1).lot_number := FND_API.G_MISS_CHAR;
1962: l_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
1963: l_lot_serial_tbl(1).quantity := abs(EstDtlTab(i).quantity_required);
1964: l_lot_serial_tbl(1).from_serial_number := EstDtlTab(i).return_serial_number;
1965: l_lot_serial_tbl(1).to_serial_number := EstDtlTab(i).return_serial_number;
1958: EstDtlTab(i).line_category_code = 'RETURN' and
1959: EstDtlTab(i).return_serial_number IS NOT NULL) THEN
1960:
1961: l_lot_serial_tbl(1).lot_number := FND_API.G_MISS_CHAR;
1962: l_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
1963: l_lot_serial_tbl(1).quantity := abs(EstDtlTab(i).quantity_required);
1964: l_lot_serial_tbl(1).from_serial_number := EstDtlTab(i).return_serial_number;
1965: l_lot_serial_tbl(1).to_serial_number := EstDtlTab(i).return_serial_number;
1966: l_lot_serial_tbl(1).operation := 'CREATE';
2011: FND_MSG_PUB.Add;
2012: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2013: p_count => x_msg_count,
2014: p_data => x_msg_data);
2015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2016:
2017: WHEN NO_DATA_FOUND THEN
2018: l_update_ib_flag := 'N';
2019: /* Commenting out this exception as part of IB changes */
2021: FND_MSG_PUB.Add;
2022: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2023: p_count => x_msg_count,
2024: p_data => x_msg_data);
2025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2026: END;
2027:
2028: -- Populate installation details if there is instance information and
2029: -- update_ib_flag is 'Y',but do not raise any error message.
2045: -- Serial_number is available only if the instance is serialized
2046: /* WHEN NO_DATA_FOUND THEN
2047: FND_MESSAGE.Set_Name('CS','CS_CHG_IB_MISSING_INSTANCE');
2048: FND_MSG_PUB.Add;
2049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2050: WHEN OTHERS THEN
2051: RAISE;
2052: END;
2053: IF l_ib_serial_number is not null THEN
2050: WHEN OTHERS THEN
2051: RAISE;
2052: END;
2053: IF l_ib_serial_number is not null THEN
2054: l_lot_serial_tbl(1).lot_number := FND_API.G_MISS_CHAR;
2055: l_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
2056: l_lot_serial_tbl(1).quantity := abs(EstDtlTab(i).quantity_required);
2057: l_lot_serial_tbl(1).from_serial_number := l_ib_serial_number;
2058: l_lot_serial_tbl(1).to_serial_number := l_ib_serial_number;
2051: RAISE;
2052: END;
2053: IF l_ib_serial_number is not null THEN
2054: l_lot_serial_tbl(1).lot_number := FND_API.G_MISS_CHAR;
2055: l_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
2056: l_lot_serial_tbl(1).quantity := abs(EstDtlTab(i).quantity_required);
2057: l_lot_serial_tbl(1).from_serial_number := l_ib_serial_number;
2058: l_lot_serial_tbl(1).to_serial_number := l_ib_serial_number;
2059: l_lot_serial_tbl(1).operation := 'CREATE';
2061: END IF;
2062: --Bug 8284773
2063: IF l_ib_lot_number is not null THEN
2064: l_lot_serial_tbl(1).lot_number := l_ib_lot_number;
2065: l_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
2066: l_lot_serial_tbl(1).quantity := abs(EstDtlTab(i).quantity_required);
2067: l_lot_serial_tbl(1).operation := 'CREATE';
2068: l_lot_serial_tbl(1).line_index := j;
2069: END IF;
2070: -- End Bug 8284773
2071: /* ELSE
2072: FND_MESSAGE.Set_Name('CS','CS_CHG_IB_MISSING_INSTANCE');
2073: FND_MSG_PUB.Add;
2074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2075: END IF;
2076: END IF;
2077:
2078:
2085: EstDtlTab(i).customer_product_id IS NULL THEN
2086:
2087: FND_MESSAGE.Set_Name('CS','CS_CHG_IB_MISSING_INSTANCE');
2088: FND_MSG_PUB.Add;
2089: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2090: END IF;
2091: --
2092: -- Clear IB structures
2093: --
2138: FND_MSG_PUB.Add;
2139: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2140: p_count => x_msg_count,
2141: p_data => x_msg_data);
2142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2143: -- null;
2144:
2145: END IF;
2146:
2147: -- Bug 11936035
2148: IF EstDtlTab(i).System_id is not null THEN
2149: csi_txn_line_detail_tbl(1).csi_system_id := EstDtlTab(i).system_id;
2150: ELSE
2151: csi_txn_line_detail_tbl(1).csi_system_id := FND_API.G_MISS_NUM;
2152: END IF;
2153: --end Bug 11936035
2154: IF EstDtlTab(i).Item_revision is not null THEN
2155: csi_txn_line_detail_tbl(1).inventory_revision := EstDtlTab(i).Item_revision;
2153: --end Bug 11936035
2154: IF EstDtlTab(i).Item_revision is not null THEN
2155: csi_txn_line_detail_tbl(1).inventory_revision := EstDtlTab(i).Item_revision;
2156: ELSE
2157: csi_txn_line_detail_tbl(1).inventory_revision := FND_API.G_MISS_CHAR;
2158: END IF;
2159:
2160: csi_txn_line_detail_tbl(1).inventory_item_id := EstDtlTab(i).Inventory_Item_id;
2161: csi_txn_line_detail_tbl(1).inv_organization_id := CS_STD.Get_Item_Valdn_Orgzn_ID;
2164:
2165: IF EstDtlTab(i).installed_cp_return_by_date is not null THEN
2166: csi_txn_line_detail_tbl(1).return_by_date := EstDtlTab(i).installed_cp_return_by_date;
2167: ELSE
2168: csi_txn_line_detail_tbl(1).return_by_date := FND_API.G_MISS_DATE;
2169: END IF;
2170:
2171: ELSE -- Shipment Line
2172: csi_txn_line_detail_tbl(1).sub_type_id := l_sub_type_id;
2171: ELSE -- Shipment Line
2172: csi_txn_line_detail_tbl(1).sub_type_id := l_sub_type_id;
2173: csi_txn_line_detail_tbl(1).source_transaction_flag := 'Y';
2174:
2175: csi_txn_line_detail_tbl(1).instance_id := FND_API.G_MISS_NUM;
2176: csi_txn_line_detail_tbl(1).instance_exists_flag := 'N';
2177:
2178: IF EstDtlTab(i).Item_revision is not null THEN
2179: csi_txn_line_detail_tbl(1).inventory_revision := EstDtlTab(i).Item_revision;
2177:
2178: IF EstDtlTab(i).Item_revision is not null THEN
2179: csi_txn_line_detail_tbl(1).inventory_revision := EstDtlTab(i).Item_revision;
2180: ELSE
2181: csi_txn_line_detail_tbl(1).inventory_revision := FND_API.G_MISS_CHAR;
2182: END IF;
2183:
2184: --Bug 11936035
2185: IF EstDtlTab(i).System_id is not null THEN
2184: --Bug 11936035
2185: IF EstDtlTab(i).System_id is not null THEN
2186: csi_txn_line_detail_tbl(1).csi_system_id := EstDtlTab(i).system_id;
2187: ELSE
2188: csi_txn_line_detail_tbl(1).csi_system_id := FND_API.G_MISS_NUM;
2189: END IF;
2190: --end Bug 11936035
2191:
2192: csi_txn_line_detail_tbl(1).inventory_item_id := EstDtlTab(i).Inventory_Item_id;
2199: IF l_src_return_reqd_flag = 'Y' THEN
2200: IF EstDtlTab(i).installed_cp_return_by_date is not null THEN
2201: csi_txn_line_detail_tbl(1).return_by_date := EstDtlTab(i).installed_cp_return_by_date;
2202: ELSE
2203: csi_txn_line_detail_tbl(1).return_by_date := FND_API.G_MISS_DATE;
2204: END IF;
2205: END IF;
2206: */
2207: -- Commented the above and uncommented the below IF block for Bug# 5136853.
2207: -- Commented the above and uncommented the below IF block for Bug# 5136853.
2208: IF EstDtlTab(i).new_cp_return_by_date is not null THEN
2209: csi_txn_line_detail_tbl(1).return_by_date := EstDtlTab(i).new_cp_return_by_date;
2210: ELSE
2211: csi_txn_line_detail_tbl(1).return_by_date := FND_API.G_MISS_DATE;
2212: END IF;
2213:
2214: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
2215: FND_LOG.String ( FND_LOG.level_procedure , L_LOG_MODULE , 'Bug 12626780 Start of Validation:'||EstDtlTab(i).Customer_product_id);
2248: FND_MSG_PUB.Add;
2249: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2250: p_count => x_msg_count,
2251: p_data => x_msg_data);
2252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2253: END IF;
2254:
2255: /* BUG 4287842 for a loaner shipment, installation details should display the ITEM for which the instance_number was selected. Currently it displays the Item irrespective of the reference number*/
2256:
2267: /*
2268: IF EstDtlTab(i).Item_revision is not null THEN
2269: csi_txn_line_detail_tbl(2).inventory_revision := EstDtlTab(i).Item_revision;
2270: ELSE
2271: csi_txn_line_detail_tbl(2).inventory_revision := FND_API.G_MISS_CHAR;
2272: END IF;
2273: */
2274:
2275: -- Uncommented the below IF block for Bug# 5136853.
2275: -- Uncommented the below IF block for Bug# 5136853.
2276: IF EstDtlTab(i).installed_cp_return_by_date is not null THEN
2277: csi_txn_line_detail_tbl(2).return_by_date := EstDtlTab(i).installed_cp_return_by_date;
2278: ELSE
2279: csi_txn_line_detail_tbl(2).return_by_date := FND_API.G_MISS_DATE;
2280: END IF;
2281:
2282:
2283: -- Create relationship between two txn line detail records
2315:
2316: IF EstDtlTab(i).installed_cp_return_by_date is not null THEN
2317: csi_txn_line_detail_tbl(2).return_by_date := EstDtlTab(i).installed_cp_return_by_date;
2318: ELSE
2319: csi_txn_line_detail_tbl(2).return_by_date := FND_API.G_MISS_DATE;
2320: END IF;
2321: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
2322: FND_LOG.String ( FND_LOG.level_procedure , L_LOG_MODULE , ' Bug 12626780 Component Info :');
2323: END IF;
2352: FND_MSG_PUB.Add;
2353: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2354: p_count => x_msg_count,
2355: p_data => x_msg_data);
2356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2357: END;
2358:
2359: -- Start Bug 8209077
2360: DECLARE
2446: FND_MSG_PUB.Add;
2447: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2448: p_count => x_msg_count,
2449: p_data => x_msg_data);
2450: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2451: END;
2452:
2453: csi_txn_party_detail_tbl(1).instance_party_id := l_instance_party_id;
2454: csi_txn_party_detail_tbl(1).party_source_table := 'HZ_PARTIES';
2462: FND_MSG_PUB.Add;
2463: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2464: p_count => x_msg_count,
2465: p_data => x_msg_data);
2466: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2467: END IF; -- IF l_src_change_owner_to_code = 'I'
2468:
2469: --taklam
2470: ---NEW CODE
2485: FND_MSG_PUB.Add;
2486: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2487: p_count => x_msg_count,
2488: p_data => x_msg_data);
2489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2490: END;
2491:
2492: -- Start Bug 8209077
2493: DECLARE
2571: FND_MSG_PUB.Add;
2572: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2573: p_count => x_msg_count,
2574: p_data => x_msg_data);
2575: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;*/
2576: END;
2577: /*
2578: csi_txn_party_detail_tbl(1).instance_party_id := l_instance_party_id;
2579: csi_txn_party_detail_tbl(1).party_source_table := 'HZ_PARTIES';
2978:
2979: -- dbms_output.put_line('In the validate_acct_site_call');
2980: -- dbms_output.put_line('Return_Status' || x_return_status);
2981:
2982: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2983: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2984: p_count => x_msg_count,
2985: p_data => x_msg_data);
2986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2982: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2983: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
2984: p_count => x_msg_count,
2985: p_data => x_msg_data);
2986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2987: END IF;
2988:
2989: -- Validate the bill to customer account site and account site use are correct.
2990: validate_acct_site_uses(
2998:
2999: -- dbms_output.put_line('In the validate_acct_site_call2');
3000: -- dbms_output.put_line('Return_Status2' || x_return_status);
3001:
3002: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3003: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3004: p_count => x_msg_count,
3005: p_data => x_msg_data);
3006: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3002: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3003: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3004: p_count => x_msg_count,
3005: p_data => x_msg_data);
3006: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3007: END IF;
3008: --
3009: -- bug 13826788
3010: --Pass the org_contact_id value
3029: FND_MSG_PUB.initialize;
3030: FND_MESSAGE.Set_Name('CS','CS_CHG_NEW_CONTEXT_OU_MISMATCH') ;
3031: FND_MESSAGE.Set_Token('ROUTINE',l_api_name_full) ;
3032: FND_MSG_PUB.Add ;
3033: raise FND_API.G_EXC_ERROR ;
3034: END IF;
3035:
3036: End if;
3037:
3271:
3272: END IF; -- Add_To_Order
3273:
3274:
3275: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
3276: -- moved this to elsif below.
3277: -- X_ORDER_HEADER_ID := X_ORDER_HEADER_REC.ORDER_HEADER_ID;
3278:
3279: IF X_ORDER_HEADER_REC.ORDER_HEADER_ID IS NULL THEN
3282: FND_MSG_PUB.Add;
3283: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3284: p_count => x_msg_count,
3285: p_data => x_msg_data);
3286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3287:
3288: -- Need to verify if we need to trap this error message
3289: --
3290:
3313: END LOOP; */
3314:
3315: -- Initialize xi_return_status.
3316:
3317: xi_return_status := FND_API.G_RET_STS_SUCCESS;
3318:
3319: /* This will call the wrapper API to raise the Business Event oracle.apps.cs.chg.Charges.submitted
3320: and their subscriptions.
3321: All the custom code exists in the subscriptions/rule functions
3335: wf_user_id := FND_GLOBAL.USER_ID;
3336:
3337: CS_CHG_WF_EVENT_PKG.RAISE_SUBMITCHARGES_EVENT(
3338: p_api_version => 1.0,
3339: p_init_msg_list => FND_API.G_FALSE,
3340: p_commit => FND_API.G_FALSE,
3341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3342: p_event_code => 'SUBMIT_CHARGES',
3343: p_estimate_detail_id => EstDtlTab(i).Estimate_Detail_Id,
3336:
3337: CS_CHG_WF_EVENT_PKG.RAISE_SUBMITCHARGES_EVENT(
3338: p_api_version => 1.0,
3339: p_init_msg_list => FND_API.G_FALSE,
3340: p_commit => FND_API.G_FALSE,
3341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3342: p_event_code => 'SUBMIT_CHARGES',
3343: p_estimate_detail_id => EstDtlTab(i).Estimate_Detail_Id,
3344: p_USER_ID => wf_user_id,
3337: CS_CHG_WF_EVENT_PKG.RAISE_SUBMITCHARGES_EVENT(
3338: p_api_version => 1.0,
3339: p_init_msg_list => FND_API.G_FALSE,
3340: p_commit => FND_API.G_FALSE,
3341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3342: p_event_code => 'SUBMIT_CHARGES',
3343: p_estimate_detail_id => EstDtlTab(i).Estimate_Detail_Id,
3344: p_USER_ID => wf_user_id,
3345: p_RESP_ID => wf_resp_id,
3352: x_return_status => lx_return_status,
3353: x_msg_count => lx_msg_count,
3354: x_msg_data => lx_msg_data );
3355:
3356: if ( lx_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3357: -- do nothing in this API. The BES wrapper API will have to trap this
3358: -- situation.
3359: null;
3360: end if;
3412: EXCEPTION
3413: WHEN OTHERS THEN
3414: FND_MESSAGE.Set_Name('CS','CS_CHG_INTERNAL_PARTY_NOT_DEF');
3415: FND_MSG_PUB.Add;
3416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3417: END;
3418:
3419: SELECT instance_party_id
3420: INTO l_instance_party_id
3437: FND_MSG_PUB.Add;
3438: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3439: p_count => x_msg_count,
3440: p_data => x_msg_data);
3441: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3442:
3443: END IF; -- IF l_src_change_owner_to_code = 'I'
3444: ELSE
3445: csi_txn_party_detail_tbl.delete;
3479: --and (EstDtlTab(i).customer_product_id IS NOT NULL) THEN -- commented for bug 9312433
3480: -- Now call the create transaction Details API.
3481: csi_t_txn_details_grp.create_transaction_dtls(
3482: p_api_version => 1.0,
3483: p_commit => fnd_api.g_false,
3484: p_init_msg_list => fnd_api.g_false,
3485: p_validation_level => fnd_api.g_valid_level_full,
3486: px_txn_line_rec => csi_txn_line_rec ,
3487: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3480: -- Now call the create transaction Details API.
3481: csi_t_txn_details_grp.create_transaction_dtls(
3482: p_api_version => 1.0,
3483: p_commit => fnd_api.g_false,
3484: p_init_msg_list => fnd_api.g_false,
3485: p_validation_level => fnd_api.g_valid_level_full,
3486: px_txn_line_rec => csi_txn_line_rec ,
3487: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3488: px_txn_party_detail_tbl => csi_txn_party_detail_tbl ,
3481: csi_t_txn_details_grp.create_transaction_dtls(
3482: p_api_version => 1.0,
3483: p_commit => fnd_api.g_false,
3484: p_init_msg_list => fnd_api.g_false,
3485: p_validation_level => fnd_api.g_valid_level_full,
3486: px_txn_line_rec => csi_txn_line_rec ,
3487: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3488: px_txn_party_detail_tbl => csi_txn_party_detail_tbl ,
3489: px_txn_pty_acct_detail_tbl => csi_txn_pty_acct_detail_tbl,
3498: ELSIF EstDtlTab(i).line_category_code = 'ORDER' THEN
3499: -- Now call the create transaction Details API.
3500: csi_t_txn_details_grp.create_transaction_dtls(
3501: p_api_version => 1.0,
3502: p_commit => fnd_api.g_false,
3503: p_init_msg_list => fnd_api.g_false,
3504: p_validation_level => fnd_api.g_valid_level_full,
3505: px_txn_line_rec => csi_txn_line_rec ,
3506: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3499: -- Now call the create transaction Details API.
3500: csi_t_txn_details_grp.create_transaction_dtls(
3501: p_api_version => 1.0,
3502: p_commit => fnd_api.g_false,
3503: p_init_msg_list => fnd_api.g_false,
3504: p_validation_level => fnd_api.g_valid_level_full,
3505: px_txn_line_rec => csi_txn_line_rec ,
3506: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3507: px_txn_party_detail_tbl => csi_txn_party_detail_tbl ,
3500: csi_t_txn_details_grp.create_transaction_dtls(
3501: p_api_version => 1.0,
3502: p_commit => fnd_api.g_false,
3503: p_init_msg_list => fnd_api.g_false,
3504: p_validation_level => fnd_api.g_valid_level_full,
3505: px_txn_line_rec => csi_txn_line_rec ,
3506: px_txn_line_detail_tbl => csi_txn_line_detail_tbl,
3507: px_txn_party_detail_tbl => csi_txn_party_detail_tbl ,
3508: px_txn_pty_acct_detail_tbl => csi_txn_pty_acct_detail_tbl,
3517: END IF; -- fix bug:3800010
3518:
3519: END IF; -- comms_nl_trackable_flag
3520:
3521: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3522:
3523: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3524: p_count => x_msg_count,
3525: p_data => x_msg_data);
3527: -- dbms_output.put_line('message status' || x_return_status);
3528: -- dbms_output.put_line('message_data' || substr(x_msg_data,1,200));
3529: -- dbms_output.put_line('message_count' || x_msg_count);
3530:
3531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3532:
3533: END IF;
3534:
3535: -- FND_MESSAGE.Set_Encoded(xi_msg_data);
3532:
3533: END IF;
3534:
3535: -- FND_MESSAGE.Set_Encoded(xi_msg_data);
3536: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3537:
3538:
3539: END IF; -- if billing flag = 'M'
3540:
3580:
3581: END LOOP;
3582: --
3583: -- IF THE ORDER CREATION IS NOT SUCCESSFUL
3584: ELSIF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3585:
3586: IF x_msg_count > 0 THEN
3587: -- Get next message
3588:
3596: p_data=>x_msg_data,
3597: p_msg_index_out=>l_dummy);
3598: end loop;
3599:
3600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3601:
3602: /* for k in 1..x_msg_count loop
3603: FND_MSG_PUB.get(p_encoded => 'F',
3604: p_data=>x_msg_data,
3628: FND_MSG_PUB.Add;
3629: FND_MSG_PUB.Count_And_Get(p_encoded => 'F',
3630: p_count => x_msg_count,
3631: p_data => x_msg_data);
3632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3633:
3634: END IF;
3635:
3636: -- FND_MESSAGE.Set_Encoded(x_msg_data);
3634: END IF;
3635:
3636: -- FND_MESSAGE.Set_Encoded(x_msg_data);
3637: -- FND_MSG_PUB.Add;
3638: -- RAISE FND_API.G_EXC_ERROR;
3639:
3640: END IF;
3641:
3642: END LOOP;
3649: --FND_MESSAGE.SET_TOKEN('INCIDENT_ID', p_incident_id, TRUE);
3650: --FND_MESSAGE.SET_TOKEN('PARTY_ID', p_party_id, TRUE);
3651: --FND_MESSAGE.SET_TOKEN('ACCOUNT_ID', p_account_id, TRUE);
3652: FND_MSG_PUB.Add;
3653: RAISE FND_API.G_EXC_ERROR;
3654: END IF;
3655:
3656: --
3657: -- End of API body
3657: -- End of API body
3658: --
3659:
3660: -- Standard check of p_commit.
3661: IF FND_API.To_Boolean( p_commit ) THEN
3662: COMMIT WORK;
3663: END IF;
3664:
3665: -- Standard call to get message count and if count is 1, get message info.
3675: --7117301
3676: WHEN RESOURCE_BUSY THEN
3677: FND_MESSAGE.Set_Name('CS','CS_CH_SUBMIT_IN_PROCESS');
3678: FND_MSG_PUB.Add;
3679: RAISE FND_API.G_EXC_ERROR;
3680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3681: --7117301
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: ROLLBACK TO CS_Charge_Create_Order_PVT;
3676: WHEN RESOURCE_BUSY THEN
3677: FND_MESSAGE.Set_Name('CS','CS_CH_SUBMIT_IN_PROCESS');
3678: FND_MSG_PUB.Add;
3679: RAISE FND_API.G_EXC_ERROR;
3680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3681: --7117301
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: ROLLBACK TO CS_Charge_Create_Order_PVT;
3684: x_return_status := FND_API.G_RET_STS_ERROR;
3678: FND_MSG_PUB.Add;
3679: RAISE FND_API.G_EXC_ERROR;
3680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3681: --7117301
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: ROLLBACK TO CS_Charge_Create_Order_PVT;
3684: x_return_status := FND_API.G_RET_STS_ERROR;
3685: FND_MSG_PUB.Count_And_Get
3686: ( p_count => x_msg_count,
3680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3681: --7117301
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: ROLLBACK TO CS_Charge_Create_Order_PVT;
3684: x_return_status := FND_API.G_RET_STS_ERROR;
3685: FND_MSG_PUB.Count_And_Get
3686: ( p_count => x_msg_count,
3687: p_data => x_msg_data
3688: );
3689:
3690: --
3691: -- This exception is for Charge Line Level
3692:
3693: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3694:
3695: -- updating charges schema with errors for 11.5.10
3696: --
3697: -- dbms_output.put_line('Charge_Line_Id before calling update_errors' || EstDtlTab(i).estimate_detail_id);
3704: p_submit_from_system => p_submit_from_system);
3705:
3706: FND_MESSAGE.Set_Encoded(x_msg_data);
3707: --ROLLBACK TO CS_Charge_Create_Order_PVT; --7117301
3708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3709:
3710: WHEN OTHERS THEN
3711: g_oraerrmsg := substrb(sqlerrm,1,G_MAXERRLEN);
3712: fnd_message.set_name('CS','CS_CHG_SUBMIT_ORDER_FAILED');
3739: FND_MESSAGE.Set_Encoded(x_msg_data);
3740:
3741:
3742: --ROLLBACK TO CS_Charge_Create_Order_PVT; --7117301
3743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3744:
3745: END Submit_Order;
3746:
3747: /***************************************************************************/