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

APPS.ASO_CHECK_TCA_PVT dependencies on FND_API

Line 16: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'asovctcb.pls';
13:
14: PROCEDURE check_tca(
15: p_api_version IN NUMBER,
16: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
17: P_Qte_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Header_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
19: P_Operation_Code IN VARCHAR2 := FND_API.G_MISS_CHAR,
20: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 19: P_Operation_Code IN VARCHAR2 := FND_API.G_MISS_CHAR,

15: p_api_version IN NUMBER,
16: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
17: P_Qte_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Header_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
19: P_Operation_Code IN VARCHAR2 := FND_API.G_MISS_CHAR,
20: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,
21: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
22: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
23: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 20: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,

16: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
17: P_Qte_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Header_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
19: P_Operation_Code IN VARCHAR2 := FND_API.G_MISS_CHAR,
20: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,
21: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
22: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
23: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
24: )

Line 61: IF FND_API.to_boolean(p_init_msg_list) THEN

57: BEGIN
58:
59: SAVEPOINT CHECK_TCA_PVT;
60:
61: IF FND_API.to_boolean(p_init_msg_list) THEN
62: FND_MSG_PUB.initialize;
63: END IF;
64:
65: IF NOT FND_API.compatible_api_call(

Line 65: IF NOT FND_API.compatible_api_call(

61: IF FND_API.to_boolean(p_init_msg_list) THEN
62: FND_MSG_PUB.initialize;
63: END IF;
64:
65: IF NOT FND_API.compatible_api_call(
66: l_api_version,
67: p_api_version,
68: l_api_name,
69: g_pkg_name

Line 71: RAISE FND_API.g_exc_unexpected_error;

67: p_api_version,
68: l_api_name,
69: g_pkg_name
70: ) THEN
71: RAISE FND_API.g_exc_unexpected_error;
72: END IF;
73:
74: x_return_status := FND_API.g_ret_sts_success;
75:

Line 74: x_return_status := FND_API.g_ret_sts_success;

70: ) THEN
71: RAISE FND_API.g_exc_unexpected_error;
72: END IF;
73:
74: x_return_status := FND_API.g_ret_sts_success;
75:
76: IF aso_debug_pub.g_debug_flag = 'Y' THEN
77: aso_debug_pub.add('Check_Tca: begin', 1, 'N');
78: aso_debug_pub.add('Check_Tca: p_qte_rec.party_id: '||p_qte_rec.party_id, 1, 'N');

Line 86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR

82:
83: IF (p_application_type_code = 'QUOTING HTML' AND p_operation_code = 'UPDATE') THEN
84: l_qte_header_rec := ASO_UTILITY_PVT.query_header_row (p_qte_rec.quote_header_id);
85:
86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR
87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR
88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN

Line 87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR

83: IF (p_application_type_code = 'QUOTING HTML' AND p_operation_code = 'UPDATE') THEN
84: l_qte_header_rec := ASO_UTILITY_PVT.query_header_row (p_qte_rec.quote_header_id);
85:
86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR
87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR
88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN
91:

Line 88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR

84: l_qte_header_rec := ASO_UTILITY_PVT.query_header_row (p_qte_rec.quote_header_id);
85:
86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR
87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR
88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN
91:
92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN

Line 89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND

85:
86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR
87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR
88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN
91:
92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
93: p_qte_rec.party_id := l_qte_header_rec.party_id;

Line 90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN

86: IF p_qte_rec.party_id <> FND_API.G_MISS_NUM OR
87: p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM OR
88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN
91:
92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
93: p_qte_rec.party_id := l_qte_header_rec.party_id;
94: END IF;

Line 92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN

88: p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM OR
89: p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM AND
90: p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM THEN
91:
92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
93: p_qte_rec.party_id := l_qte_header_rec.party_id;
94: END IF;
95: IF p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN
96: p_qte_rec.cust_party_id := l_qte_header_rec.cust_party_id;

Line 95: IF p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN

91:
92: IF p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
93: p_qte_rec.party_id := l_qte_header_rec.party_id;
94: END IF;
95: IF p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN
96: p_qte_rec.cust_party_id := l_qte_header_rec.cust_party_id;
97: END IF;
98: IF p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN
99: p_qte_rec.cust_account_id := l_qte_header_rec.cust_account_id;

Line 98: IF p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN

94: END IF;
95: IF p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN
96: p_qte_rec.cust_party_id := l_qte_header_rec.cust_party_id;
97: END IF;
98: IF p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN
99: p_qte_rec.cust_account_id := l_qte_header_rec.cust_account_id;
100: END IF;
101: IF p_qte_rec.sold_to_party_site_id = FND_API.G_MISS_NUM THEN
102: p_qte_rec.sold_to_party_site_id := l_qte_header_rec.sold_to_party_site_id;

Line 101: IF p_qte_rec.sold_to_party_site_id = FND_API.G_MISS_NUM THEN

97: END IF;
98: IF p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN
99: p_qte_rec.cust_account_id := l_qte_header_rec.cust_account_id;
100: END IF;
101: IF p_qte_rec.sold_to_party_site_id = FND_API.G_MISS_NUM THEN
102: p_qte_rec.sold_to_party_site_id := l_qte_header_rec.sold_to_party_site_id;
103: END IF;
104:
105: IF p_qte_rec.org_contact_id = FND_API.G_MISS_NUM THEN

Line 105: IF p_qte_rec.org_contact_id = FND_API.G_MISS_NUM THEN

101: IF p_qte_rec.sold_to_party_site_id = FND_API.G_MISS_NUM THEN
102: p_qte_rec.sold_to_party_site_id := l_qte_header_rec.sold_to_party_site_id;
103: END IF;
104:
105: IF p_qte_rec.org_contact_id = FND_API.G_MISS_NUM THEN
106: p_qte_rec.org_contact_id := l_qte_header_rec.org_contact_id;
107: END IF;
108:
109: END IF;

Line 111: IF p_qte_rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR

107: END IF;
108:
109: END IF;
110:
111: IF p_qte_rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
115:

Line 112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR

108:
109: END IF;
110:
111: IF p_qte_rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
115:
116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN

Line 113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR

109: END IF;
110:
111: IF p_qte_rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
115:
116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
117: p_qte_rec.invoice_to_party_id := l_qte_header_rec.invoice_to_party_id;

Line 114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN

110:
111: IF p_qte_rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
115:
116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
117: p_qte_rec.invoice_to_party_id := l_qte_header_rec.invoice_to_party_id;
118: END IF;

Line 116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN

112: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
113: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
114: p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
115:
116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
117: p_qte_rec.invoice_to_party_id := l_qte_header_rec.invoice_to_party_id;
118: END IF;
119: IF p_qte_rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
120: p_qte_rec.invoice_to_cust_party_id := l_qte_header_rec.invoice_to_cust_party_id;

Line 119: IF p_qte_rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN

115:
116: IF p_qte_rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
117: p_qte_rec.invoice_to_party_id := l_qte_header_rec.invoice_to_party_id;
118: END IF;
119: IF p_qte_rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
120: p_qte_rec.invoice_to_cust_party_id := l_qte_header_rec.invoice_to_cust_party_id;
121: END IF;
122: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
123: p_qte_rec.invoice_to_cust_account_id := l_qte_header_rec.invoice_to_cust_account_id;

Line 122: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN

118: END IF;
119: IF p_qte_rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
120: p_qte_rec.invoice_to_cust_party_id := l_qte_header_rec.invoice_to_cust_party_id;
121: END IF;
122: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
123: p_qte_rec.invoice_to_cust_account_id := l_qte_header_rec.invoice_to_cust_account_id;
124: END IF;
125: IF p_qte_rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN
126: p_qte_rec.invoice_to_party_site_id := l_qte_header_rec.invoice_to_party_site_id;

Line 125: IF p_qte_rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN

121: END IF;
122: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
123: p_qte_rec.invoice_to_cust_account_id := l_qte_header_rec.invoice_to_cust_account_id;
124: END IF;
125: IF p_qte_rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN
126: p_qte_rec.invoice_to_party_site_id := l_qte_header_rec.invoice_to_party_site_id;
127: END IF;
128: END IF;
129:

Line 130: IF p_qte_rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR

126: p_qte_rec.invoice_to_party_site_id := l_qte_header_rec.invoice_to_party_site_id;
127: END IF;
128: END IF;
129:
130: IF p_qte_rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
134:

Line 131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR

127: END IF;
128: END IF;
129:
130: IF p_qte_rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
134:
135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN

Line 132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR

128: END IF;
129:
130: IF p_qte_rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
134:
135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
136: p_qte_rec.End_Customer_party_id := l_qte_header_rec.End_Customer_party_id;

Line 133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN

129:
130: IF p_qte_rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
134:
135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
136: p_qte_rec.End_Customer_party_id := l_qte_header_rec.End_Customer_party_id;
137: END IF;

Line 135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN

131: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
132: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
133: p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
134:
135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
136: p_qte_rec.End_Customer_party_id := l_qte_header_rec.End_Customer_party_id;
137: END IF;
138: IF p_qte_rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
139: p_qte_rec.End_Customer_cust_party_id := l_qte_header_rec.End_Customer_cust_party_id;

Line 138: IF p_qte_rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN

134:
135: IF p_qte_rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
136: p_qte_rec.End_Customer_party_id := l_qte_header_rec.End_Customer_party_id;
137: END IF;
138: IF p_qte_rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
139: p_qte_rec.End_Customer_cust_party_id := l_qte_header_rec.End_Customer_cust_party_id;
140: END IF;
141: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
142: p_qte_rec.End_Customer_cust_account_id := l_qte_header_rec.End_Customer_cust_account_id;

Line 141: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN

137: END IF;
138: IF p_qte_rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
139: p_qte_rec.End_Customer_cust_party_id := l_qte_header_rec.End_Customer_cust_party_id;
140: END IF;
141: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
142: p_qte_rec.End_Customer_cust_account_id := l_qte_header_rec.End_Customer_cust_account_id;
143: END IF;
144: IF p_qte_rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN
145: p_qte_rec.End_Customer_party_site_id := l_qte_header_rec.End_Customer_party_site_id;

Line 144: IF p_qte_rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN

140: END IF;
141: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
142: p_qte_rec.End_Customer_cust_account_id := l_qte_header_rec.End_Customer_cust_account_id;
143: END IF;
144: IF p_qte_rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN
145: p_qte_rec.End_Customer_party_site_id := l_qte_header_rec.End_Customer_party_site_id;
146: END IF;
147: END IF;
148:

Line 151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN

147: END IF;
148:
149: IF P_Header_Shipment_Tbl.count > 0 THEN
150: IF P_Header_Shipment_Tbl(1).operation_code = 'UPDATE' AND
151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN
152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR
153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

Line 152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR

148:
149: IF P_Header_Shipment_Tbl.count > 0 THEN
150: IF P_Header_Shipment_Tbl(1).operation_code = 'UPDATE' AND
151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN
152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR
153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
156:

Line 153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR

149: IF P_Header_Shipment_Tbl.count > 0 THEN
150: IF P_Header_Shipment_Tbl(1).operation_code = 'UPDATE' AND
151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN
152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR
153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
156:
157: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_Header_Shipment_Tbl(1).shipment_id);

Line 154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR

150: IF P_Header_Shipment_Tbl(1).operation_code = 'UPDATE' AND
151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN
152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR
153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
156:
157: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_Header_Shipment_Tbl(1).shipment_id);
158: IF P_Header_Shipment_Tbl(1).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN

Line 155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

151: (P_Header_Shipment_Tbl(1).shipment_id IS NOT NULL AND P_Header_Shipment_Tbl(1).shipment_id <> FND_API.G_MISS_NUM) THEN
152: IF P_Header_Shipment_Tbl(1).ship_to_party_id <> FND_API.G_MISS_NUM OR
153: P_Header_Shipment_Tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
156:
157: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_Header_Shipment_Tbl(1).shipment_id);
158: IF P_Header_Shipment_Tbl(1).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
159: P_Header_Shipment_Tbl(1).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;

Line 158: IF P_Header_Shipment_Tbl(1).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN

154: P_Header_Shipment_Tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
155: P_Header_Shipment_Tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
156:
157: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_Header_Shipment_Tbl(1).shipment_id);
158: IF P_Header_Shipment_Tbl(1).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
159: P_Header_Shipment_Tbl(1).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;
160: END IF;
161: IF P_Header_Shipment_Tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
162: P_Header_Shipment_Tbl(1).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;

Line 161: IF P_Header_Shipment_Tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN

157: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_Header_Shipment_Tbl(1).shipment_id);
158: IF P_Header_Shipment_Tbl(1).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
159: P_Header_Shipment_Tbl(1).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;
160: END IF;
161: IF P_Header_Shipment_Tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
162: P_Header_Shipment_Tbl(1).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;
163: END IF;
164: IF P_Header_Shipment_Tbl(1).ship_to_party_id = FND_API.G_MISS_NUM THEN
165: P_Header_Shipment_Tbl(1).ship_to_party_id := l_shipment_rec.ship_to_party_id;

Line 164: IF P_Header_Shipment_Tbl(1).ship_to_party_id = FND_API.G_MISS_NUM THEN

160: END IF;
161: IF P_Header_Shipment_Tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
162: P_Header_Shipment_Tbl(1).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;
163: END IF;
164: IF P_Header_Shipment_Tbl(1).ship_to_party_id = FND_API.G_MISS_NUM THEN
165: P_Header_Shipment_Tbl(1).ship_to_party_id := l_shipment_rec.ship_to_party_id;
166: END IF;
167: IF P_Header_Shipment_Tbl(1).ship_to_party_site_id = FND_API.G_MISS_NUM THEN
168: P_Header_Shipment_Tbl(1).ship_to_party_site_id := l_shipment_rec.ship_to_party_site_id;

Line 167: IF P_Header_Shipment_Tbl(1).ship_to_party_site_id = FND_API.G_MISS_NUM THEN

163: END IF;
164: IF P_Header_Shipment_Tbl(1).ship_to_party_id = FND_API.G_MISS_NUM THEN
165: P_Header_Shipment_Tbl(1).ship_to_party_id := l_shipment_rec.ship_to_party_id;
166: END IF;
167: IF P_Header_Shipment_Tbl(1).ship_to_party_site_id = FND_API.G_MISS_NUM THEN
168: P_Header_Shipment_Tbl(1).ship_to_party_site_id := l_shipment_rec.ship_to_party_site_id;
169: END IF;
170: END IF;
171: END IF;

Line 176: IF p_qte_rec.party_id IS NULL OR p_qte_rec.party_id = FND_API.G_MISS_NUM THEN

172: END IF;
173:
174: END IF; -- UPDATE
175:
176: IF p_qte_rec.party_id IS NULL OR p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
177:
178: IF p_qte_rec.cust_party_id IS NOT NULL AND p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM THEN
179:
180: p_qte_rec.party_id := p_qte_rec.cust_party_id;

Line 178: IF p_qte_rec.cust_party_id IS NOT NULL AND p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM THEN

174: END IF; -- UPDATE
175:
176: IF p_qte_rec.party_id IS NULL OR p_qte_rec.party_id = FND_API.G_MISS_NUM THEN
177:
178: IF p_qte_rec.cust_party_id IS NOT NULL AND p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM THEN
179:
180: p_qte_rec.party_id := p_qte_rec.cust_party_id;
181:
182: ELSIF p_qte_rec.cust_account_id IS NOT NULL AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN

Line 182: ELSIF p_qte_rec.cust_account_id IS NOT NULL AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN

178: IF p_qte_rec.cust_party_id IS NOT NULL AND p_qte_rec.cust_party_id <> FND_API.G_MISS_NUM THEN
179:
180: p_qte_rec.party_id := p_qte_rec.cust_party_id;
181:
182: ELSIF p_qte_rec.cust_account_id IS NOT NULL AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN
183:
184: OPEN C_Get_Party_From_Acct(p_qte_rec.cust_account_id);
185: FETCH C_Get_Party_From_Acct INTO p_qte_rec.party_id;
186: IF C_Get_Party_From_Acct%NOTFOUND THEN

Line 187: x_Return_Status := FND_API.G_RET_STS_ERROR;

183:
184: OPEN C_Get_Party_From_Acct(p_qte_rec.cust_account_id);
185: FETCH C_Get_Party_From_Acct INTO p_qte_rec.party_id;
186: IF C_Get_Party_From_Acct%NOTFOUND THEN
187: x_Return_Status := FND_API.G_RET_STS_ERROR;
188: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
189: FND_MESSAGE.Set_Name('ASO', 'ASO_API_INVALID_ID');
190: FND_MESSAGE.Set_Token('COLUMN', 'CUST_ACCOUNT_ID', FALSE);
191: FND_MESSAGE.Set_Token('VALUE', to_char(p_qte_rec.cust_account_id), FALSE);

Line 195: raise FND_API.G_EXC_ERROR;

191: FND_MESSAGE.Set_Token('VALUE', to_char(p_qte_rec.cust_account_id), FALSE);
192: FND_MSG_PUB.ADD;
193: END IF;
194: CLOSE C_Get_Party_From_Acct;
195: raise FND_API.G_EXC_ERROR;
196: END IF;
197: CLOSE C_Get_Party_From_Acct;
198:
199: END IF;

Line 207: IF p_qte_rec.party_id IS NOT NULL AND p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN

203: IF aso_debug_pub.g_debug_flag = 'Y' THEN
204: aso_debug_pub.add('Check_Tca: p_qte_rec.party_id: '||p_qte_rec.party_id, 1, 'N');
205: END IF;
206:
207: IF p_qte_rec.party_id IS NOT NULL AND p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
208:
209: IF p_qte_rec.cust_party_id IS NULL OR p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN
210:
211: OPEN C_Party_Type(p_qte_rec.party_id);

Line 209: IF p_qte_rec.cust_party_id IS NULL OR p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN

205: END IF;
206:
207: IF p_qte_rec.party_id IS NOT NULL AND p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
208:
209: IF p_qte_rec.cust_party_id IS NULL OR p_qte_rec.cust_party_id = FND_API.G_MISS_NUM THEN
210:
211: OPEN C_Party_Type(p_qte_rec.party_id);
212: FETCH C_Party_Type INTO l_party_type;
213: CLOSE C_Party_Type;

Line 237: IF p_qte_rec.cust_account_id IS NULL OR p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN

233: IF aso_debug_pub.g_debug_flag = 'Y' THEN
234: aso_debug_pub.add('Check_Tca: p_qte_rec.cust_party_id: '||p_qte_rec.cust_party_id, 1, 'N');
235: END IF;
236:
237: IF p_qte_rec.cust_account_id IS NULL OR p_qte_rec.cust_account_id = FND_API.G_MISS_NUM THEN
238:
239: IF aso_debug_pub.g_debug_flag = 'Y' THEN
240: aso_debug_pub.add('Check_Tca: before customer account:p_qte_rec.party_id '||p_qte_rec.party_id, 1, 'N');
241: END IF;

Line 255: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

251:
252: IF aso_debug_pub.g_debug_flag = 'Y' THEN
253: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '||x_Return_Status, 1, 'N');
254: END IF;
255: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
256: raise FND_API.G_EXC_ERROR;
257: END IF;
258:
259: END IF; -- cust_account_id

Line 256: raise FND_API.G_EXC_ERROR;

252: IF aso_debug_pub.g_debug_flag = 'Y' THEN
253: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '||x_Return_Status, 1, 'N');
254: END IF;
255: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
256: raise FND_API.G_EXC_ERROR;
257: END IF;
258:
259: END IF; -- cust_account_id
260:

Line 269: IF lx_cust_account_id IS NOT NULL AND lx_cust_account_id <> FND_API.G_MISS_NUM THEN

265: END IF; -- party_id is not null
266:
267: lx_cust_account_id := p_qte_rec.cust_account_id;
268:
269: IF lx_cust_account_id IS NOT NULL AND lx_cust_account_id <> FND_API.G_MISS_NUM THEN
270: IF aso_debug_pub.g_debug_flag = 'Y' THEN
271: aso_debug_pub.add('before org contact', 1, 'N');
272: END IF;
273: IF p_qte_rec.party_id is not null and

Line 274: p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN

270: IF aso_debug_pub.g_debug_flag = 'Y' THEN
271: aso_debug_pub.add('before org contact', 1, 'N');
272: END IF;
273: IF p_qte_rec.party_id is not null and
274: p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
275:
276: IF aso_debug_pub.g_debug_flag = 'Y' THEN
277: aso_debug_pub.add('before org contact:p_qte_rec.org_contact_id: '||p_qte_rec.org_contact_id, 1, 'N');
278: END IF;

Line 280: p_qte_rec.org_contact_id = FND_API.G_MISS_NUM THEN

276: IF aso_debug_pub.g_debug_flag = 'Y' THEN
277: aso_debug_pub.add('before org contact:p_qte_rec.org_contact_id: '||p_qte_rec.org_contact_id, 1, 'N');
278: END IF;
279: IF p_qte_rec.org_contact_id is NULL OR
280: p_qte_rec.org_contact_id = FND_API.G_MISS_NUM THEN
281: ASO_MAP_QUOTE_ORDER_INT.get_org_contact(p_party_id => p_qte_rec.party_id,
282: x_org_contact => l_org_contact);
283: IF aso_debug_pub.g_debug_flag = 'Y' THEN
284: aso_debug_pub.add('after org contact:l_org_contact: '||l_org_contact, 1, 'N');

Line 289: IF l_org_contact is not NULL AND l_org_contact <> FND_API.G_MISS_NUM THEN

285: END IF;
286: ELSE
287: l_org_contact := p_qte_rec.org_contact_id;
288: END IF;
289: IF l_org_contact is not NULL AND l_org_contact <> FND_API.G_MISS_NUM THEN
290: IF aso_debug_pub.g_debug_flag = 'Y' THEN
291: aso_debug_pub.add('deriving org_contact_role:l_org_contact: ' || l_org_contact,1, 'N');
292: END IF;
293: ASO_MAP_QUOTE_ORDER_INT.get_org_contact_role(

Line 304: if p_qte_rec.org_contact_id is not null and p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM then

300: IF aso_debug_pub.g_debug_flag = 'Y' THEN
301: aso_debug_pub.add('after get org contact. l_org_contact_party_id = ' || l_org_contact_party_id ,1, 'N');
302: aso_debug_pub.add('after get org contact. sold_to_contact_id = ' || l_sold_to_contact_id ,1, 'N');
303: END IF;
304: if p_qte_rec.org_contact_id is not null and p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM then
305: p_qte_rec.party_id := l_org_contact_party_id;
306: end if;
307: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
308: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 307: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

303: END IF;
304: if p_qte_rec.org_contact_id is not null and p_qte_rec.org_contact_id <> FND_API.G_MISS_NUM then
305: p_qte_rec.party_id := l_org_contact_party_id;
306: end if;
307: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
308: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
309: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_ORG_CON_ACT_CRS');
310: -- FND_MESSAGE.Set_Token('ID', to_char(p_qte_rec.org_contact_id),FALSE);
311: FND_MSG_PUB.ADD;

Line 313: raise FND_API.G_EXC_ERROR;

309: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_ORG_CON_ACT_CRS');
310: -- FND_MESSAGE.Set_Token('ID', to_char(p_qte_rec.org_contact_id),FALSE);
311: FND_MSG_PUB.ADD;
312: END IF;
313: raise FND_API.G_EXC_ERROR;
314: END IF;
315: IF l_sold_to_contact_id is NULL OR
316: l_sold_to_contact_id = FND_API.G_MISS_NUM THEN
317: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 316: l_sold_to_contact_id = FND_API.G_MISS_NUM THEN

312: END IF;
313: raise FND_API.G_EXC_ERROR;
314: END IF;
315: IF l_sold_to_contact_id is NULL OR
316: l_sold_to_contact_id = FND_API.G_MISS_NUM THEN
317: IF aso_debug_pub.g_debug_flag = 'Y' THEN
318: aso_debug_pub.add('calling create contact role for org contact ',1, 'N');
319: END IF;
320: ASO_PARTY_INT.Create_Contact_Role (

Line 333: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

329: IF aso_debug_pub.g_debug_flag = 'Y' THEN
330: aso_debug_pub.add('after create contact role. sold_to_contact_id = ' || l_sold_to_contact_id ,1, 'N');
331: aso_debug_pub.add('after create contact role. x_return_status = ' || x_return_status ,1, 'N');
332: END IF;
333: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
334: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
335: FND_MESSAGE.Set_Name('ASO', 'ASO_ORG_CONTACT');
336: FND_MESSAGE.Set_Token('ID', to_char(p_qte_rec.party_id), FALSE);
337: FND_MSG_PUB.ADD;

Line 339: raise FND_API.G_EXC_ERROR;

335: FND_MESSAGE.Set_Name('ASO', 'ASO_ORG_CONTACT');
336: FND_MESSAGE.Set_Token('ID', to_char(p_qte_rec.party_id), FALSE);
337: FND_MSG_PUB.ADD;
338: END IF;
339: raise FND_API.G_EXC_ERROR;
340: END IF;
341: END IF;
342:
343: END IF;

Line 365: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

361:
362: IF aso_debug_pub.g_debug_flag = 'Y' THEN
363: aso_debug_pub.add('after check hdr info:x_return_status: '||x_return_status,1, 'N');
364: END IF;
365: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
366: raise FND_API.G_EXC_ERROR;
367: END IF;
368:
369: FND_MSG_PUB.Count_And_Get

Line 366: raise FND_API.G_EXC_ERROR;

362: IF aso_debug_pub.g_debug_flag = 'Y' THEN
363: aso_debug_pub.add('after check hdr info:x_return_status: '||x_return_status,1, 'N');
364: END IF;
365: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
366: raise FND_API.G_EXC_ERROR;
367: END IF;
368:
369: FND_MSG_PUB.Count_And_Get
370: ( p_count => x_msg_count,

Line 375: WHEN FND_API.G_EXC_ERROR THEN

371: p_data => x_msg_data
372: );
373:
374: EXCEPTION
375: WHEN FND_API.G_EXC_ERROR THEN
376: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
377: P_API_NAME => L_API_NAME
378: ,P_PKG_NAME => G_PKG_NAME
379: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 387: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

383: ,X_MSG_COUNT => X_MSG_COUNT
384: ,X_MSG_DATA => X_MSG_DATA
385: ,X_RETURN_STATUS => X_RETURN_STATUS);
386:
387: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
388: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
389: P_API_NAME => L_API_NAME
390: ,P_PKG_NAME => G_PKG_NAME
391: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 416: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

412:
413:
414: PROCEDURE check_header_account_info(
415: p_api_version IN NUMBER,
416: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
417: p_cust_account_id IN NUMBER,
418: P_Qte_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Header_Rec_Type,
419: P_Header_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
420: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 469: IF FND_API.to_boolean(p_init_msg_list) THEN

465: BEGIN
466:
467: SAVEPOINT CHECK_HEADER_ACCOUNT_INFO_PVT;
468:
469: IF FND_API.to_boolean(p_init_msg_list) THEN
470: FND_MSG_PUB.initialize;
471: END IF;
472:
473: IF NOT FND_API.compatible_api_call(

Line 473: IF NOT FND_API.compatible_api_call(

469: IF FND_API.to_boolean(p_init_msg_list) THEN
470: FND_MSG_PUB.initialize;
471: END IF;
472:
473: IF NOT FND_API.compatible_api_call(
474: l_api_version,
475: p_api_version,
476: l_api_name,
477: g_pkg_name

Line 479: RAISE FND_API.g_exc_unexpected_error;

475: p_api_version,
476: l_api_name,
477: g_pkg_name
478: ) THEN
479: RAISE FND_API.g_exc_unexpected_error;
480: END IF;
481:
482: x_return_status := FND_API.g_ret_sts_success;
483:

Line 482: x_return_status := FND_API.g_ret_sts_success;

478: ) THEN
479: RAISE FND_API.g_exc_unexpected_error;
480: END IF;
481:
482: x_return_status := FND_API.g_ret_sts_success;
483:
484: IF aso_debug_pub.g_debug_flag = 'Y' THEN
485: aso_debug_pub.add('Check_Hdr_Acct: begin ', 1, 'Y');
486: aso_debug_pub.add('Check_Hdr_Acct: before sold to party site id '|| p_qte_rec.sold_to_party_site_id, 1, 'N');

Line 493: AND p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM THEN

489: aso_debug_pub.add('Check_Hdr_Acct: p_qte_rec.invoice_to_party_site_id: '|| p_qte_rec.invoice_to_party_site_id, 1, 'N');
490: END IF;
491:
492: IF p_qte_rec.sold_to_party_site_id is not NULL
493: AND p_qte_rec.sold_to_party_site_id <> FND_API.G_MISS_NUM THEN
494:
495: OPEN C_Site_Use(p_qte_rec.sold_to_party_site_id);
496: FETCH C_Site_Use INTO l_party_site_use_id;
497: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

509:
510: IF aso_debug_pub.g_debug_flag = 'Y' THEN
511: aso_debug_pub.add('chk_hdr:party_site_use_id after sold_to = ' || l_party_site_use_id,1,'N');
512: END IF;
513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
514: raise FND_API.G_EXC_ERROR;
515: END IF;
516:
517: END IF;

Line 514: raise FND_API.G_EXC_ERROR;

510: IF aso_debug_pub.g_debug_flag = 'Y' THEN
511: aso_debug_pub.add('chk_hdr:party_site_use_id after sold_to = ' || l_party_site_use_id,1,'N');
512: END IF;
513: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
514: raise FND_API.G_EXC_ERROR;
515: END IF;
516:
517: END IF;
518:

Line 534: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

530:
531: IF aso_debug_pub.g_debug_flag = 'Y' THEN
532: aso_debug_pub.add('chk_hdr:after populate_acct_party: ' || x_return_status,1,'N');
533: END IF;
534: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
535: raise FND_API.G_EXC_ERROR;
536: END IF;
537:
538: IF (p_qte_rec.invoice_to_cust_party_id is NOT NULL AND

Line 535: raise FND_API.G_EXC_ERROR;

531: IF aso_debug_pub.g_debug_flag = 'Y' THEN
532: aso_debug_pub.add('chk_hdr:after populate_acct_party: ' || x_return_status,1,'N');
533: END IF;
534: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
535: raise FND_API.G_EXC_ERROR;
536: END IF;
537:
538: IF (p_qte_rec.invoice_to_cust_party_id is NOT NULL AND
539: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND

Line 539: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND

535: raise FND_API.G_EXC_ERROR;
536: END IF;
537:
538: IF (p_qte_rec.invoice_to_cust_party_id is NOT NULL AND
539: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND
540: (p_qte_rec.invoice_to_cust_account_id IS NULL OR
541: p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN
542:
543:

Line 541: p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN

537:
538: IF (p_qte_rec.invoice_to_cust_party_id is NOT NULL AND
539: p_qte_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND
540: (p_qte_rec.invoice_to_cust_account_id IS NULL OR
541: p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN
542:
543:
544: IF aso_debug_pub.g_debug_flag = 'Y' THEN
545: aso_debug_pub.add('Check_Tca: before customer account:p_qte_rec.invoice_to_cust_party_id '

Line 561: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

557: IF aso_debug_pub.g_debug_flag = 'Y' THEN
558: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
559: ||x_Return_Status, 1, 'N');
560: END IF;
561: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
562: raise FND_API.G_EXC_ERROR;
563: END IF;
564:
565: END IF; -- invoice_to_cust_account_id

Line 562: raise FND_API.G_EXC_ERROR;

558: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
559: ||x_Return_Status, 1, 'N');
560: END IF;
561: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
562: raise FND_API.G_EXC_ERROR;
563: END IF;
564:
565: END IF; -- invoice_to_cust_account_id
566:

Line 574: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN

570: END IF;
571:
572:
573: IF p_qte_rec.invoice_to_cust_account_id is not NULL AND
574: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
575: l_invoice_cust_account_id := p_qte_rec.invoice_to_cust_account_id;
576: ELSE
577: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
578: OPEN c_get_cust_account_id;

Line 577: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN

573: IF p_qte_rec.invoice_to_cust_account_id is not NULL AND
574: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
575: l_invoice_cust_account_id := p_qte_rec.invoice_to_cust_account_id;
576: ELSE
577: IF p_qte_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
578: OPEN c_get_cust_account_id;
579: FETCH c_get_cust_account_id INTO l_invoice_cust_account_id;
580: CLOSE c_get_cust_account_id;
581: END IF;

Line 588: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN

584: aso_debug_pub.add('chk_hdr:l_invoice_cust_acccount_id = ' || l_invoice_cust_account_id,1,'N' );
585: aso_debug_pub.add('chk_hdr:before invoice to party site id '|| p_qte_rec.invoice_to_party_site_id, 1, 'Y');
586: aso_debug_pub.add('chk_hdr:invoice_to_cust_account = ' || p_qte_rec.invoice_to_cust_account_id,1,'N');
587: END IF;
588: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN
589:
590: IF p_qte_rec.invoice_to_party_site_id is not NULL
591: AND p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
592:

Line 591: AND p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN

587: END IF;
588: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN
589:
590: IF p_qte_rec.invoice_to_party_site_id is not NULL
591: AND p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
592:
593: Customer_Account_Site(
594: p_api_version => 1.0
595: ,p_party_site_id => p_qte_rec.invoice_to_party_site_id

Line 608: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

604: IF aso_debug_pub.g_debug_flag = 'Y' THEN
605: aso_debug_pub.add('chk_hdr:site_use_id after deriving invoice = ' || l_invoice_to_org_id,1,'N');
606: aso_debug_pub.add('chk_hdr:cust_acct_site_id after deriving invoice = ' || l_inv_cust_acct_site_id,1,'N');
607: END IF;
608: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
609: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
610: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
611: FND_MSG_PUB.ADD;
612: END IF;

Line 613: raise FND_API.G_EXC_ERROR;

609: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
610: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
611: FND_MSG_PUB.ADD;
612: END IF;
613: raise FND_API.G_EXC_ERROR;
614: END IF;
615:
616: END IF;
617: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 639: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

635: IF aso_debug_pub.g_debug_flag = 'Y' THEN
636: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_invoice_to_contact_id: '||l_invoice_to_contact_id,1,'N');
637: END IF;
638:
639: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
640: raise FND_API.G_EXC_ERROR;
641: END IF;
642:
643: END IF; -- l_invoice_cust_account_id not null

Line 640: raise FND_API.G_EXC_ERROR;

636: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_invoice_to_contact_id: '||l_invoice_to_contact_id,1,'N');
637: END IF;
638:
639: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
640: raise FND_API.G_EXC_ERROR;
641: END IF;
642:
643: END IF; -- l_invoice_cust_account_id not null
644:

Line 662: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

658:
659: IF aso_debug_pub.g_debug_flag = 'Y' THEN
660: aso_debug_pub.add('chk_hdr:after populate_acct_party: ' || x_return_status,1,'N');
661: END IF;
662: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
663: raise FND_API.G_EXC_ERROR;
664: END IF;
665:
666: IF (p_qte_rec.End_Customer_cust_party_id is NOT NULL AND

Line 663: raise FND_API.G_EXC_ERROR;

659: IF aso_debug_pub.g_debug_flag = 'Y' THEN
660: aso_debug_pub.add('chk_hdr:after populate_acct_party: ' || x_return_status,1,'N');
661: END IF;
662: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
663: raise FND_API.G_EXC_ERROR;
664: END IF;
665:
666: IF (p_qte_rec.End_Customer_cust_party_id is NOT NULL AND
667: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND

Line 667: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND

663: raise FND_API.G_EXC_ERROR;
664: END IF;
665:
666: IF (p_qte_rec.End_Customer_cust_party_id is NOT NULL AND
667: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND
668: (p_qte_rec.End_Customer_cust_account_id IS NULL OR
669: p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN
670:
671:

Line 669: p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN

665:
666: IF (p_qte_rec.End_Customer_cust_party_id is NOT NULL AND
667: p_qte_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND
668: (p_qte_rec.End_Customer_cust_account_id IS NULL OR
669: p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN
670:
671:
672: IF aso_debug_pub.g_debug_flag = 'Y' THEN
673: aso_debug_pub.add('Check_Tca: before customer account:p_qte_rec.End_Customer_cust_party_id '

Line 689: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

685: IF aso_debug_pub.g_debug_flag = 'Y' THEN
686: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
687: ||x_Return_Status, 1, 'N');
688: END IF;
689: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
690: raise FND_API.G_EXC_ERROR;
691: END IF;
692:
693: END IF; -- End_Customer_cust_account_id

Line 690: raise FND_API.G_EXC_ERROR;

686: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
687: ||x_Return_Status, 1, 'N');
688: END IF;
689: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
690: raise FND_API.G_EXC_ERROR;
691: END IF;
692:
693: END IF; -- End_Customer_cust_account_id
694:

Line 702: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN

698: END IF;
699:
700:
701: IF p_qte_rec.End_Customer_cust_account_id is not NULL AND
702: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
703: l_End_cust_account_id := p_qte_rec.End_Customer_cust_account_id;
704: ELSE
705: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
706: OPEN c_get_cust_account_id;

Line 705: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN

701: IF p_qte_rec.End_Customer_cust_account_id is not NULL AND
702: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
703: l_End_cust_account_id := p_qte_rec.End_Customer_cust_account_id;
704: ELSE
705: IF p_qte_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
706: OPEN c_get_cust_account_id;
707: FETCH c_get_cust_account_id INTO l_End_cust_account_id;
708: CLOSE c_get_cust_account_id;
709: END IF;

Line 716: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN

712: aso_debug_pub.add('chk_hdr:l_End_Customer_cust_acccount_id = ' || l_End_cust_account_id,1,'N' );
713: aso_debug_pub.add('chk_hdr:before End_Customer party site id '|| p_qte_rec.End_Customer_party_site_id, 1, 'Y');
714: aso_debug_pub.add('chk_hdr:End_Customer_cust_account = ' || p_qte_rec.End_Customer_cust_account_id,1,'N');
715: END IF;
716: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN
717:
718: IF p_qte_rec.End_Customer_party_site_id is not NULL
719: AND p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
720:

Line 719: AND p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN

715: END IF;
716: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN
717:
718: IF p_qte_rec.End_Customer_party_site_id is not NULL
719: AND p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
720:
721: Customer_Account_Site(
722: p_api_version => 1.0
723: ,p_party_site_id => p_qte_rec.End_Customer_party_site_id

Line 736: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

732: IF aso_debug_pub.g_debug_flag = 'Y' THEN
733: aso_debug_pub.add('chk_hdr:site_use_id after deriving End_Customer = ' || l_End_Customer_org_id,1,'N');
734: aso_debug_pub.add('chk_hdr:cust_acct_site_id after deriving End_Customer = ' || l_end_cust_acct_site_id,1,'N');
735: END IF;
736: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
737: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
738: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_END_SITE_AC_CRS');
739: FND_MSG_PUB.ADD;
740: END IF;

Line 741: raise FND_API.G_EXC_ERROR;

737: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
738: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_END_SITE_AC_CRS');
739: FND_MSG_PUB.ADD;
740: END IF;
741: raise FND_API.G_EXC_ERROR;
742: END IF;
743:
744: END IF;
745: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

763: IF aso_debug_pub.g_debug_flag = 'Y' THEN
764: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_End_Customer_contact_id: '||l_End_Customer_contact_id,1,'N');
765: END IF;
766:
767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
768: raise FND_API.G_EXC_ERROR;
769: END IF;
770:
771: END IF; -- l_End_cust_account_id not null

Line 768: raise FND_API.G_EXC_ERROR;

764: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_End_Customer_contact_id: '||l_End_Customer_contact_id,1,'N');
765: END IF;
766:
767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
768: raise FND_API.G_EXC_ERROR;
769: END IF;
770:
771: END IF; -- l_End_cust_account_id not null
772:

Line 802: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

798:
799: IF aso_debug_pub.g_debug_flag = 'Y' THEN
800: aso_debug_pub.add('chk_hdr:(ship)after populate_acct_party: ' || x_return_status,1,'N');
801: END IF;
802: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
803: raise FND_API.G_EXC_ERROR;
804: END IF;
805:
806: IF (p_header_shipment_tbl(1).ship_to_cust_party_id IS NOT NULL AND

Line 803: raise FND_API.G_EXC_ERROR;

799: IF aso_debug_pub.g_debug_flag = 'Y' THEN
800: aso_debug_pub.add('chk_hdr:(ship)after populate_acct_party: ' || x_return_status,1,'N');
801: END IF;
802: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
803: raise FND_API.G_EXC_ERROR;
804: END IF;
805:
806: IF (p_header_shipment_tbl(1).ship_to_cust_party_id IS NOT NULL AND
807: p_header_shipment_tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND

Line 807: p_header_shipment_tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND

803: raise FND_API.G_EXC_ERROR;
804: END IF;
805:
806: IF (p_header_shipment_tbl(1).ship_to_cust_party_id IS NOT NULL AND
807: p_header_shipment_tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND
808: (p_header_shipment_tbl(1).ship_to_cust_account_id IS NULL OR
809: p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
810:
811:

Line 809: p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN

805:
806: IF (p_header_shipment_tbl(1).ship_to_cust_party_id IS NOT NULL AND
807: p_header_shipment_tbl(1).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND
808: (p_header_shipment_tbl(1).ship_to_cust_account_id IS NULL OR
809: p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
810:
811:
812: IF aso_debug_pub.g_debug_flag = 'Y' THEN
813: aso_debug_pub.add('Check_Tca: before customer account:p_header_shipment_tbl(1).

Line 830: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

826: IF aso_debug_pub.g_debug_flag = 'Y' THEN
827: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
828: ||x_Return_Status, 1, 'N');
829: END IF;
830: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
831: raise FND_API.G_EXC_ERROR;
832: END IF;
833:
834: END IF; -- cust_account_id

Line 831: raise FND_API.G_EXC_ERROR;

827: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
828: ||x_Return_Status, 1, 'N');
829: END IF;
830: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
831: raise FND_API.G_EXC_ERROR;
832: END IF;
833:
834: END IF; -- cust_account_id
835:

Line 843: p_header_shipment_tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN

839: END IF;
840:
841:
842: IF p_header_shipment_tbl(1).ship_to_cust_account_id is not NULL AND
843: p_header_shipment_tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN
844: l_ship_cust_account_id := p_header_shipment_tbl(1).ship_to_cust_account_id;
845: ELSE
846: IF p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
847: OPEN c_get_cust_account_id;

Line 846: IF p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN

842: IF p_header_shipment_tbl(1).ship_to_cust_account_id is not NULL AND
843: p_header_shipment_tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN
844: l_ship_cust_account_id := p_header_shipment_tbl(1).ship_to_cust_account_id;
845: ELSE
846: IF p_header_shipment_tbl(1).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
847: OPEN c_get_cust_account_id;
848: FETCH c_get_cust_account_id INTO l_ship_cust_account_id;
849: CLOSE c_get_cust_account_id;
850: END IF;

Line 857: IF l_ship_cust_account_id IS NOT NULL AND l_ship_cust_account_id <> FND_API.G_MISS_NUM THEN

853: IF aso_debug_pub.g_debug_flag = 'Y' THEN
854: aso_debug_pub.add('chk_hdr:ship cust acccount = ' || l_ship_cust_account_id ,1, 'N');
855: aso_debug_pub.add('chk_hdr:ship to party site = ' || p_header_shipment_tbl(1).ship_to_party_site_id, 1, 'N');
856: END IF;
857: IF l_ship_cust_account_id IS NOT NULL AND l_ship_cust_account_id <> FND_API.G_MISS_NUM THEN
858:
859: IF p_header_shipment_tbl(1).ship_to_party_site_id is not NULL
860: AND p_header_shipment_tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
861:

Line 860: AND p_header_shipment_tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

856: END IF;
857: IF l_ship_cust_account_id IS NOT NULL AND l_ship_cust_account_id <> FND_API.G_MISS_NUM THEN
858:
859: IF p_header_shipment_tbl(1).ship_to_party_site_id is not NULL
860: AND p_header_shipment_tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
861:
862: Customer_Account_Site(
863: p_api_version => 1.0
864: ,p_party_site_id => p_header_shipment_tbl(1).ship_to_party_site_id

Line 877: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

873: IF aso_debug_pub.g_debug_flag = 'Y' THEN
874: aso_debug_pub.add('chk_hdr:ship to org after deriving = ' || l_ship_to_org_id, 1, 'Y');
875: aso_debug_pub.add('chk_hdr:ship cust acct site after deriving = ' || l_shp_cust_acct_site_id, 1, 'Y');
876: END IF;
877: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
878: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
879: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_SHP_SITE_AC_CRS');
880: -- FND_MESSAGE.Set_Token('ID', to_char(p_header_shipment_tbl(1).ship_to_party_site_id),FALSE);
881: FND_MSG_PUB.ADD;

Line 883: raise FND_API.G_EXC_ERROR;

879: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_SHP_SITE_AC_CRS');
880: -- FND_MESSAGE.Set_Token('ID', to_char(p_header_shipment_tbl(1).ship_to_party_site_id),FALSE);
881: FND_MSG_PUB.ADD;
882: END IF;
883: raise FND_API.G_EXC_ERROR;
884: END IF;
885:
886: END IF;
887:

Line 909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

905: IF aso_debug_pub.g_debug_flag = 'Y' THEN
906: aso_debug_pub.add('chk_hdr: after Cust_Acct_Contact_Addr:l_ship_to_contact_id: '||l_ship_to_contact_id,1,'N');
907: aso_debug_pub.add('chk_hdr: after Cust_Acct_Contact_Addr:l_shp_cust_acct_site_id: '||l_shp_cust_acct_site_id,1,'N');
908: END IF;
909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
910: raise FND_API.G_EXC_ERROR;
911: END IF;
912:
913: END IF; -- l_ship_cust_account_id is not null

Line 910: raise FND_API.G_EXC_ERROR;

906: aso_debug_pub.add('chk_hdr: after Cust_Acct_Contact_Addr:l_ship_to_contact_id: '||l_ship_to_contact_id,1,'N');
907: aso_debug_pub.add('chk_hdr: after Cust_Acct_Contact_Addr:l_shp_cust_acct_site_id: '||l_shp_cust_acct_site_id,1,'N');
908: END IF;
909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
910: raise FND_API.G_EXC_ERROR;
911: END IF;
912:
913: END IF; -- l_ship_cust_account_id is not null
914:

Line 927: WHEN FND_API.G_EXC_ERROR THEN

923: p_data => x_msg_data
924: );
925:
926: EXCEPTION
927: WHEN FND_API.G_EXC_ERROR THEN
928: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
929: P_API_NAME => L_API_NAME
930: ,P_PKG_NAME => G_PKG_NAME
931: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 939: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

935: ,X_MSG_COUNT => X_MSG_COUNT
936: ,X_MSG_DATA => X_MSG_DATA
937: ,X_RETURN_STATUS => X_RETURN_STATUS);
938:
939: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
940: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
941: P_API_NAME => L_API_NAME
942: ,P_PKG_NAME => G_PKG_NAME
943: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 968: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

964:
965:
966: PROCEDURE check_line_account_info(
967: p_api_version IN NUMBER,
968: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
969: p_cust_account_id IN NUMBER,
970: P_Qte_Line_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Line_Rec_Type,
971: P_Line_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
972: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 972: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,

968: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
969: p_cust_account_id IN NUMBER,
970: P_Qte_Line_Rec IN OUT NOCOPY ASO_QUOTE_PUB.Qte_Line_Rec_Type,
971: P_Line_Shipment_Tbl IN OUT NOCOPY ASO_QUOTE_PUB.Shipment_Tbl_Type,
972: p_application_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,
973: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
974: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
975: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
976: IS

Line 1037: IF FND_API.to_boolean(p_init_msg_list) THEN

1033: BEGIN
1034:
1035: SAVEPOINT CHECK_LINE_ACCOUNT_INFO_PVT;
1036:
1037: IF FND_API.to_boolean(p_init_msg_list) THEN
1038: FND_MSG_PUB.initialize;
1039: END IF;
1040:
1041: IF NOT FND_API.compatible_api_call(

Line 1041: IF NOT FND_API.compatible_api_call(

1037: IF FND_API.to_boolean(p_init_msg_list) THEN
1038: FND_MSG_PUB.initialize;
1039: END IF;
1040:
1041: IF NOT FND_API.compatible_api_call(
1042: l_api_version,
1043: p_api_version,
1044: l_api_name,
1045: g_pkg_name

Line 1047: RAISE FND_API.g_exc_unexpected_error;

1043: p_api_version,
1044: l_api_name,
1045: g_pkg_name
1046: ) THEN
1047: RAISE FND_API.g_exc_unexpected_error;
1048: END IF;
1049:
1050: x_return_status := FND_API.g_ret_sts_success;
1051:

Line 1050: x_return_status := FND_API.g_ret_sts_success;

1046: ) THEN
1047: RAISE FND_API.g_exc_unexpected_error;
1048: END IF;
1049:
1050: x_return_status := FND_API.g_ret_sts_success;
1051:
1052: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1053: aso_debug_pub.add('line account info:begin ',1,'Y');
1054: aso_debug_pub.add('line account info:P_line_Shipment_Tbl.count: '||P_line_Shipment_Tbl.count,1,'N');

Line 1068: IF P_Qte_Line_Rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR

1064:
1065: IF (P_Qte_Line_Rec.operation_code = 'UPDATE' AND P_Application_Type_Code = 'QUOTING HTML') THEN
1066: l_qte_line_rec := ASO_UTILITY_PVT.query_qte_line_row (P_Qte_Line_Rec.quote_line_id);
1067:
1068: IF P_Qte_Line_Rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1072:

Line 1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR

1065: IF (P_Qte_Line_Rec.operation_code = 'UPDATE' AND P_Application_Type_Code = 'QUOTING HTML') THEN
1066: l_qte_line_rec := ASO_UTILITY_PVT.query_qte_line_row (P_Qte_Line_Rec.quote_line_id);
1067:
1068: IF P_Qte_Line_Rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1072:
1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN

Line 1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR

1066: l_qte_line_rec := ASO_UTILITY_PVT.query_qte_line_row (P_Qte_Line_Rec.quote_line_id);
1067:
1068: IF P_Qte_Line_Rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1072:
1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
1074: P_Qte_Line_Rec.invoice_to_party_id := l_qte_line_rec.invoice_to_party_id;

Line 1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN

1067:
1068: IF P_Qte_Line_Rec.invoice_to_party_id <> FND_API.G_MISS_NUM OR
1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1072:
1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
1074: P_Qte_Line_Rec.invoice_to_party_id := l_qte_line_rec.invoice_to_party_id;
1075: END IF;

Line 1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN

1069: P_Qte_Line_Rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM OR
1070: P_Qte_Line_Rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM OR
1071: P_Qte_Line_Rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1072:
1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
1074: P_Qte_Line_Rec.invoice_to_party_id := l_qte_line_rec.invoice_to_party_id;
1075: END IF;
1076: IF P_Qte_Line_Rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
1077: P_Qte_Line_Rec.invoice_to_cust_party_id := l_qte_line_rec.invoice_to_cust_party_id;

Line 1076: IF P_Qte_Line_Rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN

1072:
1073: IF P_Qte_Line_Rec.invoice_to_party_id = FND_API.G_MISS_NUM THEN
1074: P_Qte_Line_Rec.invoice_to_party_id := l_qte_line_rec.invoice_to_party_id;
1075: END IF;
1076: IF P_Qte_Line_Rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
1077: P_Qte_Line_Rec.invoice_to_cust_party_id := l_qte_line_rec.invoice_to_cust_party_id;
1078: END IF;
1079: IF P_Qte_Line_Rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
1080: P_Qte_Line_Rec.invoice_to_cust_account_id := l_qte_line_rec.invoice_to_cust_account_id;

Line 1079: IF P_Qte_Line_Rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN

1075: END IF;
1076: IF P_Qte_Line_Rec.invoice_to_cust_party_id = FND_API.G_MISS_NUM THEN
1077: P_Qte_Line_Rec.invoice_to_cust_party_id := l_qte_line_rec.invoice_to_cust_party_id;
1078: END IF;
1079: IF P_Qte_Line_Rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
1080: P_Qte_Line_Rec.invoice_to_cust_account_id := l_qte_line_rec.invoice_to_cust_account_id;
1081: END IF;
1082: IF P_Qte_Line_Rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN
1083: P_Qte_Line_Rec.invoice_to_party_site_id := l_qte_line_rec.invoice_to_party_site_id;

Line 1082: IF P_Qte_Line_Rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN

1078: END IF;
1079: IF P_Qte_Line_Rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
1080: P_Qte_Line_Rec.invoice_to_cust_account_id := l_qte_line_rec.invoice_to_cust_account_id;
1081: END IF;
1082: IF P_Qte_Line_Rec.invoice_to_party_site_id = FND_API.G_MISS_NUM THEN
1083: P_Qte_Line_Rec.invoice_to_party_site_id := l_qte_line_rec.invoice_to_party_site_id;
1084: END IF;
1085: END IF;
1086:

Line 1087: IF P_Qte_Line_Rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR

1083: P_Qte_Line_Rec.invoice_to_party_site_id := l_qte_line_rec.invoice_to_party_site_id;
1084: END IF;
1085: END IF;
1086:
1087: IF P_Qte_Line_Rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1091:

Line 1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR

1084: END IF;
1085: END IF;
1086:
1087: IF P_Qte_Line_Rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1091:
1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN

Line 1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR

1085: END IF;
1086:
1087: IF P_Qte_Line_Rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1091:
1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
1093: P_Qte_Line_Rec.End_Customer_party_id := l_qte_line_rec.End_Customer_party_id;

Line 1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN

1086:
1087: IF P_Qte_Line_Rec.End_Customer_party_id <> FND_API.G_MISS_NUM OR
1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1091:
1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
1093: P_Qte_Line_Rec.End_Customer_party_id := l_qte_line_rec.End_Customer_party_id;
1094: END IF;

Line 1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN

1088: P_Qte_Line_Rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM OR
1089: P_Qte_Line_Rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM OR
1090: P_Qte_Line_Rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1091:
1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
1093: P_Qte_Line_Rec.End_Customer_party_id := l_qte_line_rec.End_Customer_party_id;
1094: END IF;
1095: IF P_Qte_Line_Rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
1096: P_Qte_Line_Rec.End_Customer_cust_party_id := l_qte_line_rec.End_Customer_cust_party_id;

Line 1095: IF P_Qte_Line_Rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN

1091:
1092: IF P_Qte_Line_Rec.End_Customer_party_id = FND_API.G_MISS_NUM THEN
1093: P_Qte_Line_Rec.End_Customer_party_id := l_qte_line_rec.End_Customer_party_id;
1094: END IF;
1095: IF P_Qte_Line_Rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
1096: P_Qte_Line_Rec.End_Customer_cust_party_id := l_qte_line_rec.End_Customer_cust_party_id;
1097: END IF;
1098: IF P_Qte_Line_Rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
1099: P_Qte_Line_Rec.End_Customer_cust_account_id := l_qte_line_rec.End_Customer_cust_account_id;

Line 1098: IF P_Qte_Line_Rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN

1094: END IF;
1095: IF P_Qte_Line_Rec.End_Customer_cust_party_id = FND_API.G_MISS_NUM THEN
1096: P_Qte_Line_Rec.End_Customer_cust_party_id := l_qte_line_rec.End_Customer_cust_party_id;
1097: END IF;
1098: IF P_Qte_Line_Rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
1099: P_Qte_Line_Rec.End_Customer_cust_account_id := l_qte_line_rec.End_Customer_cust_account_id;
1100: END IF;
1101: IF P_Qte_Line_Rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN
1102: P_Qte_Line_Rec.End_Customer_party_site_id := l_qte_line_rec.End_Customer_party_site_id;

Line 1101: IF P_Qte_Line_Rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN

1097: END IF;
1098: IF P_Qte_Line_Rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
1099: P_Qte_Line_Rec.End_Customer_cust_account_id := l_qte_line_rec.End_Customer_cust_account_id;
1100: END IF;
1101: IF P_Qte_Line_Rec.End_Customer_party_site_id = FND_API.G_MISS_NUM THEN
1102: P_Qte_Line_Rec.End_Customer_party_site_id := l_qte_line_rec.End_Customer_party_site_id;
1103: END IF;
1104: END IF;
1105:

Line 1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN

1103: END IF;
1104: END IF;
1105:
1106: IF P_line_Shipment_Tbl(j).operation_code = 'UPDATE' THEN
1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN
1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR
1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

Line 1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR

1104: END IF;
1105:
1106: IF P_line_Shipment_Tbl(j).operation_code = 'UPDATE' THEN
1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN
1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR
1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1112:

Line 1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR

1105:
1106: IF P_line_Shipment_Tbl(j).operation_code = 'UPDATE' THEN
1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN
1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR
1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1112:
1113: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_line_Shipment_Tbl(j).shipment_id);

Line 1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR

1106: IF P_line_Shipment_Tbl(j).operation_code = 'UPDATE' THEN
1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN
1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR
1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1112:
1113: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_line_Shipment_Tbl(j).shipment_id);
1114: IF P_line_Shipment_Tbl(j).ship_to_party_id = FND_API.G_MISS_NUM THEN

Line 1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

1107: IF P_line_Shipment_Tbl(j).shipment_id IS NOT NULL AND P_line_Shipment_Tbl(j).shipment_id <> FND_API.G_MISS_NUM THEN
1108: IF P_line_Shipment_Tbl(j).ship_to_party_id <> FND_API.G_MISS_NUM OR
1109: P_line_Shipment_Tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM OR
1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1112:
1113: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_line_Shipment_Tbl(j).shipment_id);
1114: IF P_line_Shipment_Tbl(j).ship_to_party_id = FND_API.G_MISS_NUM THEN
1115: P_line_Shipment_Tbl(j).ship_to_party_id := l_shipment_rec.ship_to_party_id;

Line 1114: IF P_line_Shipment_Tbl(j).ship_to_party_id = FND_API.G_MISS_NUM THEN

1110: P_line_Shipment_Tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM OR
1111: P_line_Shipment_Tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1112:
1113: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_line_Shipment_Tbl(j).shipment_id);
1114: IF P_line_Shipment_Tbl(j).ship_to_party_id = FND_API.G_MISS_NUM THEN
1115: P_line_Shipment_Tbl(j).ship_to_party_id := l_shipment_rec.ship_to_party_id;
1116: END IF;
1117: IF P_line_Shipment_Tbl(j).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
1118: P_line_Shipment_Tbl(j).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;

Line 1117: IF P_line_Shipment_Tbl(j).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN

1113: l_shipment_rec := ASO_UTILITY_PVT.query_shipment_row (P_line_Shipment_Tbl(j).shipment_id);
1114: IF P_line_Shipment_Tbl(j).ship_to_party_id = FND_API.G_MISS_NUM THEN
1115: P_line_Shipment_Tbl(j).ship_to_party_id := l_shipment_rec.ship_to_party_id;
1116: END IF;
1117: IF P_line_Shipment_Tbl(j).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
1118: P_line_Shipment_Tbl(j).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;
1119: END IF;
1120: IF P_line_Shipment_Tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
1121: P_line_Shipment_Tbl(j).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;

Line 1120: IF P_line_Shipment_Tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN

1116: END IF;
1117: IF P_line_Shipment_Tbl(j).ship_to_cust_party_id = FND_API.G_MISS_NUM THEN
1118: P_line_Shipment_Tbl(j).ship_to_cust_party_id := l_shipment_rec.ship_to_cust_party_id;
1119: END IF;
1120: IF P_line_Shipment_Tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
1121: P_line_Shipment_Tbl(j).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;
1122: END IF;
1123: IF P_line_Shipment_Tbl(j).ship_to_party_site_id = FND_API.G_MISS_NUM THEN
1124: P_line_Shipment_Tbl(j).ship_to_party_site_id := l_shipment_rec.ship_to_party_site_id;

Line 1123: IF P_line_Shipment_Tbl(j).ship_to_party_site_id = FND_API.G_MISS_NUM THEN

1119: END IF;
1120: IF P_line_Shipment_Tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
1121: P_line_Shipment_Tbl(j).ship_to_cust_account_id := l_shipment_rec.ship_to_cust_account_id;
1122: END IF;
1123: IF P_line_Shipment_Tbl(j).ship_to_party_site_id = FND_API.G_MISS_NUM THEN
1124: P_line_Shipment_Tbl(j).ship_to_party_site_id := l_shipment_rec.ship_to_party_site_id;
1125: END IF;
1126: END IF;
1127: END IF;

Line 1158: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1154:
1155: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1156: aso_debug_pub.add('chk_lin:after populate_acct_party: ' || x_return_status,1,'N');
1157: END IF;
1158: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1159: raise FND_API.G_EXC_ERROR;
1160: END IF;
1161: */
1162:

Line 1159: raise FND_API.G_EXC_ERROR;

1155: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1156: aso_debug_pub.add('chk_lin:after populate_acct_party: ' || x_return_status,1,'N');
1157: END IF;
1158: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1159: raise FND_API.G_EXC_ERROR;
1160: END IF;
1161: */
1162:
1163: IF (p_qte_line_rec.invoice_to_cust_party_id IS NOT NULL AND

Line 1164: p_qte_line_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND

1160: END IF;
1161: */
1162:
1163: IF (p_qte_line_rec.invoice_to_cust_party_id IS NOT NULL AND
1164: p_qte_line_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND
1165: (p_qte_line_rec.invoice_to_cust_account_id IS NULL OR
1166: p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN
1167:
1168:

Line 1166: p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN

1162:
1163: IF (p_qte_line_rec.invoice_to_cust_party_id IS NOT NULL AND
1164: p_qte_line_rec.invoice_to_cust_party_id <> FND_API.G_MISS_NUM) AND
1165: (p_qte_line_rec.invoice_to_cust_account_id IS NULL OR
1166: p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM) THEN
1167:
1168:
1169: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1170: aso_debug_pub.add('Check_Tca: before customer account: p_qte_line_rec.invoice_to_cust_party_id '

Line 1187: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1183: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1184: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1185: ||x_Return_Status, 1, 'N');
1186: END IF;
1187: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1188: raise FND_API.G_EXC_ERROR;
1189: END IF;
1190:
1191: END IF; -- invoice_to_cust_account_id

Line 1188: raise FND_API.G_EXC_ERROR;

1184: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1185: ||x_Return_Status, 1, 'N');
1186: END IF;
1187: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1188: raise FND_API.G_EXC_ERROR;
1189: END IF;
1190:
1191: END IF; -- invoice_to_cust_account_id
1192: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 1199: p_qte_line_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN

1195: END IF;
1196:
1197:
1198: IF p_qte_line_rec.invoice_to_cust_account_id is not NULL AND
1199: p_qte_line_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
1200: l_invoice_cust_account_id := p_qte_line_rec.invoice_to_cust_account_id;
1201: ELSE
1202: IF p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
1203: OPEN C_line_cust;

Line 1202: IF p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN

1198: IF p_qte_line_rec.invoice_to_cust_account_id is not NULL AND
1199: p_qte_line_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
1200: l_invoice_cust_account_id := p_qte_line_rec.invoice_to_cust_account_id;
1201: ELSE
1202: IF p_qte_line_rec.invoice_to_cust_account_id = FND_API.G_MISS_NUM THEN
1203: OPEN C_line_cust;
1204: FETCH C_line_cust INTO l_invoice_cust_account_id,l_End_cust_account_id;
1205: CLOSE C_line_cust;
1206: END IF;

Line 1215: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN

1211: aso_debug_pub.add('chk_ln: l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1212: aso_debug_pub.add('line account info: inside shipment loop:party_site: '||p_qte_line_rec.invoice_to_party_site_id,1,'N');
1213: END IF;
1214:
1215: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN
1216:
1217: IF p_qte_line_rec.invoice_to_party_site_id is not NULL
1218: AND p_qte_line_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1219:

Line 1218: AND p_qte_line_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN

1214:
1215: IF l_invoice_cust_account_id IS NOT NULL AND l_invoice_cust_account_id <> FND_API.G_MISS_NUM THEN
1216:
1217: IF p_qte_line_rec.invoice_to_party_site_id is not NULL
1218: AND p_qte_line_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1219:
1220: Customer_Account_Site(
1221: p_api_version => 1.0
1222: ,p_party_site_id => p_qte_line_rec.invoice_to_party_site_id

Line 1231: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1227: ,x_msg_count => x_msg_count
1228: ,x_msg_data => x_msg_data
1229: ,x_site_use_id => l_site_use_id);
1230:
1231: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1233: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
1234: FND_MSG_PUB.ADD;
1235: END IF;

Line 1236: raise FND_API.G_EXC_ERROR;

1232: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1233: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
1234: FND_MSG_PUB.ADD;
1235: END IF;
1236: raise FND_API.G_EXC_ERROR;
1237: END IF;
1238: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1239: aso_debug_pub.add('line account info: site use after cust account site: '||l_site_use_id,1,'N');
1240: aso_debug_pub.add('line account info: cust_acct_site after cust account site: '||l_inv_cust_acct_site_id,1,'N');

Line 1265: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1261: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_invoice_to_contact_id: '||l_invoice_to_contact_id,1,'N');
1262: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_inv_cust_acct_site_id: '||l_inv_cust_acct_site_id,1,'N');
1263: END IF;
1264:
1265: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1266: raise FND_API.G_EXC_ERROR;
1267: END IF;
1268:
1269: END IF; -- l_invoice_cust_account_id is not null

Line 1266: raise FND_API.G_EXC_ERROR;

1262: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_inv_cust_acct_site_id: '||l_inv_cust_acct_site_id,1,'N');
1263: END IF;
1264:
1265: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1266: raise FND_API.G_EXC_ERROR;
1267: END IF;
1268:
1269: END IF; -- l_invoice_cust_account_id is not null
1270:

Line 1282: IF l_cust_acct_id IS NULL AND l_cust_party_id IS NOT NULL AND l_cust_party_id <> FND_API.G_MISS_NUM THEN

1278: /*--bug 5132989
1279: l_cust_acct_id := p_qte_line_rec.End_Customer_cust_account_id;
1280: l_cust_party_id := p_qte_line_rec.End_Customer_cust_party_id;
1281:
1282: IF l_cust_acct_id IS NULL AND l_cust_party_id IS NOT NULL AND l_cust_party_id <> FND_API.G_MISS_NUM THEN
1283:
1284: OPEN C_Get_Sold_To_Info(p_qte_line_rec.quote_header_id);
1285: FETCH C_Get_Sold_To_Info INTO l_cust_acct_id, l_cust_party_id;
1286: CLOSE C_Get_Sold_To_Info;

Line 1303: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1299: END IF;
1300: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1301: aso_debug_pub.add('chk_lin:after populate_acct_party: ' || x_return_status,1,'N');
1302: END IF;
1303: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1304: raise FND_API.G_EXC_ERROR;
1305: END IF;
1306:
1307: */

Line 1304: raise FND_API.G_EXC_ERROR;

1300: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1301: aso_debug_pub.add('chk_lin:after populate_acct_party: ' || x_return_status,1,'N');
1302: END IF;
1303: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1304: raise FND_API.G_EXC_ERROR;
1305: END IF;
1306:
1307: */
1308: IF (p_qte_line_rec.End_Customer_cust_party_id IS NOT NULL AND

Line 1309: p_qte_line_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND

1305: END IF;
1306:
1307: */
1308: IF (p_qte_line_rec.End_Customer_cust_party_id IS NOT NULL AND
1309: p_qte_line_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND
1310: (p_qte_line_rec.End_Customer_cust_account_id IS NULL OR
1311: p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN
1312:
1313:

Line 1311: p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN

1307: */
1308: IF (p_qte_line_rec.End_Customer_cust_party_id IS NOT NULL AND
1309: p_qte_line_rec.End_Customer_cust_party_id <> FND_API.G_MISS_NUM) AND
1310: (p_qte_line_rec.End_Customer_cust_account_id IS NULL OR
1311: p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM) THEN
1312:
1313:
1314: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1315: aso_debug_pub.add('Check_Tca: before customer account: p_qte_line_rec.End_Customer_cust_party_id '

Line 1332: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1328: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1329: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1330: ||x_Return_Status, 1, 'N');
1331: END IF;
1332: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1333: raise FND_API.G_EXC_ERROR;
1334: END IF;
1335:
1336: END IF; -- End_Customer_cust_account_id

Line 1333: raise FND_API.G_EXC_ERROR;

1329: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1330: ||x_Return_Status, 1, 'N');
1331: END IF;
1332: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1333: raise FND_API.G_EXC_ERROR;
1334: END IF;
1335:
1336: END IF; -- End_Customer_cust_account_id
1337: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 1344: p_qte_line_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN

1340: END IF;
1341:
1342:
1343: IF p_qte_line_rec.End_Customer_cust_account_id is not NULL AND
1344: p_qte_line_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
1345: l_End_cust_account_id := p_qte_line_rec.End_Customer_cust_account_id;
1346: ELSE
1347: IF p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
1348: OPEN C_line_cust;

Line 1347: IF p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN

1343: IF p_qte_line_rec.End_Customer_cust_account_id is not NULL AND
1344: p_qte_line_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
1345: l_End_cust_account_id := p_qte_line_rec.End_Customer_cust_account_id;
1346: ELSE
1347: IF p_qte_line_rec.End_Customer_cust_account_id = FND_API.G_MISS_NUM THEN
1348: OPEN C_line_cust;
1349: FETCH C_line_cust INTO l_invoice_cust_account_id,l_End_cust_account_id;
1350: CLOSE C_line_cust;
1351: END IF;

Line 1359: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN

1355: aso_debug_pub.add('chk_ln: l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1356: aso_debug_pub.add('line account info: inside shipment loop:party_site: '||p_qte_line_rec.End_Customer_party_site_id,1,'N');
1357: END IF;
1358:
1359: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN
1360:
1361: IF p_qte_line_rec.End_Customer_party_site_id is not NULL
1362: AND p_qte_line_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1363:

Line 1362: AND p_qte_line_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN

1358:
1359: IF l_End_cust_account_id IS NOT NULL AND l_End_cust_account_id <> FND_API.G_MISS_NUM THEN
1360:
1361: IF p_qte_line_rec.End_Customer_party_site_id is not NULL
1362: AND p_qte_line_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1363:
1364: Customer_Account_Site(
1365: p_api_version => 1.0
1366: ,p_party_site_id => p_qte_line_rec.End_Customer_party_site_id

Line 1375: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1371: ,x_msg_count => x_msg_count
1372: ,x_msg_data => x_msg_data
1373: ,x_site_use_id => l_site_use_id);
1374:
1375: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1376: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1377: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_END_SITE_AC_CRS');
1378: FND_MSG_PUB.ADD;
1379: END IF;

Line 1380: raise FND_API.G_EXC_ERROR;

1376: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1377: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_END_SITE_AC_CRS');
1378: FND_MSG_PUB.ADD;
1379: END IF;
1380: raise FND_API.G_EXC_ERROR;
1381: END IF;
1382: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1383: aso_debug_pub.add('line account info: site use after cust account site: '||l_site_use_id,1,'N');
1384: aso_debug_pub.add('line account info: cust_acct_site after cust account site: '||l_end_cust_acct_site_id,1,'N');

Line 1409: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1405: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_End_Customer_contact_id: '||l_End_Customer_contact_id,1,'N');
1406: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_end_cust_acct_site_id: '||l_end_cust_acct_site_id,1,'N');
1407: END IF;
1408:
1409: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1410: raise FND_API.G_EXC_ERROR;
1411: END IF;
1412:
1413: END IF; -- l_End_cust_account_id is not null

Line 1410: raise FND_API.G_EXC_ERROR;

1406: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_end_cust_acct_site_id: '||l_end_cust_acct_site_id,1,'N');
1407: END IF;
1408:
1409: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1410: raise FND_API.G_EXC_ERROR;
1411: END IF;
1412:
1413: END IF; -- l_End_cust_account_id is not null
1414:

Line 1438: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1434:
1435: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1436: aso_debug_pub.add('chk_lin:(ship)after populate_acct_party: ' || x_return_status,1,'N');
1437: END IF;
1438: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1439: raise FND_API.G_EXC_ERROR;
1440: END IF;
1441: */
1442: IF (p_line_shipment_tbl(j).ship_to_cust_party_id IS NOT NULL AND

Line 1439: raise FND_API.G_EXC_ERROR;

1435: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1436: aso_debug_pub.add('chk_lin:(ship)after populate_acct_party: ' || x_return_status,1,'N');
1437: END IF;
1438: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1439: raise FND_API.G_EXC_ERROR;
1440: END IF;
1441: */
1442: IF (p_line_shipment_tbl(j).ship_to_cust_party_id IS NOT NULL AND
1443: p_line_shipment_tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND

Line 1443: p_line_shipment_tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND

1439: raise FND_API.G_EXC_ERROR;
1440: END IF;
1441: */
1442: IF (p_line_shipment_tbl(j).ship_to_cust_party_id IS NOT NULL AND
1443: p_line_shipment_tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND
1444: (p_line_shipment_tbl(j).ship_to_cust_account_id IS NULL OR
1445: p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
1446:
1447:

Line 1445: p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN

1441: */
1442: IF (p_line_shipment_tbl(j).ship_to_cust_party_id IS NOT NULL AND
1443: p_line_shipment_tbl(j).ship_to_cust_party_id <> FND_API.G_MISS_NUM) AND
1444: (p_line_shipment_tbl(j).ship_to_cust_account_id IS NULL OR
1445: p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
1446:
1447:
1448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1449: aso_debug_pub.add('Check_Tca: before customer account:p_header_shipment_tbl(j).

Line 1466: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1462: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1463: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1464: ||x_Return_Status, 1, 'N');
1465: END IF;
1466: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1467: raise FND_API.G_EXC_ERROR;
1468: END IF;
1469:
1470: END IF; -- ship cust_account_id

Line 1467: raise FND_API.G_EXC_ERROR;

1463: aso_debug_pub.add('Check_Tca: after customer account:x_Return_Status '
1464: ||x_Return_Status, 1, 'N');
1465: END IF;
1466: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1467: raise FND_API.G_EXC_ERROR;
1468: END IF;
1469:
1470: END IF; -- ship cust_account_id
1471:

Line 1478: p_line_shipment_tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN

1474: p_line_shipment_tbl(j).ship_to_cust_account_id, 1, 'N');
1475: END IF;
1476:
1477: IF p_line_shipment_tbl(j).ship_to_cust_account_id is not NULL AND
1478: p_line_shipment_tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN
1479: l_ship_cust_account_id := p_line_shipment_tbl(j).ship_to_cust_account_id;
1480: ELSE
1481: IF p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
1482: OPEN C_ship_cust(p_line_shipment_tbl(j).shipment_id);

Line 1481: IF p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN

1477: IF p_line_shipment_tbl(j).ship_to_cust_account_id is not NULL AND
1478: p_line_shipment_tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM THEN
1479: l_ship_cust_account_id := p_line_shipment_tbl(j).ship_to_cust_account_id;
1480: ELSE
1481: IF p_line_shipment_tbl(j).ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
1482: OPEN C_ship_cust(p_line_shipment_tbl(j).shipment_id);
1483: FETCH C_ship_cust INTO l_ship_cust_account_id ;
1484: CLOSE C_ship_cust;
1485: END IF;

Line 1492: IF l_ship_cust_account_id IS NOT NULL AND l_ship_cust_account_id <> FND_API.G_MISS_NUM THEN

1488: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1489: aso_debug_pub.add('line acct info: before cust_acct_site:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
1490: END IF;
1491:
1492: IF l_ship_cust_account_id IS NOT NULL AND l_ship_cust_account_id <> FND_API.G_MISS_NUM THEN
1493: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1494: aso_debug_pub.add('line acct info: before cust_acct_site:p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
1495: END IF;
1496: IF p_line_shipment_tbl(j).ship_to_party_site_id is not NULL AND

Line 1497: p_line_shipment_tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN

1493: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1494: aso_debug_pub.add('line acct info: before cust_acct_site:p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
1495: END IF;
1496: IF p_line_shipment_tbl(j).ship_to_party_site_id is not NULL AND
1497: p_line_shipment_tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
1498:
1499: Customer_Account_Site(
1500: p_api_version => 1.0
1501: ,p_party_site_id => p_line_shipment_tbl(j).ship_to_party_site_id

Line 1514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1510: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1511: aso_debug_pub.add('line acct info: after cust_acct_site:l_site_use_id: '||l_site_use_id,1,'N');
1512: aso_debug_pub.add('line acct info: after cust_acct_site:l_shp_cust_acct_site_id: '||l_shp_cust_acct_site_id,1,'N');
1513: END IF;
1514: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1515: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1516: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
1517: -- FND_MESSAGE.Set_Token('ID', to_char(p_line_shipment_tbl(j).ship_to_party_site_id),FALSE);
1518: FND_MSG_PUB.ADD;

Line 1520: raise FND_API.G_EXC_ERROR;

1516: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
1517: -- FND_MESSAGE.Set_Token('ID', to_char(p_line_shipment_tbl(j).ship_to_party_site_id),FALSE);
1518: FND_MSG_PUB.ADD;
1519: END IF;
1520: raise FND_API.G_EXC_ERROR;
1521: END IF;
1522:
1523: END IF;
1524:

Line 1546: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1542: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_ship_to_contact_id: '||l_ship_to_contact_id,1,'N');
1543: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_shp_cust_acct_site_id: '||l_shp_cust_acct_site_id,1,'N');
1544: END IF;
1545:
1546: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1547: raise FND_API.G_EXC_ERROR;
1548: END IF;
1549:
1550: END IF; -- l_ship_cust_account_id is not null

Line 1547: raise FND_API.G_EXC_ERROR;

1543: aso_debug_pub.add('chk_ln: after Cust_Acct_Contact_Addr:l_shp_cust_acct_site_id: '||l_shp_cust_acct_site_id,1,'N');
1544: END IF;
1545:
1546: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1547: raise FND_API.G_EXC_ERROR;
1548: END IF;
1549:
1550: END IF; -- l_ship_cust_account_id is not null
1551:

Line 1561: WHEN FND_API.G_EXC_ERROR THEN

1557: p_data => x_msg_data
1558: );
1559:
1560: EXCEPTION
1561: WHEN FND_API.G_EXC_ERROR THEN
1562: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1563: P_API_NAME => L_API_NAME
1564: ,P_PKG_NAME => G_PKG_NAME
1565: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1569: ,X_MSG_COUNT => X_MSG_COUNT
1570: ,X_MSG_DATA => X_MSG_DATA
1571: ,X_RETURN_STATUS => X_RETURN_STATUS);
1572:
1573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1574: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1575: P_API_NAME => L_API_NAME
1576: ,P_PKG_NAME => G_PKG_NAME
1577: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1602: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

1598:
1599:
1600: PROCEDURE Customer_Account(
1601: p_api_version IN NUMBER,
1602: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1603: p_commit IN VARCHAR2 := FND_API.g_false,
1604: p_Party_Id IN NUMBER,
1605: p_error_ret IN VARCHAR2 := FND_API.G_TRUE,
1606: p_calling_api_flag IN NUMBER := 0,

Line 1603: p_commit IN VARCHAR2 := FND_API.g_false,

1599:
1600: PROCEDURE Customer_Account(
1601: p_api_version IN NUMBER,
1602: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1603: p_commit IN VARCHAR2 := FND_API.g_false,
1604: p_Party_Id IN NUMBER,
1605: p_error_ret IN VARCHAR2 := FND_API.G_TRUE,
1606: p_calling_api_flag IN NUMBER := 0,
1607: x_Cust_Acct_Id OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 1605: p_error_ret IN VARCHAR2 := FND_API.G_TRUE,

1601: p_api_version IN NUMBER,
1602: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1603: p_commit IN VARCHAR2 := FND_API.g_false,
1604: p_Party_Id IN NUMBER,
1605: p_error_ret IN VARCHAR2 := FND_API.G_TRUE,
1606: p_calling_api_flag IN NUMBER := 0,
1607: x_Cust_Acct_Id OUT NOCOPY /* file.sql.39 change */ NUMBER,
1608: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1609: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 1678: IF FND_API.to_boolean(p_init_msg_list) THEN

1674: ---- Initialize---------------------
1675:
1676: SAVEPOINT CUSTOMER_ACCOUNT_PVT;
1677:
1678: IF FND_API.to_boolean(p_init_msg_list) THEN
1679: FND_MSG_PUB.initialize;
1680: END IF;
1681:
1682: IF NOT FND_API.compatible_api_call(

Line 1682: IF NOT FND_API.compatible_api_call(

1678: IF FND_API.to_boolean(p_init_msg_list) THEN
1679: FND_MSG_PUB.initialize;
1680: END IF;
1681:
1682: IF NOT FND_API.compatible_api_call(
1683: l_api_version,
1684: p_api_version,
1685: l_api_name,
1686: g_pkg_name

Line 1688: RAISE FND_API.g_exc_unexpected_error;

1684: p_api_version,
1685: l_api_name,
1686: g_pkg_name
1687: ) THEN
1688: RAISE FND_API.g_exc_unexpected_error;
1689: END IF;
1690:
1691: x_return_status := FND_API.G_RET_STS_SUCCESS;
1692:

Line 1691: x_return_status := FND_API.G_RET_STS_SUCCESS;

1687: ) THEN
1688: RAISE FND_API.g_exc_unexpected_error;
1689: END IF;
1690:
1691: x_return_status := FND_API.G_RET_STS_SUCCESS;
1692:
1693: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1694: aso_debug_pub.add('Chk_TCA.Customer_Account Begin ',1,'N');
1695: aso_debug_pub.add('Customer_Account: p_party_id '||p_party_id,1,'N');

Line 1709: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN

1705: aso_debug_pub.add('Cust_Acct:party type for sold_to = '|| l_party_type,1,'N');
1706: END IF;
1707: IF l_party_type = 'PERSON' OR l_party_type ='ORGANIZATION' THEN
1708:
1709: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN
1710: OPEN C_Get_Account_Count(p_party_id);
1711: FETCH C_Get_Account_Count INTO l_acct_count;
1712: CLOSE C_Get_Account_Count;
1713:

Line 1718: x_return_status := FND_API.G_RET_STS_ERROR;

1714: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1715: aso_debug_pub.add('Cust_Acct:l_acct_count: '|| l_acct_count,1,'N');
1716: END IF;
1717: IF l_acct_count > 1 THEN
1718: x_return_status := FND_API.G_RET_STS_ERROR;
1719: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1720: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1721: FND_MSG_PUB.ADD;
1722: RAISE FND_API.G_EXC_ERROR;

Line 1722: RAISE FND_API.G_EXC_ERROR;

1718: x_return_status := FND_API.G_RET_STS_ERROR;
1719: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1720: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1721: FND_MSG_PUB.ADD;
1722: RAISE FND_API.G_EXC_ERROR;
1723: END IF;
1724: END IF;
1725:
1726: -- derive customer account

Line 1737: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN

1733: END IF;
1734:
1735: ELSIF l_party_type = 'PARTY_RELATIONSHIP' THEN -- party_type
1736:
1737: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN
1738: OPEN C_Get_Account_User_Count(p_party_id);
1739: FETCH C_Get_Account_User_Count INTO l_acct_count;
1740: CLOSE C_Get_Account_User_Count;
1741:

Line 1746: x_return_status := FND_API.G_RET_STS_ERROR;

1742: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1743: aso_debug_pub.add('Cust_Acct:l_acct_count: '|| l_acct_count,1,'N');
1744: END IF;
1745: IF l_acct_count > 1 THEN
1746: x_return_status := FND_API.G_RET_STS_ERROR;
1747: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1748: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1749: FND_MSG_PUB.ADD;
1750: RAISE FND_API.G_EXC_ERROR;

Line 1750: RAISE FND_API.G_EXC_ERROR;

1746: x_return_status := FND_API.G_RET_STS_ERROR;
1747: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1748: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1749: FND_MSG_PUB.ADD;
1750: RAISE FND_API.G_EXC_ERROR;
1751: END IF;
1752: END IF;
1753:
1754: OPEN account_user_cur(p_party_id);

Line 1768: IF lx_cust_id is NULL OR lx_cust_id = FND_API.G_MISS_NUM THEN

1764: aso_debug_pub.add('checking for object id of relationship',1,'N');
1765: aso_debug_pub.add('lx_cust_id in rel = ' || lx_cust_id,1,'N');
1766: END IF;
1767:
1768: IF lx_cust_id is NULL OR lx_cust_id = FND_API.G_MISS_NUM THEN
1769:
1770: OPEN party_rel_cur(p_party_id);
1771: FETCH party_rel_cur INTO l_object_party_id;
1772: IF aso_debug_pub.g_debug_flag = 'Y' THEN

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

1772: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1773: aso_debug_pub.add('object_id = ' || l_object_party_id,1,'N');
1774: END IF;
1775: IF party_rel_cur%NOTFOUND THEN
1776: -- x_return_status := FND_API.G_RET_STS_ERROR;
1777: CLOSE party_rel_cur;
1778: ELSE
1779: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN
1780: OPEN C_Get_Account_Count(l_object_party_id);

Line 1779: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN

1775: IF party_rel_cur%NOTFOUND THEN
1776: -- x_return_status := FND_API.G_RET_STS_ERROR;
1777: CLOSE party_rel_cur;
1778: ELSE
1779: IF p_error_ret = FND_API.G_TRUE AND p_calling_api_flag NOT IN (1,2) THEN
1780: OPEN C_Get_Account_Count(l_object_party_id);
1781: FETCH C_Get_Account_Count INTO l_acct_count;
1782: CLOSE C_Get_Account_Count;
1783: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 1788: x_return_status := FND_API.G_RET_STS_ERROR;

1784: aso_debug_pub.add('Cust_Acct:l_acct_count: '|| l_acct_count,1,'N');
1785: END IF;
1786:
1787: IF l_acct_count > 1 THEN
1788: x_return_status := FND_API.G_RET_STS_ERROR;
1789: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1790: FND_MESSAGE.Set_Token('ID', to_char(l_object_party_id), FALSE);
1791: FND_MSG_PUB.ADD;
1792: RAISE FND_API.G_EXC_ERROR;

Line 1792: RAISE FND_API.G_EXC_ERROR;

1788: x_return_status := FND_API.G_RET_STS_ERROR;
1789: FND_MESSAGE.Set_Name('ASO', 'ASO_MULTIPLE_CUST_ACCOUNT');
1790: FND_MESSAGE.Set_Token('ID', to_char(l_object_party_id), FALSE);
1791: FND_MSG_PUB.ADD;
1792: RAISE FND_API.G_EXC_ERROR;
1793: END IF;
1794: END IF;
1795:
1796: OPEN account_user_cur(l_object_party_id);

Line 1810: IF lx_cust_id IS NULL OR lx_cust_id = FND_API.G_MISS_NUM THEN

1806: -- create customer account
1807: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1808: aso_debug_pub.add('creating customer account',1,'N');
1809: END IF;
1810: IF lx_cust_id IS NULL OR lx_cust_id = FND_API.G_MISS_NUM THEN
1811: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1812: aso_debug_pub.add('Cust_Acct:l_create_acct_prof: '|| l_create_acct_prof,1,'N');
1813: END IF;
1814: IF p_calling_api_flag = 1 AND (l_create_acct_prof = 'PLACE_ORDER') THEN

Line 1815: x_return_status := FND_API.G_RET_STS_ERROR;

1811: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1812: aso_debug_pub.add('Cust_Acct:l_create_acct_prof: '|| l_create_acct_prof,1,'N');
1813: END IF;
1814: IF p_calling_api_flag = 1 AND (l_create_acct_prof = 'PLACE_ORDER') THEN
1815: x_return_status := FND_API.G_RET_STS_ERROR;
1816: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
1817: FND_MSG_PUB.ADD;
1818: RAISE FND_API.G_EXC_ERROR;
1819: END IF;

Line 1818: RAISE FND_API.G_EXC_ERROR;

1814: IF p_calling_api_flag = 1 AND (l_create_acct_prof = 'PLACE_ORDER') THEN
1815: x_return_status := FND_API.G_RET_STS_ERROR;
1816: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
1817: FND_MSG_PUB.ADD;
1818: RAISE FND_API.G_EXC_ERROR;
1819: END IF;
1820: -- ER 5484749
1821: IF p_calling_api_flag = 2 AND (l_create_acct_prof = 'NEVER') THEN
1822: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1822: x_return_status := FND_API.G_RET_STS_ERROR;

1818: RAISE FND_API.G_EXC_ERROR;
1819: END IF;
1820: -- ER 5484749
1821: IF p_calling_api_flag = 2 AND (l_create_acct_prof = 'NEVER') THEN
1822: x_return_status := FND_API.G_RET_STS_ERROR;
1823: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
1824: FND_MSG_PUB.ADD;
1825: RAISE FND_API.G_EXC_ERROR;
1826: END IF;

Line 1825: RAISE FND_API.G_EXC_ERROR;

1821: IF p_calling_api_flag = 2 AND (l_create_acct_prof = 'NEVER') THEN
1822: x_return_status := FND_API.G_RET_STS_ERROR;
1823: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
1824: FND_MSG_PUB.ADD;
1825: RAISE FND_API.G_EXC_ERROR;
1826: END IF;
1827:
1828:
1829: IF (l_create_acct_prof = 'ALWAYS') OR

Line 1836: AND p_Party_Id <> FND_API.G_MISS_NUM THEN

1832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1833: aso_debug_pub.add('creating customer account: create_acct_prof: '||l_create_acct_prof,1,'N');
1834: END IF;
1835: IF p_Party_Id is not NULL
1836: AND p_Party_Id <> FND_API.G_MISS_NUM THEN
1837: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1838: aso_debug_pub.add('creating cust account',1,'N');
1839: END IF;
1840: ASO_PARTY_INT.Create_Customer_Account(

Line 1847: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1843: x_return_status => x_return_status,
1844: x_msg_count => x_msg_count,
1845: x_msg_data => x_msg_data,
1846: x_cust_acct_id => cust_account_id);
1847: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1848: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1849: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1850: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1851: FND_MSG_PUB.ADD;

Line 1853: raise FND_API.G_EXC_ERROR;

1849: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1850: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1851: FND_MSG_PUB.ADD;
1852: END IF;
1853: raise FND_API.G_EXC_ERROR;
1854: END IF;
1855: x_Cust_Acct_Id := cust_account_id;
1856: END IF; -- end party if
1857: ELSIF p_calling_api_flag <> 0 THEN -- profile is N raise error

Line 1858: x_return_status := FND_API.G_RET_STS_ERROR;

1854: END IF;
1855: x_Cust_Acct_Id := cust_account_id;
1856: END IF; -- end party if
1857: ELSIF p_calling_api_flag <> 0 THEN -- profile is N raise error
1858: x_return_status := FND_API.G_RET_STS_ERROR;
1859: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1860: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1861: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1862: FND_MSG_PUB.ADD;

Line 1864: raise FND_API.G_EXC_ERROR;

1860: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1861: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1862: FND_MSG_PUB.ADD;
1863: END IF;
1864: raise FND_API.G_EXC_ERROR;
1865: END IF; -- end profile condition
1866:
1867: ELSE -- lx_cust_id not null
1868:

Line 1882: WHEN FND_API.G_EXC_ERROR THEN

1878: p_data => x_msg_data
1879: );
1880:
1881: EXCEPTION
1882: WHEN FND_API.G_EXC_ERROR THEN
1883: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1884: P_API_NAME => L_API_NAME
1885: ,P_PKG_NAME => G_PKG_NAME
1886: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1894: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1890: ,X_MSG_COUNT => X_MSG_COUNT
1891: ,X_MSG_DATA => X_MSG_DATA
1892: ,X_RETURN_STATUS => X_RETURN_STATUS);
1893:
1894: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1895: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1896: P_API_NAME => L_API_NAME
1897: ,P_PKG_NAME => G_PKG_NAME
1898: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1925: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

1921:
1922: PROCEDURE Customer_Account_Site
1923: (
1924: p_api_version IN NUMBER,
1925: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1926: p_commit IN VARCHAR2 := FND_API.g_false,
1927: p_party_site_id IN NUMBER,
1928: p_acct_site_type IN VARCHAR2,
1929: p_cust_account_id IN NUMBER,

Line 1926: p_commit IN VARCHAR2 := FND_API.g_false,

1922: PROCEDURE Customer_Account_Site
1923: (
1924: p_api_version IN NUMBER,
1925: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1926: p_commit IN VARCHAR2 := FND_API.g_false,
1927: p_party_site_id IN NUMBER,
1928: p_acct_site_type IN VARCHAR2,
1929: p_cust_account_id IN NUMBER,
1930: x_cust_acct_site_id OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 2024: IF FND_API.to_boolean(p_init_msg_list) THEN

2020: ---- Initialize---------------------
2021:
2022: SAVEPOINT CUSTOMER_ACCOUNT_SITE_PVT;
2023:
2024: IF FND_API.to_boolean(p_init_msg_list) THEN
2025: FND_MSG_PUB.initialize;
2026: END IF;
2027:
2028: IF NOT FND_API.compatible_api_call(

Line 2028: IF NOT FND_API.compatible_api_call(

2024: IF FND_API.to_boolean(p_init_msg_list) THEN
2025: FND_MSG_PUB.initialize;
2026: END IF;
2027:
2028: IF NOT FND_API.compatible_api_call(
2029: l_api_version,
2030: p_api_version,
2031: l_api_name,
2032: g_pkg_name

Line 2034: RAISE FND_API.g_exc_unexpected_error;

2030: p_api_version,
2031: l_api_name,
2032: g_pkg_name
2033: ) THEN
2034: RAISE FND_API.g_exc_unexpected_error;
2035: END IF;
2036:
2037: x_return_status := FND_API.G_RET_STS_SUCCESS;
2038:

Line 2037: x_return_status := FND_API.G_RET_STS_SUCCESS;

2033: ) THEN
2034: RAISE FND_API.g_exc_unexpected_error;
2035: END IF;
2036:
2037: x_return_status := FND_API.G_RET_STS_SUCCESS;
2038:
2039: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2040: aso_debug_pub.add('site type in Customer_Account_Site = ' || p_acct_site_type,1,'N');
2041: END IF;

Line 2054: x_return_status := FND_API.G_RET_STS_ERROR;

2050: FETCH party_cur INTO l_party_type, l_party_id;
2051: IF (party_cur%NOTFOUND) THEN
2052: l_party_type := NULL;
2053:
2054: x_return_status := FND_API.G_RET_STS_ERROR;
2055: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2056: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2057: FND_MSG_PUB.ADD;
2058: END IF;

Line 2059: raise FND_API.G_EXC_ERROR;

2055: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2056: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2057: FND_MSG_PUB.ADD;
2058: END IF;
2059: raise FND_API.G_EXC_ERROR;
2060: END IF;
2061: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2062: aso_debug_pub.add('party_type in Customer_Account_Site = ' || l_party_type,1,'N');
2063: END IF;

Line 2071: x_return_status := FND_API.G_RET_STS_ERROR;

2067: OPEN relationship_cur;
2068: FETCH relationship_cur INTO cur_party_id;
2069: IF (relationship_cur%NOTFOUND) THEN
2070: cur_party_id := NULL;
2071: x_return_status := FND_API.G_RET_STS_ERROR;
2072: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2073: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2074: FND_MSG_PUB.ADD;
2075: END IF;

Line 2076: raise FND_API.G_EXC_ERROR;

2072: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2073: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2074: FND_MSG_PUB.ADD;
2075: END IF;
2076: raise FND_API.G_EXC_ERROR;
2077: END IF;
2078: CLOSE relationship_cur;
2079: ELSE
2080: cur_party_id := l_party_id;

Line 2104: x_return_status := FND_API.G_RET_STS_ERROR;

2100:
2101: IF inactive_site_cur%FOUND THEN
2102: x_cust_acct_site_id := NULL;
2103: x_site_use_id := NULL;
2104: x_return_status := FND_API.G_RET_STS_ERROR;
2105: IF p_acct_site_type = 'BILL_TO' THEN
2106: FND_MESSAGE.Set_Name('ASO','ASO_INV_CUST_SITE_INACTIVE');
2107: ELSIF p_acct_site_type = 'END_USER' THEN
2108: FND_MESSAGE.Set_Name('ASO','ASO_END_CUST_SITE_INACTIVE');

Line 2113: raise FND_API.G_EXC_ERROR;

2109: ELSIF p_acct_site_type = 'SHIP_TO' THEN
2110: FND_MESSAGE.Set_Name('ASO','ASO_SHP_CUST_SITE_INACTIVE');
2111: END IF;
2112: FND_MSG_PUB.ADD;
2113: raise FND_API.G_EXC_ERROR;
2114: END IF;
2115: CLOSE inactive_site_cur;
2116: END IF; -- active_site_cur%NOTFOUND end if
2117: CLOSE active_site_cur;

Line 2123: (x_cust_acct_site_id <> FND_API.G_MISS_NUM) THEN

2119:
2120:
2121:
2122: IF (x_cust_acct_site_id IS NOT NULL) AND
2123: (x_cust_acct_site_id <> FND_API.G_MISS_NUM) THEN
2124:
2125:
2126: OPEN active_site_use_cur(x_cust_acct_site_id, l_acct_site_type);
2127: FETCH active_site_use_cur INTO x_site_use_id, cust_site_use_status;

Line 2138: x_return_status := FND_API.G_RET_STS_ERROR;

2134: OPEN inactive_site_use_cur(x_cust_acct_site_id, l_acct_site_type);
2135: FETCH inactive_site_use_cur INTO x_site_use_id, cust_site_use_status;
2136: IF inactive_site_use_cur%FOUND THEN
2137: x_site_use_id := NULL;
2138: x_return_status := FND_API.G_RET_STS_ERROR;
2139: IF p_acct_site_type = 'BILL_TO' THEN
2140: FND_MESSAGE.Set_Name('ASO','ASO_INV_CUST_SITE_INACTIVE');
2141: ELSIF p_acct_site_type = 'END_USER' THEN
2142: FND_MESSAGE.Set_Name('ASO','ASO_END_CUST_SITE_INACTIVE');

Line 2147: raise FND_API.G_EXC_ERROR;

2143: ELSIF p_acct_site_type = 'SHIP_TO' THEN
2144: FND_MESSAGE.Set_Name('ASO','ASO_SHP_CUST_SITE_INACTIVE');
2145: END IF;
2146: FND_MSG_PUB.ADD;
2147: raise FND_API.G_EXC_ERROR;
2148: ELSE
2149: -- this means that there no site uses , either active or inactive
2150: x_site_use_id := NULL;
2151: END IF;

Line 2166: x_site_use_id = FND_API.G_MISS_NUM THEN

2162: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2163: aso_debug_pub.add('Customer_Account_Site: x_site_use_id: ' || x_site_use_id,1,'N');
2164: END IF;
2165: IF x_site_use_id is NULL OR
2166: x_site_use_id = FND_API.G_MISS_NUM THEN
2167:
2168: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2169: aso_debug_pub.add('calling create accsite uses ',1, 'N');
2170: END IF;

Line 2189: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2185:
2186: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2187: aso_debug_pub.add('site_use_id after deriving invoice = ' || x_site_use_id,1, 'Y');
2188: END IF;
2189: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2190: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2191: FND_MESSAGE.Set_Name('ASO', 'ASO_ACCT_SITE_USE');
2192: FND_MESSAGE.Set_Token('ID', to_char(p_party_site_id),FALSE);
2193: FND_MSG_PUB.ADD;

Line 2195: raise FND_API.G_EXC_ERROR;

2191: FND_MESSAGE.Set_Name('ASO', 'ASO_ACCT_SITE_USE');
2192: FND_MESSAGE.Set_Token('ID', to_char(p_party_site_id),FALSE);
2193: FND_MSG_PUB.ADD;
2194: END IF;
2195: raise FND_API.G_EXC_ERROR;
2196: END IF;
2197: END IF;
2198:
2199: FND_MSG_PUB.Count_And_Get

Line 2205: WHEN FND_API.G_EXC_ERROR THEN

2201: p_data => x_msg_data
2202: );
2203:
2204: EXCEPTION
2205: WHEN FND_API.G_EXC_ERROR THEN
2206: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2207: P_API_NAME => L_API_NAME
2208: ,P_PKG_NAME => G_PKG_NAME
2209: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2213: ,X_MSG_COUNT => X_MSG_COUNT
2214: ,X_MSG_DATA => X_MSG_DATA
2215: ,X_RETURN_STATUS => X_RETURN_STATUS);
2216:
2217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2218: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2219: P_API_NAME => L_API_NAME
2220: ,P_PKG_NAME => G_PKG_NAME
2221: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 2247: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

2243:
2244:
2245: PROCEDURE Cust_Acct_Relationship(
2246: p_api_version IN NUMBER,
2247: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2248: p_commit IN VARCHAR2 := FND_API.g_false,
2249: p_sold_to_cust_account IN NUMBER,
2250: p_related_cust_account IN NUMBER,
2251: p_relationship_type IN VARCHAR2,

Line 2248: p_commit IN VARCHAR2 := FND_API.g_false,

2244:
2245: PROCEDURE Cust_Acct_Relationship(
2246: p_api_version IN NUMBER,
2247: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2248: p_commit IN VARCHAR2 := FND_API.g_false,
2249: p_sold_to_cust_account IN NUMBER,
2250: p_related_cust_account IN NUMBER,
2251: p_relationship_type IN VARCHAR2,
2252: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 2261: l_cust_acct_match VARCHAR2(1) := FND_API.G_FALSE;

2257: l_api_version CONSTANT NUMBER := 1.0;
2258: l_api_name CONSTANT VARCHAR2(45) := 'CUST_ACCT_RELATIONSHIP';
2259:
2260: -- TRUE if there are matching row for the cust_account_id and relate_cust_account_id.
2261: l_cust_acct_match VARCHAR2(1) := FND_API.G_FALSE;
2262: -- TRUE if the matching rows also match the bill_to_flag or ship_to_flag.
2263: l_cust_acct_flag_match VARCHAR2(1) := FND_API.G_FALSE;
2264:
2265: l_bill_to_flag VARCHAR2(1);

Line 2263: l_cust_acct_flag_match VARCHAR2(1) := FND_API.G_FALSE;

2259:
2260: -- TRUE if there are matching row for the cust_account_id and relate_cust_account_id.
2261: l_cust_acct_match VARCHAR2(1) := FND_API.G_FALSE;
2262: -- TRUE if the matching rows also match the bill_to_flag or ship_to_flag.
2263: l_cust_acct_flag_match VARCHAR2(1) := FND_API.G_FALSE;
2264:
2265: l_bill_to_flag VARCHAR2(1);
2266: l_ship_to_flag VARCHAR2(1);
2267: l_last_update_date DATE;

Line 2280: IF FND_API.to_boolean(p_init_msg_list) THEN

2276: ---- Initialize---------------------
2277:
2278: SAVEPOINT CUST_ACCT_RELATIONSHIP_PVT;
2279:
2280: IF FND_API.to_boolean(p_init_msg_list) THEN
2281: FND_MSG_PUB.initialize;
2282: END IF;
2283:
2284: IF NOT FND_API.compatible_api_call(

Line 2284: IF NOT FND_API.compatible_api_call(

2280: IF FND_API.to_boolean(p_init_msg_list) THEN
2281: FND_MSG_PUB.initialize;
2282: END IF;
2283:
2284: IF NOT FND_API.compatible_api_call(
2285: l_api_version,
2286: p_api_version,
2287: l_api_name,
2288: g_pkg_name

Line 2290: RAISE FND_API.g_exc_unexpected_error;

2286: p_api_version,
2287: l_api_name,
2288: g_pkg_name
2289: ) THEN
2290: RAISE FND_API.g_exc_unexpected_error;
2291: END IF;
2292:
2293: x_return_status := FND_API.g_ret_sts_success;
2294: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2293: x_return_status := FND_API.g_ret_sts_success;

2289: ) THEN
2290: RAISE FND_API.g_exc_unexpected_error;
2291: END IF;
2292:
2293: x_return_status := FND_API.g_ret_sts_success;
2294: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2295: aso_debug_pub.add('Entering cust acct relationship ',1, 'Y');
2296: END IF;
2297:

Line 2302: l_cust_acct_match := FND_API.G_TRUE;

2298: OPEN c_cust_acct_relate;
2299: FETCH c_cust_acct_relate
2300: INTO l_bill_to_flag, l_ship_to_flag, l_last_update_date;
2301: IF c_cust_acct_relate%FOUND THEN
2302: l_cust_acct_match := FND_API.G_TRUE;
2303: END IF;
2304: CLOSE c_cust_acct_relate;
2305:
2306: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

Line 2306: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

2302: l_cust_acct_match := FND_API.G_TRUE;
2303: END IF;
2304: CLOSE c_cust_acct_relate;
2305:
2306: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2307: IF (p_relationship_type = 'BILL_TO') AND (l_bill_to_flag = 'Y') THEN
2308: l_cust_acct_flag_match := FND_API.G_TRUE;
2309: ELSIF (p_relationship_type = 'SHIP_TO') AND (l_ship_to_flag = 'Y') THEN
2310: l_cust_acct_flag_match := FND_API.G_TRUE;

Line 2308: l_cust_acct_flag_match := FND_API.G_TRUE;

2304: CLOSE c_cust_acct_relate;
2305:
2306: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2307: IF (p_relationship_type = 'BILL_TO') AND (l_bill_to_flag = 'Y') THEN
2308: l_cust_acct_flag_match := FND_API.G_TRUE;
2309: ELSIF (p_relationship_type = 'SHIP_TO') AND (l_ship_to_flag = 'Y') THEN
2310: l_cust_acct_flag_match := FND_API.G_TRUE;
2311: END IF;
2312: END IF;

Line 2310: l_cust_acct_flag_match := FND_API.G_TRUE;

2306: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2307: IF (p_relationship_type = 'BILL_TO') AND (l_bill_to_flag = 'Y') THEN
2308: l_cust_acct_flag_match := FND_API.G_TRUE;
2309: ELSIF (p_relationship_type = 'SHIP_TO') AND (l_ship_to_flag = 'Y') THEN
2310: l_cust_acct_flag_match := FND_API.G_TRUE;
2311: END IF;
2312: END IF;
2313:
2314: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2317: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN

2313:
2314: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2315: aso_debug_pub.add('cust acct relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2316: END IF;
2317: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2318: -- no matching rows
2319: IF NOT FND_API.TO_Boolean(l_cust_acct_match) THEN
2320: -- the account ids are not matched.
2321: ASO_PARTY_INT.Create_Cust_Acct_Relationship(

Line 2319: IF NOT FND_API.TO_Boolean(l_cust_acct_match) THEN

2315: aso_debug_pub.add('cust acct relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2316: END IF;
2317: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2318: -- no matching rows
2319: IF NOT FND_API.TO_Boolean(l_cust_acct_match) THEN
2320: -- the account ids are not matched.
2321: ASO_PARTY_INT.Create_Cust_Acct_Relationship(
2322:
2323: p_api_version => 1.0,

Line 2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2327: x_return_status => x_return_status,
2328: x_msg_count => x_msg_count,
2329: x_msg_data => x_msg_data
2330: );
2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2332: RAISE FND_API.G_EXC_ERROR;
2333: END IF;
2334: ELSE
2335: /*bug 8239850*/

Line 2332: RAISE FND_API.G_EXC_ERROR;

2328: x_msg_count => x_msg_count,
2329: x_msg_data => x_msg_data
2330: );
2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2332: RAISE FND_API.G_EXC_ERROR;
2333: END IF;
2334: ELSE
2335: /*bug 8239850*/
2336: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

Line 2336: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

2332: RAISE FND_API.G_EXC_ERROR;
2333: END IF;
2334: ELSE
2335: /*bug 8239850*/
2336: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2337: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2338: aso_debug_pub.add('before update_Cust_Acct_Relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2339: ASO_PARTY_INT.update_Cust_Acct_Relationship(
2340: p_api_version => 1.0,

Line 2337: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN

2333: END IF;
2334: ELSE
2335: /*bug 8239850*/
2336: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2337: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2338: aso_debug_pub.add('before update_Cust_Acct_Relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2339: ASO_PARTY_INT.update_Cust_Acct_Relationship(
2340: p_api_version => 1.0,
2341: p_sold_to_cust_account => p_sold_to_cust_account,

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

2349: end if;
2350: end if;
2351: -- the account ids are matched but bill_to_flag or ship_to_flag is not matched.
2352: -- and the profile is 'Y'.
2353: --- x_return_status := FND_API.G_RET_STS_ERROR;
2354: --IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2355: -- FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2356: -- FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2357: -- FND_MSG_PUB.ADD;

Line 2359: -- RAISE FND_API.G_EXC_ERROR;

2355: -- FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2356: -- FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2357: -- FND_MSG_PUB.ADD;
2358: -- END IF;
2359: -- RAISE FND_API.G_EXC_ERROR;
2360:
2361: END IF;
2362: /*else
2363: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2363: x_return_status := FND_API.G_RET_STS_ERROR;

2359: -- RAISE FND_API.G_EXC_ERROR;
2360:
2361: END IF;
2362: /*else
2363: x_return_status := FND_API.G_RET_STS_ERROR;
2364: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2365: FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2366: FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2367: FND_MSG_PUB.ADD;

Line 2369: RAISE FND_API.G_EXC_ERROR; */

2365: FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2366: FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2367: FND_MSG_PUB.ADD;
2368: END IF;
2369: RAISE FND_API.G_EXC_ERROR; */
2370:
2371:
2372:
2373: END IF; -- l_cust_acct_flag_match

Line 2382: WHEN FND_API.G_EXC_ERROR THEN

2378: p_data => x_msg_data
2379: );
2380:
2381: EXCEPTION
2382: WHEN FND_API.G_EXC_ERROR THEN
2383: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2384: P_API_NAME => L_API_NAME
2385: ,P_PKG_NAME => G_PKG_NAME
2386: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2390: ,X_MSG_COUNT => X_MSG_COUNT
2391: ,X_MSG_DATA => X_MSG_DATA
2392: ,X_RETURN_STATUS => X_RETURN_STATUS);
2393:
2394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2395: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2396: P_API_NAME => L_API_NAME
2397: ,P_PKG_NAME => G_PKG_NAME
2398: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 2424: p_init_msg_list IN VARCHAR2 := FND_API.g_false,

2420:
2421: PROCEDURE Cust_Acct_Contact_Addr
2422: (
2423: p_api_version IN NUMBER,
2424: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2425: p_commit IN VARCHAR2 := FND_API.g_false,
2426: p_party_site_id IN NUMBER,
2427: p_role_type IN VARCHAR2,
2428: p_cust_account_id IN NUMBER,

Line 2425: p_commit IN VARCHAR2 := FND_API.g_false,

2421: PROCEDURE Cust_Acct_Contact_Addr
2422: (
2423: p_api_version IN NUMBER,
2424: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2425: p_commit IN VARCHAR2 := FND_API.g_false,
2426: p_party_site_id IN NUMBER,
2427: p_role_type IN VARCHAR2,
2428: p_cust_account_id IN NUMBER,
2429: p_party_id IN NUMBER,

Line 2447: IF FND_API.to_boolean(p_init_msg_list) THEN

2443: BEGIN
2444: ---- Initialize---------------------
2445: SAVEPOINT CUST_ACCT_CONTACT_ADDR_PVT;
2446:
2447: IF FND_API.to_boolean(p_init_msg_list) THEN
2448: FND_MSG_PUB.initialize;
2449: END IF;
2450:
2451: IF NOT FND_API.compatible_api_call(

Line 2451: IF NOT FND_API.compatible_api_call(

2447: IF FND_API.to_boolean(p_init_msg_list) THEN
2448: FND_MSG_PUB.initialize;
2449: END IF;
2450:
2451: IF NOT FND_API.compatible_api_call(
2452: l_api_version,
2453: p_api_version,
2454: l_api_name,
2455: g_pkg_name

Line 2457: RAISE FND_API.g_exc_unexpected_error;

2453: p_api_version,
2454: l_api_name,
2455: g_pkg_name
2456: ) THEN
2457: RAISE FND_API.g_exc_unexpected_error;
2458: END IF;
2459:
2460: x_return_status := FND_API.G_RET_STS_SUCCESS;
2461:

Line 2460: x_return_status := FND_API.G_RET_STS_SUCCESS;

2456: ) THEN
2457: RAISE FND_API.g_exc_unexpected_error;
2458: END IF;
2459:
2460: x_return_status := FND_API.G_RET_STS_SUCCESS;
2461:
2462: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2463: aso_debug_pub.add('Cust_acct_contact_Addr: p_role_type: '||p_role_type,1,'N');
2464: END IF;

Line 2473: AND p_party_id<> FND_API.G_MISS_NUM THEN

2469: l_role_type := p_role_type;
2470: END IF;
2471:
2472: IF p_party_id is not NULL
2473: AND p_party_id<> FND_API.G_MISS_NUM THEN
2474:
2475: IF p_party_site_id is not NULL AND
2476: p_party_site_id <> FND_API.G_MISS_NUM THEN
2477:

Line 2476: p_party_site_id <> FND_API.G_MISS_NUM THEN

2472: IF p_party_id is not NULL
2473: AND p_party_id<> FND_API.G_MISS_NUM THEN
2474:
2475: IF p_party_site_id is not NULL AND
2476: p_party_site_id <> FND_API.G_MISS_NUM THEN
2477:
2478: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2479: aso_debug_pub.add('deriving cust acct role for party id ',1,'N');
2480: END IF;

Line 2493: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2489: ,x_cust_account_role_id => l_contact_id);
2490: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2491: aso_debug_pub.add('status after get cust acct roles in Cust_Acct_Contact_Addr = ' || x_return_status,1,'N');
2492: END IF;
2493: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2494: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2495: IF p_role_type = 'BILL_TO' THEN
2496: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_PARTY_AC_CRS');
2497: ELSIF p_role_type = 'END_USER' THEN

Line 2504: raise FND_API.G_EXC_ERROR;

2500: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_SHP_PARTY_AC_CRS');
2501: END IF;
2502: FND_MSG_PUB.ADD;
2503: END IF;
2504: raise FND_API.G_EXC_ERROR;
2505:
2506: ELSE -- x_ret_status = success
2507: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN
2508: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2507: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN

2503: END IF;
2504: raise FND_API.G_EXC_ERROR;
2505:
2506: ELSE -- x_ret_status = success
2507: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN
2508: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2509: aso_debug_pub.add('cust account site = ' ||p_cust_account_site,1,'N');
2510: END IF;
2511: ASO_PARTY_INT.Create_Contact_Role (

Line 2527: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2523: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2524: aso_debug_pub.add('status after create contact role ship = '|| x_return_status,1,'N');
2525: END IF;
2526:
2527: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2528: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2529: FND_MESSAGE.Set_Name('ASO', 'ASO_CREATE_CONTACT');
2530: FND_MESSAGE.Set_Token('ID', to_char(
2531: l_contact_party_id), FALSE);

Line 2534: raise FND_API.G_EXC_ERROR;

2530: FND_MESSAGE.Set_Token('ID', to_char(
2531: l_contact_party_id), FALSE);
2532: FND_MSG_PUB.ADD;
2533: END IF;
2534: raise FND_API.G_EXC_ERROR;
2535: END IF; -- for creatE_contact_role
2536:
2537: END IF; -- for contact_party_id
2538:

Line 2551: WHEN FND_API.G_EXC_ERROR THEN

2547: p_data => x_msg_data
2548: );
2549:
2550: EXCEPTION
2551: WHEN FND_API.G_EXC_ERROR THEN
2552: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2553: P_API_NAME => L_API_NAME
2554: ,P_PKG_NAME => G_PKG_NAME
2555: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2559: ,X_MSG_COUNT => X_MSG_COUNT
2560: ,X_MSG_DATA => X_MSG_DATA
2561: ,X_RETURN_STATUS => X_RETURN_STATUS);
2562:
2563: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2564: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2565: P_API_NAME => L_API_NAME
2566: ,P_PKG_NAME => G_PKG_NAME
2567: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

2587:
2588:
2589:
2590: PROCEDURE Assign_Customer_Accounts(
2591: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2592: p_qte_header_id IN NUMBER,
2593: p_calling_api_flag IN NUMBER := 0,
2594: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
2595: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 2662: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2658: -- Standard Start of API savepoint
2659: SAVEPOINT Assign_Customer_Accounts_PVT;
2660:
2661: -- Initialize message list if p_init_msg_list is set to TRUE.
2662: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2663: FND_MSG_PUB.initialize;
2664: END IF;
2665:
2666: -- Initialize API return status to success

Line 2667: x_return_status := FND_API.G_RET_STS_SUCCESS;

2663: FND_MSG_PUB.initialize;
2664: END IF;
2665:
2666: -- Initialize API return status to success
2667: x_return_status := FND_API.G_RET_STS_SUCCESS;
2668:
2669: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2670: aso_debug_pub.add('Assign_Customer_Accounts - Begin p_qte_header_id:'|| p_qte_header_id, 1, 'Y');
2671: END IF;

Line 2688: x_return_status := FND_API.G_RET_STS_ERROR;

2684: aso_debug_pub.add('Assign_Customer_Accounts - Invalid qte_hdr_id', 1, 'Y');
2685: END IF;
2686:
2687: CLOSE C_Validate_Quote;
2688: x_return_status := FND_API.G_RET_STS_ERROR;
2689: RAISE FND_API.G_EXC_ERROR;
2690: END IF;
2691: CLOSE C_Validate_Quote;
2692:

Line 2689: RAISE FND_API.G_EXC_ERROR;

2685: END IF;
2686:
2687: CLOSE C_Validate_Quote;
2688: x_return_status := FND_API.G_RET_STS_ERROR;
2689: RAISE FND_API.G_EXC_ERROR;
2690: END IF;
2691: CLOSE C_Validate_Quote;
2692:
2693: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2771: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2767: aso_debug_pub.add('header sold to customer = ' || l_account_id);
2768: END IF;
2769:
2770:
2771: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2772: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2773: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
2774: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2775: FND_MESSAGE.Set_Token('ID', to_char( l_cust_party), FALSE);

Line 2779: raise FND_API.G_EXC_ERROR;

2775: FND_MESSAGE.Set_Token('ID', to_char( l_cust_party), FALSE);
2776: FND_MSG_PUB.ADD;
2777: end if;
2778: END IF;
2779: raise FND_API.G_EXC_ERROR;
2780:
2781: ELSE
2782:
2783: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2822: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2818: aso_debug_pub.add('header invoice to account = ' || l_account_id,1,'N');
2819: END IF;
2820:
2821:
2822: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2823: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2824: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
2825: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2826: FND_MESSAGE.Set_Token('ID', to_char( l_inv_cust_party), FALSE);

Line 2830: raise FND_API.G_EXC_ERROR;

2826: FND_MESSAGE.Set_Token('ID', to_char( l_inv_cust_party), FALSE);
2827: FND_MSG_PUB.ADD;
2828: end if;
2829: END IF;
2830: raise FND_API.G_EXC_ERROR;
2831:
2832: ELSE
2833:
2834: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2873: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2869: aso_debug_pub.add('header end customer account = ' || l_account_id,1,'N');
2870: END IF;
2871:
2872:
2873: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2874: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2875: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
2876: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2877: FND_MESSAGE.Set_Token('ID', to_char( l_end_cust_party), FALSE);

Line 2881: raise FND_API.G_EXC_ERROR;

2877: FND_MESSAGE.Set_Token('ID', to_char( l_end_cust_party), FALSE);
2878: FND_MSG_PUB.ADD;
2879: end if;
2880: END IF;
2881: raise FND_API.G_EXC_ERROR;
2882:
2883: ELSE
2884:
2885: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2925: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2921: aso_debug_pub.add('header ship to cust party = '||l_header_shipment_tbl(1).ship_to_cust_party_id,1,'N');
2922: aso_debug_pub.add('header ship to account = ' || l_account_id,1,'N');
2923: END IF;
2924:
2925: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2926: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2927: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
2928: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2929: FND_MESSAGE.Set_Token('ID', to_char( l_header_shipment_tbl(1).ship_to_cust_party_id), FALSE);

Line 2933: raise FND_API.G_EXC_ERROR;

2929: FND_MESSAGE.Set_Token('ID', to_char( l_header_shipment_tbl(1).ship_to_cust_party_id), FALSE);
2930: FND_MSG_PUB.ADD;
2931: END IF;
2932: end if;
2933: raise FND_API.G_EXC_ERROR;
2934:
2935: ELSE
2936: UPDATE ASO_SHIPMENTS
2937: SET ship_to_cust_account_id = l_account_id

Line 2962: p_init_msg_list => FND_API.G_FALSE,

2958:
2959: IF l_header_check_tca_flag = 'Y' then
2960: check_tca(
2961: p_api_version => 1.0,
2962: p_init_msg_list => FND_API.G_FALSE,
2963: P_Qte_Rec => l_qte_header_rec,
2964: p_Header_Shipment_Tbl => l_header_Shipment_Tbl,
2965: x_return_status => x_return_status,
2966: x_msg_count => x_msg_count,

Line 2971: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2967: x_msg_data => x_msg_data);
2968: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2969: aso_debug_pub.add('after check tca '||x_return_status, 1, 'N');
2970: END IF;
2971: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2972: RAISE FND_API.G_EXC_ERROR;
2973: END IF;
2974: END IF;
2975:

Line 2972: RAISE FND_API.G_EXC_ERROR;

2968: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2969: aso_debug_pub.add('after check tca '||x_return_status, 1, 'N');
2970: END IF;
2971: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2972: RAISE FND_API.G_EXC_ERROR;
2973: END IF;
2974: END IF;
2975:
2976: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 3042: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

3038: aso_debug_pub.add('line invoice to customer account = ' ||
3039: l_account_id,1,'N');
3040: END IF;
3041:
3042: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3043: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3044: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
3045: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3046: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.invoice_to_cust_party_id), FALSE);

Line 3050: raise FND_API.G_EXC_ERROR;

3046: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.invoice_to_cust_party_id), FALSE);
3047: FND_MSG_PUB.ADD;
3048: end if;
3049: END IF;
3050: raise FND_API.G_EXC_ERROR;
3051:
3052: ELSE
3053:
3054: UPDATE ASO_QUOTE_LINES_ALL

Line 3091: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

3087: aso_debug_pub.add('line End_Customer customer account = ' ||
3088: l_account_id,1,'N');
3089: END IF;
3090:
3091: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3092: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3093: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
3094: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3095: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.End_Customer_cust_party_id), FALSE);

Line 3099: raise FND_API.G_EXC_ERROR;

3095: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.End_Customer_cust_party_id), FALSE);
3096: FND_MSG_PUB.ADD;
3097: end if;
3098: END IF;
3099: raise FND_API.G_EXC_ERROR;
3100:
3101: ELSE
3102:
3103: UPDATE ASO_QUOTE_LINES_ALL

Line 3140: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

3136: aso_debug_pub.add('line ship to customer account = ' ||
3137: l_account_id,1,'N');
3138: END IF;
3139:
3140: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3142: if NVL(FND_PROFILE.Value('ASO_AUTO_ACCOUNT_CREATE'), 'AS_REQUIRED')<>'NEVER' then -- ER 5484749
3143: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3144: FND_MESSAGE.Set_Token('ID', to_char( Line_Acct.ship_to_cust_party_id), FALSE);

Line 3148: raise FND_API.G_EXC_ERROR;

3144: FND_MESSAGE.Set_Token('ID', to_char( Line_Acct.ship_to_cust_party_id), FALSE);
3145: FND_MSG_PUB.ADD;
3146: end if;
3147: END IF;
3148: raise FND_API.G_EXC_ERROR;
3149:
3150: ELSE
3151:
3152: UPDATE ASO_SHIPMENTS

Line 3181: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3177: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3178: aso_debug_pub.add('after check line account info '||x_return_status, 1, 'N
3179: ');
3180: END IF;
3181: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3182: RAISE FND_API.G_EXC_ERROR;
3183: END IF;
3184:
3185:

Line 3182: RAISE FND_API.G_EXC_ERROR;

3178: aso_debug_pub.add('after check line account info '||x_return_status, 1, 'N
3179: ');
3180: END IF;
3181: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3182: RAISE FND_API.G_EXC_ERROR;
3183: END IF;
3184:
3185:
3186: END LOOP; -- line_Acct

Line 3203: WHEN FND_API.G_EXC_ERROR THEN

3199: p_data => x_msg_data
3200: );
3201:
3202: EXCEPTION
3203: WHEN FND_API.G_EXC_ERROR THEN
3204: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3205: P_API_NAME => L_API_NAME
3206: ,P_PKG_NAME => G_PKG_NAME
3207: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 3215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3211: ,X_MSG_COUNT => X_MSG_COUNT
3212: ,X_MSG_DATA => X_MSG_DATA
3213: ,X_RETURN_STATUS => X_RETURN_STATUS);
3214:
3215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3216: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3217: P_API_NAME => L_API_NAME
3218: ,P_PKG_NAME => G_PKG_NAME
3219: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

3240:
3241:
3242:
3243: PROCEDURE Populate_Acct_Party (
3244: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3245: p_hdr_cust_acct_id IN NUMBER,
3246: p_hdr_party_id IN NUMBER,
3247: p_party_site_id IN NUMBER,
3248: p_cust_account_id IN OUT NOCOPY NUMBER,

Line 3269: p_cust_account_id <> FND_API.G_MISS_NUM THEN

3265:
3266: BEGIN
3267:
3268: IF p_cust_account_id is not NULL AND
3269: p_cust_account_id <> FND_API.G_MISS_NUM THEN
3270: IF p_cust_party_id IS NULL OR
3271: p_cust_party_id = FND_API.G_MISS_NUM THEN
3272:
3273: OPEN C_Get_Party_From_Acct(p_cust_account_id);

Line 3271: p_cust_party_id = FND_API.G_MISS_NUM THEN

3267:
3268: IF p_cust_account_id is not NULL AND
3269: p_cust_account_id <> FND_API.G_MISS_NUM THEN
3270: IF p_cust_party_id IS NULL OR
3271: p_cust_party_id = FND_API.G_MISS_NUM THEN
3272:
3273: OPEN C_Get_Party_From_Acct(p_cust_account_id);
3274: FETCH C_Get_Party_From_Acct INTO p_cust_party_id;
3275: CLOSE C_Get_Party_From_Acct;

Line 3287: x_return_status := FND_API.G_RET_STS_ERROR;

3283: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3284: aso_debug_pub.add('Check_Hdr_Acct: l_inv_cust_id: '|| l_inv_cust_id, 1, 'N');
3285: END IF;
3286: IF l_inv_cust_id <> p_cust_party_id THEN
3287: x_return_status := FND_API.G_RET_STS_ERROR;
3288: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3289: FND_MESSAGE.Set_Name('ASO', 'ASO_API_INVALID_ID');
3290: FND_MESSAGE.Set_Token('COLUMN', 'CUST_PARTY_ID',FALSE);
3291: FND_MESSAGE.Set_Token('VALUE', to_char(p_cust_party_id),FALSE);

Line 3294: raise FND_API.G_EXC_ERROR;

3290: FND_MESSAGE.Set_Token('COLUMN', 'CUST_PARTY_ID',FALSE);
3291: FND_MESSAGE.Set_Token('VALUE', to_char(p_cust_party_id),FALSE);
3292: FND_MSG_PUB.ADD;
3293: END IF;
3294: raise FND_API.G_EXC_ERROR;
3295: END IF;
3296:
3297: END IF;
3298:

Line 3306: p_cust_party_id = FND_API.G_MISS_NUM THEN

3302:
3303: ELSE -- inv_to_cust_acct_id is null
3304:
3305: IF p_cust_party_id IS NULL OR
3306: p_cust_party_id = FND_API.G_MISS_NUM THEN
3307: IF p_party_site_id IS NOT NULL AND
3308: p_party_site_id <> FND_API.G_MISS_NUM THEN
3309:
3310: p_cust_account_id := p_hdr_cust_acct_id;

Line 3308: p_party_site_id <> FND_API.G_MISS_NUM THEN

3304:
3305: IF p_cust_party_id IS NULL OR
3306: p_cust_party_id = FND_API.G_MISS_NUM THEN
3307: IF p_party_site_id IS NOT NULL AND
3308: p_party_site_id <> FND_API.G_MISS_NUM THEN
3309:
3310: p_cust_account_id := p_hdr_cust_acct_id;
3311: p_cust_party_id := p_hdr_party_id;
3312:

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

3324: END Populate_Acct_Party;
3325:
3326:
3327: PROCEDURE Check_Customer_Accounts(
3328: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3329: p_qte_header_id IN NUMBER,
3330: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
3331: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
3332: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 3403: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3399: -- Standard Start of API savepoint
3400: SAVEPOINT Check_Customer_Accounts_INT;
3401:
3402: -- Initialize message list if p_init_msg_list is set to TRUE.
3403: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3404: FND_MSG_PUB.initialize;
3405: END IF;
3406:
3407: -- Initialize API return status to success

Line 3408: x_return_status := FND_API.G_RET_STS_SUCCESS;

3404: FND_MSG_PUB.initialize;
3405: END IF;
3406:
3407: -- Initialize API return status to success
3408: x_return_status := FND_API.G_RET_STS_SUCCESS;
3409:
3410: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3411: aso_debug_pub.add('Check_Customer_Accounts - Begin', 1, 'Y');
3412: END IF;

Line 3429: x_return_status := FND_API.G_RET_STS_ERROR;

3425: aso_debug_pub.add('Check_Customer_Accounts - Invalid qte_hdr_id', 1, 'Y');
3426: END IF;
3427:
3428: CLOSE C_Validate_Quote;
3429: x_return_status := FND_API.G_RET_STS_ERROR;
3430: RAISE FND_API.G_EXC_ERROR;
3431: END IF;
3432: CLOSE C_Validate_Quote;
3433:

Line 3430: RAISE FND_API.G_EXC_ERROR;

3426: END IF;
3427:
3428: CLOSE C_Validate_Quote;
3429: x_return_status := FND_API.G_RET_STS_ERROR;
3430: RAISE FND_API.G_EXC_ERROR;
3431: END IF;
3432: CLOSE C_Validate_Quote;
3433:
3434: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN

Line 3452: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3448: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3449: aso_debug_pub.add('Check_Customer_Accounts:hdr_CustAcct - l_party: '||l_party, 1, 'N');
3450: END IF;
3451:
3452: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3453:
3454: OPEN C_Chk_Party_Acct (l_party);
3455: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3456: CLOSE C_Chk_Party_Acct;

Line 3462: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3458: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3459: aso_debug_pub.add('Check_Customer_Accounts:hdr_CustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3460: END IF;
3461:
3462: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3463: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3464: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3465: FND_MSG_PUB.ADD;
3466: END IF;

Line 3467: x_return_status := FND_API.G_RET_STS_ERROR;

3463: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3464: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3465: FND_MSG_PUB.ADD;
3466: END IF;
3467: x_return_status := FND_API.G_RET_STS_ERROR;
3468: RAISE FND_API.G_EXC_ERROR;
3469: END IF;
3470:
3471: END IF;

Line 3468: RAISE FND_API.G_EXC_ERROR;

3464: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3465: FND_MSG_PUB.ADD;
3466: END IF;
3467: x_return_status := FND_API.G_RET_STS_ERROR;
3468: RAISE FND_API.G_EXC_ERROR;
3469: END IF;
3470:
3471: END IF;
3472:

Line 3484: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3480: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3481: aso_debug_pub.add('Check_Customer_Accounts:hdr_InvCustAcct - l_party: '||l_party, 1, 'N');
3482: END IF;
3483:
3484: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3485:
3486: OPEN C_Chk_Party_Acct (l_party);
3487: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3488: CLOSE C_Chk_Party_Acct;

Line 3494: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3490: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3491: aso_debug_pub.add('Check_Customer_Accounts:hdr_InvCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3492: END IF;
3493:
3494: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3495: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3496: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3497: FND_MSG_PUB.ADD;
3498: END IF;

Line 3499: x_return_status := FND_API.G_RET_STS_ERROR;

3495: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3496: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3497: FND_MSG_PUB.ADD;
3498: END IF;
3499: x_return_status := FND_API.G_RET_STS_ERROR;
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502:
3503: END IF;

Line 3500: RAISE FND_API.G_EXC_ERROR;

3496: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3497: FND_MSG_PUB.ADD;
3498: END IF;
3499: x_return_status := FND_API.G_RET_STS_ERROR;
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502:
3503: END IF;
3504:

Line 3516: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3512: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3513: aso_debug_pub.add('Check_Customer_Accounts:hdr_EndCustAcct - l_party: '||l_party, 1, 'N');
3514: END IF;
3515:
3516: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3517:
3518: OPEN C_Chk_Party_Acct (l_party);
3519: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3520: CLOSE C_Chk_Party_Acct;

Line 3526: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3522: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3523: aso_debug_pub.add('Check_Customer_Accounts:hdr_EndCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3524: END IF;
3525:
3526: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3528: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3529: FND_MSG_PUB.ADD;
3530: END IF;

Line 3531: x_return_status := FND_API.G_RET_STS_ERROR;

3527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3528: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3529: FND_MSG_PUB.ADD;
3530: END IF;
3531: x_return_status := FND_API.G_RET_STS_ERROR;
3532: RAISE FND_API.G_EXC_ERROR;
3533: END IF;
3534:
3535: END IF;

Line 3532: RAISE FND_API.G_EXC_ERROR;

3528: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3529: FND_MSG_PUB.ADD;
3530: END IF;
3531: x_return_status := FND_API.G_RET_STS_ERROR;
3532: RAISE FND_API.G_EXC_ERROR;
3533: END IF;
3534:
3535: END IF;
3536:

Line 3548: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3544: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3545: aso_debug_pub.add('Check_Customer_Accounts:line_Acct - l_party: '||l_party, 1, 'N');
3546: END IF;
3547:
3548: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3549:
3550: OPEN C_Chk_Party_Acct (l_party);
3551: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3552: CLOSE C_Chk_Party_Acct;

Line 3558: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3554: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3555: aso_debug_pub.add('Check_Customer_Accounts:lin_Acct - l_cust_acct: '||l_cust_acct, 1, 'N');
3556: END IF;
3557:
3558: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3559: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3560: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3561: FND_MSG_PUB.ADD;
3562: END IF;

Line 3563: x_return_status := FND_API.G_RET_STS_ERROR;

3559: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3560: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3561: FND_MSG_PUB.ADD;
3562: END IF;
3563: x_return_status := FND_API.G_RET_STS_ERROR;
3564: RAISE FND_API.G_EXC_ERROR;
3565: END IF;
3566:
3567: END IF;

Line 3564: RAISE FND_API.G_EXC_ERROR;

3560: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3561: FND_MSG_PUB.ADD;
3562: END IF;
3563: x_return_status := FND_API.G_RET_STS_ERROR;
3564: RAISE FND_API.G_EXC_ERROR;
3565: END IF;
3566:
3567: END IF;
3568:

Line 3582: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3578: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3579: aso_debug_pub.add('Check_Customer_Accounts:line_EndCustAcct - l_party: '||l_party, 1, 'N');
3580: END IF;
3581:
3582: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3583:
3584: OPEN C_Chk_Party_Acct (l_party);
3585: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3586: CLOSE C_Chk_Party_Acct;

Line 3592: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3588: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3589: aso_debug_pub.add('Check_Customer_Accounts:lin_EndCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3590: END IF;
3591:
3592: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3593: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3594: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3595: FND_MSG_PUB.ADD;
3596: END IF;

Line 3597: x_return_status := FND_API.G_RET_STS_ERROR;

3593: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3594: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3595: FND_MSG_PUB.ADD;
3596: END IF;
3597: x_return_status := FND_API.G_RET_STS_ERROR;
3598: RAISE FND_API.G_EXC_ERROR;
3599: END IF;
3600:
3601: END IF;

Line 3598: RAISE FND_API.G_EXC_ERROR;

3594: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3595: FND_MSG_PUB.ADD;
3596: END IF;
3597: x_return_status := FND_API.G_RET_STS_ERROR;
3598: RAISE FND_API.G_EXC_ERROR;
3599: END IF;
3600:
3601: END IF;
3602:

Line 3616: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN

3612: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3613: aso_debug_pub.add('Check_Customer_Accounts:shp_Acct - l_party: '||l_party, 1, 'N');
3614: END IF;
3615:
3616: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3617:
3618: OPEN C_Chk_Party_Acct (l_party);
3619: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3620: CLOSE C_Chk_Party_Acct;

Line 3626: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN

3622: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3623: aso_debug_pub.add('Check_Customer_Accounts:shp_Acct - l_cust_acct: '||l_cust_acct, 1, 'N');
3624: END IF;
3625:
3626: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3627: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3628: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3629: FND_MSG_PUB.ADD;
3630: END IF;

Line 3631: x_return_status := FND_API.G_RET_STS_ERROR;

3627: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3628: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3629: FND_MSG_PUB.ADD;
3630: END IF;
3631: x_return_status := FND_API.G_RET_STS_ERROR;
3632: RAISE FND_API.G_EXC_ERROR;
3633: END IF;
3634:
3635: END IF;

Line 3632: RAISE FND_API.G_EXC_ERROR;

3628: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3629: FND_MSG_PUB.ADD;
3630: END IF;
3631: x_return_status := FND_API.G_RET_STS_ERROR;
3632: RAISE FND_API.G_EXC_ERROR;
3633: END IF;
3634:
3635: END IF;
3636:

Line 3651: WHEN FND_API.G_EXC_ERROR THEN

3647: p_data => x_msg_data
3648: );
3649:
3650: EXCEPTION
3651: WHEN FND_API.G_EXC_ERROR THEN
3652: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3653: P_API_NAME => L_API_NAME
3654: ,P_PKG_NAME => G_PKG_NAME
3655: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 3663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3659: ,X_MSG_COUNT => X_MSG_COUNT
3660: ,X_MSG_DATA => X_MSG_DATA
3661: ,X_RETURN_STATUS => X_RETURN_STATUS);
3662:
3663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3664: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3665: P_API_NAME => L_API_NAME
3666: ,P_PKG_NAME => G_PKG_NAME
3667: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR