DBA Data[Home] [Help]

APPS.BOM_ROUTINGHEADER_PVT dependencies on FND_API

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

10: g_process constant number := 2; -- operation type
11: g_LineOp constant number := 3; -- operation type
12: PROCEDURE AssignRouting
13: ( p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
15: p_commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: x_return_status IN OUT NOCOPY VARCHAR2,
18: x_msg_count IN OUT NOCOPY NUMBER,

Line 15: p_commit IN VARCHAR2 := FND_API.G_FALSE,

11: g_LineOp constant number := 3; -- operation type
12: PROCEDURE AssignRouting
13: ( p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
15: p_commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: x_return_status IN OUT NOCOPY VARCHAR2,
18: x_msg_count IN OUT NOCOPY NUMBER,
19: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

12: PROCEDURE AssignRouting
13: ( p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
15: p_commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: x_return_status IN OUT NOCOPY VARCHAR2,
18: x_msg_count IN OUT NOCOPY NUMBER,
19: x_msg_data IN OUT NOCOPY VARCHAR2,
20: p_routing_rec IN ROUTING_REC_TYPE := G_MISS_ROUTING_REC,

Line 76: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

72: And nvl(alternate_routing_designator, 'Primary Alternate') =
73: nvl(P_Alternate, 'Primary Alternate');
74: BEGIN
75: -- Standard call to check for call compatibility.
76: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
77: p_api_version ,
78: l_api_name ,
79: G_PKG_NAME )
80: THEN

Line 81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

77: p_api_version ,
78: l_api_name ,
79: G_PKG_NAME )
80: THEN
81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83: -- Initialize message list if p_init_msg_list is set to TRUE.
84: IF FND_API.to_Boolean( p_init_msg_list ) THEN
85: FND_MSG_PUB.initialize;

Line 84: IF FND_API.to_Boolean( p_init_msg_list ) THEN

80: THEN
81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83: -- Initialize message list if p_init_msg_list is set to TRUE.
84: IF FND_API.to_Boolean( p_init_msg_list ) THEN
85: FND_MSG_PUB.initialize;
86: END IF;
87: -- Initialize API return status to success
88: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 88: x_return_status := FND_API.G_RET_STS_SUCCESS;

84: IF FND_API.to_Boolean( p_init_msg_list ) THEN
85: FND_MSG_PUB.initialize;
86: END IF;
87: -- Initialize API return status to success
88: x_return_status := FND_API.G_RET_STS_SUCCESS;
89:
90: -- API body
91: l_routing_rec := p_routing_rec;
92:

Line 95: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) <>

91: l_routing_rec := p_routing_rec;
92:
93: -- set organization id
94:
95: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) <>
96: FND_API.G_MISS_NUM then
97: For l_assy_rec in l_OldAssy_csr(
98: P_RtgSeqId => l_routing_rec.routing_sequence_id) loop
99: l_routing_rec.assembly_item_id := l_assy_rec.assembly_item_id;

Line 96: FND_API.G_MISS_NUM then

92:
93: -- set organization id
94:
95: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) <>
96: FND_API.G_MISS_NUM then
97: For l_assy_rec in l_OldAssy_csr(
98: P_RtgSeqId => l_routing_rec.routing_sequence_id) loop
99: l_routing_rec.assembly_item_id := l_assy_rec.assembly_item_id;
100: l_routing_rec.organization_id := l_assy_rec.organization_id;

Line 106: if nvl(l_routing_rec.organization_code, FND_API.G_MISS_CHAR) <>

102: l_assy_rec.alternate_routing_designator;
103: End loop;
104: End if; -- check existing routing
105:
106: if nvl(l_routing_rec.organization_code, FND_API.G_MISS_CHAR) <>
107: FND_API.G_MISS_CHAR then
108: l_routing_rec.organization_id := FND_API.G_MISS_NUM;
109: For l_parameter_rec in l_parameter_csr(
110: P_Code => l_routing_rec.organization_code) loop

Line 107: FND_API.G_MISS_CHAR then

103: End loop;
104: End if; -- check existing routing
105:
106: if nvl(l_routing_rec.organization_code, FND_API.G_MISS_CHAR) <>
107: FND_API.G_MISS_CHAR then
108: l_routing_rec.organization_id := FND_API.G_MISS_NUM;
109: For l_parameter_rec in l_parameter_csr(
110: P_Code => l_routing_rec.organization_code) loop
111: l_routing_rec.organization_id := l_parameter_rec.organization_id;

Line 108: l_routing_rec.organization_id := FND_API.G_MISS_NUM;

104: End if; -- check existing routing
105:
106: if nvl(l_routing_rec.organization_code, FND_API.G_MISS_CHAR) <>
107: FND_API.G_MISS_CHAR then
108: l_routing_rec.organization_id := FND_API.G_MISS_NUM;
109: For l_parameter_rec in l_parameter_csr(
110: P_Code => l_routing_rec.organization_code) loop
111: l_routing_rec.organization_id := l_parameter_rec.organization_id;
112: End loop;

Line 115: if nvl(l_routing_rec.organization_id, FND_API.G_MISS_NUM) =

111: l_routing_rec.organization_id := l_parameter_rec.organization_id;
112: End loop;
113: End if; -- organization code
114:
115: if nvl(l_routing_rec.organization_id, FND_API.G_MISS_NUM) =
116: FND_API.G_MISS_NUM then
117: Fnd_Message.Set_Name('BOM', 'BOM_ORG_ID_MISSING');
118: FND_MSG_PUB.Add;
119: raise FND_API.G_EXC_ERROR;

Line 116: FND_API.G_MISS_NUM then

112: End loop;
113: End if; -- organization code
114:
115: if nvl(l_routing_rec.organization_id, FND_API.G_MISS_NUM) =
116: FND_API.G_MISS_NUM then
117: Fnd_Message.Set_Name('BOM', 'BOM_ORG_ID_MISSING');
118: FND_MSG_PUB.Add;
119: raise FND_API.G_EXC_ERROR;
120: end if; -- organization_id

Line 119: raise FND_API.G_EXC_ERROR;

115: if nvl(l_routing_rec.organization_id, FND_API.G_MISS_NUM) =
116: FND_API.G_MISS_NUM then
117: Fnd_Message.Set_Name('BOM', 'BOM_ORG_ID_MISSING');
118: FND_MSG_PUB.Add;
119: raise FND_API.G_EXC_ERROR;
120: end if; -- organization_id
121:
122: -- set assembly item id
123:

Line 124: if nvl(l_routing_rec.Assembly_Item_Number, FND_API.G_MISS_CHAR) <>

120: end if; -- organization_id
121:
122: -- set assembly item id
123:
124: if nvl(l_routing_rec.Assembly_Item_Number, FND_API.G_MISS_CHAR) <>
125: FND_API.G_MISS_CHAR then
126: l_ret_code := INVPUOPI.mtl_pr_trans_prod_item(
127: org_id => l_routing_rec.organization_id,
128: item_number_in => l_routing_rec.assembly_item_number,

Line 125: FND_API.G_MISS_CHAR then

121:
122: -- set assembly item id
123:
124: if nvl(l_routing_rec.Assembly_Item_Number, FND_API.G_MISS_CHAR) <>
125: FND_API.G_MISS_CHAR then
126: l_ret_code := INVPUOPI.mtl_pr_trans_prod_item(
127: org_id => l_routing_rec.organization_id,
128: item_number_in => l_routing_rec.assembly_item_number,
129: item_id_out => l_routing_rec.assembly_item_id,

Line 134: raise FND_API.G_EXC_ERROR;

130: err_text => l_err_text);
131: if l_ret_code <> 0 then
132: Fnd_Message.Set_Name('BOM', 'BOM_ASSY_ITEM_MISSING');
133: FND_MSG_PUB.Add;
134: raise FND_API.G_EXC_ERROR;
135: end if; -- parse failed
136: end if; -- assembly item number
137:
138: -- get routing sequence id

Line 139: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) =

135: end if; -- parse failed
136: end if; -- assembly item number
137:
138: -- get routing sequence id
139: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) =
140: FND_API.G_MISS_NUM then
141: If l_routing_rec.alternate_routing_designator = FND_API.G_MISS_CHAR then
142: l_routing_rec.alternate_routing_designator := null;
143: End if;

Line 140: FND_API.G_MISS_NUM then

136: end if; -- assembly item number
137:
138: -- get routing sequence id
139: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) =
140: FND_API.G_MISS_NUM then
141: If l_routing_rec.alternate_routing_designator = FND_API.G_MISS_CHAR then
142: l_routing_rec.alternate_routing_designator := null;
143: End if;
144: For l_OldRtg_rec in l_OldRtg_csr(

Line 141: If l_routing_rec.alternate_routing_designator = FND_API.G_MISS_CHAR then

137:
138: -- get routing sequence id
139: If nvl(l_routing_rec.routing_sequence_id, FND_API.G_MISS_NUM) =
140: FND_API.G_MISS_NUM then
141: If l_routing_rec.alternate_routing_designator = FND_API.G_MISS_CHAR then
142: l_routing_rec.alternate_routing_designator := null;
143: End if;
144: For l_OldRtg_rec in l_OldRtg_csr(
145: P_AssyId => l_routing_rec.assembly_item_id,

Line 154: if nvl(l_routing_rec.location_name, FND_API.G_MISS_CHAR) <>

150: End if; -- get routing sequence id
151:
152: -- set locator id
153:
154: if nvl(l_routing_rec.location_name, FND_API.G_MISS_CHAR) <>
155: FND_API.G_MISS_CHAR then
156: l_ret_code := INVPUOPI.mtl_pr_parse_flex_name(
157: org_id => l_routing_rec.organization_id,
158: flex_code => 'MTLL',

Line 155: FND_API.G_MISS_CHAR then

151:
152: -- set locator id
153:
154: if nvl(l_routing_rec.location_name, FND_API.G_MISS_CHAR) <>
155: FND_API.G_MISS_CHAR then
156: l_ret_code := INVPUOPI.mtl_pr_parse_flex_name(
157: org_id => l_routing_rec.organization_id,
158: flex_code => 'MTLL',
159: flex_name => l_routing_rec.location_name,

Line 166: raise FND_API.G_EXC_ERROR;

162: err_text => l_err_text);
163: if l_ret_code <> 0 then
164: Fnd_Message.Set_Name('BOM', 'BOM_LOCATION_NAME_INVALID');
165: FND_MSG_PUB.Add;
166: raise FND_API.G_EXC_ERROR;
167: end if; -- invalid locator
168: end if; -- parse completion locator
169:
170: -- set common assembly item id

Line 172: if nvl(l_routing_rec.common_item_number, FND_API.G_MISS_CHAR) <>

168: end if; -- parse completion locator
169:
170: -- set common assembly item id
171:
172: if nvl(l_routing_rec.common_item_number, FND_API.G_MISS_CHAR) <>
173: FND_API.G_MISS_CHAR then
174: l_ret_code := INVPUOPI.mtl_pr_trans_prod_item(
175: org_id => l_routing_rec.organization_id,
176: item_number_in => l_routing_rec.common_item_number,

Line 173: FND_API.G_MISS_CHAR then

169:
170: -- set common assembly item id
171:
172: if nvl(l_routing_rec.common_item_number, FND_API.G_MISS_CHAR) <>
173: FND_API.G_MISS_CHAR then
174: l_ret_code := INVPUOPI.mtl_pr_trans_prod_item(
175: org_id => l_routing_rec.organization_id,
176: item_number_in => l_routing_rec.common_item_number,
177: item_id_out => l_routing_rec.common_assembly_item_id,

Line 182: raise FND_API.G_EXC_ERROR;

178: err_text => l_err_text);
179: if l_ret_code <> 0 then
180: Fnd_Message.Set_Name('BOM', 'BOM_CMN_ASSY_ITEM_INVALID');
181: FND_MSG_PUB.Add;
182: raise FND_API.G_EXC_ERROR;
183: end if; -- invalid item id
184: end if; -- common assembly
185:
186: -- set common routing info

Line 188: If nvl(l_routing_rec.common_assembly_item_id, FND_API.G_MISS_NUM) <>

184: end if; -- common assembly
185:
186: -- set common routing info
187:
188: If nvl(l_routing_rec.common_assembly_item_id, FND_API.G_MISS_NUM) <>
189: FND_API.G_MISS_NUM then
190: l_routing_rec.common_routing_sequence_id := null;
191: For l_CommonRtg_rec in l_CommonRtg_csr(
192: P_AssyId => l_routing_rec.common_assembly_item_id,

Line 189: FND_API.G_MISS_NUM then

185:
186: -- set common routing info
187:
188: If nvl(l_routing_rec.common_assembly_item_id, FND_API.G_MISS_NUM) <>
189: FND_API.G_MISS_NUM then
190: l_routing_rec.common_routing_sequence_id := null;
191: For l_CommonRtg_rec in l_CommonRtg_csr(
192: P_AssyId => l_routing_rec.common_assembly_item_id,
193: P_OrgId => l_routing_rec.organization_id,

Line 208: raise FND_API.G_EXC_ERROR;

204: End loop; -- common routing
205: If l_routing_rec.common_routing_sequence_id is null then
206: Fnd_Message.Set_Name('BOM', 'BOM_CMN_RTG_SEQ_INVALID');
207: FND_MSG_PUB.Add;
208: raise FND_API.G_EXC_ERROR;
209: End if; -- could not find routing
210: Elsif l_routing_rec.routing_sequence_id <>
211: l_routing_rec.common_routing_sequence_id and
212: l_routing_rec.common_routing_sequence_id <> FND_API.G_MISS_NUM and

Line 212: l_routing_rec.common_routing_sequence_id <> FND_API.G_MISS_NUM and

208: raise FND_API.G_EXC_ERROR;
209: End if; -- could not find routing
210: Elsif l_routing_rec.routing_sequence_id <>
211: l_routing_rec.common_routing_sequence_id and
212: l_routing_rec.common_routing_sequence_id <> FND_API.G_MISS_NUM and
213: l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then
214: l_routing_rec.common_assembly_item_id := null;
215: For l_CommonAssy_rec in l_CommonAssy_csr (
216: P_SeqId => l_routing_rec.common_routing_sequence_id,

Line 213: l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then

209: End if; -- could not find routing
210: Elsif l_routing_rec.routing_sequence_id <>
211: l_routing_rec.common_routing_sequence_id and
212: l_routing_rec.common_routing_sequence_id <> FND_API.G_MISS_NUM and
213: l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then
214: l_routing_rec.common_assembly_item_id := null;
215: For l_CommonAssy_rec in l_CommonAssy_csr (
216: P_SeqId => l_routing_rec.common_routing_sequence_id,
217: P_OrgId => l_routing_rec.organization_id,

Line 232: raise FND_API.G_EXC_ERROR;

228: end loop; -- common assembly
229: If l_routing_rec.common_assembly_item_id is null then
230: Fnd_Message.Set_Name('BOM', 'BOM_CMN_RTG_SEQ_INVALID');
231: FND_MSG_PUB.Add;
232: raise FND_API.G_EXC_ERROR;
233: End if; -- could not find common assembly
234: Elsif l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then
235: -- noncommon
236: l_routing_rec.common_routing_sequence_id :=

Line 234: Elsif l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then

230: Fnd_Message.Set_Name('BOM', 'BOM_CMN_RTG_SEQ_INVALID');
231: FND_MSG_PUB.Add;
232: raise FND_API.G_EXC_ERROR;
233: End if; -- could not find common assembly
234: Elsif l_routing_rec.routing_sequence_id <> FND_API.G_MISS_NUM then
235: -- noncommon
236: l_routing_rec.common_routing_sequence_id :=
237: l_routing_rec.routing_sequence_id;
238: l_routing_rec.common_assembly_item_id := Null;

Line 243: if nvl(l_routing_rec.line_code, FND_API.G_MISS_CHAR) <>

239: End if; -- set common routing info
240:
241: -- set line id
242:
243: if nvl(l_routing_rec.line_code, FND_API.G_MISS_CHAR) <>
244: FND_API.G_MISS_CHAR then
245: l_routing_rec.line_id := FND_API.G_MISS_NUM;
246: For l_line_rec in l_line_csr(
247: P_Organization_Id => l_routing_rec.organization_id,

Line 244: FND_API.G_MISS_CHAR then

240:
241: -- set line id
242:
243: if nvl(l_routing_rec.line_code, FND_API.G_MISS_CHAR) <>
244: FND_API.G_MISS_CHAR then
245: l_routing_rec.line_id := FND_API.G_MISS_NUM;
246: For l_line_rec in l_line_csr(
247: P_Organization_Id => l_routing_rec.organization_id,
248: P_Code => l_routing_rec.line_code) loop

Line 245: l_routing_rec.line_id := FND_API.G_MISS_NUM;

241: -- set line id
242:
243: if nvl(l_routing_rec.line_code, FND_API.G_MISS_CHAR) <>
244: FND_API.G_MISS_CHAR then
245: l_routing_rec.line_id := FND_API.G_MISS_NUM;
246: For l_line_rec in l_line_csr(
247: P_Organization_Id => l_routing_rec.organization_id,
248: P_Code => l_routing_rec.line_code) loop
249: l_routing_rec.line_id := l_line_rec.line_id;

Line 251: If l_routing_rec.line_id = FND_API.G_MISS_NUM then

247: P_Organization_Id => l_routing_rec.organization_id,
248: P_Code => l_routing_rec.line_code) loop
249: l_routing_rec.line_id := l_line_rec.line_id;
250: End loop;
251: If l_routing_rec.line_id = FND_API.G_MISS_NUM then
252: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_LINE');
253: FND_MSG_PUB.Add;
254: raise FND_API.G_EXC_ERROR;
255: End if; -- line is missing

Line 254: raise FND_API.G_EXC_ERROR;

250: End loop;
251: If l_routing_rec.line_id = FND_API.G_MISS_NUM then
252: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_LINE');
253: FND_MSG_PUB.Add;
254: raise FND_API.G_EXC_ERROR;
255: End if; -- line is missing
256: End if; -- line code
257:
258: -- set cfm_flag

Line 260: If nvl(l_routing_rec.cfm_routing_flag, FND_API.G_MISS_NUM) =

256: End if; -- line code
257:
258: -- set cfm_flag
259:
260: If nvl(l_routing_rec.cfm_routing_flag, FND_API.G_MISS_NUM) =
261: FND_API.G_MISS_NUM then
262: l_routing_rec.cfm_routing_flag := g_no; -- default
263: End if;
264:

Line 261: FND_API.G_MISS_NUM then

257:
258: -- set cfm_flag
259:
260: If nvl(l_routing_rec.cfm_routing_flag, FND_API.G_MISS_NUM) =
261: FND_API.G_MISS_NUM then
262: l_routing_rec.cfm_routing_flag := g_no; -- default
263: End if;
264:
265: x_routing_rec := l_routing_rec;

Line 276: WHEN FND_API.G_EXC_ERROR THEN

272: (p_count => x_msg_count,
273: p_data => x_msg_data
274: );
275: EXCEPTION
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: FND_MSG_PUB.Count_And_Get
279: (p_count => x_msg_count,
280: p_data => x_msg_data

Line 277: x_return_status := FND_API.G_RET_STS_ERROR;

273: p_data => x_msg_data
274: );
275: EXCEPTION
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: FND_MSG_PUB.Count_And_Get
279: (p_count => x_msg_count,
280: p_data => x_msg_data
281: );

Line 282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

278: FND_MSG_PUB.Count_And_Get
279: (p_count => x_msg_count,
280: p_data => x_msg_data
281: );
282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
283: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
284: FND_MSG_PUB.Count_And_Get
285: (p_count => x_msg_count,
286: p_data => x_msg_data

Line 283: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

279: (p_count => x_msg_count,
280: p_data => x_msg_data
281: );
282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
283: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
284: FND_MSG_PUB.Count_And_Get
285: (p_count => x_msg_count,
286: p_data => x_msg_data
287: );

Line 289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

285: (p_count => x_msg_count,
286: p_data => x_msg_data
287: );
288: WHEN OTHERS THEN
289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
290: IF FND_MSG_PUB.Check_Msg_Level
291: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
292: THEN
293: FND_MSG_PUB.Add_Exc_Msg

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

302: END AssignRouting;
303:
304: PROCEDURE ValidateRouting
305: ( p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status IN OUT NOCOPY VARCHAR2,
310: x_msg_count IN OUT NOCOPY NUMBER,

Line 307: p_commit IN VARCHAR2 := FND_API.G_FALSE,

303:
304: PROCEDURE ValidateRouting
305: ( p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status IN OUT NOCOPY VARCHAR2,
310: x_msg_count IN OUT NOCOPY NUMBER,
311: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

304: PROCEDURE ValidateRouting
305: ( p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status IN OUT NOCOPY VARCHAR2,
310: x_msg_count IN OUT NOCOPY NUMBER,
311: x_msg_data IN OUT NOCOPY VARCHAR2,
312: p_routing_rec IN ROUTING_REC_TYPE := G_MISS_ROUTING_REC,

Line 544: IF NOT FND_API.Compatible_API_Call ( l_api_version,

540: And bos.standard_operation_id is not null
541: );
542: BEGIN
543: -- Standard call to check for call compatibility.
544: IF NOT FND_API.Compatible_API_Call ( l_api_version,
545: p_api_version,
546: l_api_name,
547: G_PKG_NAME ) THEN
548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

544: IF NOT FND_API.Compatible_API_Call ( l_api_version,
545: p_api_version,
546: l_api_name,
547: G_PKG_NAME ) THEN
548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
549: END IF;
550: -- Initialize message list if p_init_msg_list is set to TRUE.
551: IF FND_API.to_Boolean( p_init_msg_list ) THEN
552: FND_MSG_PUB.initialize;

Line 551: IF FND_API.to_Boolean( p_init_msg_list ) THEN

547: G_PKG_NAME ) THEN
548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
549: END IF;
550: -- Initialize message list if p_init_msg_list is set to TRUE.
551: IF FND_API.to_Boolean( p_init_msg_list ) THEN
552: FND_MSG_PUB.initialize;
553: END IF;
554: -- Initialize API return status to success
555: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 555: x_return_status := FND_API.G_RET_STS_SUCCESS;

551: IF FND_API.to_Boolean( p_init_msg_list ) THEN
552: FND_MSG_PUB.initialize;
553: END IF;
554: -- Initialize API return status to success
555: x_return_status := FND_API.G_RET_STS_SUCCESS;
556:
557: -- API body
558: l_routing_rec := p_routing_rec;
559: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

Line 559: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

555: x_return_status := FND_API.G_RET_STS_SUCCESS;
556:
557: -- API body
558: l_routing_rec := p_routing_rec;
559: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then
560: AssignRouting (p_api_version => 1,
561: p_init_msg_list => p_init_msg_list,
562: p_commit => p_commit,
563: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

Line 563: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

559: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then
560: AssignRouting (p_api_version => 1,
561: p_init_msg_list => p_init_msg_list,
562: p_commit => p_commit,
563: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
564: x_return_status => l_return_status,
565: x_msg_count => l_msg_count,
566: x_msg_data => l_msg_data,
567: p_routing_rec => l_routing_rec,

Line 569: If l_return_status = FND_API.G_RET_STS_ERROR then

565: x_msg_count => l_msg_count,
566: x_msg_data => l_msg_data,
567: p_routing_rec => l_routing_rec,
568: x_routing_rec => l_routing_rec);
569: If l_return_status = FND_API.G_RET_STS_ERROR then
570: Raise FND_API.G_EXC_ERROR;
571: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
572: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
573: End if; -- error

Line 570: Raise FND_API.G_EXC_ERROR;

566: x_msg_data => l_msg_data,
567: p_routing_rec => l_routing_rec,
568: x_routing_rec => l_routing_rec);
569: If l_return_status = FND_API.G_RET_STS_ERROR then
570: Raise FND_API.G_EXC_ERROR;
571: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
572: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
573: End if; -- error
574: End if; -- assign values

Line 571: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

567: p_routing_rec => l_routing_rec,
568: x_routing_rec => l_routing_rec);
569: If l_return_status = FND_API.G_RET_STS_ERROR then
570: Raise FND_API.G_EXC_ERROR;
571: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
572: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
573: End if; -- error
574: End if; -- assign values
575:

Line 572: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

568: x_routing_rec => l_routing_rec);
569: If l_return_status = FND_API.G_RET_STS_ERROR then
570: Raise FND_API.G_EXC_ERROR;
571: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
572: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
573: End if; -- error
574: End if; -- assign values
575:
576: -- Check for valid org id

Line 582: Raise FND_API.G_EXC_ERROR;

578: For l_org_rec in l_org_csr (
579: P_OrgId => l_routing_rec.organization_id) loop
580: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_ORG_ID');
581: FND_MSG_PUB.Add;
582: Raise FND_API.G_EXC_ERROR;
583: End loop; -- Invalid Organization
584:
585: -- Check for valid alternate
586:

Line 593: Raise FND_API.G_EXC_ERROR;

589: P_OrgId => l_routing_rec.organization_id,
590: P_Alt => l_routing_rec.alternate_routing_designator) loop
591: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_RTG_ALTERNATE');
592: FND_MSG_PUB.Add;
593: Raise FND_API.G_EXC_ERROR;
594: End loop; -- invalid alternate
595: End if; -- Check for valid alternate
596:
597: -- Check if assembly item exists

Line 604: Raise FND_API.G_EXC_ERROR;

600: P_Org => l_routing_rec.organization_id,
601: P_Item => l_routing_rec.assembly_item_id) loop
602: Fnd_Message.Set_Name ('BOM', 'BOM_ASSEMBLY_ITEM_INVALID');
603: FND_MSG_PUB.Add;
604: Raise FND_API.G_EXC_ERROR;
605: End loop; -- Invalid item id
606:
607: -- routing_type must be 1 or 2
608:

Line 612: Raise FND_API.G_EXC_ERROR;

608:
609: If l_routing_rec.routing_type not in (g_mfg, g_eng) then
610: Fnd_Message.Set_Name('BOM', 'BOM_ROUTING_TYPE_INVALID');
611: FND_MSG_PUB.Add;
612: Raise FND_API.G_EXC_ERROR;
613: End if; -- invalid routing type
614:
615: -- Check for unique routing
616:

Line 624: Raise FND_API.G_EXC_ERROR;

620: P_OrgId => l_routing_rec.organization_id,
621: P_Alternate => l_routing_rec.alternate_routing_designator) loop
622: Fnd_Message.Set_Name('BOM', 'BOM_DUPLICATE_RTG');
623: FND_MSG_PUB.Add;
624: Raise FND_API.G_EXC_ERROR;
625: End loop; -- duplicate routing
626:
627: -- Check alternate routing has a primary
628: -- Check alternate mfg routing does not have an eng primary routing

Line 637: Raise FND_API.G_EXC_ERROR;

633: P_AssyId => l_routing_rec.assembly_item_id,
634: P_RtgType => l_routing_rec.routing_type) loop
635: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_PRIMARY');
636: FND_MSG_PUB.Add;
637: Raise FND_API.G_EXC_ERROR;
638: End loop; -- invalid primary
639: End if; -- alternate is not null
640:
641: -- Check routing type and item attributes

Line 649: Raise FND_API.G_EXC_ERROR;

645: P_AssyId => l_routing_rec.assembly_item_id,
646: P_RtgType => l_routing_rec.routing_type) loop
647: Fnd_Message.Set_Name('BOM', 'BOM_ROUTING_TYPE_ERR');
648: FND_MSG_PUB.Add;
649: Raise FND_API.G_EXC_ERROR;
650: End loop; -- invalid item
651:
652: If l_routing_rec.routing_sequence_id <>
653: l_routing_rec.common_routing_sequence_id then

Line 661: Raise FND_API.G_EXC_ERROR;

657: For l_Common_rec in l_CommonRtg_csr(P_RtgSeqId =>
658: l_routing_rec.common_routing_sequence_id) loop
659: Fnd_Message.Set_Name('BOM', 'BOM_COMMON_RTG_NOT_EXIST');
660: FND_MSG_PUB.Add;
661: Raise FND_API.G_EXC_ERROR;
662: End loop; -- nonexistent common
663:
664: -- Verify common routing attributes
665:

Line 674: Raise FND_API.G_EXC_ERROR;

670: P_org_id => l_routing_rec.organization_id,
671: P_alt_desg => l_routing_rec.alternate_routing_designator) loop
672: Fnd_Message.Set_Name('BOM', 'BOM_COMMON_RTG_ERROR');
673: FND_MSG_PUB.Add;
674: Raise FND_API.G_EXC_ERROR;
675: End loop; -- validate common
676: End if; -- common specified
677:
678: -- Validate subinventory

Line 684: Raise FND_API.G_EXC_ERROR;

680: If l_routing_rec.completion_locator_id is not null
681: and l_routing_rec.completion_subinventory is null then
682: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
683: FND_MSG_PUB.Add;
684: Raise FND_API.G_EXC_ERROR;
685: End if; -- locator without subinventory
686:
687: If l_routing_rec.completion_subinventory is not null then
688: For l_Flags_rec in l_SubInvFlags_csr (

Line 730: Raise FND_API.G_EXC_ERROR;

726: End if; -- restricted or nonrestricted subinventory
727: If l_sub_loc_code is null then
728: Fnd_Message.Set_Name('BOM', 'BOM_SUBINV_INVALID');
729: FND_MSG_PUB.Add;
730: Raise FND_API.G_EXC_ERROR;
731: End if;
732:
733: -- Validate locator
734: -- Org level

Line 739: Raise FND_API.G_EXC_ERROR;

735: If l_Flags_rec.stock_locator_control_code = 1
736: and l_routing_rec.completion_locator_id is not null then
737: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
738: FND_MSG_PUB.Add;
739: Raise FND_API.G_EXC_ERROR;
740: end if;
741:
742: If l_Flags_rec.stock_locator_control_code in (2, 3) and
743: l_routing_rec.completion_locator_id is null then

Line 746: Raise FND_API.G_EXC_ERROR;

742: If l_Flags_rec.stock_locator_control_code in (2, 3) and
743: l_routing_rec.completion_locator_id is null then
744: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
745: FND_MSG_PUB.Add;
746: Raise FND_API.G_EXC_ERROR;
747: end if;
748:
749: If l_Flags_rec.stock_locator_control_code in (2, 3)
750: and l_routing_rec.completion_locator_id is not null then

Line 759: Raise FND_API.G_EXC_ERROR;

755: P_OrgId => l_routing_rec.organization_id,
756: P_SubInventory => l_routing_rec.completion_subinventory) loop
757: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
758: FND_MSG_PUB.Add;
759: Raise FND_API.G_EXC_ERROR;
760: End loop;
761: Else -- restricted locator
762: For l_Locator_rec in l_RestrictedLocators_csr (
763: P_Location => l_routing_rec.completion_locator_id,

Line 769: Raise FND_API.G_EXC_ERROR;

765: P_SubInventory => l_routing_rec.completion_subinventory,
766: P_ItemId => l_routing_rec.assembly_item_id) loop
767: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
768: FND_MSG_PUB.Add;
769: Raise FND_API.G_EXC_ERROR;
770: End loop;
771: End If; -- restricted or non-restricted locator
772: End If; -- check if item location exists
773:

Line 778: Raise FND_API.G_EXC_ERROR;

774: If l_Flags_rec.stock_locator_control_code not in (1,2,3,4)
775: and l_routing_rec.completion_locator_id is not null then
776: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
777: FND_MSG_PUB.Add;
778: Raise FND_API.G_EXC_ERROR;
779: End if;
780:
781: -- Subinventory level
782: If l_Flags_rec.stock_locator_control_code = 4

Line 787: Raise FND_API.G_EXC_ERROR;

783: and l_sub_loc_code = 1
784: and l_routing_rec.completion_locator_id is not null then
785: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
786: FND_MSG_PUB.Add;
787: Raise FND_API.G_EXC_ERROR;
788: End if;
789:
790: If l_Flags_rec.stock_locator_control_code = 4 then
791: If l_sub_loc_code in (2, 3) and

Line 795: Raise FND_API.G_EXC_ERROR;

791: If l_sub_loc_code in (2, 3) and
792: l_routing_rec.completion_locator_id is null then
793: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
794: FND_MSG_PUB.Add;
795: Raise FND_API.G_EXC_ERROR;
796: End if;
797: If l_sub_loc_code in (2, 3)
798: and l_routing_rec.completion_locator_id is not null then
799: If l_Flags_rec.restrict_locators_code = 2 then

Line 807: Raise FND_API.G_EXC_ERROR;

803: P_OrgId => l_routing_rec.organization_id,
804: P_SubInventory => l_routing_rec.completion_subinventory) loop
805: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
806: FND_MSG_PUB.Add;
807: Raise FND_API.G_EXC_ERROR;
808: End loop;
809: Else -- restricted locator
810: For l_Location_rec in l_RestrictedLocators_csr (
811: P_Location => l_routing_rec.completion_locator_id,

Line 817: Raise FND_API.G_EXC_ERROR;

813: P_SubInventory => l_routing_rec.completion_subinventory,
814: P_ItemId => l_routing_rec.assembly_item_id) loop
815: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
816: FND_MSG_PUB.Add;
817: Raise FND_API.G_EXC_ERROR;
818: End loop;
819: End If; -- locator exists?
820: End if; -- subinventory required locator
821:

Line 826: Raise FND_API.G_EXC_ERROR;

822: If l_sub_loc_code not in (1,2,3,5)
823: and l_routing_rec.completion_locator_id is not null then
824: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
825: FND_MSG_PUB.Add;
826: Raise FND_API.G_EXC_ERROR;
827: End if;
828: End If; -- org locator = 4
829:
830: -- Item level

Line 836: Raise FND_API.G_EXC_ERROR;

832: and l_sub_loc_code = 5 and l_Flags_rec.location_control_code = 1
833: and l_routing_rec.completion_locator_id is not null then
834: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
835: FND_MSG_PUB.Add;
836: Raise FND_API.G_EXC_ERROR;
837: end if;
838:
839: If l_Flags_rec.location_control_code in (2, 3)
840: and l_routing_rec.completion_locator_id is not null then

Line 849: Raise FND_API.G_EXC_ERROR;

845: P_OrgId => l_routing_rec.organization_id,
846: P_SubInventory => l_routing_rec.completion_subinventory) loop
847: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
848: FND_MSG_PUB.Add;
849: Raise FND_API.G_EXC_ERROR;
850: End loop;
851: Else -- restricted locator
852: For l_Location_rec in l_RestrictedLocators_csr (
853: P_Location => l_routing_rec.completion_locator_id,

Line 859: Raise FND_API.G_EXC_ERROR;

855: P_SubInventory => l_routing_rec.completion_subinventory,
856: P_ItemId => l_routing_rec.assembly_item_id) loop
857: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
858: FND_MSG_PUB.Add;
859: Raise FND_API.G_EXC_ERROR;
860: End loop;
861: End If; -- locator exists?
862: End If; -- locator control in (2, 3)
863:

Line 868: Raise FND_API.G_EXC_ERROR;

864: If l_Flags_rec.location_control_code not in (1,2,3)
865: and l_routing_rec.completion_locator_id is not null then
866: Fnd_Message.Set_Name('BOM', 'BOM_LOCATOR_INVALID');
867: FND_MSG_PUB.Add;
868: Raise FND_API.G_EXC_ERROR;
869: End if;
870: End loop; -- SubInvFlags
871: End If; -- Completion SubInventory specified
872:

Line 886: Raise FND_API.G_EXC_ERROR;

882: If l_routing_rec.cfm_routing_flag = g_yes
883: and l_routing_rec.line_id is null then
884: Fnd_Message.Set_Name('BOM', 'BOM_LINE_REQUIRED');
885: FND_MSG_PUB.Add;
886: Raise FND_API.G_EXC_ERROR;
887: End if;
888:
889: If l_routing_rec.line_id is not null then
890: For l_line_rec in l_line_csr(

Line 894: Raise FND_API.G_EXC_ERROR;

890: For l_line_rec in l_line_csr(
891: p_line_id => l_routing_rec.line_id) loop
892: Fnd_Message.Set_Name('BOM', 'BOM_INVALID_LINE');
893: FND_MSG_PUB.Add;
894: Raise FND_API.G_EXC_ERROR;
895: End loop;
896: End if;
897:
898: If l_routing_rec.mixed_model_map_flag = g_yes then

Line 906: Raise FND_API.G_EXC_ERROR;

902: p_alternate => l_routing_rec.alternate_routing_designator,
903: p_line_id => l_routing_rec.line_id) loop
904: Fnd_Message.Set_Name('BOM', 'BOM_MIXED_MODEL_UNIQUE');
905: FND_MSG_PUB.Add;
906: Raise FND_API.G_EXC_ERROR;
907: End loop;
908: End if; -- use in mixed model map
909:
910: For l_priority_rec in l_DupPriority_csr(

Line 919: Raise FND_API.G_EXC_ERROR;

915: Fnd_Message.Set_Name('BOM', 'BOM_UNIQUE_PRIORITY');
916: Fnd_Message.Set_Token('ENTITY2', null);
917: Fnd_Message.Set_Token('ENTITY', to_char(l_routing_rec.priority));
918: FND_MSG_PUB.Add;
919: Raise FND_API.G_EXC_ERROR;
920: End loop;
921:
922: If l_routing_rec.ctp_flag = g_yes then
923: For l_ctp_rec in l_ctp_csr(

Line 929: Raise FND_API.G_EXC_ERROR;

925: p_org_id => l_routing_rec.organization_id,
926: p_alternate => l_routing_rec.alternate_routing_designator) loop
927: Fnd_Message.Set_Name('BOM', 'BOM_CTP_UNIQUE');
928: FND_MSG_PUB.Add;
929: Raise FND_API.G_EXC_ERROR;
930: End loop;
931: End If; -- ctp_flag = yes
932:
933: If l_routing_rec.cfm_routing_flag = g_yes then

Line 939: Raise FND_API.G_EXC_ERROR;

935: P_RtgSeqId => l_routing_rec.routing_sequence_id) loop
936: If l_OldLine_rec.line_id <> l_routing_rec.line_id then
937: Fnd_Message.Set_Name('BOM', 'BOM_CANNOT_UPDATE_OI');
938: FND_MSG_PUB.Add;
939: Raise FND_API.G_EXC_ERROR;
940: End if; -- line changed
941: End loop; -- old routing
942: End if; -- cfm routing
943:

Line 954: WHEN FND_API.G_EXC_ERROR THEN

950: (p_count => x_msg_count,
951: p_data => x_msg_data
952: );
953: EXCEPTION
954: WHEN FND_API.G_EXC_ERROR THEN
955: x_return_status := FND_API.G_RET_STS_ERROR;
956: FND_MSG_PUB.Count_And_Get
957: (p_count => x_msg_count,
958: p_data => x_msg_data

Line 955: x_return_status := FND_API.G_RET_STS_ERROR;

951: p_data => x_msg_data
952: );
953: EXCEPTION
954: WHEN FND_API.G_EXC_ERROR THEN
955: x_return_status := FND_API.G_RET_STS_ERROR;
956: FND_MSG_PUB.Count_And_Get
957: (p_count => x_msg_count,
958: p_data => x_msg_data
959: );

Line 960: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

956: FND_MSG_PUB.Count_And_Get
957: (p_count => x_msg_count,
958: p_data => x_msg_data
959: );
960: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
962: FND_MSG_PUB.Count_And_Get
963: (p_count => x_msg_count,
964: p_data => x_msg_data

Line 961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

957: (p_count => x_msg_count,
958: p_data => x_msg_data
959: );
960: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
962: FND_MSG_PUB.Count_And_Get
963: (p_count => x_msg_count,
964: p_data => x_msg_data
965: );

Line 967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

963: (p_count => x_msg_count,
964: p_data => x_msg_data
965: );
966: WHEN OTHERS THEN
967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
968: IF FND_MSG_PUB.Check_Msg_Level
969: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
970: THEN
971: FND_MSG_PUB.Add_Exc_Msg

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

979: );
980: END ValidateRouting;
981: PROCEDURE CreateRouting
982: ( p_api_version IN NUMBER,
983: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
984: p_commit IN VARCHAR2 := FND_API.G_FALSE,
985: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
986: x_return_status IN OUT NOCOPY VARCHAR2,
987: x_msg_count IN OUT NOCOPY NUMBER,

Line 984: p_commit IN VARCHAR2 := FND_API.G_FALSE,

980: END ValidateRouting;
981: PROCEDURE CreateRouting
982: ( p_api_version IN NUMBER,
983: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
984: p_commit IN VARCHAR2 := FND_API.G_FALSE,
985: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
986: x_return_status IN OUT NOCOPY VARCHAR2,
987: x_msg_count IN OUT NOCOPY NUMBER,
988: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 985: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

981: PROCEDURE CreateRouting
982: ( p_api_version IN NUMBER,
983: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
984: p_commit IN VARCHAR2 := FND_API.G_FALSE,
985: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
986: x_return_status IN OUT NOCOPY VARCHAR2,
987: x_msg_count IN OUT NOCOPY NUMBER,
988: x_msg_data IN OUT NOCOPY VARCHAR2,
989: p_routing_rec IN ROUTING_REC_TYPE := G_MISS_ROUTING_REC,

Line 1012: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1008: BEGIN
1009: -- Standard Start of API savepoint
1010: SAVEPOINT CreateRouting_Pvt;
1011: -- Standard call to check for call compatibility.
1012: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1013: p_api_version,
1014: l_api_name,
1015: G_PKG_NAME )
1016: THEN

Line 1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1013: p_api_version,
1014: l_api_name,
1015: G_PKG_NAME )
1016: THEN
1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1018: END IF;
1019: -- Initialize message list if p_init_msg_list is set to TRUE.
1020: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1021: FND_MSG_PUB.initialize;

Line 1020: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1016: THEN
1017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1018: END IF;
1019: -- Initialize message list if p_init_msg_list is set to TRUE.
1020: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1021: FND_MSG_PUB.initialize;
1022: END IF;
1023: -- Initialize API return status to success
1024: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1024: x_return_status := FND_API.G_RET_STS_SUCCESS;

1020: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1021: FND_MSG_PUB.initialize;
1022: END IF;
1023: -- Initialize API return status to success
1024: x_return_status := FND_API.G_RET_STS_SUCCESS;
1025:
1026: -- API body
1027:
1028: l_routing_rec := p_routing_rec;

Line 1036: If l_routing_rec.assembly_item_id = FND_API.G_MISS_NUM then

1032: End loop; -- new primary key
1033:
1034: -- initialize record
1035:
1036: If l_routing_rec.assembly_item_id = FND_API.G_MISS_NUM then
1037: l_routing_rec.assembly_item_id := null;
1038: End if;
1039: If l_routing_rec.assembly_item_number = FND_API.G_MISS_CHAR then
1040: l_routing_rec.assembly_item_number := null;

Line 1039: If l_routing_rec.assembly_item_number = FND_API.G_MISS_CHAR then

1035:
1036: If l_routing_rec.assembly_item_id = FND_API.G_MISS_NUM then
1037: l_routing_rec.assembly_item_id := null;
1038: End if;
1039: If l_routing_rec.assembly_item_number = FND_API.G_MISS_CHAR then
1040: l_routing_rec.assembly_item_number := null;
1041: End if;
1042: If l_routing_rec.organization_id = FND_API.G_MISS_NUM then
1043: l_routing_rec.organization_id := null;

Line 1042: If l_routing_rec.organization_id = FND_API.G_MISS_NUM then

1038: End if;
1039: If l_routing_rec.assembly_item_number = FND_API.G_MISS_CHAR then
1040: l_routing_rec.assembly_item_number := null;
1041: End if;
1042: If l_routing_rec.organization_id = FND_API.G_MISS_NUM then
1043: l_routing_rec.organization_id := null;
1044: End if;
1045: If l_routing_rec.organization_code = FND_API.G_MISS_CHAR then
1046: l_routing_rec.organization_code := null;

Line 1045: If l_routing_rec.organization_code = FND_API.G_MISS_CHAR then

1041: End if;
1042: If l_routing_rec.organization_id = FND_API.G_MISS_NUM then
1043: l_routing_rec.organization_id := null;
1044: End if;
1045: If l_routing_rec.organization_code = FND_API.G_MISS_CHAR then
1046: l_routing_rec.organization_code := null;
1047: End if;
1048: If l_routing_rec.alternate_routing_designator =
1049: FND_API.G_MISS_CHAR then

Line 1049: FND_API.G_MISS_CHAR then

1045: If l_routing_rec.organization_code = FND_API.G_MISS_CHAR then
1046: l_routing_rec.organization_code := null;
1047: End if;
1048: If l_routing_rec.alternate_routing_designator =
1049: FND_API.G_MISS_CHAR then
1050: l_routing_rec.alternate_routing_designator := null;
1051: End if;
1052: If nvl(l_routing_rec.routing_type, FND_API.G_MISS_NUM) =
1053: FND_API.G_MISS_NUM then

Line 1052: If nvl(l_routing_rec.routing_type, FND_API.G_MISS_NUM) =

1048: If l_routing_rec.alternate_routing_designator =
1049: FND_API.G_MISS_CHAR then
1050: l_routing_rec.alternate_routing_designator := null;
1051: End if;
1052: If nvl(l_routing_rec.routing_type, FND_API.G_MISS_NUM) =
1053: FND_API.G_MISS_NUM then
1054: l_routing_rec.routing_type := g_mfg;
1055: End if;
1056: If l_routing_rec.common_assembly_item_id = FND_API.G_MISS_NUM then

Line 1053: FND_API.G_MISS_NUM then

1049: FND_API.G_MISS_CHAR then
1050: l_routing_rec.alternate_routing_designator := null;
1051: End if;
1052: If nvl(l_routing_rec.routing_type, FND_API.G_MISS_NUM) =
1053: FND_API.G_MISS_NUM then
1054: l_routing_rec.routing_type := g_mfg;
1055: End if;
1056: If l_routing_rec.common_assembly_item_id = FND_API.G_MISS_NUM then
1057: l_routing_rec.common_assembly_item_id := null;

Line 1056: If l_routing_rec.common_assembly_item_id = FND_API.G_MISS_NUM then

1052: If nvl(l_routing_rec.routing_type, FND_API.G_MISS_NUM) =
1053: FND_API.G_MISS_NUM then
1054: l_routing_rec.routing_type := g_mfg;
1055: End if;
1056: If l_routing_rec.common_assembly_item_id = FND_API.G_MISS_NUM then
1057: l_routing_rec.common_assembly_item_id := null;
1058: End if;
1059: If l_routing_rec.common_item_number = FND_API.G_MISS_CHAR then
1060: l_routing_rec.common_item_number := null;

Line 1059: If l_routing_rec.common_item_number = FND_API.G_MISS_CHAR then

1055: End if;
1056: If l_routing_rec.common_assembly_item_id = FND_API.G_MISS_NUM then
1057: l_routing_rec.common_assembly_item_id := null;
1058: End if;
1059: If l_routing_rec.common_item_number = FND_API.G_MISS_CHAR then
1060: l_routing_rec.common_item_number := null;
1061: End if;
1062: If nvl(l_routing_rec.common_routing_sequence_id, FND_API.G_MISS_NUM)
1063: = FND_API.G_MISS_NUM then

Line 1062: If nvl(l_routing_rec.common_routing_sequence_id, FND_API.G_MISS_NUM)

1058: End if;
1059: If l_routing_rec.common_item_number = FND_API.G_MISS_CHAR then
1060: l_routing_rec.common_item_number := null;
1061: End if;
1062: If nvl(l_routing_rec.common_routing_sequence_id, FND_API.G_MISS_NUM)
1063: = FND_API.G_MISS_NUM then
1064: l_routing_rec.common_routing_sequence_id :=
1065: l_routing_rec.routing_sequence_id;
1066: End if;

Line 1063: = FND_API.G_MISS_NUM then

1059: If l_routing_rec.common_item_number = FND_API.G_MISS_CHAR then
1060: l_routing_rec.common_item_number := null;
1061: End if;
1062: If nvl(l_routing_rec.common_routing_sequence_id, FND_API.G_MISS_NUM)
1063: = FND_API.G_MISS_NUM then
1064: l_routing_rec.common_routing_sequence_id :=
1065: l_routing_rec.routing_sequence_id;
1066: End if;
1067: If l_routing_rec.routing_comment = FND_API.G_MISS_CHAR then

Line 1067: If l_routing_rec.routing_comment = FND_API.G_MISS_CHAR then

1063: = FND_API.G_MISS_NUM then
1064: l_routing_rec.common_routing_sequence_id :=
1065: l_routing_rec.routing_sequence_id;
1066: End if;
1067: If l_routing_rec.routing_comment = FND_API.G_MISS_CHAR then
1068: l_routing_rec.routing_comment := null;
1069: End if;
1070: If l_routing_rec.completion_subinventory = FND_API.G_MISS_CHAR then
1071: l_routing_rec.completion_subinventory := null;

Line 1070: If l_routing_rec.completion_subinventory = FND_API.G_MISS_CHAR then

1066: End if;
1067: If l_routing_rec.routing_comment = FND_API.G_MISS_CHAR then
1068: l_routing_rec.routing_comment := null;
1069: End if;
1070: If l_routing_rec.completion_subinventory = FND_API.G_MISS_CHAR then
1071: l_routing_rec.completion_subinventory := null;
1072: End if;
1073: If l_routing_rec.completion_locator_id = FND_API.G_MISS_NUM then
1074: l_routing_rec.completion_locator_id := null;

Line 1073: If l_routing_rec.completion_locator_id = FND_API.G_MISS_NUM then

1069: End if;
1070: If l_routing_rec.completion_subinventory = FND_API.G_MISS_CHAR then
1071: l_routing_rec.completion_subinventory := null;
1072: End if;
1073: If l_routing_rec.completion_locator_id = FND_API.G_MISS_NUM then
1074: l_routing_rec.completion_locator_id := null;
1075: End if;
1076: If l_routing_rec.location_name = FND_API.G_MISS_CHAR then
1077: l_routing_rec.location_name := null;

Line 1076: If l_routing_rec.location_name = FND_API.G_MISS_CHAR then

1072: End if;
1073: If l_routing_rec.completion_locator_id = FND_API.G_MISS_NUM then
1074: l_routing_rec.completion_locator_id := null;
1075: End if;
1076: If l_routing_rec.location_name = FND_API.G_MISS_CHAR then
1077: l_routing_rec.location_name := null;
1078: End if;
1079: If l_routing_rec.attribute_category = FND_API.G_MISS_CHAR then
1080: l_routing_rec.attribute_category := null;

Line 1079: If l_routing_rec.attribute_category = FND_API.G_MISS_CHAR then

1075: End if;
1076: If l_routing_rec.location_name = FND_API.G_MISS_CHAR then
1077: l_routing_rec.location_name := null;
1078: End if;
1079: If l_routing_rec.attribute_category = FND_API.G_MISS_CHAR then
1080: l_routing_rec.attribute_category := null;
1081: End if;
1082: If l_routing_rec.attribute1 = FND_API.G_MISS_CHAR then
1083: l_routing_rec.attribute1 := null;

Line 1082: If l_routing_rec.attribute1 = FND_API.G_MISS_CHAR then

1078: End if;
1079: If l_routing_rec.attribute_category = FND_API.G_MISS_CHAR then
1080: l_routing_rec.attribute_category := null;
1081: End if;
1082: If l_routing_rec.attribute1 = FND_API.G_MISS_CHAR then
1083: l_routing_rec.attribute1 := null;
1084: End if;
1085: If l_routing_rec.attribute2 = FND_API.G_MISS_CHAR then
1086: l_routing_rec.attribute2 := null;

Line 1085: If l_routing_rec.attribute2 = FND_API.G_MISS_CHAR then

1081: End if;
1082: If l_routing_rec.attribute1 = FND_API.G_MISS_CHAR then
1083: l_routing_rec.attribute1 := null;
1084: End if;
1085: If l_routing_rec.attribute2 = FND_API.G_MISS_CHAR then
1086: l_routing_rec.attribute2 := null;
1087: End if;
1088: If l_routing_rec.attribute3 = FND_API.G_MISS_CHAR then
1089: l_routing_rec.attribute3 := null;

Line 1088: If l_routing_rec.attribute3 = FND_API.G_MISS_CHAR then

1084: End if;
1085: If l_routing_rec.attribute2 = FND_API.G_MISS_CHAR then
1086: l_routing_rec.attribute2 := null;
1087: End if;
1088: If l_routing_rec.attribute3 = FND_API.G_MISS_CHAR then
1089: l_routing_rec.attribute3 := null;
1090: End if;
1091: If l_routing_rec.attribute4 = FND_API.G_MISS_CHAR then
1092: l_routing_rec.attribute4 := null;

Line 1091: If l_routing_rec.attribute4 = FND_API.G_MISS_CHAR then

1087: End if;
1088: If l_routing_rec.attribute3 = FND_API.G_MISS_CHAR then
1089: l_routing_rec.attribute3 := null;
1090: End if;
1091: If l_routing_rec.attribute4 = FND_API.G_MISS_CHAR then
1092: l_routing_rec.attribute4 := null;
1093: End if;
1094: If l_routing_rec.attribute5 = FND_API.G_MISS_CHAR then
1095: l_routing_rec.attribute5 := null;

Line 1094: If l_routing_rec.attribute5 = FND_API.G_MISS_CHAR then

1090: End if;
1091: If l_routing_rec.attribute4 = FND_API.G_MISS_CHAR then
1092: l_routing_rec.attribute4 := null;
1093: End if;
1094: If l_routing_rec.attribute5 = FND_API.G_MISS_CHAR then
1095: l_routing_rec.attribute5 := null;
1096: End if;
1097: If l_routing_rec.attribute6 = FND_API.G_MISS_CHAR then
1098: l_routing_rec.attribute6 := null;

Line 1097: If l_routing_rec.attribute6 = FND_API.G_MISS_CHAR then

1093: End if;
1094: If l_routing_rec.attribute5 = FND_API.G_MISS_CHAR then
1095: l_routing_rec.attribute5 := null;
1096: End if;
1097: If l_routing_rec.attribute6 = FND_API.G_MISS_CHAR then
1098: l_routing_rec.attribute6 := null;
1099: End if;
1100: If l_routing_rec.attribute7 = FND_API.G_MISS_CHAR then
1101: l_routing_rec.attribute7 := null;

Line 1100: If l_routing_rec.attribute7 = FND_API.G_MISS_CHAR then

1096: End if;
1097: If l_routing_rec.attribute6 = FND_API.G_MISS_CHAR then
1098: l_routing_rec.attribute6 := null;
1099: End if;
1100: If l_routing_rec.attribute7 = FND_API.G_MISS_CHAR then
1101: l_routing_rec.attribute7 := null;
1102: End if;
1103: If l_routing_rec.attribute8 = FND_API.G_MISS_CHAR then
1104: l_routing_rec.attribute8 := null;

Line 1103: If l_routing_rec.attribute8 = FND_API.G_MISS_CHAR then

1099: End if;
1100: If l_routing_rec.attribute7 = FND_API.G_MISS_CHAR then
1101: l_routing_rec.attribute7 := null;
1102: End if;
1103: If l_routing_rec.attribute8 = FND_API.G_MISS_CHAR then
1104: l_routing_rec.attribute8 := null;
1105: End if;
1106: If l_routing_rec.attribute9 = FND_API.G_MISS_CHAR then
1107: l_routing_rec.attribute9 := null;

Line 1106: If l_routing_rec.attribute9 = FND_API.G_MISS_CHAR then

1102: End if;
1103: If l_routing_rec.attribute8 = FND_API.G_MISS_CHAR then
1104: l_routing_rec.attribute8 := null;
1105: End if;
1106: If l_routing_rec.attribute9 = FND_API.G_MISS_CHAR then
1107: l_routing_rec.attribute9 := null;
1108: End if;
1109: If l_routing_rec.attribute10 = FND_API.G_MISS_CHAR then
1110: l_routing_rec.attribute10 := null;

Line 1109: If l_routing_rec.attribute10 = FND_API.G_MISS_CHAR then

1105: End if;
1106: If l_routing_rec.attribute9 = FND_API.G_MISS_CHAR then
1107: l_routing_rec.attribute9 := null;
1108: End if;
1109: If l_routing_rec.attribute10 = FND_API.G_MISS_CHAR then
1110: l_routing_rec.attribute10 := null;
1111: End if;
1112: If l_routing_rec.attribute11 = FND_API.G_MISS_CHAR then
1113: l_routing_rec.attribute11 := null;

Line 1112: If l_routing_rec.attribute11 = FND_API.G_MISS_CHAR then

1108: End if;
1109: If l_routing_rec.attribute10 = FND_API.G_MISS_CHAR then
1110: l_routing_rec.attribute10 := null;
1111: End if;
1112: If l_routing_rec.attribute11 = FND_API.G_MISS_CHAR then
1113: l_routing_rec.attribute11 := null;
1114: End if;
1115: If l_routing_rec.attribute12 = FND_API.G_MISS_CHAR then
1116: l_routing_rec.attribute12 := null;

Line 1115: If l_routing_rec.attribute12 = FND_API.G_MISS_CHAR then

1111: End if;
1112: If l_routing_rec.attribute11 = FND_API.G_MISS_CHAR then
1113: l_routing_rec.attribute11 := null;
1114: End if;
1115: If l_routing_rec.attribute12 = FND_API.G_MISS_CHAR then
1116: l_routing_rec.attribute12 := null;
1117: End if;
1118: If l_routing_rec.attribute13 = FND_API.G_MISS_CHAR then
1119: l_routing_rec.attribute13 := null;

Line 1118: If l_routing_rec.attribute13 = FND_API.G_MISS_CHAR then

1114: End if;
1115: If l_routing_rec.attribute12 = FND_API.G_MISS_CHAR then
1116: l_routing_rec.attribute12 := null;
1117: End if;
1118: If l_routing_rec.attribute13 = FND_API.G_MISS_CHAR then
1119: l_routing_rec.attribute13 := null;
1120: End if;
1121: If l_routing_rec.attribute14 = FND_API.G_MISS_CHAR then
1122: l_routing_rec.attribute14 := null;

Line 1121: If l_routing_rec.attribute14 = FND_API.G_MISS_CHAR then

1117: End if;
1118: If l_routing_rec.attribute13 = FND_API.G_MISS_CHAR then
1119: l_routing_rec.attribute13 := null;
1120: End if;
1121: If l_routing_rec.attribute14 = FND_API.G_MISS_CHAR then
1122: l_routing_rec.attribute14 := null;
1123: End if;
1124: If l_routing_rec.attribute15 = FND_API.G_MISS_CHAR then
1125: l_routing_rec.attribute15 := null;

Line 1124: If l_routing_rec.attribute15 = FND_API.G_MISS_CHAR then

1120: End if;
1121: If l_routing_rec.attribute14 = FND_API.G_MISS_CHAR then
1122: l_routing_rec.attribute14 := null;
1123: End if;
1124: If l_routing_rec.attribute15 = FND_API.G_MISS_CHAR then
1125: l_routing_rec.attribute15 := null;
1126: End if;
1127: If l_routing_rec.line_id = FND_API.G_MISS_NUM then
1128: l_routing_rec.line_id := null;

Line 1127: If l_routing_rec.line_id = FND_API.G_MISS_NUM then

1123: End if;
1124: If l_routing_rec.attribute15 = FND_API.G_MISS_CHAR then
1125: l_routing_rec.attribute15 := null;
1126: End if;
1127: If l_routing_rec.line_id = FND_API.G_MISS_NUM then
1128: l_routing_rec.line_id := null;
1129: End if;
1130: If l_routing_rec.line_code = FND_API.G_MISS_CHAR then
1131: l_routing_rec.line_code := null;

Line 1130: If l_routing_rec.line_code = FND_API.G_MISS_CHAR then

1126: End if;
1127: If l_routing_rec.line_id = FND_API.G_MISS_NUM then
1128: l_routing_rec.line_id := null;
1129: End if;
1130: If l_routing_rec.line_code = FND_API.G_MISS_CHAR then
1131: l_routing_rec.line_code := null;
1132: End if;
1133: If l_routing_rec.mixed_model_map_flag = FND_API.G_MISS_NUM then
1134: l_routing_rec.mixed_model_map_flag := g_no;

Line 1133: If l_routing_rec.mixed_model_map_flag = FND_API.G_MISS_NUM then

1129: End if;
1130: If l_routing_rec.line_code = FND_API.G_MISS_CHAR then
1131: l_routing_rec.line_code := null;
1132: End if;
1133: If l_routing_rec.mixed_model_map_flag = FND_API.G_MISS_NUM then
1134: l_routing_rec.mixed_model_map_flag := g_no;
1135: End if;
1136: If l_routing_rec.priority = FND_API.G_MISS_NUM then
1137: l_routing_rec.priority := null;

Line 1136: If l_routing_rec.priority = FND_API.G_MISS_NUM then

1132: End if;
1133: If l_routing_rec.mixed_model_map_flag = FND_API.G_MISS_NUM then
1134: l_routing_rec.mixed_model_map_flag := g_no;
1135: End if;
1136: If l_routing_rec.priority = FND_API.G_MISS_NUM then
1137: l_routing_rec.priority := null;
1138: End if;
1139: If l_routing_rec.cfm_routing_flag = FND_API.G_MISS_NUM then
1140: l_routing_rec.cfm_routing_flag := g_no;

Line 1139: If l_routing_rec.cfm_routing_flag = FND_API.G_MISS_NUM then

1135: End if;
1136: If l_routing_rec.priority = FND_API.G_MISS_NUM then
1137: l_routing_rec.priority := null;
1138: End if;
1139: If l_routing_rec.cfm_routing_flag = FND_API.G_MISS_NUM then
1140: l_routing_rec.cfm_routing_flag := g_no;
1141: End if;
1142: If l_routing_rec.total_product_cycle_time = FND_API.G_MISS_NUM then
1143: l_routing_rec.total_product_cycle_time := null;

Line 1142: If l_routing_rec.total_product_cycle_time = FND_API.G_MISS_NUM then

1138: End if;
1139: If l_routing_rec.cfm_routing_flag = FND_API.G_MISS_NUM then
1140: l_routing_rec.cfm_routing_flag := g_no;
1141: End if;
1142: If l_routing_rec.total_product_cycle_time = FND_API.G_MISS_NUM then
1143: l_routing_rec.total_product_cycle_time := null;
1144: End if;
1145: If l_routing_rec.ctp_flag = FND_API.G_MISS_NUM then
1146: l_routing_rec.ctp_flag := g_no;

Line 1145: If l_routing_rec.ctp_flag = FND_API.G_MISS_NUM then

1141: End if;
1142: If l_routing_rec.total_product_cycle_time = FND_API.G_MISS_NUM then
1143: l_routing_rec.total_product_cycle_time := null;
1144: End if;
1145: If l_routing_rec.ctp_flag = FND_API.G_MISS_NUM then
1146: l_routing_rec.ctp_flag := g_no;
1147: End if;
1148: IF l_routing_rec.pending_from_ecn = FND_API.G_MISS_CHAR THEN
1149: l_routing_rec.pending_from_ecn := NULL;

Line 1148: IF l_routing_rec.pending_from_ecn = FND_API.G_MISS_CHAR THEN

1144: End if;
1145: If l_routing_rec.ctp_flag = FND_API.G_MISS_NUM then
1146: l_routing_rec.ctp_flag := g_no;
1147: End if;
1148: IF l_routing_rec.pending_from_ecn = FND_API.G_MISS_CHAR THEN
1149: l_routing_rec.pending_from_ecn := NULL;
1150: END IF;
1151:
1152: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then

Line 1152: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then

1148: IF l_routing_rec.pending_from_ecn = FND_API.G_MISS_CHAR THEN
1149: l_routing_rec.pending_from_ecn := NULL;
1150: END IF;
1151:
1152: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then
1153: ValidateRouting(
1154: p_api_version => 1,
1155: p_init_msg_list => p_init_msg_list,
1156: p_commit => p_commit,

Line 1163: If l_return_status = FND_API.G_RET_STS_ERROR then

1159: x_msg_count => l_msg_count,
1160: x_msg_data => l_msg_data,
1161: p_routing_rec => l_routing_rec,
1162: x_routing_rec => l_routing_rec);
1163: If l_return_status = FND_API.G_RET_STS_ERROR then
1164: Raise FND_API.G_EXC_ERROR;
1165: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1166: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1167: End if; -- validation error

Line 1164: Raise FND_API.G_EXC_ERROR;

1160: x_msg_data => l_msg_data,
1161: p_routing_rec => l_routing_rec,
1162: x_routing_rec => l_routing_rec);
1163: If l_return_status = FND_API.G_RET_STS_ERROR then
1164: Raise FND_API.G_EXC_ERROR;
1165: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1166: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1167: End if; -- validation error
1168: End if; -- validate before inserting

Line 1165: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1161: p_routing_rec => l_routing_rec,
1162: x_routing_rec => l_routing_rec);
1163: If l_return_status = FND_API.G_RET_STS_ERROR then
1164: Raise FND_API.G_EXC_ERROR;
1165: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1166: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1167: End if; -- validation error
1168: End if; -- validate before inserting
1169:

Line 1166: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

1162: x_routing_rec => l_routing_rec);
1163: If l_return_status = FND_API.G_RET_STS_ERROR then
1164: Raise FND_API.G_EXC_ERROR;
1165: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1166: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1167: End if; -- validation error
1168: End if; -- validate before inserting
1169:
1170: l_UserId := nvl(Fnd_Global.USER_ID, -1);

Line 1305: IF FND_API.To_Boolean( p_commit ) THEN

1301: x_routing_rec := l_routing_rec;
1302:
1303: -- End of API body.
1304: -- Standard check of p_commit.
1305: IF FND_API.To_Boolean( p_commit ) THEN
1306: COMMIT WORK;
1307: END IF;
1308: -- Standard call to get message count and if count is 1,
1309: -- get message info.

Line 1315: WHEN FND_API.G_EXC_ERROR THEN

1311: (p_count => x_msg_count,
1312: p_data => x_msg_data
1313: );
1314: EXCEPTION
1315: WHEN FND_API.G_EXC_ERROR THEN
1316: ROLLBACK TO CreateRouting_Pvt;
1317: x_return_status := FND_API.G_RET_STS_ERROR;
1318: FND_MSG_PUB.Count_And_Get
1319: (p_count => x_msg_count,

Line 1317: x_return_status := FND_API.G_RET_STS_ERROR;

1313: );
1314: EXCEPTION
1315: WHEN FND_API.G_EXC_ERROR THEN
1316: ROLLBACK TO CreateRouting_Pvt;
1317: x_return_status := FND_API.G_RET_STS_ERROR;
1318: FND_MSG_PUB.Count_And_Get
1319: (p_count => x_msg_count,
1320: p_data => x_msg_data
1321: );

Line 1322: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1318: FND_MSG_PUB.Count_And_Get
1319: (p_count => x_msg_count,
1320: p_data => x_msg_data
1321: );
1322: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1323: ROLLBACK TO CreateRouting_Pvt;
1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: FND_MSG_PUB.Count_And_Get
1326: (p_count => x_msg_count,

Line 1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1320: p_data => x_msg_data
1321: );
1322: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1323: ROLLBACK TO CreateRouting_Pvt;
1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: FND_MSG_PUB.Count_And_Get
1326: (p_count => x_msg_count,
1327: p_data => x_msg_data
1328: );

Line 1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1327: p_data => x_msg_data
1328: );
1329: WHEN OTHERS THEN
1330: ROLLBACK TO CreateRouting_Pvt;
1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1332: IF FND_MSG_PUB.Check_Msg_Level
1333: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1334: THEN
1335: FND_MSG_PUB.Add_Exc_Msg

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

1344: END CreateRouting;
1345:
1346: PROCEDURE UpdateRouting
1347: ( p_api_version IN NUMBER,
1348: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1349: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1350: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1351: x_return_status IN OUT NOCOPY VARCHAR2,
1352: x_msg_count IN OUT NOCOPY NUMBER,

Line 1349: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1345:
1346: PROCEDURE UpdateRouting
1347: ( p_api_version IN NUMBER,
1348: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1349: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1350: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1351: x_return_status IN OUT NOCOPY VARCHAR2,
1352: x_msg_count IN OUT NOCOPY NUMBER,
1353: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 1350: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1346: PROCEDURE UpdateRouting
1347: ( p_api_version IN NUMBER,
1348: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1349: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1350: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1351: x_return_status IN OUT NOCOPY VARCHAR2,
1352: x_msg_count IN OUT NOCOPY NUMBER,
1353: x_msg_data IN OUT NOCOPY VARCHAR2,
1354: p_routing_rec IN ROUTING_REC_TYPE := G_MISS_ROUTING_REC,

Line 1386: IF NOT FND_API.Compatible_API_Call(

1382: BEGIN
1383: -- Standard Start of API savepoint
1384: SAVEPOINT UpdateRouting_Pvt;
1385: -- Standard call to check for call compatibility.
1386: IF NOT FND_API.Compatible_API_Call(
1387: l_api_version,
1388: p_api_version,
1389: l_api_name,
1390: G_PKG_NAME)

Line 1392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1388: p_api_version,
1389: l_api_name,
1390: G_PKG_NAME)
1391: THEN
1392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1393: END IF;
1394: -- Initialize message list if p_init_msg_list is set to TRUE.
1395: IF FND_API.to_Boolean(p_init_msg_list) THEN
1396: FND_MSG_PUB.initialize;

Line 1395: IF FND_API.to_Boolean(p_init_msg_list) THEN

1391: THEN
1392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1393: END IF;
1394: -- Initialize message list if p_init_msg_list is set to TRUE.
1395: IF FND_API.to_Boolean(p_init_msg_list) THEN
1396: FND_MSG_PUB.initialize;
1397: END IF;
1398: -- Initialize API return status to success
1399: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1399: x_return_status := FND_API.G_RET_STS_SUCCESS;

1395: IF FND_API.to_Boolean(p_init_msg_list) THEN
1396: FND_MSG_PUB.initialize;
1397: END IF;
1398: -- Initialize API return status to success
1399: x_return_status := FND_API.G_RET_STS_SUCCESS;
1400:
1401: -- API body
1402: l_routing_rec := p_routing_rec;
1403: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

Line 1403: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1399: x_return_status := FND_API.G_RET_STS_SUCCESS;
1400:
1401: -- API body
1402: l_routing_rec := p_routing_rec;
1403: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1404: AssignRouting(
1405: p_api_version => 1,
1406: p_init_msg_list => p_init_msg_list,
1407: p_commit => p_commit,

Line 1415: If l_return_status = FND_API.G_RET_STS_ERROR then

1411: x_msg_data => l_msg_data,
1412: p_routing_rec => l_routing_rec,
1413: x_routing_rec => l_routing_rec
1414: );
1415: If l_return_status = FND_API.G_RET_STS_ERROR then
1416: Raise FND_API.G_EXC_ERROR;
1417: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1418: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1419: End if; -- assign error

Line 1416: Raise FND_API.G_EXC_ERROR;

1412: p_routing_rec => l_routing_rec,
1413: x_routing_rec => l_routing_rec
1414: );
1415: If l_return_status = FND_API.G_RET_STS_ERROR then
1416: Raise FND_API.G_EXC_ERROR;
1417: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1418: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1419: End if; -- assign error
1420: End If; -- assign

Line 1417: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1413: x_routing_rec => l_routing_rec
1414: );
1415: If l_return_status = FND_API.G_RET_STS_ERROR then
1416: Raise FND_API.G_EXC_ERROR;
1417: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1418: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1419: End if; -- assign error
1420: End If; -- assign
1421:

Line 1418: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

1414: );
1415: If l_return_status = FND_API.G_RET_STS_ERROR then
1416: Raise FND_API.G_EXC_ERROR;
1417: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1418: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1419: End if; -- assign error
1420: End If; -- assign
1421:
1422: -- populate unspecified values

Line 1431: If l_routing_rec.routing_sequence_id = Fnd_Api.G_Miss_Num then

1427: p_assy_item_id => l_routing_rec.assembly_item_id,
1428: p_org_id => l_routing_rec.organization_id,
1429: p_alternate => l_routing_rec.alternate_routing_designator) loop
1430: l_RowFound := true; -- old routing found
1431: If l_routing_rec.routing_sequence_id = Fnd_Api.G_Miss_Num then
1432: l_routing_rec.routing_sequence_id := l_OldRtg_rec.routing_sequence_id;
1433: End if;
1434: If l_routing_rec.assembly_item_id = Fnd_Api.G_Miss_Num then
1435: l_routing_rec.assembly_item_id := l_OldRtg_rec.assembly_item_id;

Line 1434: If l_routing_rec.assembly_item_id = Fnd_Api.G_Miss_Num then

1430: l_RowFound := true; -- old routing found
1431: If l_routing_rec.routing_sequence_id = Fnd_Api.G_Miss_Num then
1432: l_routing_rec.routing_sequence_id := l_OldRtg_rec.routing_sequence_id;
1433: End if;
1434: If l_routing_rec.assembly_item_id = Fnd_Api.G_Miss_Num then
1435: l_routing_rec.assembly_item_id := l_OldRtg_rec.assembly_item_id;
1436: End if;
1437: If l_routing_rec.organization_id = Fnd_Api.G_Miss_Num then
1438: l_routing_rec.organization_id := l_OldRtg_rec.organization_id;

Line 1437: If l_routing_rec.organization_id = Fnd_Api.G_Miss_Num then

1433: End if;
1434: If l_routing_rec.assembly_item_id = Fnd_Api.G_Miss_Num then
1435: l_routing_rec.assembly_item_id := l_OldRtg_rec.assembly_item_id;
1436: End if;
1437: If l_routing_rec.organization_id = Fnd_Api.G_Miss_Num then
1438: l_routing_rec.organization_id := l_OldRtg_rec.organization_id;
1439: End if;
1440: If l_routing_rec.alternate_routing_designator = Fnd_Api.G_Miss_Char then
1441: l_routing_rec.alternate_routing_designator :=

Line 1440: If l_routing_rec.alternate_routing_designator = Fnd_Api.G_Miss_Char then

1436: End if;
1437: If l_routing_rec.organization_id = Fnd_Api.G_Miss_Num then
1438: l_routing_rec.organization_id := l_OldRtg_rec.organization_id;
1439: End if;
1440: If l_routing_rec.alternate_routing_designator = Fnd_Api.G_Miss_Char then
1441: l_routing_rec.alternate_routing_designator :=
1442: l_OldRtg_rec.alternate_routing_designator;
1443: End if;
1444:

Line 1448: If l_routing_rec.common_assembly_item_id = Fnd_Api.G_Miss_Num then

1444:
1445: -- can not update routing type
1446: l_routing_rec.routing_type := l_OldRtg_rec.routing_type;
1447:
1448: If l_routing_rec.common_assembly_item_id = Fnd_Api.G_Miss_Num then
1449: l_routing_rec.common_assembly_item_id :=
1450: l_OldRtg_rec.common_assembly_item_id;
1451: End if;
1452: If l_routing_rec.common_routing_sequence_id = Fnd_Api.G_Miss_Num then

Line 1452: If l_routing_rec.common_routing_sequence_id = Fnd_Api.G_Miss_Num then

1448: If l_routing_rec.common_assembly_item_id = Fnd_Api.G_Miss_Num then
1449: l_routing_rec.common_assembly_item_id :=
1450: l_OldRtg_rec.common_assembly_item_id;
1451: End if;
1452: If l_routing_rec.common_routing_sequence_id = Fnd_Api.G_Miss_Num then
1453: l_routing_rec.common_routing_sequence_id :=
1454: l_OldRtg_rec.common_routing_sequence_id;
1455: End if;
1456: If l_routing_rec.routing_comment = Fnd_Api.G_Miss_Char then

Line 1456: If l_routing_rec.routing_comment = Fnd_Api.G_Miss_Char then

1452: If l_routing_rec.common_routing_sequence_id = Fnd_Api.G_Miss_Num then
1453: l_routing_rec.common_routing_sequence_id :=
1454: l_OldRtg_rec.common_routing_sequence_id;
1455: End if;
1456: If l_routing_rec.routing_comment = Fnd_Api.G_Miss_Char then
1457: l_routing_rec.routing_comment := l_OldRtg_rec.routing_comment;
1458: End if;
1459: If l_routing_rec.completion_subinventory = Fnd_Api.G_Miss_Char then
1460: l_routing_rec.completion_subinventory :=

Line 1459: If l_routing_rec.completion_subinventory = Fnd_Api.G_Miss_Char then

1455: End if;
1456: If l_routing_rec.routing_comment = Fnd_Api.G_Miss_Char then
1457: l_routing_rec.routing_comment := l_OldRtg_rec.routing_comment;
1458: End if;
1459: If l_routing_rec.completion_subinventory = Fnd_Api.G_Miss_Char then
1460: l_routing_rec.completion_subinventory :=
1461: l_OldRtg_rec.completion_subinventory;
1462: End if;
1463: If l_routing_rec.completion_locator_id = Fnd_Api.G_Miss_Num then

Line 1463: If l_routing_rec.completion_locator_id = Fnd_Api.G_Miss_Num then

1459: If l_routing_rec.completion_subinventory = Fnd_Api.G_Miss_Char then
1460: l_routing_rec.completion_subinventory :=
1461: l_OldRtg_rec.completion_subinventory;
1462: End if;
1463: If l_routing_rec.completion_locator_id = Fnd_Api.G_Miss_Num then
1464: l_routing_rec.completion_locator_id :=
1465: l_OldRtg_rec.completion_locator_id;
1466: End if;
1467: If l_routing_rec.attribute_category = Fnd_Api.G_Miss_Char then

Line 1467: If l_routing_rec.attribute_category = Fnd_Api.G_Miss_Char then

1463: If l_routing_rec.completion_locator_id = Fnd_Api.G_Miss_Num then
1464: l_routing_rec.completion_locator_id :=
1465: l_OldRtg_rec.completion_locator_id;
1466: End if;
1467: If l_routing_rec.attribute_category = Fnd_Api.G_Miss_Char then
1468: l_routing_rec.attribute_category := l_OldRtg_rec.attribute_category;
1469: End if;
1470: If l_routing_rec.attribute1 = Fnd_Api.G_Miss_Char then
1471: l_routing_rec.attribute1 := l_OldRtg_rec.attribute1;

Line 1470: If l_routing_rec.attribute1 = Fnd_Api.G_Miss_Char then

1466: End if;
1467: If l_routing_rec.attribute_category = Fnd_Api.G_Miss_Char then
1468: l_routing_rec.attribute_category := l_OldRtg_rec.attribute_category;
1469: End if;
1470: If l_routing_rec.attribute1 = Fnd_Api.G_Miss_Char then
1471: l_routing_rec.attribute1 := l_OldRtg_rec.attribute1;
1472: End if;
1473: If l_routing_rec.attribute2 = Fnd_Api.G_Miss_Char then
1474: l_routing_rec.attribute2 := l_OldRtg_rec.attribute2;

Line 1473: If l_routing_rec.attribute2 = Fnd_Api.G_Miss_Char then

1469: End if;
1470: If l_routing_rec.attribute1 = Fnd_Api.G_Miss_Char then
1471: l_routing_rec.attribute1 := l_OldRtg_rec.attribute1;
1472: End if;
1473: If l_routing_rec.attribute2 = Fnd_Api.G_Miss_Char then
1474: l_routing_rec.attribute2 := l_OldRtg_rec.attribute2;
1475: End if;
1476: If l_routing_rec.attribute3 = Fnd_Api.G_Miss_Char then
1477: l_routing_rec.attribute3 := l_OldRtg_rec.attribute3;

Line 1476: If l_routing_rec.attribute3 = Fnd_Api.G_Miss_Char then

1472: End if;
1473: If l_routing_rec.attribute2 = Fnd_Api.G_Miss_Char then
1474: l_routing_rec.attribute2 := l_OldRtg_rec.attribute2;
1475: End if;
1476: If l_routing_rec.attribute3 = Fnd_Api.G_Miss_Char then
1477: l_routing_rec.attribute3 := l_OldRtg_rec.attribute3;
1478: End if;
1479: If l_routing_rec.attribute4 = Fnd_Api.G_Miss_Char then
1480: l_routing_rec.attribute4 := l_OldRtg_rec.attribute4;

Line 1479: If l_routing_rec.attribute4 = Fnd_Api.G_Miss_Char then

1475: End if;
1476: If l_routing_rec.attribute3 = Fnd_Api.G_Miss_Char then
1477: l_routing_rec.attribute3 := l_OldRtg_rec.attribute3;
1478: End if;
1479: If l_routing_rec.attribute4 = Fnd_Api.G_Miss_Char then
1480: l_routing_rec.attribute4 := l_OldRtg_rec.attribute4;
1481: End if;
1482: If l_routing_rec.attribute5 = Fnd_Api.G_Miss_Char then
1483: l_routing_rec.attribute5 := l_OldRtg_rec.attribute5;

Line 1482: If l_routing_rec.attribute5 = Fnd_Api.G_Miss_Char then

1478: End if;
1479: If l_routing_rec.attribute4 = Fnd_Api.G_Miss_Char then
1480: l_routing_rec.attribute4 := l_OldRtg_rec.attribute4;
1481: End if;
1482: If l_routing_rec.attribute5 = Fnd_Api.G_Miss_Char then
1483: l_routing_rec.attribute5 := l_OldRtg_rec.attribute5;
1484: End if;
1485: If l_routing_rec.attribute6 = Fnd_Api.G_Miss_Char then
1486: l_routing_rec.attribute6 := l_OldRtg_rec.attribute6;

Line 1485: If l_routing_rec.attribute6 = Fnd_Api.G_Miss_Char then

1481: End if;
1482: If l_routing_rec.attribute5 = Fnd_Api.G_Miss_Char then
1483: l_routing_rec.attribute5 := l_OldRtg_rec.attribute5;
1484: End if;
1485: If l_routing_rec.attribute6 = Fnd_Api.G_Miss_Char then
1486: l_routing_rec.attribute6 := l_OldRtg_rec.attribute6;
1487: End if;
1488: If l_routing_rec.attribute7 = Fnd_Api.G_Miss_Char then
1489: l_routing_rec.attribute7 := l_OldRtg_rec.attribute7;

Line 1488: If l_routing_rec.attribute7 = Fnd_Api.G_Miss_Char then

1484: End if;
1485: If l_routing_rec.attribute6 = Fnd_Api.G_Miss_Char then
1486: l_routing_rec.attribute6 := l_OldRtg_rec.attribute6;
1487: End if;
1488: If l_routing_rec.attribute7 = Fnd_Api.G_Miss_Char then
1489: l_routing_rec.attribute7 := l_OldRtg_rec.attribute7;
1490: End if;
1491: If l_routing_rec.attribute8 = Fnd_Api.G_Miss_Char then
1492: l_routing_rec.attribute8 := l_OldRtg_rec.attribute8;

Line 1491: If l_routing_rec.attribute8 = Fnd_Api.G_Miss_Char then

1487: End if;
1488: If l_routing_rec.attribute7 = Fnd_Api.G_Miss_Char then
1489: l_routing_rec.attribute7 := l_OldRtg_rec.attribute7;
1490: End if;
1491: If l_routing_rec.attribute8 = Fnd_Api.G_Miss_Char then
1492: l_routing_rec.attribute8 := l_OldRtg_rec.attribute8;
1493: End if;
1494: If l_routing_rec.attribute9 = Fnd_Api.G_Miss_Char then
1495: l_routing_rec.attribute9 := l_OldRtg_rec.attribute9;

Line 1494: If l_routing_rec.attribute9 = Fnd_Api.G_Miss_Char then

1490: End if;
1491: If l_routing_rec.attribute8 = Fnd_Api.G_Miss_Char then
1492: l_routing_rec.attribute8 := l_OldRtg_rec.attribute8;
1493: End if;
1494: If l_routing_rec.attribute9 = Fnd_Api.G_Miss_Char then
1495: l_routing_rec.attribute9 := l_OldRtg_rec.attribute9;
1496: End if;
1497: If l_routing_rec.attribute10 = Fnd_Api.G_Miss_Char then
1498: l_routing_rec.attribute10 := l_OldRtg_rec.attribute10;

Line 1497: If l_routing_rec.attribute10 = Fnd_Api.G_Miss_Char then

1493: End if;
1494: If l_routing_rec.attribute9 = Fnd_Api.G_Miss_Char then
1495: l_routing_rec.attribute9 := l_OldRtg_rec.attribute9;
1496: End if;
1497: If l_routing_rec.attribute10 = Fnd_Api.G_Miss_Char then
1498: l_routing_rec.attribute10 := l_OldRtg_rec.attribute10;
1499: End if;
1500: If l_routing_rec.attribute11 = Fnd_Api.G_Miss_Char then
1501: l_routing_rec.attribute11 := l_OldRtg_rec.attribute11;

Line 1500: If l_routing_rec.attribute11 = Fnd_Api.G_Miss_Char then

1496: End if;
1497: If l_routing_rec.attribute10 = Fnd_Api.G_Miss_Char then
1498: l_routing_rec.attribute10 := l_OldRtg_rec.attribute10;
1499: End if;
1500: If l_routing_rec.attribute11 = Fnd_Api.G_Miss_Char then
1501: l_routing_rec.attribute11 := l_OldRtg_rec.attribute11;
1502: End if;
1503: If l_routing_rec.attribute12 = Fnd_Api.G_Miss_Char then
1504: l_routing_rec.attribute12 := l_OldRtg_rec.attribute12;

Line 1503: If l_routing_rec.attribute12 = Fnd_Api.G_Miss_Char then

1499: End if;
1500: If l_routing_rec.attribute11 = Fnd_Api.G_Miss_Char then
1501: l_routing_rec.attribute11 := l_OldRtg_rec.attribute11;
1502: End if;
1503: If l_routing_rec.attribute12 = Fnd_Api.G_Miss_Char then
1504: l_routing_rec.attribute12 := l_OldRtg_rec.attribute12;
1505: End if;
1506: If l_routing_rec.attribute13 = Fnd_Api.G_Miss_Char then
1507: l_routing_rec.attribute13 := l_OldRtg_rec.attribute13;

Line 1506: If l_routing_rec.attribute13 = Fnd_Api.G_Miss_Char then

1502: End if;
1503: If l_routing_rec.attribute12 = Fnd_Api.G_Miss_Char then
1504: l_routing_rec.attribute12 := l_OldRtg_rec.attribute12;
1505: End if;
1506: If l_routing_rec.attribute13 = Fnd_Api.G_Miss_Char then
1507: l_routing_rec.attribute13 := l_OldRtg_rec.attribute13;
1508: End if;
1509: If l_routing_rec.attribute14 = Fnd_Api.G_Miss_Char then
1510: l_routing_rec.attribute14 := l_OldRtg_rec.attribute14;

Line 1509: If l_routing_rec.attribute14 = Fnd_Api.G_Miss_Char then

1505: End if;
1506: If l_routing_rec.attribute13 = Fnd_Api.G_Miss_Char then
1507: l_routing_rec.attribute13 := l_OldRtg_rec.attribute13;
1508: End if;
1509: If l_routing_rec.attribute14 = Fnd_Api.G_Miss_Char then
1510: l_routing_rec.attribute14 := l_OldRtg_rec.attribute14;
1511: End if;
1512: If l_routing_rec.attribute15 = Fnd_Api.G_Miss_Char then
1513: l_routing_rec.attribute15 := l_OldRtg_rec.attribute15;

Line 1512: If l_routing_rec.attribute15 = Fnd_Api.G_Miss_Char then

1508: End if;
1509: If l_routing_rec.attribute14 = Fnd_Api.G_Miss_Char then
1510: l_routing_rec.attribute14 := l_OldRtg_rec.attribute14;
1511: End if;
1512: If l_routing_rec.attribute15 = Fnd_Api.G_Miss_Char then
1513: l_routing_rec.attribute15 := l_OldRtg_rec.attribute15;
1514: End if;
1515: If l_routing_rec.line_id = Fnd_Api.G_Miss_Num then
1516: l_routing_rec.line_id := l_OldRtg_rec.line_id;

Line 1515: If l_routing_rec.line_id = Fnd_Api.G_Miss_Num then

1511: End if;
1512: If l_routing_rec.attribute15 = Fnd_Api.G_Miss_Char then
1513: l_routing_rec.attribute15 := l_OldRtg_rec.attribute15;
1514: End if;
1515: If l_routing_rec.line_id = Fnd_Api.G_Miss_Num then
1516: l_routing_rec.line_id := l_OldRtg_rec.line_id;
1517: End if;
1518:
1519: -- CFM flag is not updatable

Line 1522: If l_routing_rec.mixed_model_map_flag = Fnd_Api.G_Miss_Num then

1518:
1519: -- CFM flag is not updatable
1520: l_routing_rec.cfm_routing_flag := l_OldRtg_rec.cfm_routing_flag;
1521:
1522: If l_routing_rec.mixed_model_map_flag = Fnd_Api.G_Miss_Num then
1523: l_routing_rec.mixed_model_map_flag :=
1524: l_OldRtg_rec.mixed_model_map_flag;
1525: End if;
1526: If l_routing_rec.priority = Fnd_Api.G_Miss_Num then

Line 1526: If l_routing_rec.priority = Fnd_Api.G_Miss_Num then

1522: If l_routing_rec.mixed_model_map_flag = Fnd_Api.G_Miss_Num then
1523: l_routing_rec.mixed_model_map_flag :=
1524: l_OldRtg_rec.mixed_model_map_flag;
1525: End if;
1526: If l_routing_rec.priority = Fnd_Api.G_Miss_Num then
1527: l_routing_rec.priority := l_OldRtg_rec.priority;
1528: End if;
1529: If l_routing_rec.ctp_flag = Fnd_Api.G_Miss_Num then
1530: l_routing_rec.ctp_flag := l_OldRtg_rec.ctp_flag;

Line 1529: If l_routing_rec.ctp_flag = Fnd_Api.G_Miss_Num then

1525: End if;
1526: If l_routing_rec.priority = Fnd_Api.G_Miss_Num then
1527: l_routing_rec.priority := l_OldRtg_rec.priority;
1528: End if;
1529: If l_routing_rec.ctp_flag = Fnd_Api.G_Miss_Num then
1530: l_routing_rec.ctp_flag := l_OldRtg_rec.ctp_flag;
1531: End if;
1532: If l_routing_rec.total_product_cycle_time = Fnd_Api.G_Miss_Num then
1533: l_routing_rec.total_product_cycle_time :=

Line 1532: If l_routing_rec.total_product_cycle_time = Fnd_Api.G_Miss_Num then

1528: End if;
1529: If l_routing_rec.ctp_flag = Fnd_Api.G_Miss_Num then
1530: l_routing_rec.ctp_flag := l_OldRtg_rec.ctp_flag;
1531: End if;
1532: If l_routing_rec.total_product_cycle_time = Fnd_Api.G_Miss_Num then
1533: l_routing_rec.total_product_cycle_time :=
1534: l_OldRtg_rec.total_product_cycle_time;
1535: End if;
1536: End loop; -- get old values

Line 1541: Raise FND_API.G_EXC_ERROR;

1537:
1538: If not l_RowFound then -- old routing not found
1539: Fnd_Message.Set_Name('BOM', 'BOM_ROUTING_MISSING');
1540: FND_MSG_PUB.Add;
1541: Raise FND_API.G_EXC_ERROR;
1542: End if; -- missing routing
1543:
1544: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then
1545: ValidateRouting(

Line 1544: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then

1540: FND_MSG_PUB.Add;
1541: Raise FND_API.G_EXC_ERROR;
1542: End if; -- missing routing
1543:
1544: If p_validation_level > FND_API.G_VALID_LEVEL_NONE then
1545: ValidateRouting(
1546: p_api_version => 1,
1547: p_init_msg_list => p_init_msg_list,
1548: p_commit => p_commit,

Line 1549: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

1545: ValidateRouting(
1546: p_api_version => 1,
1547: p_init_msg_list => p_init_msg_list,
1548: p_commit => p_commit,
1549: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1550: x_return_status => l_return_status,
1551: x_msg_count => l_msg_count,
1552: x_msg_data => l_msg_data,
1553: p_routing_rec => l_routing_rec,

Line 1556: If l_return_status = FND_API.G_RET_STS_ERROR then

1552: x_msg_data => l_msg_data,
1553: p_routing_rec => l_routing_rec,
1554: x_routing_rec => l_routing_rec
1555: );
1556: If l_return_status = FND_API.G_RET_STS_ERROR then
1557: Raise FND_API.G_EXC_ERROR;
1558: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1559: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1560: End if; -- validation error

Line 1557: Raise FND_API.G_EXC_ERROR;

1553: p_routing_rec => l_routing_rec,
1554: x_routing_rec => l_routing_rec
1555: );
1556: If l_return_status = FND_API.G_RET_STS_ERROR then
1557: Raise FND_API.G_EXC_ERROR;
1558: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1559: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1560: End if; -- validation error
1561: End If; -- validation

Line 1558: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1554: x_routing_rec => l_routing_rec
1555: );
1556: If l_return_status = FND_API.G_RET_STS_ERROR then
1557: Raise FND_API.G_EXC_ERROR;
1558: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1559: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1560: End if; -- validation error
1561: End If; -- validation
1562:

Line 1559: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

1555: );
1556: If l_return_status = FND_API.G_RET_STS_ERROR then
1557: Raise FND_API.G_EXC_ERROR;
1558: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1559: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1560: End if; -- validation error
1561: End If; -- validation
1562:
1563: -- update routing

Line 1624: IF FND_API.To_Boolean(p_commit) THEN

1620: x_routing_rec := l_routing_rec;
1621: -- End of API body.
1622:
1623: -- Standard check of p_commit.
1624: IF FND_API.To_Boolean(p_commit) THEN
1625: COMMIT WORK;
1626: END IF;
1627: -- Standard call to get message count and if count is 1, get message info.
1628: FND_MSG_PUB.Count_And_Get(

Line 1632: WHEN FND_API.G_EXC_ERROR THEN

1628: FND_MSG_PUB.Count_And_Get(
1629: p_count => x_msg_count,
1630: p_data => x_msg_data);
1631: EXCEPTION
1632: WHEN FND_API.G_EXC_ERROR THEN
1633: ROLLBACK TO UpdateRouting_Pvt;
1634: x_return_status := FND_API.G_RET_STS_ERROR;
1635: FND_MSG_PUB.Count_And_Get(
1636: p_count => x_msg_count,

Line 1634: x_return_status := FND_API.G_RET_STS_ERROR;

1630: p_data => x_msg_data);
1631: EXCEPTION
1632: WHEN FND_API.G_EXC_ERROR THEN
1633: ROLLBACK TO UpdateRouting_Pvt;
1634: x_return_status := FND_API.G_RET_STS_ERROR;
1635: FND_MSG_PUB.Count_And_Get(
1636: p_count => x_msg_count,
1637: p_data => x_msg_data);
1638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1634: x_return_status := FND_API.G_RET_STS_ERROR;
1635: FND_MSG_PUB.Count_And_Get(
1636: p_count => x_msg_count,
1637: p_data => x_msg_data);
1638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1639: ROLLBACK TO UpdateRouting_Pvt;
1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1641: FND_MSG_PUB.Count_And_Get(
1642: p_count => x_msg_count,

Line 1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1636: p_count => x_msg_count,
1637: p_data => x_msg_data);
1638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1639: ROLLBACK TO UpdateRouting_Pvt;
1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1641: FND_MSG_PUB.Count_And_Get(
1642: p_count => x_msg_count,
1643: p_data => x_msg_data);
1644: WHEN OTHERS THEN

Line 1646: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1642: p_count => x_msg_count,
1643: p_data => x_msg_data);
1644: WHEN OTHERS THEN
1645: ROLLBACK TO UpdateRouting_Pvt;
1646: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1647: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1648: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1649: END IF;
1650: FND_MSG_PUB.Count_And_Get(

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

1652: p_data => x_msg_data);
1653: End UpdateRouting;
1654: PROCEDURE DeleteRouting
1655: ( p_api_version IN NUMBER,
1656: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1657: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1658: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1659: x_return_status IN OUT NOCOPY VARCHAR2,
1660: x_msg_count IN OUT NOCOPY NUMBER,

Line 1657: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1653: End UpdateRouting;
1654: PROCEDURE DeleteRouting
1655: ( p_api_version IN NUMBER,
1656: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1657: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1658: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1659: x_return_status IN OUT NOCOPY VARCHAR2,
1660: x_msg_count IN OUT NOCOPY NUMBER,
1661: x_msg_data IN OUT NOCOPY VARCHAR2,

Line 1658: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1654: PROCEDURE DeleteRouting
1655: ( p_api_version IN NUMBER,
1656: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1657: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1658: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1659: x_return_status IN OUT NOCOPY VARCHAR2,
1660: x_msg_count IN OUT NOCOPY NUMBER,
1661: x_msg_data IN OUT NOCOPY VARCHAR2,
1662: p_delete_group IN VARCHAR2,

Line 1703: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

1699: BEGIN
1700: -- Standard Start of API savepoint
1701: SAVEPOINT DeleteRouting_Pvt;
1702: -- Standard call to check for call compatibility.
1703: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1704: G_PKG_NAME) THEN
1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1706: END IF;
1707: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1701: SAVEPOINT DeleteRouting_Pvt;
1702: -- Standard call to check for call compatibility.
1703: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1704: G_PKG_NAME) THEN
1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1706: END IF;
1707: -- Initialize message list if p_init_msg_list is set to TRUE.
1708: IF FND_API.to_Boolean(p_init_msg_list) THEN
1709: FND_MSG_PUB.initialize;

Line 1708: IF FND_API.to_Boolean(p_init_msg_list) THEN

1704: G_PKG_NAME) THEN
1705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1706: END IF;
1707: -- Initialize message list if p_init_msg_list is set to TRUE.
1708: IF FND_API.to_Boolean(p_init_msg_list) THEN
1709: FND_MSG_PUB.initialize;
1710: END IF;
1711: -- Initialize API return status to success
1712: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1712: x_return_status := FND_API.G_RET_STS_SUCCESS;

1708: IF FND_API.to_Boolean(p_init_msg_list) THEN
1709: FND_MSG_PUB.initialize;
1710: END IF;
1711: -- Initialize API return status to success
1712: x_return_status := FND_API.G_RET_STS_SUCCESS;
1713:
1714: -- API body
1715: l_routing_rec := p_routing_rec;
1716: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

Line 1716: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1712: x_return_status := FND_API.G_RET_STS_SUCCESS;
1713:
1714: -- API body
1715: l_routing_rec := p_routing_rec;
1716: If p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1717: AssignRouting(
1718: p_api_version => 1,
1719: p_init_msg_list => p_init_msg_list,
1720: p_commit => p_commit,

Line 1728: If l_return_status = FND_API.G_RET_STS_ERROR then

1724: x_msg_data => l_msg_data,
1725: p_routing_rec => l_routing_rec,
1726: x_routing_rec => l_routing_rec
1727: );
1728: If l_return_status = FND_API.G_RET_STS_ERROR then
1729: Raise FND_API.G_EXC_ERROR;
1730: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1731: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: End if; -- assign error

Line 1729: Raise FND_API.G_EXC_ERROR;

1725: p_routing_rec => l_routing_rec,
1726: x_routing_rec => l_routing_rec
1727: );
1728: If l_return_status = FND_API.G_RET_STS_ERROR then
1729: Raise FND_API.G_EXC_ERROR;
1730: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1731: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: End if; -- assign error
1733: End If; -- assign

Line 1730: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1726: x_routing_rec => l_routing_rec
1727: );
1728: If l_return_status = FND_API.G_RET_STS_ERROR then
1729: Raise FND_API.G_EXC_ERROR;
1730: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1731: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: End if; -- assign error
1733: End If; -- assign
1734:

Line 1731: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

1727: );
1728: If l_return_status = FND_API.G_RET_STS_ERROR then
1729: Raise FND_API.G_EXC_ERROR;
1730: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1731: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1732: End if; -- assign error
1733: End If; -- assign
1734:
1735: l_DeleteGrpSeqId := null;

Line 1771: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

1767: p_pkg_name => 'MODAL_DELETE',
1768: p_procedure_name => 'DELETE_MANAGER_OI',
1769: p_error_text => l_msg_data
1770: );
1771: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1772: End if; -- SQL error in modal delete
1773: End loop; -- Add to delete group
1774:
1775: If not l_RowFound then -- old routing not found

Line 1778: Raise FND_API.G_EXC_ERROR;

1774:
1775: If not l_RowFound then -- old routing not found
1776: Fnd_Message.Set_Name('BOM', 'BOM_ROUTING_MISSING');
1777: FND_MSG_PUB.Add;
1778: Raise FND_API.G_EXC_ERROR;
1779: End if; -- missing routing
1780:
1781: x_routing_rec := l_routing_rec;
1782: -- End of API body.

Line 1785: IF FND_API.To_Boolean(p_commit) THEN

1781: x_routing_rec := l_routing_rec;
1782: -- End of API body.
1783:
1784: -- Standard check of p_commit.
1785: IF FND_API.To_Boolean(p_commit) THEN
1786: COMMIT WORK;
1787: END IF;
1788: -- Standard call to get message count and if count is 1, get message info.
1789: FND_MSG_PUB.Count_And_Get(

Line 1794: WHEN FND_API.G_EXC_ERROR THEN

1790: p_count => x_msg_count,
1791: p_data => x_msg_data
1792: );
1793: EXCEPTION
1794: WHEN FND_API.G_EXC_ERROR THEN
1795: ROLLBACK TO DeleteRouting_Pvt;
1796: x_return_status := FND_API.G_RET_STS_ERROR;
1797: FND_MSG_PUB.Count_And_Get(
1798: p_count => x_msg_count,

Line 1796: x_return_status := FND_API.G_RET_STS_ERROR;

1792: );
1793: EXCEPTION
1794: WHEN FND_API.G_EXC_ERROR THEN
1795: ROLLBACK TO DeleteRouting_Pvt;
1796: x_return_status := FND_API.G_RET_STS_ERROR;
1797: FND_MSG_PUB.Count_And_Get(
1798: p_count => x_msg_count,
1799: p_data => x_msg_data
1800: );

Line 1801: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1797: FND_MSG_PUB.Count_And_Get(
1798: p_count => x_msg_count,
1799: p_data => x_msg_data
1800: );
1801: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1802: ROLLBACK TO DeleteRouting_Pvt;
1803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1804: FND_MSG_PUB.Count_And_Get(
1805: p_count => x_msg_count,

Line 1803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1799: p_data => x_msg_data
1800: );
1801: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1802: ROLLBACK TO DeleteRouting_Pvt;
1803: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1804: FND_MSG_PUB.Count_And_Get(
1805: p_count => x_msg_count,
1806: p_data => x_msg_data
1807: );

Line 1810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1806: p_data => x_msg_data
1807: );
1808: WHEN OTHERS THEN
1809: ROLLBACK TO DeleteRouting_Pvt;
1810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1811: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1812: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1813: END IF;
1814: FND_MSG_PUB.Count_And_Get(

Line 1846: IF NOT fnd_api.compatible_api_call(l_api_version,

1842: x_routing_rec bom_routingheader_pvt.routing_rec_type;
1843: BEGIN
1844: SAVEPOINT createrouting_pvt;
1845: -- Standard call to check for call compatibility.
1846: IF NOT fnd_api.compatible_api_call(l_api_version,
1847: p_api_version,
1848: l_api_name,
1849: G_PKG_NAME)
1850: THEN

Line 1851: RAISE fnd_api.g_exc_unexpected_error;

1847: p_api_version,
1848: l_api_name,
1849: G_PKG_NAME)
1850: THEN
1851: RAISE fnd_api.g_exc_unexpected_error;
1852: END IF;
1853: -- Initialize API return status to success
1854: x_return_status := fnd_api.g_ret_sts_success;
1855: l_routing_rec.assembly_item_id := p_assembly_item_id;

Line 1854: x_return_status := fnd_api.g_ret_sts_success;

1850: THEN
1851: RAISE fnd_api.g_exc_unexpected_error;
1852: END IF;
1853: -- Initialize API return status to success
1854: x_return_status := fnd_api.g_ret_sts_success;
1855: l_routing_rec.assembly_item_id := p_assembly_item_id;
1856: l_routing_rec.routing_sequence_id := NULL; -- Create will not have the sequence id
1857: l_routing_rec.organization_id := p_organization_id;
1858: l_routing_rec.alternate_routing_designator := p_alt_rtg_desig;

Line 1867: p_init_msg_list => fnd_api.G_TRUE,

1863: l_routing_rec.pending_from_ecn := p_change_notice;
1864:
1865: CreateRouting (
1866: p_api_version => p_api_version,
1867: p_init_msg_list => fnd_api.G_TRUE,
1868: p_commit => fnd_api.G_FALSE,
1869: p_validation_level => fnd_api.G_VALID_LEVEL_FULL,
1870: x_return_status => x_return_status,
1871: x_msg_count => x_msg_count,

Line 1868: p_commit => fnd_api.G_FALSE,

1864:
1865: CreateRouting (
1866: p_api_version => p_api_version,
1867: p_init_msg_list => fnd_api.G_TRUE,
1868: p_commit => fnd_api.G_FALSE,
1869: p_validation_level => fnd_api.G_VALID_LEVEL_FULL,
1870: x_return_status => x_return_status,
1871: x_msg_count => x_msg_count,
1872: x_msg_data => x_msg_data,

Line 1869: p_validation_level => fnd_api.G_VALID_LEVEL_FULL,

1865: CreateRouting (
1866: p_api_version => p_api_version,
1867: p_init_msg_list => fnd_api.G_TRUE,
1868: p_commit => fnd_api.G_FALSE,
1869: p_validation_level => fnd_api.G_VALID_LEVEL_FULL,
1870: x_return_status => x_return_status,
1871: x_msg_count => x_msg_count,
1872: x_msg_data => x_msg_data,
1873: p_routing_rec => l_routing_rec,

Line 1877: IF ( x_return_status = fnd_api.g_ret_sts_success ) THEN

1873: p_routing_rec => l_routing_rec,
1874: x_routing_rec => x_routing_rec
1875: );
1876:
1877: IF ( x_return_status = fnd_api.g_ret_sts_success ) THEN
1878: x_rtg_seq_id := x_routing_rec.routing_sequence_id;
1879: ELSE
1880: INSERT INTO mtl_interface_errors
1881: (unique_id,