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:
1821: IF (l_create_acct_prof = 'ALWAYS') OR
1822: (l_create_acct_prof = 'AS_REQUIRED' AND p_calling_api_flag = 1) OR

Line 1828: AND p_Party_Id <> FND_API.G_MISS_NUM THEN

1824: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1825: aso_debug_pub.add('creating customer account: create_acct_prof: '||l_create_acct_prof,1,'N');
1826: END IF;
1827: IF p_Party_Id is not NULL
1828: AND p_Party_Id <> FND_API.G_MISS_NUM THEN
1829: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1830: aso_debug_pub.add('creating cust account',1,'N');
1831: END IF;
1832: ASO_PARTY_INT.Create_Customer_Account(

Line 1839: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1835: x_return_status => x_return_status,
1836: x_msg_count => x_msg_count,
1837: x_msg_data => x_msg_data,
1838: x_cust_acct_id => cust_account_id);
1839: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1840: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1841: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1842: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1843: FND_MSG_PUB.ADD;

Line 1845: raise FND_API.G_EXC_ERROR;

1841: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1842: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1843: FND_MSG_PUB.ADD;
1844: END IF;
1845: raise FND_API.G_EXC_ERROR;
1846: END IF;
1847: x_Cust_Acct_Id := cust_account_id;
1848: END IF; -- end party if
1849: ELSIF p_calling_api_flag <> 0 THEN -- profile is N raise error

Line 1850: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 1856: raise FND_API.G_EXC_ERROR;

1852: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
1853: FND_MESSAGE.Set_Token('ID', to_char(p_Party_Id), FALSE);
1854: FND_MSG_PUB.ADD;
1855: END IF;
1856: raise FND_API.G_EXC_ERROR;
1857: END IF; -- end profile condition
1858:
1859: ELSE -- lx_cust_id not null
1860:

Line 1874: WHEN FND_API.G_EXC_ERROR THEN

1870: p_data => x_msg_data
1871: );
1872:
1873: EXCEPTION
1874: WHEN FND_API.G_EXC_ERROR THEN
1875: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1876: P_API_NAME => L_API_NAME
1877: ,P_PKG_NAME => G_PKG_NAME
1878: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1886: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1882: ,X_MSG_COUNT => X_MSG_COUNT
1883: ,X_MSG_DATA => X_MSG_DATA
1884: ,X_RETURN_STATUS => X_RETURN_STATUS);
1885:
1886: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1887: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1888: P_API_NAME => L_API_NAME
1889: ,P_PKG_NAME => G_PKG_NAME
1890: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

1913:
1914: PROCEDURE Customer_Account_Site
1915: (
1916: p_api_version IN NUMBER,
1917: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1918: p_commit IN VARCHAR2 := FND_API.g_false,
1919: p_party_site_id IN NUMBER,
1920: p_acct_site_type IN VARCHAR2,
1921: p_cust_account_id IN NUMBER,

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

1914: PROCEDURE Customer_Account_Site
1915: (
1916: p_api_version IN NUMBER,
1917: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1918: p_commit IN VARCHAR2 := FND_API.g_false,
1919: p_party_site_id IN NUMBER,
1920: p_acct_site_type IN VARCHAR2,
1921: p_cust_account_id IN NUMBER,
1922: x_cust_acct_site_id OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 2016: IF FND_API.to_boolean(p_init_msg_list) THEN

2012: ---- Initialize---------------------
2013:
2014: SAVEPOINT CUSTOMER_ACCOUNT_SITE_PVT;
2015:
2016: IF FND_API.to_boolean(p_init_msg_list) THEN
2017: FND_MSG_PUB.initialize;
2018: END IF;
2019:
2020: IF NOT FND_API.compatible_api_call(

Line 2020: IF NOT FND_API.compatible_api_call(

2016: IF FND_API.to_boolean(p_init_msg_list) THEN
2017: FND_MSG_PUB.initialize;
2018: END IF;
2019:
2020: IF NOT FND_API.compatible_api_call(
2021: l_api_version,
2022: p_api_version,
2023: l_api_name,
2024: g_pkg_name

Line 2026: RAISE FND_API.g_exc_unexpected_error;

2022: p_api_version,
2023: l_api_name,
2024: g_pkg_name
2025: ) THEN
2026: RAISE FND_API.g_exc_unexpected_error;
2027: END IF;
2028:
2029: x_return_status := FND_API.G_RET_STS_SUCCESS;
2030:

Line 2029: x_return_status := FND_API.G_RET_STS_SUCCESS;

2025: ) THEN
2026: RAISE FND_API.g_exc_unexpected_error;
2027: END IF;
2028:
2029: x_return_status := FND_API.G_RET_STS_SUCCESS;
2030:
2031: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2032: aso_debug_pub.add('site type in Customer_Account_Site = ' || p_acct_site_type,1,'N');
2033: END IF;

Line 2046: x_return_status := FND_API.G_RET_STS_ERROR;

2042: FETCH party_cur INTO l_party_type, l_party_id;
2043: IF (party_cur%NOTFOUND) THEN
2044: l_party_type := NULL;
2045:
2046: x_return_status := FND_API.G_RET_STS_ERROR;
2047: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2048: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2049: FND_MSG_PUB.ADD;
2050: END IF;

Line 2051: raise FND_API.G_EXC_ERROR;

2047: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2048: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2049: FND_MSG_PUB.ADD;
2050: END IF;
2051: raise FND_API.G_EXC_ERROR;
2052: END IF;
2053: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2054: aso_debug_pub.add('party_type in Customer_Account_Site = ' || l_party_type,1,'N');
2055: END IF;

Line 2063: x_return_status := FND_API.G_RET_STS_ERROR;

2059: OPEN relationship_cur;
2060: FETCH relationship_cur INTO cur_party_id;
2061: IF (relationship_cur%NOTFOUND) THEN
2062: cur_party_id := NULL;
2063: x_return_status := FND_API.G_RET_STS_ERROR;
2064: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2065: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2066: FND_MSG_PUB.ADD;
2067: END IF;

Line 2068: raise FND_API.G_EXC_ERROR;

2064: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2065: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_SITE_AC_CRS');
2066: FND_MSG_PUB.ADD;
2067: END IF;
2068: raise FND_API.G_EXC_ERROR;
2069: END IF;
2070: CLOSE relationship_cur;
2071: ELSE
2072: cur_party_id := l_party_id;

Line 2096: x_return_status := FND_API.G_RET_STS_ERROR;

2092:
2093: IF inactive_site_cur%FOUND THEN
2094: x_cust_acct_site_id := NULL;
2095: x_site_use_id := NULL;
2096: x_return_status := FND_API.G_RET_STS_ERROR;
2097: IF p_acct_site_type = 'BILL_TO' THEN
2098: FND_MESSAGE.Set_Name('ASO','ASO_INV_CUST_SITE_INACTIVE');
2099: ELSIF p_acct_site_type = 'END_USER' THEN
2100: FND_MESSAGE.Set_Name('ASO','ASO_END_CUST_SITE_INACTIVE');

Line 2105: raise FND_API.G_EXC_ERROR;

2101: ELSIF p_acct_site_type = 'SHIP_TO' THEN
2102: FND_MESSAGE.Set_Name('ASO','ASO_SHP_CUST_SITE_INACTIVE');
2103: END IF;
2104: FND_MSG_PUB.ADD;
2105: raise FND_API.G_EXC_ERROR;
2106: END IF;
2107: CLOSE inactive_site_cur;
2108: END IF; -- active_site_cur%NOTFOUND end if
2109: CLOSE active_site_cur;

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

2111:
2112:
2113:
2114: IF (x_cust_acct_site_id IS NOT NULL) AND
2115: (x_cust_acct_site_id <> FND_API.G_MISS_NUM) THEN
2116:
2117:
2118: OPEN active_site_use_cur(x_cust_acct_site_id, l_acct_site_type);
2119: FETCH active_site_use_cur INTO x_site_use_id, cust_site_use_status;

Line 2130: x_return_status := FND_API.G_RET_STS_ERROR;

2126: OPEN inactive_site_use_cur(x_cust_acct_site_id, l_acct_site_type);
2127: FETCH inactive_site_use_cur INTO x_site_use_id, cust_site_use_status;
2128: IF inactive_site_use_cur%FOUND THEN
2129: x_site_use_id := NULL;
2130: x_return_status := FND_API.G_RET_STS_ERROR;
2131: IF p_acct_site_type = 'BILL_TO' THEN
2132: FND_MESSAGE.Set_Name('ASO','ASO_INV_CUST_SITE_INACTIVE');
2133: ELSIF p_acct_site_type = 'END_USER' THEN
2134: FND_MESSAGE.Set_Name('ASO','ASO_END_CUST_SITE_INACTIVE');

Line 2139: raise FND_API.G_EXC_ERROR;

2135: ELSIF p_acct_site_type = 'SHIP_TO' THEN
2136: FND_MESSAGE.Set_Name('ASO','ASO_SHP_CUST_SITE_INACTIVE');
2137: END IF;
2138: FND_MSG_PUB.ADD;
2139: raise FND_API.G_EXC_ERROR;
2140: ELSE
2141: -- this means that there no site uses , either active or inactive
2142: x_site_use_id := NULL;
2143: END IF;

Line 2158: x_site_use_id = FND_API.G_MISS_NUM THEN

2154: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2155: aso_debug_pub.add('Customer_Account_Site: x_site_use_id: ' || x_site_use_id,1,'N');
2156: END IF;
2157: IF x_site_use_id is NULL OR
2158: x_site_use_id = FND_API.G_MISS_NUM THEN
2159:
2160: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2161: aso_debug_pub.add('calling create accsite uses ',1, 'N');
2162: END IF;

Line 2181: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2177:
2178: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2179: aso_debug_pub.add('site_use_id after deriving invoice = ' || x_site_use_id,1, 'Y');
2180: END IF;
2181: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2182: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2183: FND_MESSAGE.Set_Name('ASO', 'ASO_ACCT_SITE_USE');
2184: FND_MESSAGE.Set_Token('ID', to_char(p_party_site_id),FALSE);
2185: FND_MSG_PUB.ADD;

Line 2187: raise FND_API.G_EXC_ERROR;

2183: FND_MESSAGE.Set_Name('ASO', 'ASO_ACCT_SITE_USE');
2184: FND_MESSAGE.Set_Token('ID', to_char(p_party_site_id),FALSE);
2185: FND_MSG_PUB.ADD;
2186: END IF;
2187: raise FND_API.G_EXC_ERROR;
2188: END IF;
2189: END IF;
2190:
2191: FND_MSG_PUB.Count_And_Get

Line 2197: WHEN FND_API.G_EXC_ERROR THEN

2193: p_data => x_msg_data
2194: );
2195:
2196: EXCEPTION
2197: WHEN FND_API.G_EXC_ERROR THEN
2198: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2199: P_API_NAME => L_API_NAME
2200: ,P_PKG_NAME => G_PKG_NAME
2201: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2209: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2205: ,X_MSG_COUNT => X_MSG_COUNT
2206: ,X_MSG_DATA => X_MSG_DATA
2207: ,X_RETURN_STATUS => X_RETURN_STATUS);
2208:
2209: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2210: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2211: P_API_NAME => L_API_NAME
2212: ,P_PKG_NAME => G_PKG_NAME
2213: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

2235:
2236:
2237: PROCEDURE Cust_Acct_Relationship(
2238: p_api_version IN NUMBER,
2239: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2240: p_commit IN VARCHAR2 := FND_API.g_false,
2241: p_sold_to_cust_account IN NUMBER,
2242: p_related_cust_account IN NUMBER,
2243: p_relationship_type IN VARCHAR2,

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

2236:
2237: PROCEDURE Cust_Acct_Relationship(
2238: p_api_version IN NUMBER,
2239: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2240: p_commit IN VARCHAR2 := FND_API.g_false,
2241: p_sold_to_cust_account IN NUMBER,
2242: p_related_cust_account IN NUMBER,
2243: p_relationship_type IN VARCHAR2,
2244: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

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

2249: l_api_version CONSTANT NUMBER := 1.0;
2250: l_api_name CONSTANT VARCHAR2(45) := 'CUST_ACCT_RELATIONSHIP';
2251:
2252: -- TRUE if there are matching row for the cust_account_id and relate_cust_account_id.
2253: l_cust_acct_match VARCHAR2(1) := FND_API.G_FALSE;
2254: -- TRUE if the matching rows also match the bill_to_flag or ship_to_flag.
2255: l_cust_acct_flag_match VARCHAR2(1) := FND_API.G_FALSE;
2256:
2257: l_bill_to_flag VARCHAR2(1);

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

2251:
2252: -- TRUE if there are matching row for the cust_account_id and relate_cust_account_id.
2253: l_cust_acct_match VARCHAR2(1) := FND_API.G_FALSE;
2254: -- TRUE if the matching rows also match the bill_to_flag or ship_to_flag.
2255: l_cust_acct_flag_match VARCHAR2(1) := FND_API.G_FALSE;
2256:
2257: l_bill_to_flag VARCHAR2(1);
2258: l_ship_to_flag VARCHAR2(1);
2259: l_last_update_date DATE;

Line 2272: IF FND_API.to_boolean(p_init_msg_list) THEN

2268: ---- Initialize---------------------
2269:
2270: SAVEPOINT CUST_ACCT_RELATIONSHIP_PVT;
2271:
2272: IF FND_API.to_boolean(p_init_msg_list) THEN
2273: FND_MSG_PUB.initialize;
2274: END IF;
2275:
2276: IF NOT FND_API.compatible_api_call(

Line 2276: IF NOT FND_API.compatible_api_call(

2272: IF FND_API.to_boolean(p_init_msg_list) THEN
2273: FND_MSG_PUB.initialize;
2274: END IF;
2275:
2276: IF NOT FND_API.compatible_api_call(
2277: l_api_version,
2278: p_api_version,
2279: l_api_name,
2280: g_pkg_name

Line 2282: RAISE FND_API.g_exc_unexpected_error;

2278: p_api_version,
2279: l_api_name,
2280: g_pkg_name
2281: ) THEN
2282: RAISE FND_API.g_exc_unexpected_error;
2283: END IF;
2284:
2285: x_return_status := FND_API.g_ret_sts_success;
2286: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2285: x_return_status := FND_API.g_ret_sts_success;

2281: ) THEN
2282: RAISE FND_API.g_exc_unexpected_error;
2283: END IF;
2284:
2285: x_return_status := FND_API.g_ret_sts_success;
2286: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2287: aso_debug_pub.add('Entering cust acct relationship ',1, 'Y');
2288: END IF;
2289:

Line 2294: l_cust_acct_match := FND_API.G_TRUE;

2290: OPEN c_cust_acct_relate;
2291: FETCH c_cust_acct_relate
2292: INTO l_bill_to_flag, l_ship_to_flag, l_last_update_date;
2293: IF c_cust_acct_relate%FOUND THEN
2294: l_cust_acct_match := FND_API.G_TRUE;
2295: END IF;
2296: CLOSE c_cust_acct_relate;
2297:
2298: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

Line 2298: IF FND_API.TO_Boolean(l_cust_acct_match) THEN

2294: l_cust_acct_match := FND_API.G_TRUE;
2295: END IF;
2296: CLOSE c_cust_acct_relate;
2297:
2298: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2299: IF p_relationship_type = 'BILL_TO' AND l_bill_to_flag = 'Y' THEN
2300: l_cust_acct_flag_match := FND_API.G_TRUE;
2301: ELSIF p_relationship_type = 'SHIP_TO' AND l_ship_to_flag = 'Y' THEN
2302: l_cust_acct_flag_match := FND_API.G_TRUE;

Line 2300: l_cust_acct_flag_match := FND_API.G_TRUE;

2296: CLOSE c_cust_acct_relate;
2297:
2298: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2299: IF p_relationship_type = 'BILL_TO' AND l_bill_to_flag = 'Y' THEN
2300: l_cust_acct_flag_match := FND_API.G_TRUE;
2301: ELSIF p_relationship_type = 'SHIP_TO' AND l_ship_to_flag = 'Y' THEN
2302: l_cust_acct_flag_match := FND_API.G_TRUE;
2303: END IF;
2304: END IF;

Line 2302: l_cust_acct_flag_match := FND_API.G_TRUE;

2298: IF FND_API.TO_Boolean(l_cust_acct_match) THEN
2299: IF p_relationship_type = 'BILL_TO' AND l_bill_to_flag = 'Y' THEN
2300: l_cust_acct_flag_match := FND_API.G_TRUE;
2301: ELSIF p_relationship_type = 'SHIP_TO' AND l_ship_to_flag = 'Y' THEN
2302: l_cust_acct_flag_match := FND_API.G_TRUE;
2303: END IF;
2304: END IF;
2305:
2306: IF aso_debug_pub.g_debug_flag = 'Y' THEN

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

2305:
2306: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2307: aso_debug_pub.add('cust acct relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2308: END IF;
2309: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2310: -- no matching rows
2311: IF NOT FND_API.TO_Boolean(l_cust_acct_match) THEN
2312: -- the account ids are not matched.
2313: ASO_PARTY_INT.Create_Cust_Acct_Relationship(

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

2307: aso_debug_pub.add('cust acct relationship: l_cust_acct_match is ' || l_cust_acct_match,1, 'N');
2308: END IF;
2309: IF NOT FND_API.TO_Boolean(l_cust_acct_flag_match) THEN
2310: -- no matching rows
2311: IF NOT FND_API.TO_Boolean(l_cust_acct_match) THEN
2312: -- the account ids are not matched.
2313: ASO_PARTY_INT.Create_Cust_Acct_Relationship(
2314: -- Create_Cust_Acct_Relationship(
2315: p_api_version => 1.0,

Line 2323: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2319: x_return_status => x_return_status,
2320: x_msg_count => x_msg_count,
2321: x_msg_data => x_msg_data
2322: );
2323: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2324: RAISE FND_API.G_EXC_ERROR;
2325: END IF;
2326: ELSE
2327: -- the account ids are matched but bill_to_flag or ship_to_flag is not matched.

Line 2324: RAISE FND_API.G_EXC_ERROR;

2320: x_msg_count => x_msg_count,
2321: x_msg_data => x_msg_data
2322: );
2323: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2324: RAISE FND_API.G_EXC_ERROR;
2325: END IF;
2326: ELSE
2327: -- the account ids are matched but bill_to_flag or ship_to_flag is not matched.
2328: -- and the profile is 'Y'.

Line 2329: x_return_status := FND_API.G_RET_STS_ERROR;

2325: END IF;
2326: ELSE
2327: -- the account ids are matched but bill_to_flag or ship_to_flag is not matched.
2328: -- and the profile is 'Y'.
2329: x_return_status := FND_API.G_RET_STS_ERROR;
2330: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2331: FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2332: FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2333: FND_MSG_PUB.ADD;

Line 2335: RAISE FND_API.G_EXC_ERROR;

2331: FND_MESSAGE.Set_Name(' + appShortName +', 'ASO_INVALID_ACCT_RELTN');
2332: FND_MESSAGE.Set_Token('TYPE', p_relationship_type, FALSE);
2333: FND_MSG_PUB.ADD;
2334: END IF;
2335: RAISE FND_API.G_EXC_ERROR;
2336:
2337: END IF;
2338:
2339: END IF; -- l_cust_acct_flag_match

Line 2348: WHEN FND_API.G_EXC_ERROR THEN

2344: p_data => x_msg_data
2345: );
2346:
2347: EXCEPTION
2348: WHEN FND_API.G_EXC_ERROR THEN
2349: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2350: P_API_NAME => L_API_NAME
2351: ,P_PKG_NAME => G_PKG_NAME
2352: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2356: ,X_MSG_COUNT => X_MSG_COUNT
2357: ,X_MSG_DATA => X_MSG_DATA
2358: ,X_RETURN_STATUS => X_RETURN_STATUS);
2359:
2360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2361: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2362: P_API_NAME => L_API_NAME
2363: ,P_PKG_NAME => G_PKG_NAME
2364: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

2386:
2387: PROCEDURE Cust_Acct_Contact_Addr
2388: (
2389: p_api_version IN NUMBER,
2390: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2391: p_commit IN VARCHAR2 := FND_API.g_false,
2392: p_party_site_id IN NUMBER,
2393: p_role_type IN VARCHAR2,
2394: p_cust_account_id IN NUMBER,

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

2387: PROCEDURE Cust_Acct_Contact_Addr
2388: (
2389: p_api_version IN NUMBER,
2390: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
2391: p_commit IN VARCHAR2 := FND_API.g_false,
2392: p_party_site_id IN NUMBER,
2393: p_role_type IN VARCHAR2,
2394: p_cust_account_id IN NUMBER,
2395: p_party_id IN NUMBER,

Line 2413: IF FND_API.to_boolean(p_init_msg_list) THEN

2409: BEGIN
2410: ---- Initialize---------------------
2411: SAVEPOINT CUST_ACCT_CONTACT_ADDR_PVT;
2412:
2413: IF FND_API.to_boolean(p_init_msg_list) THEN
2414: FND_MSG_PUB.initialize;
2415: END IF;
2416:
2417: IF NOT FND_API.compatible_api_call(

Line 2417: IF NOT FND_API.compatible_api_call(

2413: IF FND_API.to_boolean(p_init_msg_list) THEN
2414: FND_MSG_PUB.initialize;
2415: END IF;
2416:
2417: IF NOT FND_API.compatible_api_call(
2418: l_api_version,
2419: p_api_version,
2420: l_api_name,
2421: g_pkg_name

Line 2423: RAISE FND_API.g_exc_unexpected_error;

2419: p_api_version,
2420: l_api_name,
2421: g_pkg_name
2422: ) THEN
2423: RAISE FND_API.g_exc_unexpected_error;
2424: END IF;
2425:
2426: x_return_status := FND_API.G_RET_STS_SUCCESS;
2427:

Line 2426: x_return_status := FND_API.G_RET_STS_SUCCESS;

2422: ) THEN
2423: RAISE FND_API.g_exc_unexpected_error;
2424: END IF;
2425:
2426: x_return_status := FND_API.G_RET_STS_SUCCESS;
2427:
2428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2429: aso_debug_pub.add('Cust_acct_contact_Addr: p_role_type: '||p_role_type,1,'N');
2430: END IF;

Line 2439: AND p_party_id<> FND_API.G_MISS_NUM THEN

2435: l_role_type := p_role_type;
2436: END IF;
2437:
2438: IF p_party_id is not NULL
2439: AND p_party_id<> FND_API.G_MISS_NUM THEN
2440:
2441: IF p_party_site_id is not NULL AND
2442: p_party_site_id <> FND_API.G_MISS_NUM THEN
2443:

Line 2442: p_party_site_id <> FND_API.G_MISS_NUM THEN

2438: IF p_party_id is not NULL
2439: AND p_party_id<> FND_API.G_MISS_NUM THEN
2440:
2441: IF p_party_site_id is not NULL AND
2442: p_party_site_id <> FND_API.G_MISS_NUM THEN
2443:
2444: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2445: aso_debug_pub.add('deriving cust acct role for party id ',1,'N');
2446: END IF;

Line 2459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2455: ,x_cust_account_role_id => l_contact_id);
2456: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2457: aso_debug_pub.add('status after get cust acct roles in Cust_Acct_Contact_Addr = ' || x_return_status,1,'N');
2458: END IF;
2459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2460: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2461: IF p_role_type = 'BILL_TO' THEN
2462: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_INV_PARTY_AC_CRS');
2463: ELSIF p_role_type = 'END_USER' THEN

Line 2470: raise FND_API.G_EXC_ERROR;

2466: FND_MESSAGE.Set_Name('ASO', 'ASO_VALIDATE_SHP_PARTY_AC_CRS');
2467: END IF;
2468: FND_MSG_PUB.ADD;
2469: END IF;
2470: raise FND_API.G_EXC_ERROR;
2471:
2472: ELSE -- x_ret_status = success
2473: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN
2474: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2473: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN

2469: END IF;
2470: raise FND_API.G_EXC_ERROR;
2471:
2472: ELSE -- x_ret_status = success
2473: IF l_contact_party_id <> FND_API.G_MISS_NUM THEN
2474: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2475: aso_debug_pub.add('cust account site = ' ||p_cust_account_site,1,'N');
2476: END IF;
2477: ASO_PARTY_INT.Create_Contact_Role (

Line 2493: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2489: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2490: aso_debug_pub.add('status after create contact role ship = '|| x_return_status,1,'N');
2491: END IF;
2492:
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: FND_MESSAGE.Set_Name('ASO', 'ASO_CREATE_CONTACT');
2496: FND_MESSAGE.Set_Token('ID', to_char(
2497: l_contact_party_id), FALSE);

Line 2500: raise FND_API.G_EXC_ERROR;

2496: FND_MESSAGE.Set_Token('ID', to_char(
2497: l_contact_party_id), FALSE);
2498: FND_MSG_PUB.ADD;
2499: END IF;
2500: raise FND_API.G_EXC_ERROR;
2501: END IF; -- for creatE_contact_role
2502:
2503: END IF; -- for contact_party_id
2504:

Line 2517: WHEN FND_API.G_EXC_ERROR THEN

2513: p_data => x_msg_data
2514: );
2515:
2516: EXCEPTION
2517: WHEN FND_API.G_EXC_ERROR THEN
2518: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2519: P_API_NAME => L_API_NAME
2520: ,P_PKG_NAME => G_PKG_NAME
2521: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2525: ,X_MSG_COUNT => X_MSG_COUNT
2526: ,X_MSG_DATA => X_MSG_DATA
2527: ,X_RETURN_STATUS => X_RETURN_STATUS);
2528:
2529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2530: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
2531: P_API_NAME => L_API_NAME
2532: ,P_PKG_NAME => G_PKG_NAME
2533: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

2553:
2554:
2555:
2556: PROCEDURE Assign_Customer_Accounts(
2557: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2558: p_qte_header_id IN NUMBER,
2559: p_calling_api_flag IN NUMBER := 0,
2560: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
2561: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 2628: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2624: -- Standard Start of API savepoint
2625: SAVEPOINT Assign_Customer_Accounts_PVT;
2626:
2627: -- Initialize message list if p_init_msg_list is set to TRUE.
2628: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2629: FND_MSG_PUB.initialize;
2630: END IF;
2631:
2632: -- Initialize API return status to success

Line 2633: x_return_status := FND_API.G_RET_STS_SUCCESS;

2629: FND_MSG_PUB.initialize;
2630: END IF;
2631:
2632: -- Initialize API return status to success
2633: x_return_status := FND_API.G_RET_STS_SUCCESS;
2634:
2635: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2636: aso_debug_pub.add('Assign_Customer_Accounts - Begin p_qte_header_id:'|| p_qte_header_id, 1, 'Y');
2637: END IF;

Line 2654: x_return_status := FND_API.G_RET_STS_ERROR;

2650: aso_debug_pub.add('Assign_Customer_Accounts - Invalid qte_hdr_id', 1, 'Y');
2651: END IF;
2652:
2653: CLOSE C_Validate_Quote;
2654: x_return_status := FND_API.G_RET_STS_ERROR;
2655: RAISE FND_API.G_EXC_ERROR;
2656: END IF;
2657: CLOSE C_Validate_Quote;
2658:

Line 2655: RAISE FND_API.G_EXC_ERROR;

2651: END IF;
2652:
2653: CLOSE C_Validate_Quote;
2654: x_return_status := FND_API.G_RET_STS_ERROR;
2655: RAISE FND_API.G_EXC_ERROR;
2656: END IF;
2657: CLOSE C_Validate_Quote;
2658:
2659: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 2737: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2733: aso_debug_pub.add('header sold to customer = ' || l_account_id);
2734: END IF;
2735:
2736:
2737: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2738: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2739: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2740: FND_MESSAGE.Set_Token('ID', to_char( l_cust_party), FALSE);
2741: FND_MSG_PUB.ADD;

Line 2743: raise FND_API.G_EXC_ERROR;

2739: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2740: FND_MESSAGE.Set_Token('ID', to_char( l_cust_party), FALSE);
2741: FND_MSG_PUB.ADD;
2742: END IF;
2743: raise FND_API.G_EXC_ERROR;
2744:
2745: ELSE
2746:
2747: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2786: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2782: aso_debug_pub.add('header invoice to account = ' || l_account_id,1,'N');
2783: END IF;
2784:
2785:
2786: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2787: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2788: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2789: FND_MESSAGE.Set_Token('ID', to_char( l_inv_cust_party), FALSE);
2790: FND_MSG_PUB.ADD;

Line 2792: raise FND_API.G_EXC_ERROR;

2788: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2789: FND_MESSAGE.Set_Token('ID', to_char( l_inv_cust_party), FALSE);
2790: FND_MSG_PUB.ADD;
2791: END IF;
2792: raise FND_API.G_EXC_ERROR;
2793:
2794: ELSE
2795:
2796: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2835: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2831: aso_debug_pub.add('header end customer account = ' || l_account_id,1,'N');
2832: END IF;
2833:
2834:
2835: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2836: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2837: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2838: FND_MESSAGE.Set_Token('ID', to_char( l_end_cust_party), FALSE);
2839: FND_MSG_PUB.ADD;

Line 2841: raise FND_API.G_EXC_ERROR;

2837: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2838: FND_MESSAGE.Set_Token('ID', to_char( l_end_cust_party), FALSE);
2839: FND_MSG_PUB.ADD;
2840: END IF;
2841: raise FND_API.G_EXC_ERROR;
2842:
2843: ELSE
2844:
2845: UPDATE ASO_QUOTE_HEADERS_ALL

Line 2885: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2881: aso_debug_pub.add('header ship to cust party = '||l_header_shipment_tbl(1).ship_to_cust_party_id,1,'N');
2882: aso_debug_pub.add('header ship to account = ' || l_account_id,1,'N');
2883: END IF;
2884:
2885: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
2886: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2887: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2888: FND_MESSAGE.Set_Token('ID', to_char( l_header_shipment_tbl(1).ship_to_cust_party_id), FALSE);
2889: FND_MSG_PUB.ADD;

Line 2891: raise FND_API.G_EXC_ERROR;

2887: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
2888: FND_MESSAGE.Set_Token('ID', to_char( l_header_shipment_tbl(1).ship_to_cust_party_id), FALSE);
2889: FND_MSG_PUB.ADD;
2890: END IF;
2891: raise FND_API.G_EXC_ERROR;
2892:
2893: ELSE
2894: UPDATE ASO_SHIPMENTS
2895: SET ship_to_cust_account_id = l_account_id

Line 2920: p_init_msg_list => FND_API.G_FALSE,

2916:
2917: IF l_header_check_tca_flag = 'Y' then
2918: check_tca(
2919: p_api_version => 1.0,
2920: p_init_msg_list => FND_API.G_FALSE,
2921: P_Qte_Rec => l_qte_header_rec,
2922: p_Header_Shipment_Tbl => l_header_Shipment_Tbl,
2923: x_return_status => x_return_status,
2924: x_msg_count => x_msg_count,

Line 2929: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

2925: x_msg_data => x_msg_data);
2926: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2927: aso_debug_pub.add('after check tca '||x_return_status, 1, 'N');
2928: END IF;
2929: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2930: RAISE FND_API.G_EXC_ERROR;
2931: END IF;
2932: END IF;
2933:

Line 2930: RAISE FND_API.G_EXC_ERROR;

2926: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2927: aso_debug_pub.add('after check tca '||x_return_status, 1, 'N');
2928: END IF;
2929: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2930: RAISE FND_API.G_EXC_ERROR;
2931: END IF;
2932: END IF;
2933:
2934: IF aso_debug_pub.g_debug_flag = 'Y' THEN

Line 3000: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

2996: aso_debug_pub.add('line invoice to customer account = ' ||
2997: l_account_id,1,'N');
2998: END IF;
2999:
3000: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3001: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3002: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3003: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.invoice_to_cust_party_id), FALSE);
3004: FND_MSG_PUB.ADD;

Line 3006: raise FND_API.G_EXC_ERROR;

3002: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3003: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.invoice_to_cust_party_id), FALSE);
3004: FND_MSG_PUB.ADD;
3005: END IF;
3006: raise FND_API.G_EXC_ERROR;
3007:
3008: ELSE
3009:
3010: UPDATE ASO_QUOTE_LINES_ALL

Line 3047: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

3043: aso_debug_pub.add('line End_Customer customer account = ' ||
3044: l_account_id,1,'N');
3045: END IF;
3046:
3047: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3048: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3049: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3050: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.End_Customer_cust_party_id), FALSE);
3051: FND_MSG_PUB.ADD;

Line 3053: raise FND_API.G_EXC_ERROR;

3049: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3050: FND_MESSAGE.Set_Token('ID', to_char( l_qte_line_rec.End_Customer_cust_party_id), FALSE);
3051: FND_MSG_PUB.ADD;
3052: END IF;
3053: raise FND_API.G_EXC_ERROR;
3054:
3055: ELSE
3056:
3057: UPDATE ASO_QUOTE_LINES_ALL

Line 3094: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

3090: aso_debug_pub.add('line ship to customer account = ' ||
3091: l_account_id,1,'N');
3092: END IF;
3093:
3094: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
3095: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3096: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3097: FND_MESSAGE.Set_Token('ID', to_char( Line_Acct.ship_to_cust_party_id), FALSE);
3098: FND_MSG_PUB.ADD;

Line 3100: raise FND_API.G_EXC_ERROR;

3096: FND_MESSAGE.Set_Name('ASO', 'ASO_CUST_ACCOUNT');
3097: FND_MESSAGE.Set_Token('ID', to_char( Line_Acct.ship_to_cust_party_id), FALSE);
3098: FND_MSG_PUB.ADD;
3099: END IF;
3100: raise FND_API.G_EXC_ERROR;
3101:
3102: ELSE
3103:
3104: UPDATE ASO_SHIPMENTS

Line 3133: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

3129: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3130: aso_debug_pub.add('after check line account info '||x_return_status, 1, 'N
3131: ');
3132: END IF;
3133: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3134: RAISE FND_API.G_EXC_ERROR;
3135: END IF;
3136:
3137:

Line 3134: RAISE FND_API.G_EXC_ERROR;

3130: aso_debug_pub.add('after check line account info '||x_return_status, 1, 'N
3131: ');
3132: END IF;
3133: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
3134: RAISE FND_API.G_EXC_ERROR;
3135: END IF;
3136:
3137:
3138: END LOOP; -- line_Acct

Line 3155: WHEN FND_API.G_EXC_ERROR THEN

3151: p_data => x_msg_data
3152: );
3153:
3154: EXCEPTION
3155: WHEN FND_API.G_EXC_ERROR THEN
3156: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3157: P_API_NAME => L_API_NAME
3158: ,P_PKG_NAME => G_PKG_NAME
3159: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 3167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3163: ,X_MSG_COUNT => X_MSG_COUNT
3164: ,X_MSG_DATA => X_MSG_DATA
3165: ,X_RETURN_STATUS => X_RETURN_STATUS);
3166:
3167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3168: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3169: P_API_NAME => L_API_NAME
3170: ,P_PKG_NAME => G_PKG_NAME
3171: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

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

3192:
3193:
3194:
3195: PROCEDURE Populate_Acct_Party (
3196: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3197: p_hdr_cust_acct_id IN NUMBER,
3198: p_hdr_party_id IN NUMBER,
3199: p_party_site_id IN NUMBER,
3200: p_cust_account_id IN OUT NOCOPY NUMBER,

Line 3221: p_cust_account_id <> FND_API.G_MISS_NUM THEN

3217:
3218: BEGIN
3219:
3220: IF p_cust_account_id is not NULL AND
3221: p_cust_account_id <> FND_API.G_MISS_NUM THEN
3222: IF p_cust_party_id IS NULL OR
3223: p_cust_party_id = FND_API.G_MISS_NUM THEN
3224:
3225: OPEN C_Get_Party_From_Acct(p_cust_account_id);

Line 3223: p_cust_party_id = FND_API.G_MISS_NUM THEN

3219:
3220: IF p_cust_account_id is not NULL AND
3221: p_cust_account_id <> FND_API.G_MISS_NUM THEN
3222: IF p_cust_party_id IS NULL OR
3223: p_cust_party_id = FND_API.G_MISS_NUM THEN
3224:
3225: OPEN C_Get_Party_From_Acct(p_cust_account_id);
3226: FETCH C_Get_Party_From_Acct INTO p_cust_party_id;
3227: CLOSE C_Get_Party_From_Acct;

Line 3239: x_return_status := FND_API.G_RET_STS_ERROR;

3235: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3236: aso_debug_pub.add('Check_Hdr_Acct: l_inv_cust_id: '|| l_inv_cust_id, 1, 'N');
3237: END IF;
3238: IF l_inv_cust_id <> p_cust_party_id THEN
3239: x_return_status := FND_API.G_RET_STS_ERROR;
3240: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3241: FND_MESSAGE.Set_Name('ASO', 'ASO_API_INVALID_ID');
3242: FND_MESSAGE.Set_Token('COLUMN', 'CUST_PARTY_ID',FALSE);
3243: FND_MESSAGE.Set_Token('VALUE', to_char(p_cust_party_id),FALSE);

Line 3246: raise FND_API.G_EXC_ERROR;

3242: FND_MESSAGE.Set_Token('COLUMN', 'CUST_PARTY_ID',FALSE);
3243: FND_MESSAGE.Set_Token('VALUE', to_char(p_cust_party_id),FALSE);
3244: FND_MSG_PUB.ADD;
3245: END IF;
3246: raise FND_API.G_EXC_ERROR;
3247: END IF;
3248:
3249: END IF;
3250:

Line 3258: p_cust_party_id = FND_API.G_MISS_NUM THEN

3254:
3255: ELSE -- inv_to_cust_acct_id is null
3256:
3257: IF p_cust_party_id IS NULL OR
3258: p_cust_party_id = FND_API.G_MISS_NUM THEN
3259: IF p_party_site_id IS NOT NULL AND
3260: p_party_site_id <> FND_API.G_MISS_NUM THEN
3261:
3262: p_cust_account_id := p_hdr_cust_acct_id;

Line 3260: p_party_site_id <> FND_API.G_MISS_NUM THEN

3256:
3257: IF p_cust_party_id IS NULL OR
3258: p_cust_party_id = FND_API.G_MISS_NUM THEN
3259: IF p_party_site_id IS NOT NULL AND
3260: p_party_site_id <> FND_API.G_MISS_NUM THEN
3261:
3262: p_cust_account_id := p_hdr_cust_acct_id;
3263: p_cust_party_id := p_hdr_party_id;
3264:

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

3276: END Populate_Acct_Party;
3277:
3278:
3279: PROCEDURE Check_Customer_Accounts(
3280: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3281: p_qte_header_id IN NUMBER,
3282: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
3283: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
3284: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 3355: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3351: -- Standard Start of API savepoint
3352: SAVEPOINT Check_Customer_Accounts_INT;
3353:
3354: -- Initialize message list if p_init_msg_list is set to TRUE.
3355: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3356: FND_MSG_PUB.initialize;
3357: END IF;
3358:
3359: -- Initialize API return status to success

Line 3360: x_return_status := FND_API.G_RET_STS_SUCCESS;

3356: FND_MSG_PUB.initialize;
3357: END IF;
3358:
3359: -- Initialize API return status to success
3360: x_return_status := FND_API.G_RET_STS_SUCCESS;
3361:
3362: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3363: aso_debug_pub.add('Check_Customer_Accounts - Begin', 1, 'Y');
3364: END IF;

Line 3381: x_return_status := FND_API.G_RET_STS_ERROR;

3377: aso_debug_pub.add('Check_Customer_Accounts - Invalid qte_hdr_id', 1, 'Y');
3378: END IF;
3379:
3380: CLOSE C_Validate_Quote;
3381: x_return_status := FND_API.G_RET_STS_ERROR;
3382: RAISE FND_API.G_EXC_ERROR;
3383: END IF;
3384: CLOSE C_Validate_Quote;
3385:

Line 3382: RAISE FND_API.G_EXC_ERROR;

3378: END IF;
3379:
3380: CLOSE C_Validate_Quote;
3381: x_return_status := FND_API.G_RET_STS_ERROR;
3382: RAISE FND_API.G_EXC_ERROR;
3383: END IF;
3384: CLOSE C_Validate_Quote;
3385:
3386: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN

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

3400: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3401: aso_debug_pub.add('Check_Customer_Accounts:hdr_CustAcct - l_party: '||l_party, 1, 'N');
3402: END IF;
3403:
3404: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3405:
3406: OPEN C_Chk_Party_Acct (l_party);
3407: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3408: CLOSE C_Chk_Party_Acct;

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

3410: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3411: aso_debug_pub.add('Check_Customer_Accounts:hdr_CustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3412: END IF;
3413:
3414: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3415: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3416: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3417: FND_MSG_PUB.ADD;
3418: END IF;

Line 3419: x_return_status := FND_API.G_RET_STS_ERROR;

3415: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3416: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3417: FND_MSG_PUB.ADD;
3418: END IF;
3419: x_return_status := FND_API.G_RET_STS_ERROR;
3420: RAISE FND_API.G_EXC_ERROR;
3421: END IF;
3422:
3423: END IF;

Line 3420: RAISE FND_API.G_EXC_ERROR;

3416: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3417: FND_MSG_PUB.ADD;
3418: END IF;
3419: x_return_status := FND_API.G_RET_STS_ERROR;
3420: RAISE FND_API.G_EXC_ERROR;
3421: END IF;
3422:
3423: END IF;
3424:

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

3432: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3433: aso_debug_pub.add('Check_Customer_Accounts:hdr_InvCustAcct - l_party: '||l_party, 1, 'N');
3434: END IF;
3435:
3436: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3437:
3438: OPEN C_Chk_Party_Acct (l_party);
3439: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3440: CLOSE C_Chk_Party_Acct;

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

3442: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3443: aso_debug_pub.add('Check_Customer_Accounts:hdr_InvCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3444: END IF;
3445:
3446: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3447: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3448: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3449: FND_MSG_PUB.ADD;
3450: END IF;

Line 3451: x_return_status := FND_API.G_RET_STS_ERROR;

3447: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3448: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3449: FND_MSG_PUB.ADD;
3450: END IF;
3451: x_return_status := FND_API.G_RET_STS_ERROR;
3452: RAISE FND_API.G_EXC_ERROR;
3453: END IF;
3454:
3455: END IF;

Line 3452: RAISE FND_API.G_EXC_ERROR;

3448: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3449: FND_MSG_PUB.ADD;
3450: END IF;
3451: x_return_status := FND_API.G_RET_STS_ERROR;
3452: RAISE FND_API.G_EXC_ERROR;
3453: END IF;
3454:
3455: END IF;
3456:

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

3464: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3465: aso_debug_pub.add('Check_Customer_Accounts:hdr_EndCustAcct - l_party: '||l_party, 1, 'N');
3466: END IF;
3467:
3468: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3469:
3470: OPEN C_Chk_Party_Acct (l_party);
3471: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3472: CLOSE C_Chk_Party_Acct;

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

3474: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3475: aso_debug_pub.add('Check_Customer_Accounts:hdr_EndCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3476: END IF;
3477:
3478: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3479: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3480: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3481: FND_MSG_PUB.ADD;
3482: END IF;

Line 3483: x_return_status := FND_API.G_RET_STS_ERROR;

3479: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3480: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3481: FND_MSG_PUB.ADD;
3482: END IF;
3483: x_return_status := FND_API.G_RET_STS_ERROR;
3484: RAISE FND_API.G_EXC_ERROR;
3485: END IF;
3486:
3487: END IF;

Line 3484: RAISE FND_API.G_EXC_ERROR;

3480: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3481: FND_MSG_PUB.ADD;
3482: END IF;
3483: x_return_status := FND_API.G_RET_STS_ERROR;
3484: RAISE FND_API.G_EXC_ERROR;
3485: END IF;
3486:
3487: END IF;
3488:

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

3496: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3497: aso_debug_pub.add('Check_Customer_Accounts:line_Acct - l_party: '||l_party, 1, 'N');
3498: END IF;
3499:
3500: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3501:
3502: OPEN C_Chk_Party_Acct (l_party);
3503: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3504: CLOSE C_Chk_Party_Acct;

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

3506: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3507: aso_debug_pub.add('Check_Customer_Accounts:lin_Acct - l_cust_acct: '||l_cust_acct, 1, 'N');
3508: END IF;
3509:
3510: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3511: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3512: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3513: FND_MSG_PUB.ADD;
3514: END IF;

Line 3515: x_return_status := FND_API.G_RET_STS_ERROR;

3511: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3512: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3513: FND_MSG_PUB.ADD;
3514: END IF;
3515: x_return_status := FND_API.G_RET_STS_ERROR;
3516: RAISE FND_API.G_EXC_ERROR;
3517: END IF;
3518:
3519: END IF;

Line 3516: RAISE FND_API.G_EXC_ERROR;

3512: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3513: FND_MSG_PUB.ADD;
3514: END IF;
3515: x_return_status := FND_API.G_RET_STS_ERROR;
3516: RAISE FND_API.G_EXC_ERROR;
3517: END IF;
3518:
3519: END IF;
3520:

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

3530: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3531: aso_debug_pub.add('Check_Customer_Accounts:line_EndCustAcct - l_party: '||l_party, 1, 'N');
3532: END IF;
3533:
3534: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3535:
3536: OPEN C_Chk_Party_Acct (l_party);
3537: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3538: CLOSE C_Chk_Party_Acct;

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

3540: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3541: aso_debug_pub.add('Check_Customer_Accounts:lin_EndCustAcct - l_cust_acct: '||l_cust_acct, 1, 'N');
3542: END IF;
3543:
3544: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3545: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3546: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3547: FND_MSG_PUB.ADD;
3548: END IF;

Line 3549: x_return_status := FND_API.G_RET_STS_ERROR;

3545: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3546: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3547: FND_MSG_PUB.ADD;
3548: END IF;
3549: x_return_status := FND_API.G_RET_STS_ERROR;
3550: RAISE FND_API.G_EXC_ERROR;
3551: END IF;
3552:
3553: END IF;

Line 3550: RAISE FND_API.G_EXC_ERROR;

3546: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3547: FND_MSG_PUB.ADD;
3548: END IF;
3549: x_return_status := FND_API.G_RET_STS_ERROR;
3550: RAISE FND_API.G_EXC_ERROR;
3551: END IF;
3552:
3553: END IF;
3554:

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

3564: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3565: aso_debug_pub.add('Check_Customer_Accounts:shp_Acct - l_party: '||l_party, 1, 'N');
3566: END IF;
3567:
3568: IF l_party IS NOT NULL AND l_party <> FND_API.G_MISS_NUM THEN
3569:
3570: OPEN C_Chk_Party_Acct (l_party);
3571: FETCH C_Chk_Party_Acct INTO l_cust_acct;
3572: CLOSE C_Chk_Party_Acct;

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

3574: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
3575: aso_debug_pub.add('Check_Customer_Accounts:shp_Acct - l_cust_acct: '||l_cust_acct, 1, 'N');
3576: END IF;
3577:
3578: IF l_cust_acct IS NULL OR l_cust_acct = FND_API.G_MISS_NUM THEN
3579: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3580: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3581: FND_MSG_PUB.ADD;
3582: END IF;

Line 3583: x_return_status := FND_API.G_RET_STS_ERROR;

3579: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3580: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3581: FND_MSG_PUB.ADD;
3582: END IF;
3583: x_return_status := FND_API.G_RET_STS_ERROR;
3584: RAISE FND_API.G_EXC_ERROR;
3585: END IF;
3586:
3587: END IF;

Line 3584: RAISE FND_API.G_EXC_ERROR;

3580: FND_MESSAGE.Set_Name('ASO', 'ASO_CANNOT_CREATE_ACCOUNT');
3581: FND_MSG_PUB.ADD;
3582: END IF;
3583: x_return_status := FND_API.G_RET_STS_ERROR;
3584: RAISE FND_API.G_EXC_ERROR;
3585: END IF;
3586:
3587: END IF;
3588:

Line 3603: WHEN FND_API.G_EXC_ERROR THEN

3599: p_data => x_msg_data
3600: );
3601:
3602: EXCEPTION
3603: WHEN FND_API.G_EXC_ERROR THEN
3604: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3605: P_API_NAME => L_API_NAME
3606: ,P_PKG_NAME => G_PKG_NAME
3607: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 3615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3611: ,X_MSG_COUNT => X_MSG_COUNT
3612: ,X_MSG_DATA => X_MSG_DATA
3613: ,X_RETURN_STATUS => X_RETURN_STATUS);
3614:
3615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3616: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
3617: P_API_NAME => L_API_NAME
3618: ,P_PKG_NAME => G_PKG_NAME
3619: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR