14: G_LOGIN_ID NUMBER := FND_GLOBAL.LOGIN_ID;
15:
16: PROCEDURE Validate_And_Write (
17: P_Api_Version_Number IN NUMBER,
18: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
19: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
15:
16: PROCEDURE Validate_And_Write (
17: P_Api_Version_Number IN NUMBER,
18: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
19: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
16: PROCEDURE Validate_And_Write (
17: P_Api_Version_Number IN NUMBER,
18: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
19: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
18: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
19: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
19: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
20: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
21: p_action_code IN NUMBER, /* 0 = insert, 1 = update, 2 = delete */
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
22: p_header_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
23: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
24: p_creation_date IN DATE := FND_API.G_MISS_DATE,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
25: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
26: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
27: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
28: p_carrier IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
29: p_shipment_method IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
30: p_autoreceipt_flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
31: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
32: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
33: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
34: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
35: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
36: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_location_id IN NUMBER := FND_API.G_MISS_NUM,
40: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_location_id IN NUMBER := FND_API.G_MISS_NUM,
48: p_party_site_id IN NUMBER,
41: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_location_id IN NUMBER := FND_API.G_MISS_NUM,
48: p_party_site_id IN NUMBER,
49: X_Return_Status OUT NOCOPY VARCHAR2,
42: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_location_id IN NUMBER := FND_API.G_MISS_NUM,
48: p_party_site_id IN NUMBER,
49: X_Return_Status OUT NOCOPY VARCHAR2,
50: X_Msg_Count OUT NOCOPY NUMBER,
43: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_location_id IN NUMBER := FND_API.G_MISS_NUM,
48: p_party_site_id IN NUMBER,
49: X_Return_Status OUT NOCOPY VARCHAR2,
50: X_Msg_Count OUT NOCOPY NUMBER,
51: X_Msg_Data OUT NOCOPY VARCHAR2
59: l_msg_data VARCHAR2(300);
60: l_check_existence NUMBER := 0;
61: l_return_status VARCHAR2(1);
62: l_msg_count NUMBER := 0;
63: l_commit VARCHAR2(1) := FND_API.G_FALSE;
64: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_NONE;
65: l_pkg_api_name CONSTANT VARCHAR2(80) := G_PKG_NAME ||'.'||l_api_name;
66: l_carrier VARCHAR2(25);
67: EXCP_USER_DEFINED EXCEPTION;
60: l_check_existence NUMBER := 0;
61: l_return_status VARCHAR2(1);
62: l_msg_count NUMBER := 0;
63: l_commit VARCHAR2(1) := FND_API.G_FALSE;
64: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_NONE;
65: l_pkg_api_name CONSTANT VARCHAR2(80) := G_PKG_NAME ||'.'||l_api_name;
66: l_carrier VARCHAR2(25);
67: EXCP_USER_DEFINED EXCEPTION;
68:
82:
83: BEGIN
84: savepoint Validate_And_Write_PUB;
85:
86: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
87: -- initialize message list
88: FND_MSG_PUB.initialize;
89: END IF;
90:
88: FND_MSG_PUB.initialize;
89: END IF;
90:
91: -- Standard call to check for call compatibility.
92: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
93: p_api_version_number,
94: l_api_name,
95: G_PKG_NAME)
96: THEN
93: p_api_version_number,
94: l_api_name,
95: G_PKG_NAME)
96: THEN
97: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
98: END IF;
99:
100:
101: -- check p_action_code
107: END IF;
108:
109: IF p_action_code = 0 THEN
110: -- For inserting, we need to validate the header_id and the carrier.
111: IF nvl(p_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
112: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
113: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_header_id', FALSE);
114: FND_MSG_PUB.ADD;
115: RAISE EXCP_USER_DEFINED;
147: CLOSE l_Get_Header_ID_Csr;
148:
149: END IF;
150:
151: IF nvl(p_carrier, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
152: -- Validate whether the p_carrier exists.
153: BEGIN
154: SELECT distinct freight_code INTO l_carrier
155: FROM org_freight_tl
172: END;
173: END IF;
174:
175: -- check creation_date and last_update_date
176: IF nvl(l_creation_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
177: l_creation_date := sysdate;
178: END IF;
179:
180: IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
176: IF nvl(l_creation_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
177: l_creation_date := sysdate;
178: END IF;
179:
180: IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
181: l_last_update_date := sysdate;
182: END IF;
183:
184: IF nvl(l_created_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
180: IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
181: l_last_update_date := sysdate;
182: END IF;
183:
184: IF nvl(l_created_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
185: l_created_by := g_user_id;
186: END IF;
187:
188: IF nvl(l_last_update_login, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
184: IF nvl(l_created_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
185: l_created_by := g_user_id;
186: END IF;
187:
188: IF nvl(l_last_update_login, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
189: l_last_update_login := g_login_id;
190: END IF;
191:
192: IF nvl(l_last_updated_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
188: IF nvl(l_last_update_login, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
189: l_last_update_login := g_login_id;
190: END IF;
191:
192: IF nvl(l_last_updated_by, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
193: l_last_updated_by := g_user_id;
194: END IF;
195:
196: ELSIF p_action_code = 1 THEN
193: l_last_updated_by := g_user_id;
194: END IF;
195:
196: ELSIF p_action_code = 1 THEN
197: IF nvl(p_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
198: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
199: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_header_id', FALSE);
200: FND_MSG_PUB.ADD;
201: RAISE EXCP_USER_DEFINED;
222:
223: END;
224: END IF;
225:
226: IF nvl(p_carrier, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
227: -- Validate whether the p_carrier exists.
228: BEGIN
229: SELECT distinct freight_code INTO l_carrier
230: FROM org_freight_tl
247: END;
248: END IF;
249:
250: -- validate the creation_date
251: IF nvl(l_creation_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
252: Open l_Get_Creation_Date_Csr;
253: Fetch l_Get_Creation_Date_Csr into l_creation_date;
254: If l_Get_Creation_Date_Csr%NOTFOUND Then
255: Close l_Get_Creation_Date_Csr;
262: End if;
263: Close l_Get_Creation_Date_Csr;
264: END IF;
265:
266: IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
267: l_last_update_date := sysdate;
268: END IF;
269: ELSE -- p_action_code = 2
270: IF nvl(p_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
266: IF nvl(l_last_update_date, fnd_api.g_miss_date) = fnd_api.g_miss_date THEN
267: l_last_update_date := sysdate;
268: END IF;
269: ELSE -- p_action_code = 2
270: IF nvl(p_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
271: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
272: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_header_id', FALSE);
273: FND_MSG_PUB.ADD;
274: RAISE EXCP_USER_DEFINED;
299:
300:
301: -- construct the move_over_headers record
302: l_moheader_rec.header_id := p_header_id;
303: l_moheader_rec.created_by := nvl(l_created_by, fnd_api.g_miss_num);
304: l_moheader_rec.creation_date := nvl(l_creation_date, fnd_api.g_miss_date);
305: l_moheader_rec.last_updated_by := nvl(l_last_updated_by, fnd_api.g_miss_num);
306: l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
307: l_moheader_rec.last_update_login := l_last_update_login;
300:
301: -- construct the move_over_headers record
302: l_moheader_rec.header_id := p_header_id;
303: l_moheader_rec.created_by := nvl(l_created_by, fnd_api.g_miss_num);
304: l_moheader_rec.creation_date := nvl(l_creation_date, fnd_api.g_miss_date);
305: l_moheader_rec.last_updated_by := nvl(l_last_updated_by, fnd_api.g_miss_num);
306: l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
307: l_moheader_rec.last_update_login := l_last_update_login;
308: l_moheader_rec.carrier := p_carrier;
301: -- construct the move_over_headers record
302: l_moheader_rec.header_id := p_header_id;
303: l_moheader_rec.created_by := nvl(l_created_by, fnd_api.g_miss_num);
304: l_moheader_rec.creation_date := nvl(l_creation_date, fnd_api.g_miss_date);
305: l_moheader_rec.last_updated_by := nvl(l_last_updated_by, fnd_api.g_miss_num);
306: l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
307: l_moheader_rec.last_update_login := l_last_update_login;
308: l_moheader_rec.carrier := p_carrier;
309: l_moheader_rec.shipment_method := p_shipment_method;
302: l_moheader_rec.header_id := p_header_id;
303: l_moheader_rec.created_by := nvl(l_created_by, fnd_api.g_miss_num);
304: l_moheader_rec.creation_date := nvl(l_creation_date, fnd_api.g_miss_date);
305: l_moheader_rec.last_updated_by := nvl(l_last_updated_by, fnd_api.g_miss_num);
306: l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
307: l_moheader_rec.last_update_login := l_last_update_login;
308: l_moheader_rec.carrier := p_carrier;
309: l_moheader_rec.shipment_method := p_shipment_method;
310: l_moheader_rec.autoreceipt_flag := nvl(p_autoreceipt_flag, fnd_api.g_miss_char);
306: l_moheader_rec.last_update_date := nvl(l_last_update_date, fnd_api.g_miss_date);
307: l_moheader_rec.last_update_login := l_last_update_login;
308: l_moheader_rec.carrier := p_carrier;
309: l_moheader_rec.shipment_method := p_shipment_method;
310: l_moheader_rec.autoreceipt_flag := nvl(p_autoreceipt_flag, fnd_api.g_miss_char);
311: l_moheader_rec.attribute_category := p_attribute_category;
312: l_moheader_rec.attribute1 := p_attribute1;
313: l_moheader_rec.attribute2 := p_attribute2;
314: l_moheader_rec.attribute3 := p_attribute3;
367: X_Msg_Count => l_msg_count,
368: X_Msg_Data => l_msg_data);
369: end if;
370:
371: IF l_return_status <> fnd_api.g_ret_sts_success THEN
372: RAISE FND_API.G_EXC_ERROR;
373: END IF;
374:
375: IF fnd_api.to_boolean(p_commit) THEN
368: X_Msg_Data => l_msg_data);
369: end if;
370:
371: IF l_return_status <> fnd_api.g_ret_sts_success THEN
372: RAISE FND_API.G_EXC_ERROR;
373: END IF;
374:
375: IF fnd_api.to_boolean(p_commit) THEN
376: commit work;
371: IF l_return_status <> fnd_api.g_ret_sts_success THEN
372: RAISE FND_API.G_EXC_ERROR;
373: END IF;
374:
375: IF fnd_api.to_boolean(p_commit) THEN
376: commit work;
377: END IF;
378:
379: EXCEPTION
378:
379: EXCEPTION
380: WHEN EXCP_USER_DEFINED THEN
381: Rollback to Validate_And_Write_PUB;
382: x_return_status := FND_API.G_RET_STS_ERROR;
383: fnd_msg_pub.count_and_get
384: ( p_count => x_msg_count
385: , p_data => x_msg_data);
386: --for debugging purpose
384: ( p_count => x_msg_count
385: , p_data => x_msg_data);
386: --for debugging purpose
387: --x_msg_data := l_msg_data;
388: WHEN FND_API.G_EXC_ERROR THEN
389: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
390: P_API_NAME => L_API_NAME
391: ,P_PKG_NAME => G_PKG_NAME
392: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
393: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
394: ,X_MSG_COUNT => X_MSG_COUNT
395: ,X_MSG_DATA => X_MSG_DATA
396: ,X_RETURN_STATUS => X_RETURN_STATUS);
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
398: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
399: P_API_NAME => L_API_NAME
400: ,P_PKG_NAME => G_PKG_NAME
401: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
411: fnd_msg_pub.add;
412: fnd_msg_pub.count_and_get
413: ( p_count => x_msg_count
414: , p_data => x_msg_data);
415: x_return_status := fnd_api.g_ret_sts_error;
416:
417: END Validate_And_Write;
418:
419: END CSP_TO_FORM_MOHEADERS;