DBA Data[Home] [Help]

APPS.WIP_TRANSACTION_PVT dependencies on FND_API

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

10: PROCEDURE Process_OSP_Transaction
11: ( p_OSP_rec IN WIP_Transaction_PUB.Res_Rec_Type
12: , p_validation_level IN NUMBER DEFAULT COMPLETE
13: , p_return_status OUT NOCOPY VARCHAR2
14: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
15: , p_msg_count OUT NOCOPY NUMBER
16: , p_msg_data OUT NOCOPY VARCHAR2
17: )
18: IS

Line 63: IF FND_API.to_Boolean( p_init_msg_list ) THEN

59: p_params => l_params,
60: x_returnStatus => l_return_status);
61: END IF;
62: -- Initialize message list if p_init_msg_list is set to TRUE.
63: IF FND_API.to_Boolean( p_init_msg_list ) THEN
64: FND_MSG_PUB.initialize;
65: END IF;
66:
67: -- Initialize API return status to success

Line 68: p_return_status := FND_API.G_RET_STS_SUCCESS;

64: FND_MSG_PUB.initialize;
65: END IF;
66:
67: -- Initialize API return status to success
68: p_return_status := FND_API.G_RET_STS_SUCCESS;
69: l_OSP_rec := p_OSP_rec;
70: l_process_phase := '2';
71: -- Check for direct items
72: CST_eamCost_PUB.check_if_direct_item (

Line 81: if (p_return_status <> fnd_api.g_ret_sts_success) then

77: x_return_status => p_return_status,
78: x_msg_count => p_msg_count,
79: x_msg_data => p_msg_data);
80:
81: if (p_return_status <> fnd_api.g_ret_sts_success) then
82: Raise fnd_api.g_exc_unexpected_error ;
83: end if;
84:
85: if (l_direct_item_flag = 1) then

Line 82: Raise fnd_api.g_exc_unexpected_error ;

78: x_msg_count => p_msg_count,
79: x_msg_data => p_msg_data);
80:
81: if (p_return_status <> fnd_api.g_ret_sts_success) then
82: Raise fnd_api.g_exc_unexpected_error ;
83: end if;
84:
85: if (l_direct_item_flag = 1) then
86: l_process_phase := '3';

Line 96: if (p_return_status <> fnd_api.g_ret_sts_success) then

92: x_return_status => p_return_status,
93: x_msg_count => p_msg_count,
94: x_msg_data => p_msg_data);
95:
96: if (p_return_status <> fnd_api.g_ret_sts_success) then
97: Raise fnd_api.g_exc_unexpected_error ;
98: end if;
99: else
100: l_process_phase := '4';

Line 97: Raise fnd_api.g_exc_unexpected_error ;

93: x_msg_count => p_msg_count,
94: x_msg_data => p_msg_data);
95:
96: if (p_return_status <> fnd_api.g_ret_sts_success) then
97: Raise fnd_api.g_exc_unexpected_error ;
98: end if;
99: else
100: l_process_phase := '4';
101: --Default the OSP Record

Line 133: if ( p_return_status <> fnd_api.g_ret_sts_success ) then

129: || p_return_status,
130: x_returnStatus => l_return_status);
131: end if;
132:
133: if ( p_return_status <> fnd_api.g_ret_sts_success ) then
134: raise fnd_api.g_exc_unexpected_error;
135: end if;
136:
137: l_OSP_rec.encumbrance_type_id := l_encumbrance_type_id;

Line 134: raise fnd_api.g_exc_unexpected_error;

130: x_returnStatus => l_return_status);
131: end if;
132:
133: if ( p_return_status <> fnd_api.g_ret_sts_success ) then
134: raise fnd_api.g_exc_unexpected_error;
135: end if;
136:
137: l_OSP_rec.encumbrance_type_id := l_encumbrance_type_id;
138: l_OSP_rec.encumbrance_amount := l_encumbrance_amount;

Line 154: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

150: ,p_validation_level => p_validation_level
151: ,p_old_Res_rec => l_old_OSP_rec);
152:
153: l_process_phase := '7';
154: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
155: WIP_Validate_Res.Entity(
156: x_return_status => l_return_status
157: ,p_Res_rec => l_OSP_rec
158: ,p_validation_level => p_validation_level

Line 163: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

159: ,p_old_Res_rec => l_old_OSP_rec);
160: end if;
161:
162: --Bug 7409477(FP 6991030): Resource to be charged must be an OSP resource
163: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
164: if (l_OSP_rec.autocharge_type IS NOT NULL AND
165: l_OSP_rec.autocharge_type <> WIP_CONSTANTS.PO_MOVE AND
166: l_OSP_rec.autocharge_type <> WIP_CONSTANTS.PO_RECEIPT)
167: then

Line 168: l_return_status := FND_API.G_RET_STS_ERROR;

164: if (l_OSP_rec.autocharge_type IS NOT NULL AND
165: l_OSP_rec.autocharge_type <> WIP_CONSTANTS.PO_MOVE AND
166: l_OSP_rec.autocharge_type <> WIP_CONSTANTS.PO_RECEIPT)
167: then
168: l_return_status := FND_API.G_RET_STS_ERROR;
169: WIP_Globals.Add_Error_Message
170: (p_message_name => 'WIP_INVALID_OSP_RESOURCE');
171: end if;
172: end if;

Line 176: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

172: end if;
173:
174: l_process_phase := '8';
175: --Create the OSP record (resource transaction)
176: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
177: WIP_Res_Util.Insert_Row(p_Res_rec => l_OSP_rec);
178: end if;
179: l_process_phase := '9';
180: if (l_direct_item_flag <> 1) then

Line 183: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

179: l_process_phase := '9';
180: if (l_direct_item_flag <> 1) then
181: --Perform the Move transaction if the autocharge is PO Move
182: -- do not do this if direct item
183: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
184: IF l_OSP_rec.autocharge_type = WIP_CONSTANTS.PO_MOVE THEN
185: l_process_phase := '10';
186: --Default the ShopFloorMove record
187: WIP_Default_ShopFloorMove.Attributes(

Line 202: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

198: p_ShopFloorMove_rec => l_ShopFloorMove_rec,
199: p_validation_level => p_validation_level
200: ,p_old_ShopFloorMove_rec => l_old_ShopFloorMove_rec);
201: l_process_phase := '13';
202: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
203: l_process_phase := '14';
204: WIP_Validate_ShopFloorMove.Entity(
205: x_return_status => l_return_status,
206: p_ShopFloorMove_rec => l_ShopFloorMove_rec,

Line 212: if (l_return_status <> FND_API.G_RET_STS_ERROR) then

208: ,p_old_ShopFloorMove_rec => l_old_ShopFloorMove_rec);
209: end if;
210: l_process_phase := '15';
211: --Create the ShopFloorMove record
212: if (l_return_status <> FND_API.G_RET_STS_ERROR) then
213: WIP_ShopFloorMove_Util.Insert_Row(
214: p_ShopFloorMove_rec => l_ShopFloorMove_rec);
215: end if;
216: l_process_phase := '16';

Line 222: ( p_encoded => FND_API.G_FALSE ,

218: END IF;
219: END IF; -- end of check for direct items
220:
221: FND_MSG_PUB.Count_And_Get
222: ( p_encoded => FND_API.G_FALSE ,
223: p_count => p_msg_count ,
224: p_data => p_msg_data
225: );
226: p_return_status := l_return_status;

Line 236: WHEN FND_API.G_EXC_ERROR THEN

232: x_returnStatus => l_return_status);
233: END IF;
234: EXCEPTION
235:
236: WHEN FND_API.G_EXC_ERROR THEN
237: l_OSP_rec.return_status := FND_API.G_RET_STS_ERROR;
238:
239: p_return_status := l_OSP_rec.return_status ;
240:

Line 237: l_OSP_rec.return_status := FND_API.G_RET_STS_ERROR;

233: END IF;
234: EXCEPTION
235:
236: WHEN FND_API.G_EXC_ERROR THEN
237: l_OSP_rec.return_status := FND_API.G_RET_STS_ERROR;
238:
239: p_return_status := l_OSP_rec.return_status ;
240:
241: FND_MSG_PUB.Count_And_Get

Line 254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

250: p_procReturnStatus => p_return_status,
251: p_msg => l_error_msg,
252: x_returnStatus => l_return_status);
253: END IF;
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255:
256: l_OSP_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
257: p_return_status := l_OSP_rec.return_status ;
258:

Line 256: l_OSP_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

252: x_returnStatus => l_return_status);
253: END IF;
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255:
256: l_OSP_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
257: p_return_status := l_OSP_rec.return_status ;
258:
259: FND_MSG_PUB.Count_And_Get
260: ( p_count => p_msg_count

Line 275: l_OSP_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

271: END IF;
272:
273: WHEN OTHERS THEN
274:
275: l_OSP_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276:
277: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
278: THEN
279: FND_MSG_PUB.Add_Exc_Msg

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

316: -- End of Comments
317:
318: PROCEDURE Get_Transaction
319: ( p_api_version_number IN NUMBER
320: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
321: , x_return_status OUT NOCOPY VARCHAR2
322: , x_msg_count OUT NOCOPY NUMBER
323: , x_msg_data OUT NOCOPY VARCHAR2
324: , p_dummy IN VARCHAR2

Line 341: IF NOT FND_API.Compatible_API_Call

337: BEGIN
338:
339: -- Standard call to check for call compatibility
340:
341: IF NOT FND_API.Compatible_API_Call
342: ( l_api_version_number
343: , p_api_version_number
344: , l_api_name
345: , G_PKG_NAME

Line 353: IF FND_API.to_Boolean(p_init_msg_list) THEN

349: END IF;
350:
351: -- Initialize message list.
352:
353: IF FND_API.to_Boolean(p_init_msg_list) THEN
354: FND_MSG_PUB.initialize;
355: END IF;
356:
357: -- Get WIPTransaction ( parent = WIPTransaction )

Line 404: x_return_status := FND_API.G_RET_STS_SUCCESS;

400: x_ShopFloorMove_tbl := l_x_ShopFloorMove_tbl;
401:
402: -- Set return status
403:
404: x_return_status := FND_API.G_RET_STS_SUCCESS;
405:
406: -- Get message count and data
407:
408: FND_MSG_PUB.Count_And_Get

Line 416: WHEN FND_API.G_EXC_ERROR THEN

412:
413:
414: EXCEPTION
415:
416: WHEN FND_API.G_EXC_ERROR THEN
417:
418: x_return_status := FND_API.G_RET_STS_ERROR;
419:
420: -- Get message count and data

Line 418: x_return_status := FND_API.G_RET_STS_ERROR;

414: EXCEPTION
415:
416: WHEN FND_API.G_EXC_ERROR THEN
417:
418: x_return_status := FND_API.G_RET_STS_ERROR;
419:
420: -- Get message count and data
421:
422: FND_MSG_PUB.Count_And_Get

Line 427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

423: ( p_count => x_msg_count
424: , p_data => x_msg_data
425: );
426:
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428:
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
430:
431: -- Get message count and data

Line 429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

425: );
426:
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428:
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
430:
431: -- Get message count and data
432:
433: FND_MSG_PUB.Count_And_Get

Line 440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

436: );
437:
438: WHEN OTHERS THEN
439:
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
441:
442: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
443: THEN
444: FND_MSG_PUB.Add_Exc_Msg

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

464: PROCEDURE Process_Resource_Transaction
465: ( p_res_txn_rec IN WIP_Transaction_PUB.Res_Rec_Type
466: , p_validation_level IN NUMBER DEFAULT COMPLETE
467: , p_return_status OUT NOCOPY VARCHAR2
468: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
469: , p_msg_count OUT NOCOPY NUMBER
470: , p_msg_data OUT NOCOPY VARCHAR2
471: )
472: IS

Line 501: IF FND_API.to_Boolean( p_init_msg_list ) THEN

497: p_params => l_params,
498: x_returnStatus => l_return_status);
499: END IF;
500: -- Initialize message list if p_init_msg_list is set to TRUE.
501: IF FND_API.to_Boolean( p_init_msg_list ) THEN
502: FND_MSG_PUB.initialize;
503: END IF;
504:
505: -- Initialize API return status to success

Line 506: l_return_status := FND_API.G_RET_STS_SUCCESS;

502: FND_MSG_PUB.initialize;
503: END IF;
504:
505: -- Initialize API return status to success
506: l_return_status := FND_API.G_RET_STS_SUCCESS;
507:
508: l_res_txn_rec := p_res_txn_rec;
509: l_process_phase := '2';
510: --Default the Resource Record

Line 542: ( p_encoded => FND_API.G_FALSE ,

538: --Create the Resource record (resource transaction)
539: WIP_Res_Util.Insert_Row(p_Res_rec => l_res_txn_rec);
540: l_process_phase := '8';
541: FND_MSG_PUB.Count_And_Get
542: ( p_encoded => FND_API.G_FALSE ,
543: p_count => p_msg_count ,
544: p_data => p_msg_data
545: );
546:

Line 557: WHEN FND_API.G_EXC_ERROR THEN

553: x_returnStatus => l_return_status);
554: END IF;
555: EXCEPTION
556:
557: WHEN FND_API.G_EXC_ERROR THEN
558: l_res_txn_rec.return_status := FND_API.G_RET_STS_ERROR;
559: l_error_msg := 'process_phase = ' || l_process_phase || ';';
560: IF (l_log_level <= wip_constants.trace_logging) THEN
561: wip_logger.exitPoint(

Line 558: l_res_txn_rec.return_status := FND_API.G_RET_STS_ERROR;

554: END IF;
555: EXCEPTION
556:
557: WHEN FND_API.G_EXC_ERROR THEN
558: l_res_txn_rec.return_status := FND_API.G_RET_STS_ERROR;
559: l_error_msg := 'process_phase = ' || l_process_phase || ';';
560: IF (l_log_level <= wip_constants.trace_logging) THEN
561: wip_logger.exitPoint(
562: p_procName => 'WIP_Transaction_PVT.Process_Resource_Transaction',

Line 567: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

563: p_procReturnStatus => p_return_status,
564: p_msg => l_error_msg,
565: x_returnStatus => l_return_status);
566: END IF;
567: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
568: l_res_txn_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
569: l_error_msg := 'process_phase = ' || l_process_phase || ';';
570: IF (l_log_level <= wip_constants.trace_logging) THEN
571: wip_logger.exitPoint(

Line 568: l_res_txn_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

564: p_msg => l_error_msg,
565: x_returnStatus => l_return_status);
566: END IF;
567: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
568: l_res_txn_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
569: l_error_msg := 'process_phase = ' || l_process_phase || ';';
570: IF (l_log_level <= wip_constants.trace_logging) THEN
571: wip_logger.exitPoint(
572: p_procName => 'WIP_Transaction_PVT.Process_Resource_Transaction',

Line 578: l_res_txn_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;

574: p_msg => l_error_msg,
575: x_returnStatus => l_return_status);
576: END IF;
577: WHEN OTHERS THEN
578: l_res_txn_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
579:
580: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
581: THEN
582: FND_MSG_PUB.Add_Exc_Msg