DBA Data[Home] [Help]

APPS.INV_KANBAN_PVT dependencies on INV_KANBAN_PVT

Line 1: PACKAGE BODY INV_Kanban_PVT as

1: PACKAGE BODY INV_Kanban_PVT as
2: /* $Header: INVVKBNB.pls 120.27.12020000.2 2012/06/27 14:23:26 akuppa ship $ */
3:
4: -- Global constant holding the package name
5:

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_KANBAN_PVT';

2: /* $Header: INVVKBNB.pls 120.27.12020000.2 2012/06/27 14:23:26 akuppa ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_KANBAN_PVT';
7: TYPE Kanban_Card_Tbl_Type IS TABLE OF INV_Kanban_PVT.Kanban_Card_Rec_Type
8: INDEX BY BINARY_INTEGER;
9:
10:

Line 7: TYPE Kanban_Card_Tbl_Type IS TABLE OF INV_Kanban_PVT.Kanban_Card_Rec_Type

3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_KANBAN_PVT';
7: TYPE Kanban_Card_Tbl_Type IS TABLE OF INV_Kanban_PVT.Kanban_Card_Rec_Type
8: INDEX BY BINARY_INTEGER;
9:
10:
11: PROCEDURE mydebug(msg IN VARCHAR2) IS

Line 13: inv_log_util.trace(msg, 'INV_KANBAN_PVT', 9);

9:
10:
11: PROCEDURE mydebug(msg IN VARCHAR2) IS
12: BEGIN
13: inv_log_util.trace(msg, 'INV_KANBAN_PVT', 9);
14: END mydebug;
15:
16:
17: --

Line 49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;

45:
46: X_Ret_Success := FND_API.G_RET_STS_SUCCESS;
47: X_Ret_Error := FND_API.G_RET_STS_ERROR;
48: X_Ret_Unexp_Error := FND_API.G_RET_STS_UNEXP_ERROR;
49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;
50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;

Line 50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;

46: X_Ret_Success := FND_API.G_RET_STS_SUCCESS;
47: X_Ret_Error := FND_API.G_RET_STS_ERROR;
48: X_Ret_Unexp_Error := FND_API.G_RET_STS_UNEXP_ERROR;
49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;
50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;

Line 51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;

47: X_Ret_Error := FND_API.G_RET_STS_ERROR;
48: X_Ret_Unexp_Error := FND_API.G_RET_STS_UNEXP_ERROR;
49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;
50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;

Line 52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;

48: X_Ret_Unexp_Error := FND_API.G_RET_STS_UNEXP_ERROR;
49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;
50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;

Line 53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;

49: X_Current_Plan := INV_Kanban_PVT.G_Current_Plan;
50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;

Line 54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;

50: X_Source_Type_InterOrg := INV_Kanban_PVT.G_Source_Type_InterOrg;
51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;

Line 55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;

51: X_Source_Type_Supplier := INV_Kanban_PVT.G_Source_Type_Supplier;
52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;

Line 56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;

52: X_Source_Type_IntraOrg := INV_Kanban_PVT.G_Source_Type_IntraOrg;
53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;

Line 57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;

53: X_Source_Type_Production := INV_Kanban_PVT.G_Source_Type_Production;
54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;

Line 58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;

54: X_Card_Type_Replenishable := INV_Kanban_PVT.G_Card_Type_Replenishable;
55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;
62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;

Line 59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;

55: X_Card_Type_NonReplenishable := INV_Kanban_PVT.G_Card_Type_NonReplenishable;
56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;
62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;
63:

Line 60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;

56: X_Card_Status_Active := INV_Kanban_PVT.G_Card_Status_Active;
57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;
62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;
63:
64: End Get_Constants;

Line 61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;

57: X_Card_Status_Hold := INV_Kanban_PVT.G_Card_Status_Hold;
58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;
62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;
63:
64: End Get_Constants;
65: --

Line 62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;

58: X_Card_Status_Cancel := INV_Kanban_PVT.G_Card_Status_Cancel;
59: X_No_Pull_sequence := INV_Kanban_PVT.G_No_Pull_sequence;
60: X_Doc_Type_Po := INV_Kanban_PVT.G_Doc_Type_Po;
61: X_Doc_Type_Release := INV_Kanban_PVT.G_Doc_Type_Release;
62: X_Doc_Type_Internal_Req := INV_Kanban_PVT.G_Doc_Type_Internal_Req;
63:
64: End Get_Constants;
65: --
66: --

Line 135: If p_kanban_plan_id = INV_kanban_PVT.G_Current_Plan

131: l_return_status Varchar2(1) := FND_API.G_RET_STS_SUCCESS;
132:
133: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
134: Begin
135: If p_kanban_plan_id = INV_kanban_PVT.G_Current_Plan
136: then
137: For pull_sequences in get_pull_sequences
138: loop
139: If Ok_To_Delete_Pull_Sequence(pull_sequences.pull_sequence_id)

Line 181: (p_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type)

177: -- fields are present.
178: --
179: --
180: PROCEDURE Validate_Pull_Sequence
181: (p_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type)
182: IS
183: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
184: Begin
185: if p_Pull_Sequence_Rec.Organization_Id is null

Line 223: if p_Pull_Sequence_Rec.source_type = INV_Kanban_PVT.G_Source_type_IntraOrg

219: FND_MSG_PUB.Add;
220: Raise FND_API.G_EXC_ERROR;
221: end if;
222:
223: if p_Pull_Sequence_Rec.source_type = INV_Kanban_PVT.G_Source_type_IntraOrg
224: And p_Pull_Sequence_Rec.source_subinventory is null
225: then
226: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
227: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','INV_SOURCE_SUBINV',TRUE);

Line 233: /*if p_Pull_Sequence_Rec.source_type = INV_Kanban_PVT.G_Source_type_Production

229: Raise FND_API.G_EXC_ERROR;
230: end if;
231:
232: /*Code modification for bug2186198*/
233: /*if p_Pull_Sequence_Rec.source_type = INV_Kanban_PVT.G_Source_type_Production
234: And p_Pull_Sequence_Rec.wip_line_id is null
235: then
236: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
237: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','INV_WIP_LINE');

Line 273: p_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type)

269: --
270: --
271: PROCEDURE Insert_Pull_Sequence
272: (x_return_status Out NOCOPY Varchar2,
273: p_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type)
274: IS
275: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type;
276: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
277: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 275: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type;

271: PROCEDURE Insert_Pull_Sequence
272: (x_return_status Out NOCOPY Varchar2,
273: p_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type)
274: IS
275: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_sequence_Rec_Type;
276: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
277: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
278: Begin
279: FND_MSG_PUB.initialize;

Line 326: x_Pull_Sequence_Rec IN OUT NOCOPY INV_Kanban_PVT.Pull_sequence_Rec_Type)

322: --
323: --
324: PROCEDURE Update_Pull_sequence
325: (x_return_status Out NOCOPY Varchar2,
326: x_Pull_Sequence_Rec IN OUT NOCOPY INV_Kanban_PVT.Pull_sequence_Rec_Type)
327: IS
328: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
329: l_Old_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
330: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

Line 328: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;

324: PROCEDURE Update_Pull_sequence
325: (x_return_status Out NOCOPY Varchar2,
326: x_Pull_Sequence_Rec IN OUT NOCOPY INV_Kanban_PVT.Pull_sequence_Rec_Type)
327: IS
328: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
329: l_Old_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
330: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
331: l_org_code VARCHAR2(3);
332: l_item_name VARCHAR2(30);

Line 329: l_Old_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;

325: (x_return_status Out NOCOPY Varchar2,
326: x_Pull_Sequence_Rec IN OUT NOCOPY INV_Kanban_PVT.Pull_sequence_Rec_Type)
327: IS
328: l_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
329: l_Old_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
330: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
331: l_org_code VARCHAR2(3);
332: l_item_name VARCHAR2(30);
333: l_loc_name VARCHAR2(30);

Line 471: p_Pull_Sequence_tbl INV_Kanban_PVT.Pull_sequence_Id_Tbl_Type,

467: ------------------------------------------------------------------------------
468: -- PROCEDURE : UPDATE_PULL_SEQUENCE_TBL
469: ------------------------------------------------------------------------------
470: PROCEDURE Update_Pull_sequence_Tbl (x_return_status Out NOCOPY Varchar2,
471: p_Pull_Sequence_tbl INV_Kanban_PVT.Pull_sequence_Id_Tbl_Type,
472: x_update_flag Varchar2,
473: p_operation_tbl INV_Kanban_PVT.operation_tbl_type := G_operation_tbl)
474: IS
475: l_record_count NUMBER := 0;

Line 473: p_operation_tbl INV_Kanban_PVT.operation_tbl_type := G_operation_tbl)

469: ------------------------------------------------------------------------------
470: PROCEDURE Update_Pull_sequence_Tbl (x_return_status Out NOCOPY Varchar2,
471: p_Pull_Sequence_tbl INV_Kanban_PVT.Pull_sequence_Id_Tbl_Type,
472: x_update_flag Varchar2,
473: p_operation_tbl INV_Kanban_PVT.operation_tbl_type := G_operation_tbl)
474: IS
475: l_record_count NUMBER := 0;
476: l_PullSeqTable INV_Kanban_PVT.Pull_Sequence_id_Tbl_Type;
477: l_report_id NUMBER := 0;

Line 476: l_PullSeqTable INV_Kanban_PVT.Pull_Sequence_id_Tbl_Type;

472: x_update_flag Varchar2,
473: p_operation_tbl INV_Kanban_PVT.operation_tbl_type := G_operation_tbl)
474: IS
475: l_record_count NUMBER := 0;
476: l_PullSeqTable INV_Kanban_PVT.Pull_Sequence_id_Tbl_Type;
477: l_report_id NUMBER := 0;
478: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
479: v_req_id NUMBER;
480: v_generate_cards BOOLEAN := FALSE;

Line 481: l_Pull_sequence_rec INV_Kanban_PVT.Pull_sequence_Rec_Type;

477: l_report_id NUMBER := 0;
478: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
479: v_req_id NUMBER;
480: v_generate_cards BOOLEAN := FALSE;
481: l_Pull_sequence_rec INV_Kanban_PVT.Pull_sequence_Rec_Type;
482:
483:
484: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
485:

Line 486: l_operation_tbl INV_Kanban_PVT.operation_tbl_type; --Operation to be performed update/insert

482:
483:
484: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
485:
486: l_operation_tbl INV_Kanban_PVT.operation_tbl_type; --Operation to be performed update/insert
487: l_report_generate_id NUMBER := 0; --Report id for generating cards
488: l_report_print_id NUMBER := 0; --Report id for printing cards
489: l_count_generate NUMBER := 0; --Count of number of cards to be generated
490: l_count_print NUMBER := 0; -- Count of number of cards to be printed

Line 521: INV_Kanban_PVT.update_pull_sequence(

517: END IF;
518:
519: IF (l_operation_tbl.COUNT > 0) THEN
520: IF(l_operation_tbl(l_record_count) = 0 ) THEN
521: INV_Kanban_PVT.update_pull_sequence(
522: l_return_status,
523: l_Pull_sequence_rec);
524: ELSE
525: OPEN C2;

Line 529: INV_Kanban_PVT.insert_pull_sequence(

525: OPEN C2;
526: FETCH C2 INTO l_Pull_Sequence_Rec.pull_sequence_id;
527: CLOSE C2;
528:
529: INV_Kanban_PVT.insert_pull_sequence(
530: l_return_status,
531: l_Pull_sequence_rec);
532: END IF;
533:

Line 536: INV_Kanban_PVT.update_pull_sequence(

532: END IF;
533:
534: ELSE
535: -- Existing Functionality
536: INV_Kanban_PVT.update_pull_sequence(
537: l_return_status,
538: l_Pull_sequence_rec);
539:
540: END IF; -- end of l_operation_tbl.COUNT > 0 if loop

Line 548: IF INV_kanban_PVT.Ok_To_Create_Kanban_Cards( p_pull_sequence_id =>

544: FND_API.G_RET_STS_UNEXP_ERROR) THEN
545: RAISE FND_API.G_EXC_ERROR;
546: END IF;
547: ELSE
548: IF INV_kanban_PVT.Ok_To_Create_Kanban_Cards( p_pull_sequence_id =>
549: l_PullSeqtable(l_record_count) ) then
550: v_generate_cards := TRUE;
551: ELSE
552: v_generate_cards := FALSE;

Line 719: l_kanban_card_rec INV_Kanban_PVT.Kanban_Card_Rec_Type;

715: p_need_by_date DATE,
716: p_source_wip_entity_id NUMBER)
717:
718: IS
719: l_kanban_card_rec INV_Kanban_PVT.Kanban_Card_Rec_Type;
720: l_return_status Varchar2(1) := FND_API.G_RET_STS_SUCCESS;
721: l_supply_status_from Varchar2(30);
722: l_supply_status_to Varchar2(30);
723: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 730: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 5');

726: l_return_msg varchar2(200);
727: l_return_msg_code number;
728: Begin
729: -- added for eKanban project.
730: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 5');
731: if ( nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) = 1 AND p_Supply_Status = INV_KANBAN_PVT.G_Supply_Status_Full ) then
732: mydebug('calling flm_kanbancard_pub.change_card_status_full api: replenish_quantity='||p_replenish_quantity||', p_Supply_Status='||p_Supply_Status);
733: FLM_KANBANCARD_PUB.CHANGE_CARD_STATUS_FULL(p_Kanban_Card_Id => p_Kanban_Card_Id,
734: p_replenish_quantity => p_replenish_quantity,

Line 731: if ( nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) = 1 AND p_Supply_Status = INV_KANBAN_PVT.G_Supply_Status_Full ) then

727: l_return_msg_code number;
728: Begin
729: -- added for eKanban project.
730: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 5');
731: if ( nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) = 1 AND p_Supply_Status = INV_KANBAN_PVT.G_Supply_Status_Full ) then
732: mydebug('calling flm_kanbancard_pub.change_card_status_full api: replenish_quantity='||p_replenish_quantity||', p_Supply_Status='||p_Supply_Status);
733: FLM_KANBANCARD_PUB.CHANGE_CARD_STATUS_FULL(p_Kanban_Card_Id => p_Kanban_Card_Id,
734: p_replenish_quantity => p_replenish_quantity,
735: X_ERR_MSG => l_return_msg,

Line 800: IF ( p_supply_status IN (INV_Kanban_PVT.G_Supply_Status_InProcess,INV_Kanban_PVT.G_Supply_Status_Full) AND

796: /*Bug 3740514 --If the supply status is Full and the source is Supplier,calling
797: a new procedure update_card_and_card_status to check if the correct
798: Release is being updated.*/
799:
800: IF ( p_supply_status IN (INV_Kanban_PVT.G_Supply_Status_InProcess,INV_Kanban_PVT.G_Supply_Status_Full) AND
801: l_Kanban_Card_Rec.source_type = INV_Kanban_PVT.G_Source_Type_Supplier) THEN
802: update_card_and_card_status(
803: p_kanban_card_id => l_kanban_card_rec.kanban_card_id,
804: p_supply_status => p_supply_status,/*4490269*/

Line 801: l_Kanban_Card_Rec.source_type = INV_Kanban_PVT.G_Source_Type_Supplier) THEN

797: a new procedure update_card_and_card_status to check if the correct
798: Release is being updated.*/
799:
800: IF ( p_supply_status IN (INV_Kanban_PVT.G_Supply_Status_InProcess,INV_Kanban_PVT.G_Supply_Status_Full) AND
801: l_Kanban_Card_Rec.source_type = INV_Kanban_PVT.G_Source_Type_Supplier) THEN
802: update_card_and_card_status(
803: p_kanban_card_id => l_kanban_card_rec.kanban_card_id,
804: p_supply_status => p_supply_status,/*4490269*/
805: p_document_header_id => p_document_header_id, /*Bug#7133795*/

Line 831: (INV_Kanban_PVT.G_Card_Status_Cancel,

827: END IF;
828: ELSE
829: mydebug('Supply status change not OK');
830: If l_kanban_card_rec.card_status in
831: (INV_Kanban_PVT.G_Card_Status_Cancel,
832: INV_Kanban_PVT.G_Card_Status_Hold,INV_Kanban_PVT.G_Card_Status_Planned)
833: then
834: FND_MESSAGE.SET_TOKEN('CARD_NUMBER',l_kanban_card_rec.kanban_card_number);
835: End If;

Line 832: INV_Kanban_PVT.G_Card_Status_Hold,INV_Kanban_PVT.G_Card_Status_Planned)

828: ELSE
829: mydebug('Supply status change not OK');
830: If l_kanban_card_rec.card_status in
831: (INV_Kanban_PVT.G_Card_Status_Cancel,
832: INV_Kanban_PVT.G_Card_Status_Hold,INV_Kanban_PVT.G_Card_Status_Planned)
833: then
834: FND_MESSAGE.SET_TOKEN('CARD_NUMBER',l_kanban_card_rec.kanban_card_number);
835: End If;
836: l_return_status := FND_API.G_RET_STS_ERROR;

Line 893: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 4');

889: l_Supply_Status Number;
890:
891: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
892: Begin
893: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 4');
894: l_Supply_Status := p_Supply_Status;
895:
896: -- Bug 3032156. The following IF condition has been added to keep the
897: -- supply status to 'Full' while partially transacting the move order.

Line 917: l_Supply_Status := INV_KANBAN_PVT.G_Supply_Status_InProcess;

913: mtl_material_transactions where
914: move_order_line_id = l_move_order_line_id and
915: transaction_quantity < 0;
916: if (nvl(l_quantity_delivered,0) < l_quantity) then
917: l_Supply_Status := INV_KANBAN_PVT.G_Supply_Status_InProcess;
918: end if;
919: end if;
920: Exception When Others Then
921: Null;

Line 990: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 3');

986: l_msg_count NUMBER := NULL;
987:
988: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
989: Begin
990: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 3');
991: -- Standard Start of API savepoint
992:
993: SAVEPOINT KANBAN_PVT;
994: mydebug('Inside Update_Card_Supply_Status 1');

Line 1087: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 2');

1083: l_Document_detail_id Number := FND_API.G_MISS_NUM;
1084:
1085: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1086: Begin
1087: mydebug('In INV_KANBAN_PVT.Update_Card_Supply_Status api - 2');
1088: Update_Card_Supply_Status(X_Return_Status => x_Return_Status,
1089: p_kanban_card_Id => p_Kanban_Card_Id,
1090: p_Supply_Status => p_Supply_Status,
1091: p_Document_type => p_document_type,

Line 1135: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or

1131: Select 'x'
1132: INTO l_dummy
1133: FROM MTL_KANBAN_CARDS
1134: WHERE pull_sequence_id = p_pull_sequence_id
1135: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1136: card_status = INV_Kanban_PVT.G_Card_Status_Hold);
1137: Raise Too_Many_Rows;
1138:
1139: Exception

Line 1136: card_status = INV_Kanban_PVT.G_Card_Status_Hold);

1132: INTO l_dummy
1133: FROM MTL_KANBAN_CARDS
1134: WHERE pull_sequence_id = p_pull_sequence_id
1135: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1136: card_status = INV_Kanban_PVT.G_Card_Status_Hold);
1137: Raise Too_Many_Rows;
1138:
1139: Exception
1140: When No_data_found Then

Line 1184: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or

1180: Select 'x'
1181: INTO l_dummy
1182: FROM MTL_KANBAN_CARDS
1183: WHERE pull_sequence_id = p_pull_sequence_id
1184: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1185: card_status = INV_Kanban_PVT.G_Card_Status_Hold)
1186: -- AND nvl(p_kanban_size,-1) > 0
1187: -- AND kanban_size <> nvl(p_kanban_size,-1)
1188: AND source_type = nvl(p_source_type,-1)

Line 1185: card_status = INV_Kanban_PVT.G_Card_Status_Hold)

1181: INTO l_dummy
1182: FROM MTL_KANBAN_CARDS
1183: WHERE pull_sequence_id = p_pull_sequence_id
1184: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1185: card_status = INV_Kanban_PVT.G_Card_Status_Hold)
1186: -- AND nvl(p_kanban_size,-1) > 0
1187: -- AND kanban_size <> nvl(p_kanban_size,-1)
1188: AND source_type = nvl(p_source_type,-1)
1189: AND (((source_type = 1 or source_type = 3)

Line 1213: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or

1209: Select 'x'
1210: INTO l_dummy
1211: FROM MTL_KANBAN_CARDS
1212: WHERE pull_sequence_id = p_pull_sequence_id
1213: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1214: card_status = INV_Kanban_PVT.G_Card_Status_Hold)
1215: AND nvl(p_kanban_size,-1) > 0
1216: AND kanban_size <> nvl(p_kanban_size,-1)
1217: AND source_type = nvl(p_source_type,-1)

Line 1214: card_status = INV_Kanban_PVT.G_Card_Status_Hold)

1210: INTO l_dummy
1211: FROM MTL_KANBAN_CARDS
1212: WHERE pull_sequence_id = p_pull_sequence_id
1213: AND (card_status = INV_Kanban_PVT.G_Card_Status_Active or
1214: card_status = INV_Kanban_PVT.G_Card_Status_Hold)
1215: AND nvl(p_kanban_size,-1) > 0
1216: AND kanban_size <> nvl(p_kanban_size,-1)
1217: AND source_type = nvl(p_source_type,-1)
1218: AND (((source_type = 1 or source_type = 3)

Line 1428: if ( l_source_type = INV_KANBAN_PVT.G_Source_Type_Production ) then

1424: FND_MESSAGE.SET_TOKEN('SUB',p_subinventory);
1425: FND_MESSAGE.SET_TOKEN('LOC',x_loc_name);
1426: RETURN FALSE;
1427: end if;
1428: if ( l_source_type = INV_KANBAN_PVT.G_Source_Type_Production ) then
1429: l_proceed := 'Y';
1430: else
1431: FND_MESSAGE.SET_NAME('INV','INV_KANBAN_NOT_PRODUCTION');
1432: FND_MESSAGE.SET_TOKEN('CARD_NUM',x_kanban_num );

Line 1435: if ( l_supply_status in (INV_KANBAN_PVT.G_Supply_Status_Empty,

1431: FND_MESSAGE.SET_NAME('INV','INV_KANBAN_NOT_PRODUCTION');
1432: FND_MESSAGE.SET_TOKEN('CARD_NUM',x_kanban_num );
1433: RETURN FALSE;
1434: end if;
1435: if ( l_supply_status in (INV_KANBAN_PVT.G_Supply_Status_Empty,
1436: INV_KANBAN_PVT.G_Supply_Status_InProcess ) ) then
1437: Return TRUE;
1438: else
1439: begin

Line 1436: INV_KANBAN_PVT.G_Supply_Status_InProcess ) ) then

1432: FND_MESSAGE.SET_TOKEN('CARD_NUM',x_kanban_num );
1433: RETURN FALSE;
1434: end if;
1435: if ( l_supply_status in (INV_KANBAN_PVT.G_Supply_Status_Empty,
1436: INV_KANBAN_PVT.G_Supply_Status_InProcess ) ) then
1437: Return TRUE;
1438: else
1439: begin
1440: select 'x' into l_dummy

Line 1445: and source_type = INV_KANBAN_PVT.G_Source_Type_Production

1441: from mtl_kanban_card_activity
1442: where kanban_card_id = p_kanban_id
1443: and organization_id = p_org_id
1444: and document_header_id = p_wip_entity_id
1445: and source_type = INV_KANBAN_PVT.G_Source_Type_Production
1446: and supply_status = INV_KANBAN_PVT.G_Supply_Status_Full;
1447:
1448: Raise Too_many_rows;
1449:

Line 1446: and supply_status = INV_KANBAN_PVT.G_Supply_Status_Full;

1442: where kanban_card_id = p_kanban_id
1443: and organization_id = p_org_id
1444: and document_header_id = p_wip_entity_id
1445: and source_type = INV_KANBAN_PVT.G_Source_Type_Production
1446: and supply_status = INV_KANBAN_PVT.G_Supply_Status_Full;
1447:
1448: Raise Too_many_rows;
1449:
1450: exception

Line 1490: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,

1486: --
1487: --
1488: PROCEDURE Create_Kanban_Cards
1489: ( X_return_status OUT NOCOPY VARCHAR2,
1490: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,
1491: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,
1492: p_Supply_Status NUMBER
1493: )
1494: IS

Line 1491: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,

1487: --
1488: PROCEDURE Create_Kanban_Cards
1489: ( X_return_status OUT NOCOPY VARCHAR2,
1490: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,
1491: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,
1492: p_Supply_Status NUMBER
1493: )
1494: IS
1495: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

Line 1496: l_kanban_Card_tbl INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type;

1492: p_Supply_Status NUMBER
1493: )
1494: IS
1495: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1496: l_kanban_Card_tbl INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type;
1497: l_Kanban_Card_Id number;
1498: l_Kanban_Card_Number varchar2(200);
1499: l_supply_status Number;
1500: l_Card_status Number;

Line 1522: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;

1518:
1519:
1520:
1521: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1522: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1523: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1524: ELSE
1525: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1526: l_supply_status := p_Supply_Status;

Line 1523: l_supply_status := inv_kanban_pvt.g_supply_status_full;

1519:
1520:
1521: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1522: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1523: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1524: ELSE
1525: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1526: l_supply_status := p_Supply_Status;
1527: END IF ;

Line 1525: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;

1521: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1522: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1523: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1524: ELSE
1525: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1526: l_supply_status := p_Supply_Status;
1527: END IF ;
1528:
1529: l_Current_Replnsh_Cycle_Id := null;

Line 1573: INV_Kanban_Pvt.g_card_type_nonreplenishable then

1569: --Existing kanban cards need to be cancelled only when creating a
1570: --regular replenishable card
1571: if ( nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) = 0 )then
1572: IF p_pull_sequence_rec.kanban_card_type <>
1573: INV_Kanban_Pvt.g_card_type_nonreplenishable then
1574: -- we should not delete old kanban cards but change their status
1575: -- for historical purposes.
1576: --Delete_Kanban_Cards(p_Pull_Sequence_Rec.Pull_Sequence_Id);
1577: update_kanban_card_status

Line 1593: INV_LOG_UTIL.TRACE('FLM: Enable E-Kanban is yes','INV_KANBAN_PVT.Create_Kanban_Cards');

1589: /*added by javakat to fix 11800873 */
1590:
1591: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1592: IF (l_debug = 1 ) THEN
1593: INV_LOG_UTIL.TRACE('FLM: Enable E-Kanban is yes','INV_KANBAN_PVT.Create_Kanban_Cards');
1594: INV_LOG_UTIL.TRACE('Calling FLM_MULTIPLE_SUPPLIERS.GET_SUPPLIER','INV_KANBAN_PVT.Create_Kanban_Cards');
1595: END IF;
1596: FLM_MULTIPLE_SUPPLIERS.GET_SUPPLIER(p_pull_seq_id => p_Pull_Sequence_Rec.Pull_Sequence_Id,
1597: p_org_id => p_Pull_Sequence_Rec.Organization_id,

Line 1594: INV_LOG_UTIL.TRACE('Calling FLM_MULTIPLE_SUPPLIERS.GET_SUPPLIER','INV_KANBAN_PVT.Create_Kanban_Cards');

1590:
1591: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1592: IF (l_debug = 1 ) THEN
1593: INV_LOG_UTIL.TRACE('FLM: Enable E-Kanban is yes','INV_KANBAN_PVT.Create_Kanban_Cards');
1594: INV_LOG_UTIL.TRACE('Calling FLM_MULTIPLE_SUPPLIERS.GET_SUPPLIER','INV_KANBAN_PVT.Create_Kanban_Cards');
1595: END IF;
1596: FLM_MULTIPLE_SUPPLIERS.GET_SUPPLIER(p_pull_seq_id => p_Pull_Sequence_Rec.Pull_Sequence_Id,
1597: p_org_id => p_Pull_Sequence_Rec.Organization_id,
1598: p_cardstatus => l_Card_Status,

Line 1608: INV_LOG_UTIL.TRACE('Calling FLM_KANBAN_CUSTOM_PKG.custom_kanban_number','INV_KANBAN_PVT.Create_Kanban_Cards');

1604:
1605: -- Default it from Custom Hook
1606: if l_Kanban_Card_Number is null then
1607: IF (l_debug = 1 ) THEN
1608: INV_LOG_UTIL.TRACE('Calling FLM_KANBAN_CUSTOM_PKG.custom_kanban_number','INV_KANBAN_PVT.Create_Kanban_Cards');
1609: END IF;
1610: l_Kanban_Card_Number := FLM_KANBAN_CUSTOM_PKG.custom_kanban_number(p_Pull_Sequence_Rec.Pull_Sequence_Id);
1611: if l_Kanban_Card_Number IS NOT NULL THEN
1612: Begin

Line 1614: INV_LOG_UTIL.TRACE('validating kanban_number','INV_KANBAN_PVT.Create_Kanban_Cards');

1610: l_Kanban_Card_Number := FLM_KANBAN_CUSTOM_PKG.custom_kanban_number(p_Pull_Sequence_Rec.Pull_Sequence_Id);
1611: if l_Kanban_Card_Number IS NOT NULL THEN
1612: Begin
1613: IF (l_debug = 1 ) THEN
1614: INV_LOG_UTIL.TRACE('validating kanban_number','INV_KANBAN_PVT.Create_Kanban_Cards');
1615: END IF;
1616: select 1 into l_temp
1617: from mtl_kanban_cards
1618: where organization_id = p_Pull_Sequence_Rec.Organization_id

Line 1623: FND_MSG_PUB.Add_Exc_Msg ( 'INV_Kanban_PVT',l_error_msg );

1619: and kanban_card_number = l_Kanban_Card_Number;
1620: fnd_message.set_name ('FLM', 'FLM_ATTRIBUTE_EXISTS');
1621: fnd_message.set_token ('ATTRIBUTE', 'Kanban Card Number'||l_Kanban_Card_Number);
1622: l_error_msg := FND_MESSAGE.GET;
1623: FND_MSG_PUB.Add_Exc_Msg ( 'INV_Kanban_PVT',l_error_msg );
1624: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1625: exception
1626: when others then
1627: null;

Line 1646: P_Kanban_Card_Type => Nvl(p_pull_sequence_rec.kanban_card_type,INV_Kanban_Pvt.g_card_type_replenishable),

1642: P_Organization_id => p_Pull_Sequence_Rec.Organization_id,
1643: P_Subinventory_name => p_Pull_Sequence_Rec.Subinventory_name,
1644: P_Supply_Status => l_Supply_Status,
1645: P_Card_Status => l_Card_Status,
1646: P_Kanban_Card_Type => Nvl(p_pull_sequence_rec.kanban_card_type,INV_Kanban_Pvt.g_card_type_replenishable),
1647: P_Source_type => p_Pull_Sequence_Rec.Source_type,
1648: P_Kanban_size => nvl(p_Pull_Sequence_Rec.Kanban_size,0),
1649: P_Last_Update_Date => SYSDATE,
1650: P_Last_Updated_By => FND_GLOBAL.USER_ID,

Line 1735: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,

1731: --
1732: --
1733: PROCEDURE Create_Kanban_Cards
1734: ( X_return_status OUT NOCOPY VARCHAR2,
1735: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,
1736: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,
1737: p_Supply_Status NUMBER,
1738: --eKanban Changes
1739: p_kanban_card_id NUMBER,

Line 1736: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,

1732: --
1733: PROCEDURE Create_Kanban_Cards
1734: ( X_return_status OUT NOCOPY VARCHAR2,
1735: X_Kanban_Card_Ids OUT NOCOPY INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type,
1736: P_Pull_Sequence_Rec INV_Kanban_PVT.Pull_Sequence_Rec_Type,
1737: p_Supply_Status NUMBER,
1738: --eKanban Changes
1739: p_kanban_card_id NUMBER,
1740: p_kanban_card_number VARCHAR2,

Line 1748: l_kanban_Card_tbl INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type;

1744: p_replacement_flag NUMBER
1745: )
1746: IS
1747: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1748: l_kanban_Card_tbl INV_Kanban_PVT.Kanban_Card_Id_Tbl_Type;
1749: l_Kanban_Card_Id number;
1750: l_Kanban_Card_Number varchar2(200);
1751: l_supply_status Number;
1752: l_Card_status Number;

Line 1767: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;

1763: FND_MSG_PUB.initialize;
1764: l_kanban_Card_tbl.Delete;
1765:
1766: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1767: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1768: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1769: ELSE
1770: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1771: l_supply_status := p_Supply_Status;

Line 1768: l_supply_status := inv_kanban_pvt.g_supply_status_full;

1764: l_kanban_Card_tbl.Delete;
1765:
1766: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1767: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1768: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1769: ELSE
1770: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1771: l_supply_status := p_Supply_Status;
1772: END IF ;

Line 1770: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;

1766: IF(p_pull_sequence_rec.release_kanban_flag =2) THEN
1767: l_card_status := INV_Kanban_Pvt.G_Card_Status_Hold;
1768: l_supply_status := inv_kanban_pvt.g_supply_status_full;
1769: ELSE
1770: l_card_status := INV_Kanban_Pvt.G_Card_Status_Active;
1771: l_supply_status := p_Supply_Status;
1772: END IF ;
1773:
1774: l_Current_Replnsh_Cycle_Id := null;

Line 1819: INV_Kanban_Pvt.g_card_type_nonreplenishable then

1815: --regular replenishable card
1816: -- Do not cancel cards in eKanban.
1817: if ( nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0) = 0) then
1818: IF p_pull_sequence_rec.kanban_card_type <>
1819: INV_Kanban_Pvt.g_card_type_nonreplenishable then
1820: -- we should not delete old kanban cards but change their status
1821: -- for historical purposes.
1822: --Delete_Kanban_Cards(p_Pull_Sequence_Rec.Pull_Sequence_Id);
1823: update_kanban_card_status

Line 1845: P_Kanban_Card_Type => Nvl(p_pull_sequence_rec.kanban_card_type,INV_Kanban_Pvt.g_card_type_replenishable),

1841: P_Organization_id => p_Pull_Sequence_Rec.Organization_id,
1842: P_Subinventory_name => p_Pull_Sequence_Rec.Subinventory_name,
1843: P_Supply_Status => l_Supply_Status,
1844: P_Card_Status => l_Card_Status,
1845: P_Kanban_Card_Type => Nvl(p_pull_sequence_rec.kanban_card_type,INV_Kanban_Pvt.g_card_type_replenishable),
1846: P_Source_type => p_Pull_Sequence_Rec.Source_type,
1847: P_Kanban_size => nvl(p_Pull_Sequence_Rec.Kanban_size,0),
1848: P_Last_Update_Date => SYSDATE,
1849: P_Last_Updated_By => FND_GLOBAL.USER_ID,

Line 3239: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3235:
3236: p_Kanban_Card_Rec_Tbl(1).wip_line_id := v_wip_line_id;
3237: create_flow_schedule(p_kanban_card_rec_tbl, v_fixed_lead_time,
3238: v_var_lead_time );
3239: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3240: elsif (v_cfm_flag = 3) AND (wsmpvers.get_osfm_release_version > '110508')
3241: THEN
3242:
3243: BEGIN

Line 3260: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3256: IF l_is_lot_control = 'Y' then
3257:
3258: create_lot_based_job(p_kanban_card_rec_tbl, v_fixed_lead_time,
3259: v_var_lead_time );
3260: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3261:
3262: END IF;
3263:
3264: /* Code modification for 2186198 */

Line 3294: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3290: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3291: end ;
3292: create_rep_schedule(p_kanban_card_rec_tbl, v_fixed_lead_time,
3293: v_var_lead_time );
3294: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3295:
3296: else
3297: Create_Wip_Discrete(p_kanban_card_rec_tbl, v_fixed_lead_time,
3298: v_var_lead_time);

Line 3299: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;

3295:
3296: else
3297: Create_Wip_Discrete(p_kanban_card_rec_tbl, v_fixed_lead_time,
3298: v_var_lead_time);
3299: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3300:
3301: end if;
3302:
3303: ELSE /* wip line id IS not NULL */

Line 3333: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3329: IF v_cfm_flag = 1 THEN
3330:
3331: create_flow_schedule(p_kanban_card_rec_tbl, v_fixed_lead_time,
3332: v_var_lead_time );
3333: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3334:
3335: elsif (v_cfm_flag = 3) AND (wsmpvers.get_osfm_release_version > '110508') THEN
3336:
3337: BEGIN

Line 3354: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3350: IF l_is_lot_control = 'Y' then
3351:
3352: create_lot_based_job(p_kanban_card_rec_tbl, v_fixed_lead_time,
3353: v_var_lead_time );
3354: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3355:
3356: END IF;
3357:
3358:

Line 3363: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3359: elsif v_rep_flag = 'Y' THEN
3360:
3361: create_rep_schedule(p_kanban_card_rec_tbl, v_fixed_lead_time,
3362: v_var_lead_time );
3363: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3364: ELSE
3365:
3366: Create_Wip_Discrete(p_kanban_card_rec_tbl, v_fixed_lead_time,
3367: v_var_lead_time);

Line 3368: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;

3364: ELSE
3365:
3366: Create_Wip_Discrete(p_kanban_card_rec_tbl, v_fixed_lead_time,
3367: v_var_lead_time);
3368: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3369: end if;
3370:
3371: END IF;
3372:

Line 3520: INV_Kanban_PVT.G_Source_Type_InterOrg

3516: and c.exception_set_id = o.CALENDAR_EXCEPTION_SET_ID
3517: and c.calendar_date = trunc(sysdate);
3518: END IF;
3519: if l_kanban_card_Rec_Tbl(1).source_Type =
3520: INV_Kanban_PVT.G_Source_Type_InterOrg
3521: Then
3522:
3523: -- MOAC: Replaced the po_location_associations
3524: -- view with a _ALL table.

Line 3538: INV_Kanban_PVT.G_Source_Type_Supplier

3534: and org.location_id = loc.location_id
3535: and pla.location_id = loc.location_id;
3536:
3537: Elsif l_kanban_card_Rec_Tbl(1).source_Type =
3538: INV_Kanban_PVT.G_Source_Type_Supplier
3539: Then
3540:
3541: l_sql_stmt_no := 40;
3542: select org.location_id

Line 3605: If l_kanban_card_Rec_Tbl(1).source_type = INV_Kanban_PVT.G_Source_Type_InterOrg

3601: -- return ('Unable to generate requisition');
3602: end if;
3603: */
3604:
3605: If l_kanban_card_Rec_Tbl(1).source_type = INV_Kanban_PVT.G_Source_Type_InterOrg
3606: then
3607: l_source_type_code := 'INVENTORY';
3608: l_Requisition_type := 'INTERNAL';
3609: mydebug('create requisition INVENTORY INTERNAL');

Line 3619: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;

3615: l_primary_uom_code, l_need_by_date,
3616: l_charge_account_id, l_accrual_account_id,
3617: l_invoice_var_account_id, l_budget_account_id,
3618: l_autosource_flag, l_po_org_id );
3619: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3620: elsIf l_kanban_card_Rec_Tbl(1).source_type = INV_Kanban_PVT.G_Source_Type_Supplier
3621: Then
3622: l_source_type_code := 'VENDOR';
3623: l_Requisition_type := 'PURCHASE';

Line 3620: elsIf l_kanban_card_Rec_Tbl(1).source_type = INV_Kanban_PVT.G_Source_Type_Supplier

3616: l_charge_account_id, l_accrual_account_id,
3617: l_invoice_var_account_id, l_budget_account_id,
3618: l_autosource_flag, l_po_org_id );
3619: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3620: elsIf l_kanban_card_Rec_Tbl(1).source_type = INV_Kanban_PVT.G_Source_Type_Supplier
3621: Then
3622: l_source_type_code := 'VENDOR';
3623: l_Requisition_type := 'PURCHASE';
3624: mydebug('create requisition VENDOR PURCHASE');

Line 3634: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;

3630: l_primary_uom_code, l_need_by_date,
3631: l_charge_account_id, l_accrual_account_id,
3632: l_invoice_var_account_id, l_budget_account_id,
3633: l_autosource_flag, l_po_org_id );
3634: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3635: elsIf l_kanban_card_Rec_Tbl(1).source_type =
3636: INV_Kanban_PVT.G_Source_Type_IntraOrg
3637: Then
3638: l_source_type_code := 'INVENTORY';

Line 3636: INV_Kanban_PVT.G_Source_Type_IntraOrg

3632: l_invoice_var_account_id, l_budget_account_id,
3633: l_autosource_flag, l_po_org_id );
3634: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_Empty;
3635: elsIf l_kanban_card_Rec_Tbl(1).source_type =
3636: INV_Kanban_PVT.G_Source_Type_IntraOrg
3637: Then
3638: l_source_type_code := 'INVENTORY';
3639: l_Requisition_type := 'TRANSFER';
3640: mydebug('create transfer order INVENTORY TRANSFER');

Line 3642: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;

3638: l_source_type_code := 'INVENTORY';
3639: l_Requisition_type := 'TRANSFER';
3640: mydebug('create transfer order INVENTORY TRANSFER');
3641: Create_Transfer_Order(p_kanban_card_rec_tbl,l_need_by_date,l_Primary_Uom_Code);
3642: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3643:
3644: elsIf l_kanban_card_Rec_Tbl(1).source_type =
3645: INV_Kanban_PVT.G_Source_Type_Production
3646: Then

Line 3645: INV_Kanban_PVT.G_Source_Type_Production

3641: Create_Transfer_Order(p_kanban_card_rec_tbl,l_need_by_date,l_Primary_Uom_Code);
3642: x_card_supply_status := INV_Kanban_PVT.G_Supply_Status_InProcess;
3643:
3644: elsIf l_kanban_card_Rec_Tbl(1).source_type =
3645: INV_Kanban_PVT.G_Source_Type_Production
3646: Then
3647: l_source_type_code := 'PRODUCTION';
3648: l_Requisition_type := 'MAKE';
3649: mydebug('create wip job PRODUCTION MAKE ');

Line 3710: P_Kanban_Card_Rec In Out NOCOPY INV_Kanban_PVT.Kanban_Card_Rec_Type)

3706: PROCEDURE Check_And_Create_Replenishment
3707: (x_return_status Out NOCOPY Varchar2,
3708: X_Supply_Status Out NOCOPY Number,
3709: X_Current_Replenish_Cycle_Id Out NOCOPY Number,
3710: P_Kanban_Card_Rec In Out NOCOPY INV_Kanban_PVT.Kanban_Card_Rec_Type)
3711: IS
3712:
3713: l_Pull_Sequence_Rec Mtl_Kanban_Pull_Sequences%RowType;
3714: l_Wait_Kanban_card_Tbl Kanban_Card_Tbl_Type;

Line 3715: l_Kanban_Card_Rec INV_Kanban_PVT.Kanban_Card_Rec_Type;

3711: IS
3712:
3713: l_Pull_Sequence_Rec Mtl_Kanban_Pull_Sequences%RowType;
3714: l_Wait_Kanban_card_Tbl Kanban_Card_Tbl_Type;
3715: l_Kanban_Card_Rec INV_Kanban_PVT.Kanban_Card_Rec_Type;
3716: l_Wait_Kanban_Size Number := 0;
3717: l_Card_Count Number := 0;
3718: l_Order_Count Number := 0;
3719: l_Current_replenish_cycle_Id Number;

Line 3733: -- And Card_Status = INV_Kanban_PVT.G_Card_Status_Active

3729: NULL lot_subinventory_code,NULL lot_location_id,NULL lot_quantity,
3730: NULL replenish_quantity
3731: From Mtl_Kanban_Cards
3732: Where Pull_Sequence_Id = p_Kanban_Card_Rec.Pull_Sequence_Id
3733: -- And Card_Status = INV_Kanban_PVT.G_Card_Status_Active
3734: And Supply_Status = INV_Kanban_PVT.G_Supply_Status_Wait
3735: And Nvl(Supplier_Id,-1) = Nvl(p_Kanban_Card_Rec.Supplier_Id,-1)
3736: And Nvl(Supplier_Site_Id,-1) = Nvl(p_Kanban_Card_Rec.Supplier_Site_Id,-1)
3737: And Nvl(Source_Organization_Id,-1) = Nvl(p_Kanban_Card_Rec.Source_Organization_Id,-1)

Line 3734: And Supply_Status = INV_Kanban_PVT.G_Supply_Status_Wait

3730: NULL replenish_quantity
3731: From Mtl_Kanban_Cards
3732: Where Pull_Sequence_Id = p_Kanban_Card_Rec.Pull_Sequence_Id
3733: -- And Card_Status = INV_Kanban_PVT.G_Card_Status_Active
3734: And Supply_Status = INV_Kanban_PVT.G_Supply_Status_Wait
3735: And Nvl(Supplier_Id,-1) = Nvl(p_Kanban_Card_Rec.Supplier_Id,-1)
3736: And Nvl(Supplier_Site_Id,-1) = Nvl(p_Kanban_Card_Rec.Supplier_Site_Id,-1)
3737: And Nvl(Source_Organization_Id,-1) = Nvl(p_Kanban_Card_Rec.Source_Organization_Id,-1)
3738: And Nvl(Source_Subinventory,'#?#') = Nvl(p_Kanban_Card_Rec.Source_Subinventory,'#?#')

Line 3757: If P_Kanban_Card_rec.Pull_sequence_Id = INV_Kanban_PVT.G_No_Pull_Sequence

3753: l_Order_Count := 1;
3754:
3755: l_Kanban_Card_tbl(l_Order_Count) := p_kanban_card_rec;
3756:
3757: If P_Kanban_Card_rec.Pull_sequence_Id = INV_Kanban_PVT.G_No_Pull_Sequence
3758: OR (P_Kanban_Card_Rec.kanban_card_type = INV_Kanban_PVT.G_Card_Type_NonReplenishable) Then
3759: l_Current_Replenish_Cycle_Id := Get_Next_Replenish_Cycle_Id;
3760: l_Kanban_Card_tbl(l_Order_Count).current_replnsh_cycle_id := l_Current_Replenish_Cycle_Id;
3761: Create_Replenishment(l_Kanban_Card_tbl,null, p_card_supply_status);

Line 3758: OR (P_Kanban_Card_Rec.kanban_card_type = INV_Kanban_PVT.G_Card_Type_NonReplenishable) Then

3754:
3755: l_Kanban_Card_tbl(l_Order_Count) := p_kanban_card_rec;
3756:
3757: If P_Kanban_Card_rec.Pull_sequence_Id = INV_Kanban_PVT.G_No_Pull_Sequence
3758: OR (P_Kanban_Card_Rec.kanban_card_type = INV_Kanban_PVT.G_Card_Type_NonReplenishable) Then
3759: l_Current_Replenish_Cycle_Id := Get_Next_Replenish_Cycle_Id;
3760: l_Kanban_Card_tbl(l_Order_Count).current_replnsh_cycle_id := l_Current_Replenish_Cycle_Id;
3761: Create_Replenishment(l_Kanban_Card_tbl,null, p_card_supply_status);
3762: X_Supply_Status := p_card_supply_status;

Line 3773: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then

3769: For Update Of Minimum_Order_Quantity NOWait;
3770:
3771: If nvl(l_Pull_Sequence_Rec.Minimum_Order_Quantity,0) = 0 Then
3772: -- eKanban Changes
3773: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then
3774: l_Current_Replenish_Cycle_Id := Get_Next_Replenish_Cycle_Id;
3775: l_Kanban_Card_tbl(l_Order_Count).current_replnsh_cycle_id := l_Current_Replenish_Cycle_Id;
3776: Create_Replenishment(l_Kanban_Card_tbl,l_pull_sequence_rec.replenishment_lead_time, p_card_supply_status);
3777: X_Supply_Status := p_card_supply_status;

Line 3780: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;

3776: Create_Replenishment(l_Kanban_Card_tbl,l_pull_sequence_rec.replenishment_lead_time, p_card_supply_status);
3777: X_Supply_Status := p_card_supply_status;
3778: X_Current_Replenish_Cycle_Id := l_Current_Replenish_Cycle_Id;
3779: else
3780: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;
3781: X_Current_Replenish_Cycle_Id := Null;
3782: end if;
3783: Elsif (P_Kanban_Card_Rec.Kanban_Size >= l_Pull_Sequence_Rec.minimum_order_quantity)
3784: OR (P_Kanban_Card_Rec.lot_number IS NOT NULL)

Line 3787: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then

3783: Elsif (P_Kanban_Card_Rec.Kanban_Size >= l_Pull_Sequence_Rec.minimum_order_quantity)
3784: OR (P_Kanban_Card_Rec.lot_number IS NOT NULL)
3785: Then
3786: -- eKanban Changes
3787: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then
3788: l_Current_Replenish_Cycle_Id := Get_Next_Replenish_Cycle_Id;
3789: l_Kanban_Card_tbl(l_Order_Count).current_replnsh_cycle_id := l_Current_Replenish_Cycle_Id;
3790: Create_Replenishment(l_Kanban_Card_tbl,l_pull_sequence_rec.replenishment_lead_time, p_card_supply_status);
3791: X_Supply_Status := p_card_supply_status;

Line 3794: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;

3790: Create_Replenishment(l_Kanban_Card_tbl,l_pull_sequence_rec.replenishment_lead_time, p_card_supply_status);
3791: X_Supply_Status := p_card_supply_status;
3792: X_Current_Replenish_Cycle_Id := l_Current_Replenish_Cycle_Id;
3793: else
3794: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;
3795: X_Current_Replenish_Cycle_Id := Null;
3796: end if;
3797: Else
3798:

Line 3818: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then

3814:
3815: if (l_Wait_Kanban_Size + p_kanban_Card_rec.kanban_Size) >= l_Pull_Sequence_Rec.Minimum_Order_Quantity Then
3816:
3817: -- eKanban Changes
3818: if nvl(l_Pull_Sequence_Rec.consolidation,INV_Kanban_PVT.G_consolidate_opt_no) <> INV_Kanban_PVT.G_consolidate_opt_yes then
3819: l_Current_replenish_Cycle_Id := Get_Next_Replenish_Cycle_Id;
3820: For l_card_Count in 1..l_Wait_Kanban_card_Tbl.Count
3821: Loop
3822:

Line 3860: Set Supply_Status = INV_Kanban_PVT.G_Supply_Status_Consolidate,

3856: End Loop;
3857:
3858: For l_card_Count in 2..l_Kanban_card_Tbl.Count Loop
3859: Update Mtl_Kanban_Cards
3860: Set Supply_Status = INV_Kanban_PVT.G_Supply_Status_Consolidate,
3861: Last_Update_Date = SYSDATE,
3862: Last_Updated_By = FND_GLOBAL.USER_ID
3863: Where Kanban_Card_Id = l_Kanban_card_Tbl(l_Card_Count).Kanban_card_Id;
3864: l_kanban_card_rec := INV_KanbanCard_PKG.Query_Row( p_Kanban_Card_id => l_Kanban_card_Tbl(l_Card_Count).Kanban_card_Id);

Line 3867: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;

3863: Where Kanban_Card_Id = l_Kanban_card_Tbl(l_Card_Count).Kanban_card_Id;
3864: l_kanban_card_rec := INV_KanbanCard_PKG.Query_Row( p_Kanban_Card_id => l_Kanban_card_Tbl(l_Card_Count).Kanban_card_Id);
3865: INV_KanbanCard_PKG.Insert_Activity_For_Card(l_Kanban_Card_Rec);
3866: End Loop;
3867: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;
3868: X_Current_Replenish_Cycle_Id := Null;
3869: end if;
3870: Else
3871: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Wait;

Line 3871: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Wait;

3867: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Consolidate;
3868: X_Current_Replenish_Cycle_Id := Null;
3869: end if;
3870: Else
3871: X_Supply_Status := INV_Kanban_PVT.G_Supply_Status_Wait;
3872: X_Current_Replenish_Cycle_Id := Null;
3873: End If;
3874: End If;
3875: End If;

Line 3908: l_pull_seq_id_tbl INV_kanban_PVT.pull_sequence_id_Tbl_Type;

3904: End Check_And_Create_Replenishment;
3905:
3906: Procedure test IS
3907: i NUMBER := 0;
3908: l_pull_seq_id_tbl INV_kanban_PVT.pull_sequence_id_Tbl_Type;
3909: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
3910: l_operation_tbl INV_Kanban_PVT.operation_tbl_type;/*This new local var has been added to
3911: keep in synch with the call to procedure update_pull_sequence_tbl */
3912: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 3910: l_operation_tbl INV_Kanban_PVT.operation_tbl_type;/*This new local var has been added to

3906: Procedure test IS
3907: i NUMBER := 0;
3908: l_pull_seq_id_tbl INV_kanban_PVT.pull_sequence_id_Tbl_Type;
3909: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
3910: l_operation_tbl INV_Kanban_PVT.operation_tbl_type;/*This new local var has been added to
3911: keep in synch with the call to procedure update_pull_sequence_tbl */
3912: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3913: begin
3914:

Line 3954: l_kanban_card_rec INV_Kanban_PVT.kanban_card_rec_type;

3950: (p_Card_Status IN Number,
3951: p_pull_sequence_id IN Number)
3952:
3953: IS
3954: l_kanban_card_rec INV_Kanban_PVT.kanban_card_rec_type;
3955: CURSOR get_kanban_card_ids IS
3956: SELECT kanban_card_id
3957: FROM mtl_kanban_cards
3958: WHERE pull_sequence_id = p_pull_sequence_id ;

Line 4075: ELSIF l_source_type_id = inv_kanban_pvt.g_source_type_production THEN

4071: --fnd_message.debug('Inside eligible');
4072:
4073: IF wsmpvers.get_osfm_release_version <= '110508' THEN
4074: RETURN 'N';
4075: ELSIF l_source_type_id = inv_kanban_pvt.g_source_type_production THEN
4076: --Source type production
4077: BEGIN
4078: select
4079: Nvl(repetitive_planning_flag,'N'), lot_control_code

Line 4205: IF p_supply_status = INV_Kanban_PVT.G_Supply_Status_Full THEN /*Bug 4490269*/

4201:
4202: p_update := TRUE; -- By Default update the kanban card and kanban card activity
4203:
4204: -- Bug 3987589; Added the AND condition 'AND document_type <> fnd_api.g_miss_num' and the exception block
4205: IF p_supply_status = INV_Kanban_PVT.G_Supply_Status_Full THEN /*Bug 4490269*/
4206:
4207: BEGIN
4208: SELECT document_type
4209: , replenishment_cycle_id

Line 4231: IF (l_doc_type_id IN (inv_kanban_pvt.g_doc_type_release,INV_kanban_PVT.G_Doc_type_PO)) THEN

4227: || l_max_rep_id);
4228:
4229: /* Only if the document type is Blanket Release, then continue */
4230:
4231: IF (l_doc_type_id IN (inv_kanban_pvt.g_doc_type_release,INV_kanban_PVT.G_Doc_type_PO)) THEN
4232: OPEN mtl_kca;
4233:
4234: FETCH mtl_kca
4235: INTO l_rep_cycl_id

Line 4261: END IF; -- if l_doc_type_id = INV_kanban_PVT.G_Doc_type_Release

4257: IF (l_del_qty = 0) THEN
4258: p_update := FALSE;
4259: END IF;
4260: END IF; -- if l_rep_cycl_id IS NOT NULL ....
4261: END IF; -- if l_doc_type_id = INV_kanban_PVT.G_Doc_type_Release
4262:
4263: /*Bug#4490268--If InProcess, then need to check for any pending requsitions/PO/Release*/
4264: ELSIF p_supply_status = INV_Kanban_PVT.G_Supply_Status_InProcess THEN
4265:

Line 4264: ELSIF p_supply_status = INV_Kanban_PVT.G_Supply_Status_InProcess THEN

4260: END IF; -- if l_rep_cycl_id IS NOT NULL ....
4261: END IF; -- if l_doc_type_id = INV_kanban_PVT.G_Doc_type_Release
4262:
4263: /*Bug#4490268--If InProcess, then need to check for any pending requsitions/PO/Release*/
4264: ELSIF p_supply_status = INV_Kanban_PVT.G_Supply_Status_InProcess THEN
4265:
4266: -- Commented the below code for the bug # 7133795
4267: /* SELECT max(requisition_line_id) into l_max_req
4268: FROM po_requisition_lines

Line 4369: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban ...','INV_KANBAN_PVT');

4365:
4366: l_mo_line_rec mo_lines_cur%ROWTYPE;
4367: BEGIN
4368: IF (l_debug = 1 ) THEN
4369: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban ...','INV_KANBAN_PVT');
4370: END IF;
4371:
4372: OPEN mo_lines_cur;
4373:

Line 4419: 'lot_number:' || l_lot_number || ' transaction_temp_id' || l_txn_header_id ,'INV_KANBAN_PVT');

4415: IF (l_debug = 1 ) THEN
4416: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban : the line '||l_mo_line_rec.line_id ||' return status :'||
4417: x_return_status || 'number_of_rows:' || l_number_of_rows ||' detailed_qty:'||l_detailed_quantity ||
4418: ' revision:'||l_revision||' from_locator_id:'||l_from_locator_id||' to_location:'||l_to_locator_id ||
4419: 'lot_number:' || l_lot_number || ' transaction_temp_id' || l_txn_header_id ,'INV_KANBAN_PVT');
4420: END IF;
4421:
4422: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS
4423: OR l_mo_line_rec.quantity <> l_detailed_quantity )

Line 4437: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban : return status :'||x_return_status||' msg:'||x_msg_data,'INV_KANBAN_PVT');

4433: x_return_status := FND_API.G_RET_STS_SUCCESS;
4434: END IF;
4435:
4436: IF (l_debug = 1 ) THEN
4437: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban : return status :'||x_return_status||' msg:'||x_msg_data,'INV_KANBAN_PVT');
4438: END IF;
4439: EXCEPTION
4440: WHEN OTHERS THEN
4441: IF (l_debug = 1 ) THEN

Line 4442: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban : Exception : When Others','INV_KANBAN_PVT');

4438: END IF;
4439: EXCEPTION
4440: WHEN OTHERS THEN
4441: IF (l_debug = 1 ) THEN
4442: inv_pick_wave_pick_confirm_pub.tracelog('In Auto_Allocate_Kanban : Exception : When Others','INV_KANBAN_PVT');
4443: x_return_status := FND_API.G_RET_STS_ERROR;
4444: END IF;
4445: END Auto_Allocate_Kanban;
4446:

Line 4471: END INV_Kanban_PVT;

4467: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
4468: END get_preprocessing_lead_time;
4469:
4470:
4471: END INV_Kanban_PVT;