1 PACKAGE INVKBCGN AUTHID CURRENT_USER as
2 /* $Header: INVKBCGS.pls 120.4 2011/05/20 10:39:08 sisankar ship $ */
3 --ekanban constants declared by jana
4 flm_ekb_yes CONSTANT NUMBER :=1;
5 flm_ekb_no CONSTANT NUMBER :=2;
6 no_of_cards_created NUMBER:=0; /*Bug 11829018*/
7 Procedure Create_Kanban_Cards(
8 ERRBUF OUT NOCOPY VARCHAR2,
9 RETCODE OUT NOCOPY NUMBER,
10 X_ORG_ID IN NUMBER,
11 X_ITEM_LO IN VARCHAR2,
12 X_ITEM_HI IN VARCHAR2,
13 X_SUBINV IN VARCHAR2,
14 X_LOCATOR_LO IN VARCHAR2,
15 X_LOCATOR_HI IN VARCHAR2,
16 X_SOURCE_TYPE IN NUMBER,
17 X_SUPPLIER_ID IN NUMBER,
18 X_SUPPLIER_SITE_ID IN NUMBER,
19 X_SOURCING_ORG_ID IN NUMBER,
20 X_SOURCING_SUBINV IN VARCHAR2,
21 X_SOURCING_LOC_ID IN NUMBER,
22 X_WIP_LINE_ID IN NUMBER,
23 X_STATUS IN NUMBER,
24 X_PULL_SEQ_ID IN NUMBER,
25 X_PRINT_KANBAN_CARD IN NUMBER,
26 X_REPORT_ID IN NUMBER,
27 --ekanban changes by javakat
28 X_ENABLE_EKANBAN IN NUMBER DEFAULT 2,
29 X_ENABLE_DUMMY IN VARCHAR2 DEFAULT NULL ,
30 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
31 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2);
32
33 function resolve_pullseq_all_null(
34 X_ORG_ID IN NUMBER,
35 X_ITEM_LO IN VARCHAR2,
36 X_ITEM_HI IN VARCHAR2,
37 X_SUBINV IN VARCHAR2,
38 X_LOCATOR_LO IN VARCHAR2,
39 X_LOCATOR_HI IN VARCHAR2,
40 X_SOURCE_TYPE IN NUMBER,
41 X_SUPPLIER_ID IN NUMBER,
42 X_SUPPLIER_SITE_ID IN NUMBER,
43 X_SOURCING_ORG_ID IN NUMBER,
44 X_SOURCING_SUBINV IN VARCHAR2,
45 X_SOURCING_LOC_ID IN NUMBER,
46 X_WIP_LINE_ID IN NUMBER,
47 X_STATUS IN NUMBER,
48 X_PRINT_KANBAN_CARD IN NUMBER,
49 --ekanban changes by javakat
50 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
51 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2)
52 return Number;
53
54 function resolve_pullseq_with_pull(
55 X_STATUS IN NUMBER,
56 X_PULL_SEQ_ID IN NUMBER,
57 X_PRINT_KANBAN_CARD IN NUMBER,
58 X_REPORT_ID IN NUMBER ,
59 --ekanban changes by javakat
60 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
61 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2)
62 return Number;
63
64 function resolve_pullseq_with_loc(
65 X_ORG_ID IN NUMBER,
66 X_ITEM_LO IN VARCHAR2,
67 X_ITEM_HI IN VARCHAR2,
68 X_SUBINV IN VARCHAR2,
69 X_LOCATOR_LO IN VARCHAR2,
70 X_LOCATOR_HI IN VARCHAR2,
71 X_SOURCE_TYPE IN NUMBER,
72 X_SUPPLIER_ID IN NUMBER,
73 X_SUPPLIER_SITE_ID IN NUMBER,
74 X_SOURCING_ORG_ID IN NUMBER,
75 X_SOURCING_SUBINV IN VARCHAR2,
76 X_SOURCING_LOC_ID IN NUMBER,
77 X_WIP_LINE_ID IN NUMBER,
78 X_STATUS IN NUMBER,
79 X_PRINT_KANBAN_CARD IN NUMBER ,
80 --ekanban changes by javakat
81 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
82 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2
83 )
84 return Number;
85
86 function resolve_pullseq_no_loc(
87 X_ORG_ID IN NUMBER,
88 X_ITEM_LO IN VARCHAR2,
89 X_ITEM_HI IN VARCHAR2,
90 X_SUBINV IN VARCHAR2,
91 X_LOCATOR_LO IN VARCHAR2,
92 X_LOCATOR_HI IN VARCHAR2,
93 X_SOURCE_TYPE IN NUMBER,
94 X_SUPPLIER_ID IN NUMBER,
95 X_SUPPLIER_SITE_ID IN NUMBER,
96 X_SOURCING_ORG_ID IN NUMBER,
97 X_SOURCING_SUBINV IN VARCHAR2,
98 X_SOURCING_LOC_ID IN NUMBER,
99 X_WIP_LINE_ID IN NUMBER,
100 X_STATUS IN NUMBER,
101 X_PRINT_KANBAN_CARD IN NUMBER ,
102 --ekanban changes by javakat
103 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
104 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2
105 )
106 return Number;
107
108
109 procedure card_check_and_create( X_PULL_SEQUENCE_ID IN NUMBER,
110 X_ORG_ID IN NUMBER,
111 X_ITEM_ID IN NUMBER,
112 X_SUBINV IN VARCHAR2,
113 X_LOC_ID IN NUMBER,
114 X_SOURCE_TYPE IN NUMBER,
115 X_KANBAN_SIZE IN NUMBER,
116 X_NO_OF_CARDS IN NUMBER,
117 X_SUPPLIER_ID IN NUMBER,
118 X_SUPPLIER_SITE_ID IN NUMBER,
119 X_SOURCING_ORG_ID IN NUMBER,
120 X_SOURCING_SUBINV IN VARCHAR2,
121 X_SOURCING_LOC_ID IN NUMBER,
122 X_WIP_LINE_ID IN NUMBER,
123 X_STATUS IN NUMBER,
124 X_PRINT_KANBAN_CARD IN NUMBER,
125 p_release_kanban_flag IN NUMBER,
126 X_REPORT_ID IN OUT NOCOPY NUMBER,
127 --ekanban changes by javakat
128 X_CREATE_CARD_FLAG IN NUMBER DEFAULT 1,
129 X_PLAN_CARD_FLAG IN NUMBER DEFAULT 2
130 );
131
132 procedure query_range_loc( X_ORG_ID IN NUMBER,
133 X_LOCATOR_LO IN VARCHAR2,
134 X_LOCATOR_HI IN VARCHAR2,
135 X_WHERE OUT NOCOPY VARCHAR2 );
136
137 procedure query_range_itm( X_ITEM_LO IN VARCHAR2,
138 X_ITEM_HI IN VARCHAR2,
139 X_WHERE OUT NOCOPY VARCHAR2 );
140
141 procedure print_kanban_report ( X_REPORT_ID IN NUMBER );
142
143 procedure print_error;
144
145 procedure kb_get_conc_segments( X_ORG_ID IN NUMBER,
146 X_LOC_ID IN NUMBER,
147 X_CONC_SEGS OUT NOCOPY VARCHAR2
148 );
149 --
150 --
151 -- Ok_To_Create_eKanban_Cards : This procedure checks whether kanban cards can
152 -- be generated for a pull sequences if ekanban profile is enabled.
153 -- Added this Procedure by javakat to fix bug 11829018
154 --
155 Procedure Create_eKanban_Cards(X_return_status OUT NOCOPY VARCHAR2,
156 X_return_msg OUT NOCOPY VARCHAR2,
157 p_Pull_sequence_id IN NUMBER,
158 p_print_cards IN NUMBER
159 );
160 END INVKBCGN;