DBA Data[Home] [Help]

PACKAGE: APPS.MSC_CL_COLLECTION

Source


1 PACKAGE MSC_CL_COLLECTION AUTHID CURRENT_USER AS
2 /* $Header: MSCCLBAS.pls 120.25.12020000.3 2013/03/26 07:11:35 swundapa ship $ */
3 
4   ----- ARRAY DATA TYPE --------------------------------------------------
5 
6    TYPE NumTblTyp IS TABLE OF NUMBER;
7    TYPE TblLstTyp IS TABLE OF VARCHAR2(30);
8  --------PROFILE OPTION VALUES ------------------------------------------
9    v_inv_ctp_val NUMBER := NVL(FND_PROFILE.Value('INV_CTP'),0);
10    G_MSC_DEBUG   VARCHAR2(1) := nvl(FND_PROFILE.Value('MRP_DEBUG'),'N');
11    G_DEG_PARALLEL NUMBER := to_number(fnd_profile.value('MSC_INDEX_PARALLEL_THREADS') );
12 
13    --------Instance information ---------------
14    v_instance_id                NUMBER;
15    v_exchange_mode               NUMBER:= 2;  /* default to SYS_NO */
16    v_instance_code              VARCHAR2(3);
17    v_applsys_schema             VARCHAR2(32);
18    v_so_exchange_mode            NUMBER:= 2;  /* default to SYS_NO */
19    v_is_so_incremental_refresh   BOOLEAN;
20    v_is_so_complete_refresh      BOOLEAN;
21    v_last_collection_id          NUMBER;
22    v_is_cont_refresh             BOOLEAN;
23    v_is_incremental_refresh      BOOLEAN;
24    v_is_complete_refresh         BOOLEAN;
25    v_is_partial_refresh          BOOLEAN;
26    v_apps_ver                   NUMBER;
27    v_supply_id                  NUMBER ;
28    v_source_organization_id     NUMBER ;
29    v_source_sr_instance_id      NUMBER ;
30      ---  PREPLACE CHANGE END  ---
31    v_is_legacy_refresh           BOOLEAN:= FALSE;  -- change for legacy L Flow
32     v_current_date                DATE;
33     v_current_user                NUMBER;
34     v_warning_flag                NUMBER:= 2;
35 --    v_in_org_str                  VARCHAR2(4000):='NULL';
36     v_instance_type              NUMBER;
37 
38    v_chr10                       VARCHAR2(1) := FND_GLOBAL.LOCAL_CHR(10);
39    v_chr13                       VARCHAR2(1) := FND_GLOBAL.LOCAL_CHR(13);
40    v_sub_str                     VARCHAR2(32767):=NULL;
41 --   v_depot_org_str          VARCHAR2(15000):='NULL';
42 --   v_non_depot_org_str      VARCHAR2(15000):='NULL';
43    G_COLLECT_SRP_DATA       VARCHAR2(1) :=  NVL(FND_PROFILE.VALUE('MSC_SRP_ENABLED'),'N');
44    v_sourcing_flag               NUMBER;
45    link_top_transaction_id_req   BOOLEAN := FALSE;
46     G_MSC_CONFIGURATION 		VARCHAR2(240) := nvl(fnd_profile.value('MSC_X_CONFIGURATION'), 1);
47     SUPPLIES_INDEX_FAIL           EXCEPTION;
48      v_recalc_nra                  NUMBER;
49     v_bom_refresh_type            NUMBER :=0;
50     v_discrete_flag              NUMBER:= 2;
51     v_process_flag               NUMBER:= MSC_UTIL.SYS_NO;
52     v_my_company_name		  MSC_COMPANIES.COMPANY_NAME%TYPE;
53 
54   ----- CONSTANTS --------------------------------------------------------
55 
56    SYS_YES                      CONSTANT NUMBER := 1;
57    SYS_NO                       CONSTANT NUMBER := 2;
58    v_DSMode                              NUMBER := 2;
59    ASL_SYS_NO                   CONSTANT NUMBER := 2;
60    ASL_YES_RETAIN_CP            CONSTANT NUMBER := 3;
61    ASL_YES                      CONSTANT NUMBER := 1;
62 --agmcont
63    SYS_INCR                     CONSTANT NUMBER := 3; -- incr refresh
64    SYS_TGT                      CONSTANT NUMBER := 4; -- targeted refresh
65 
66    ------for Staging to ODS swap partition
67    G_STG_ODS_SWP_PHASE_0         CONSTANT NUMBER:=0;    -- planning datapull/legacy load completed
68    G_STG_ODS_SWP_PHASE_1         CONSTANT NUMBER:=1;    -- stg partn successfully swapped with temp tbl
69    G_STG_ODS_SWP_PHASE_2         CONSTANT NUMBER:=2;    -- temp tbl successfully swapped with ODS partition
70 
71  ----- CONSTANTS FOR SCE -------------------------------------------------
72 	NO_USER_COMPANY              CONSTANT NUMBER := 1;
73 	COMPANY_ONLY                 CONSTANT NUMBER := 2;
74 	USER_AND_COMPANY             CONSTANT NUMBER := 3;
75 
76 
77    G_JOB_DONE                     CONSTANT NUMBER := 1;
78    G_JOB_NOT_DONE                 CONSTANT NUMBER := 2;
79    G_JOB_ERROR                    CONSTANT NUMBER := 3;
80    --- PREPLACE CHANGE START ---
81 
82    G_COMPLETE                   CONSTANT NUMBER := 1;
83    G_INCREMENTAL                CONSTANT NUMBER := 2;
84    G_PARTIAL                    CONSTANT NUMBER := 3;
85 -- agmcont
86 --   G_CONT                       CONSTANT NUMBER := 5;
87 
88    v_coll_prec                   MSC_CL_EXCHANGE_PARTTBL.CollParamREC;
89    v_prec_defined                BOOLEAN := FALSE;
90 
91    ---  PREPLACE CHANGE END  ---
92 
93    G_SUCCESS                    CONSTANT NUMBER := 0;
94    G_WARNING                    CONSTANT NUMBER := 1;
95    G_ERROR                      CONSTANT NUMBER := 2;
96 
97    G_COLLECTION_PROGRAM         CONSTANT NUMBER := 1;
98    G_PULL_PROGRAM               CONSTANT NUMBER := 2;
99 
100    G_APPS107             CONSTANT NUMBER := 1;
101    G_APPS110             CONSTANT NUMBER := 2;
102    G_APPS115             CONSTANT NUMBER := 3;
103    G_APPS120             CONSTANT NUMBER := 4;
104 
105    G_INS_DISCRETE        CONSTANT NUMBER := 1;
106    G_INS_PROCESS         CONSTANT NUMBER := 2;
107    G_INS_OTHER           CONSTANT NUMBER := 3;
108    G_INS_MIXED           CONSTANT NUMBER := 4;
109 
110    G_ST_EMPTY            CONSTANT NUMBER := 0;   -- no instance data exists;
111    G_ST_PULLING          CONSTANT NUMBER := 1;
112    G_ST_READY            CONSTANT NUMBER := 2;
113    G_ST_COLLECTING       CONSTANT NUMBER := 3;
114    G_ST_PURGING          CONSTANT NUMBER := 4;
115 
116    -- NULL VALUE USED IN THE WHERE CLAUSE
117 
118   -- NULL_DATE             CONSTANT DATE:=   SYSDATE-36500;
119    --NULL_VALUE            CONSTANT NUMBER:= -23453;   -- null value for positive number
120    --NULL_CHAR             CONSTANT VARCHAR2(6):= '-23453';
121    --NULL_DBLINK           CONSTANT VARCHAR2(1):= ' ';
122 
123 --   G_ALL_ORGANIZATIONS          CONSTANT VARCHAR2(6):= '-999';
124    ALTER_TEMP_TABLE_ERROR	EXCEPTION;
125    EXCHANGE_PARTN_ERROR	    EXCEPTION;
126 
127 
128    -- ============ Task Control ================
129 
130    PIPE_TIME_OUT         CONSTANT NUMBER := 30;      -- 30 secs
131    START_TIME            DATE;
132    p_TIMEOUT		 NUMBER;
133 
134    -- ================== Worker Status ===================
135 
136    OK                    CONSTANT NUMBER := 1;
137    FAIL                  CONSTANT NUMBER := 0;
138 
139    --  ================= Task Number ====================
140 
141    TASK_SUPPLY                    CONSTANT NUMBER :=  1; --B
142    TASK_SOURCING                  CONSTANT NUMBER :=  2;
143    TASK_ATP_RULES                 CONSTANT NUMBER :=  3;
144    TASK_UNIT_NUMBER               CONSTANT NUMBER :=  4; --H
145    TASK_BOM                       CONSTANT NUMBER :=  5; --D
146    TASK_BOM_COMPONENTS            CONSTANT NUMBER :=  6;
147    TASK_ROUTING                   CONSTANT NUMBER :=  7;
148    TASK_OPERATION_COMPONENTS      CONSTANT NUMBER :=  8;
149    TASK_OPERATION_NETWORKS        CONSTANT NUMBER :=  9;
150    TASK_PROCESS_EFFECTIVITY       CONSTANT NUMBER := 10;
151    TASK_OPERATION_RESOURCES       CONSTANT NUMBER := 11;
152    TASK_COMPONENT_SUBSTITUTE      CONSTANT NUMBER := 12;
153    TASK_OP_RESOURCE_SEQ           CONSTANT NUMBER := 13;
154    TASK_ROUTING_OPERATIONS        CONSTANT NUMBER := 14;
155    TASK_CALENDAR_DATE             CONSTANT NUMBER := 15; --E
156    TASK_CATEGORY                  CONSTANT NUMBER := 16; --F
157    TASK_ITEM                      CONSTANT NUMBER := 17; --G
158    TASK_MDS_DEMAND                CONSTANT NUMBER := 18;
159    TASK_ITEM_FORECASTS            CONSTANT NUMBER := 19;
160    TASK_WIP_COMP_DEMAND           CONSTANT NUMBER := 20;
161    TASK_RES_REQ                   CONSTANT NUMBER := 21;
162    TASK_SALES_ORDER               CONSTANT NUMBER := 22; --C
163    TASK_BIS_TARGETS               CONSTANT NUMBER := 23;
164    TASK_PLANNERS                  CONSTANT NUMBER := 24;
165    TASK_DEMAND_CLASS              CONSTANT NUMBER := 25;
166    TASK_RESOURCE                  CONSTANT NUMBER := 26;
167    TASK_SUB_INVENTORY             CONSTANT NUMBER := 27;
168    TASK_HARD_RESERVATION          CONSTANT NUMBER := 28;
169    TASK_NET_RESOURCE_AVAIL        CONSTANT NUMBER := 29;
170    TASK_SUPPLIER_CAPACITY         CONSTANT NUMBER := 30;
171    TASK_SAFETY_STOCK              CONSTANT NUMBER := 31;
172    TASK_PROJECT                   CONSTANT NUMBER := 32;
173    TASK_PARAMETER                 CONSTANT NUMBER := 33;
174    TASK_BIS_PFMC_MEASURES         CONSTANT NUMBER := 34;
175    TASK_ITEM_SUBSTITUTES          CONSTANT NUMBER := 35;
176    /* SCE Change starts */
177    TASK_ITEM_CUSTOMERS		  CONSTANT NUMBER := 36;
178    TASK_COMPANY_USERS             CONSTANT NUMBER := 37;
179    /* SCE Change Ends */
180    TASK_BOR                       CONSTANT NUMBER := 38;
181    TASK_BIS_TARGET_LEVELS         CONSTANT NUMBER := 39;
182    TASK_BIS_BUSINESS_PLANS        CONSTANT NUMBER := 40;
183    TASK_BIS_PERIODS               CONSTANT NUMBER := 41;
184    TASK_ODS_DEMAND                CONSTANT NUMBER := 42;
185    TASK_TRIP                      CONSTANT NUMBER := 43;
186     --Added for the performance fix#3282638
187    TASK_ABC_CLASSES               CONSTANT NUMBER := 44;
188 
189    /* ds change  start*/
190 
191    TASK_RES_INST_REQ		  CONSTANT NUMBER :=45;
192    TASK_RESOURCE_SETUP		  CONSTANT NUMBER :=46;
193    TASK_SETUP_TRANSITION	  CONSTANT NUMBER :=47;
194    TASK_STD_OP_RESOURCES	  CONSTANT NUMBER :=48;
195 
196    TASK_SALES_CHANNEL	  CONSTANT NUMBER :=49;
197    TASK_FISCAL_CALENDAR	  CONSTANT NUMBER :=50;
198 
199    TASK_IRO_DEMAND CONSTANT  NUMBER:=51;
200    TASK_ERO_DEMAND CONSTANT  NUMBER:=52;
201 
202    TASK_PAYBACK_DEMAND_SUPPLY NUMBER:=53;
203    TASK_CURRENCY_CONVERSION  CONSTANT  NUMBER   := 54; -- for bug # 6469722
204    TASK_DELIVERY_DETAILS  CONSTANT  NUMBER   := 55; -- for bug # 6730983
205     TASK_CMRO  CONSTANT  NUMBER   := 56;       --- CMRO
206    TASK_IBUC_HISTORY  CONSTANT  NUMBER   := 57;
207    TASK_SHORT_TEXT  CONSTANT  NUMBER:=58;
208    TASK_LONG_TEXT  CONSTANT  NUMBER:=59;
209    /* usaf*/
210    TASK_EAM_INFO  CONSTANT  NUMBER:=60;
211    TASK_EAM_FORECAST CONSTANT  NUMBER:=61;
212    TASK_VISITS  CONSTANT  NUMBER:=62;
213    TASK_WO_ATTRIBUTES  CONSTANT  NUMBER:=63;
214    TASK_WO_TASK_HIERARCHY  CONSTANT  NUMBER:=64;
215    TASK_WO_OPERATION_REL  CONSTANT  NUMBER:=65;
216    TASK_WORK_BREAKDOWN_STRUCT  CONSTANT  NUMBER:=66;
217    TASK_WO_MILESTONES  CONSTANT  NUMBER:=67;
218    TASK_WO_SUB_COMP  CONSTANT  NUMBER:= 68;
219    TASK_CMRO_FORECAST_DEMANDS CONSTANT  NUMBER:=69;
220    TASK_CMRO_FORECAST_RR CONSTANT  NUMBER:=70;
221    TASK_CMRO_SUPP_RESRV CONSTANT  NUMBER:=71;
222    TASK_EAM_FORECAST_DEMANDS CONSTANT  NUMBER:=72;
223    TASK_EAM_FORECAST_RR CONSTANT  NUMBER:=73;
224    TASK_cmro_closed_wo  CONSTANT NUMBER:=74;
225    TASK_ODS_RES_REQ   CONSTANT NUMBER := 75;
226    TASK_OSP_SUPPLY CONSTANT NUMBER := 76;
227 
228    TOTAL_TASK_NUMBER              CONSTANT NUMBER := 76;  -- Changed For bug 5935273 SRP Additions
229   /* ds change end */
230 
231    UNRESOVLABLE_ERROR             CONSTANT NUMBER := -9999999;
232 
233    -- ================== SCE Related Data ==============
234    G_MY_COMPANY_ID		  CONSTANT NUMBER := 1;
235    G_SUPPLIER			  CONSTANT NUMBER := 1;
236    G_CUSTOMER			  CONSTANT NUMBER := 2;
237    G_ORGANIZATION		  CONSTANT NUMBER := 3;
238 --   G_CONF_APS			  CONSTANT NUMBER := 1;
239 --   G_CONF_APS_SCE		  CONSTANT NUMBER := 2;
240 --   G_CONF_SCE		  	  CONSTANT NUMBER := 3;
241 
242    /* CP-ACK change starts */
243    G_MRP_PO_ACK           CONSTANT NUMBER := 49;
244    /* CP-ACK change ends */
245 
246    /* CP-ACK change starts */
247    TYPE_DAILY_BUCKET      CONSTANT NUMBER := 1;
248    PROMISED_DATE_PREF     CONSTANT NUMBER := 1;
249    NEED_BY_DATE_PREF      CONSTANT NUMBER := 2;
250    /* CP-ACK change ends */
251 
252     -- ================== ATP Enhancement ==============
253 
254     G_TASK_ATP_RULES NUMBER :=0;
255     G_TASK_SOURCING NUMBER :=0;
256 
257    --  ================= Procedures ====================
258    PROCEDURE LAUNCH_WORKER(
259                      ERRBUF				OUT NOCOPY VARCHAR2,
263                      pLCID                              IN  NUMBER,
260 	             RETCODE				OUT NOCOPY NUMBER,
261                      pMONITOR_REQUEST_ID                IN  NUMBER,
262                      pINSTANCE_ID                       IN  NUMBER,
264                      pTIMEOUT                           IN  NUMBER,
265                      pRECALC_NRA                        IN  NUMBER,
266                      pRECALC_SH                         IN  NUMBER,
267                      pEXCHANGE_MODE                     IN  NUMBER,
268                      pSO_EXCHANGE_MODE                  IN  NUMBER);
269 
270    PROCEDURE LAUNCH_MONITOR(
271                       ERRBUF				OUT NOCOPY VARCHAR2,
272 	              RETCODE				OUT NOCOPY NUMBER,
273                       pINSTANCE_ID                      IN  NUMBER,
274                       pTIMEOUT                          IN  NUMBER,-- minutes
275                       pTotalWorkerNum                   IN  NUMBER,
276                       pRECALC_NRA                       IN  NUMBER,
277                       pRECALC_SH                        IN  NUMBER,
278                       pPURGE_SH                         IN  NUMBER,
279                       pAPCC_refresh                     IN  NUMBER default MSC_UTIL.SYS_NO);
280 
281    PROCEDURE DELETE_PROCESS(
282                       ERRBUF				OUT NOCOPY VARCHAR2,
283 	              RETCODE				OUT NOCOPY NUMBER,
284                       pINSTANCE_ID                      IN  NUMBER);
285 
286    PROCEDURE alter_temp_table (ERRBUF		OUT NOCOPY VARCHAR2,
287 			                         RETCODE		OUT NOCOPY NUMBER,
288                                p_part_table 	IN VARCHAR2,
289                                p_instance_code 	IN VARCHAR2,
290                                p_severity_level	IN NUMBER
291                             )  ;
292 
293    PROCEDURE PURGE_STAGING_TABLES( ERRBUF               OUT NOCOPY VARCHAR2,
294 	                           RETCODE              OUT NOCOPY NUMBER,
295                                    pINSTANCE_ID         IN  NUMBER,
296                                    pVALIDATION          IN  NUMBER:=MSC_UTIL.SYS_YES);
297 
298    PROCEDURE PURGE_STAGING_TABLES_SUB( p_instance_id    IN  NUMBER);
299 
300    PROCEDURE GENERATE_ITEM_KEYS (ERRBUF		OUT NOCOPY VARCHAR2,
301     			     RETCODE		OUT NOCOPY NUMBER,
302                                  pINSTANCE_ID 	IN NUMBER);
303 
304    PROCEDURE GENERATE_TRADING_PARTNER_KEYS (ERRBUF	OUT NOCOPY VARCHAR2,
305 	    		     RETCODE		OUT NOCOPY NUMBER,
306                               pINSTANCE_ID 	IN NUMBER);
307 
308 
309 
310   /* added this procedure for the conc program - Create Instance-Org Supplier Association
311     This conc program updates the Msc_trading_partners table with the Modeleed Supplier info */
312 
313    PROCEDURE ENTER_MODELLED_INFO( ERRBUF               OUT NOCOPY VARCHAR2,
314                                   RETCODE              OUT NOCOPY NUMBER,
315                                   pINSTANCE_ID         IN  NUMBER,
316                                   pDEST_PARTNER_ORG_ID IN  NUMBER,
317                                   pSUPPLIER_ID         IN  NUMBER,
318                                   pSUPPLIER_SITE_ID   IN  NUMBER,
319                                   pACCEPT_DEMANDS_FROM_UNMET_PO IN NUMBER );
320 
321 
322    PROCEDURE DELETE_MSC_TABLE( p_table_name            IN VARCHAR2,
323                                p_instance_id           IN NUMBER,
324                                p_plan_id               IN NUMBER:= NULL,
325                                p_sub_str               IN VARCHAR2:= NULL) ;
326 
327   FUNCTION LAUNCH_MONITOR_CONT(
328                       ERRBUF                            OUT NOCOPY VARCHAR2,
329                       RETCODE                           OUT NOCOPY NUMBER,
330                       pINSTANCE_ID                      IN  NUMBER,
331                       pTIMEOUT                          IN  NUMBER,-- minutes
332                       pTotalWorkerNum                   IN  NUMBER,
333                       pDSMode                           IN NUMBER default MSC_UTIL.SYS_NO,
334                       pAPCC_refresh                     IN NUMBER default MSC_UTIL.SYS_NO)
335  RETURN boolean;
336 
337    ------ NEW OBJECTS for PARTIAL REPLACEMENT ----
338 
339    /* ************************************************************
340    Things that are always loaded in the current design
341    for complete refershment are
342    Load_Trading_Partner - Vendor and Customer info
343    Load_Designator
344    Load_Forecasts  - Loads into designator table
345    Load_UOM
346    Category_Sets   - via Transform_Keys.
347 
348    NOTE : Objects that do not take any parameter will not
349           be loaded currently.
350     ************************************************************ */
351 
352    PTASK_SUPPLY                    CONSTANT NUMBER :=  1;
353        -- Used instead of PTASK_STAGING_SUPPLY and PTASK_ODS_SUPPLY below
354    PTASK_SOURCING                  CONSTANT NUMBER :=  2;
355    PTASK_ATP_RULES                 CONSTANT NUMBER :=  3;
356    PTASK_WIP_SUPPLY                CONSTANT NUMBER :=  4;
357    PTASK_PO_SUPPLY                 CONSTANT NUMBER :=  5;
358    PTASK_OH_SUPPLY                 CONSTANT NUMBER :=  6;
359    PTASK_MPS_SUPPLY                CONSTANT NUMBER :=  7;
360    PTASK_STAGING_SUPPLY            CONSTANT NUMBER :=  8;
361        -- Any of TASK_WIP_SUPPLY, TASK_PO_SUPPLY, TASK_OH_SUPPLY,
362        -- TASK_MPS_SUPPLY should be equivalent to this
363    PTASK_ODS_SUPPLY              CONSTANT NUMBER   :=  9;
364        -- A separate procedure is necessary
365        -- to get data from ODS to the temp table.
366    PTASK_SALES_ORDER               CONSTANT NUMBER := 10; --C
367    PTASK_BOM                       CONSTANT NUMBER := 11; --D
368    PTASK_BOM_COMPONENTS            CONSTANT NUMBER := 12;
369    PTASK_ROUTING                   CONSTANT NUMBER := 13;
373    PTASK_OPERATION_RESOURCES       CONSTANT NUMBER := 17;
370    PTASK_OPERATION_COMPONENTS      CONSTANT NUMBER := 14;
371    PTASK_OPERATION_NETWORKS        CONSTANT NUMBER := 15;
372    PTASK_PROCESS_EFFECTIVITY       CONSTANT NUMBER := 16;
374    PTASK_COMPONENT_SUBSTITUTE      CONSTANT NUMBER := 18;
375    PTASK_OP_RESOURCE_SEQ           CONSTANT NUMBER := 19;
376    PTASK_ROUTING_OPERATIONS        CONSTANT NUMBER := 20;
377    PTASK_ITEM                      CONSTANT NUMBER := 21; --G
378    PTASK_CATEGORY_ITEM             CONSTANT NUMBER := 22; --F
379    PTASK_WIP_RES_REQ               CONSTANT NUMBER := 23;
380    PTASK_WIP_DEMAND                CONSTANT NUMBER := 24;
381    PTASK_FORECASTS                 CONSTANT NUMBER := 25;
382    PTASK_MDS_DEMAND                CONSTANT NUMBER := 26;
383    PTASK_STAGING_DEMAND            CONSTANT NUMBER := 27;
384        -- Any of TASK_WIP_DEMAND, TASK_FORECAST_DEMAND,
385        -- TASK_MDS_DEMAND shoud be equivalent to this.
386        -- Call LOAD_WIP_DEMAND, LOAD_ITEM_FORECASTS
387        -- and LOAD_DEMAND accordingly.
388    PTASK_ODS_DEMAND              CONSTANT NUMBER  :=  28;
389        -- A separate procedure is necessary
390        -- to get data from ODS to the temp table.
391    PTASK_RESOURCE                  CONSTANT NUMBER := 29;
392                  -- BOM parameter will be used here
393    PTASK_HARD_RESERVATION          CONSTANT NUMBER := 30;
394    PTASK_NET_RESOURCE_AVAIL        CONSTANT NUMBER := 31;
395    PTASK_SUPPLIER_CAPACITY         CONSTANT NUMBER := 32;
396                  -- Note that this does not depend on any snapshot to
397                  -- be refreshed????  - Verify
398 
399    PTASK_SAFETY_STOCK              CONSTANT NUMBER := 33;
400    PTASK_TRADING_PARTNER           CONSTANT NUMBER := 34;
401    PTASK_UOM                       CONSTANT NUMBER := 35;
402 
403    PTASK_FORECAST_DEMAND           CONSTANT NUMBER := 36;
404    PTASK_BOR                       CONSTANT NUMBER := 37;
405    PTASK_CALENDAR_DATE             CONSTANT NUMBER := 38;
406    PTASK_DEMAND_CLASS              CONSTANT NUMBER := 39;
407    PTASK_DESIGNATOR                CONSTANT NUMBER := 40;
408    PTASK_BIS_PFMC_MEASURES         CONSTANT NUMBER := 41;
409    PTASK_BIS_TARGET_LEVELS         CONSTANT NUMBER := 42;
410    PTASK_BIS_TARGETS               CONSTANT NUMBER := 43;
411    PTASK_BIS_BUSINESS_PLANS        CONSTANT NUMBER := 44;
412    PTASK_BIS_PERIODS               CONSTANT NUMBER := 45;
413    PTASK_PARAMETER                 CONSTANT NUMBER := 46;
414    PTASK_PLANNERS                  CONSTANT NUMBER := 47;
415    PTASK_PROJECT                   CONSTANT NUMBER := 48;
416    PTASK_SUB_INVENTORY             CONSTANT NUMBER := 49;
417    PTASK_UNIT_NUMBER               CONSTANT NUMBER := 50;
418      -- added this task for Prod substitution in Targeted Collections -----
419    PTASK_ITEM_SUBSTITUTES          CONSTANT NUMBER := 51;
420 
421 	 /* SCE Change starts */
422  -- added this task for User - Company association in Targeted Collections --
423    PTASK_COMPANY_USERS             CONSTANT NUMBER := 52;
424    PTASK_ITEM_CUSTOMERS            CONSTANT NUMBER := 53;
425    	 /* SCE Change ends */
426    PTASK_TRIP                      CONSTANT NUMBER := 54;
427 
428    --Added for the performance fix#3282638
429    PTASK_ABC_CLASSES               CONSTANT NUMBER := 55;
430    /* ds change start */
431    PTASK_RES_INST_REQ		  CONSTANT NUMBER :=56;
432    PTASK_RESOURCE_SETUP		  CONSTANT NUMBER :=57;
433    PTASK_SETUP_TRANSITION	  CONSTANT NUMBER :=58;
434    PTASK_STD_OP_RESOURCES	  CONSTANT NUMBER :=59;
435    /* ds change end */
436 
437    PTASK_SALES_CHANNEL	      CONSTANT NUMBER :=60;
438    PTASK_FISCAL_CALENDAR	  CONSTANT NUMBER :=61;
439 
440    PTASK_IRO_DEMAND CONSTANT  NUMBER:=62;
441    PTASK_ERO_DEMAND CONSTANT  NUMBER:=63;
442 
443    PTASK_PAYBACK_DEMAND_SUPPLY    NUMBER:=64;
444    PTASK_CURRENCY_CONVERSION CONSTANT NUMBER:= 65; -- bug # 6469722
445    PTASK_DELIVERY_DETAILS  CONSTANT  NUMBER   := 66; -- for bug # 6730983
446    PTASK_CMRO  CONSTANT  NUMBER   := 67; -- for bug # 6730983
447    PTASK_IBUC_HISTORY  CONSTANT  NUMBER   :=68;
448    PTASK_SHORT_TEXT  CONSTANT  NUMBER:=69;
449    PTASK_LONG_TEXT  CONSTANT  NUMBER:=70;
450 
451   /* usaf*/
452    PTASK_EAM_INFO  CONSTANT  NUMBER:=71;
453    PTASK_EAM_FORECAST CONSTANT  NUMBER:=72;
454    PTASK_VISITS  CONSTANT  NUMBER:=73;
455    PTASK_WO_ATTRIBUTES  CONSTANT  NUMBER:= 74;
456    PTASK_WO_TASK_HIERARCHY  CONSTANT  NUMBER:=75;
457    PTASK_WO_OPERATION_REL  CONSTANT  NUMBER:=76;
458    PTASK_WORK_BREAKDOWN_STRUCT  CONSTANT  NUMBER:= 77;
459    PTASK_WO_MILESTONES  CONSTANT  NUMBER:=78;
460    PTASK_WO_SUB_COMP  CONSTANT  NUMBER:= 79;
461    PTASK_CMRO_FORECAST_DEMANDS CONSTANT  NUMBER:=80;
462    PTASK_CMRO_FORECAST_RR CONSTANT  NUMBER:=81;
463    PTASK_CMRO_SUPP_RESRV CONSTANT NUMBER := 82;
464    PTASK_EAM_FORECAST_DEMANDS CONSTANT  NUMBER:=83;
465    PTASK_EAM_FORECAST_RR CONSTANT  NUMBER:=84;
466    PTASK_CMRO_CLOSED_WO CONSTANT NUMBER := 85;
467    PTASK_ODS_RES_REQ CONSTANT NUMBER := 86;
468    PTASK_OSP_SUPPLY CONSTANT NUMBER := 87;
469 
470    TOTAL_PARTIAL_TASKS             CONSTANT NUMBER :=88;  -- CHanged for Bug 5935273 SRP Additions
471 
472    FUNCTION Q_PARTIAL_TASK (p_instance_id NUMBER,
473                             p_task_num    NUMBER)
474    RETURN BOOLEAN;
475 
476    PROCEDURE LOG_MESSAGE(pSOURCE                 IN  NUMBER,
477 				 pID                     IN  NUMBER,
478 				 pCREATION_DATE          IN  DATE,
479 				 pMTYPE                  IN  NUMBER,
480 				 pERRBUF                 IN  VARCHAR2);
481 
482 	 PROCEDURE LOG_MESSAGE(pSOURCE                 IN  NUMBER,
483 				 pID                     IN  NUMBER,
484 				 pCREATION_DATE          IN  DATE,
485 				 pMTYPE                  IN  NUMBER,
486 				 pPROCEDURE_NAME         IN  VARCHAR2,
487 				 pEXCEPTION_TYPE         IN  VARCHAR2 := NULL,
491 				 pSEGMENT4               IN  VARCHAR2 := NULL,
488 				 pSEGMENT1               IN  VARCHAR2 := NULL,
489 				 pSEGMENT2               IN  VARCHAR2 := NULL,
490 				 pSEGMENT3               IN  VARCHAR2 := NULL,
492 				 pSEGMENT5               IN  VARCHAR2 := NULL,
493 				 pSEGMENT6               IN  VARCHAR2 := NULL,
494 				 pSEGMENT7               IN  VARCHAR2 := NULL,
495 				 pSEGMENT8               IN  VARCHAR2 := NULL,
496 				 pSEGMENT9               IN  VARCHAR2 := NULL,
497 				 pSEGMENT10              IN  VARCHAR2 := NULL);
498 
499    PROCEDURE LAUNCH_MON_PARTIAL(
500                       ERRBUF				OUT NOCOPY VARCHAR2,
501 	              RETCODE				OUT NOCOPY NUMBER,
502                       pINSTANCE_ID                      IN  NUMBER,
503                       pTIMEOUT                          IN  NUMBER,-- minutes
504                       pTotalWorkerNum                   IN  NUMBER,
505                       pRECALC_NRA                       IN  NUMBER,
506                       pRECALC_SH                        IN  NUMBER,
507                       pPURGE_SH                         IN  NUMBER,
508                       pAPCC_refresh                     IN  NUMBER default MSC_UTIL.SYS_NO);
509 
510 
511 -- agmcont:
512 
513 -- PROCEDURE PURGE_STAGING_TABLES_TRNC(p_instance_id    IN  NUMBER) ;
514 -- PROCEDURE PURGE_STAGING_TABLES_DEL( p_instance_id     IN  NUMBER);
515  PROCEDURE TRUNCATE_MSC_TABLE(p_table_name  IN VARCHAR2) ;
516 /* ds change: */
517 PROCEDURE LAUNCH_MONITOR_DET_SCH( ERRBUF                     OUT NOCOPY VARCHAR2,
518                               RETCODE                           OUT NOCOPY NUMBER,
519                               pINSTANCE_ID                      IN  NUMBER,
520                               pTIMEOUT                          IN  NUMBER,
521                               pTotalWorkerNum                   IN  NUMBER,
522                               pRECALC_NRA                       IN  NUMBER,
523                               pAPCC_refresh                     IN NUMBER default MSC_UTIL.SYS_NO);
524 
525 
526  FUNCTION is_msctbl_partitioned ( p_table_name  IN  VARCHAR2)  RETURN BOOLEAN ;
527 
528  --FUNCTION ITEM_NAME ( p_item_id                          IN NUMBER) RETURN VARCHAR2;
529  PBS      NUMBER;   /* purge batch size */
530   --PROCEDURE LOG_DEBUG(  pBUFF                     IN  VARCHAR2);
531   --PROCEDURE LOG_MESSAGE(  pBUFF   IN  VARCHAR2);
532 
533 
534 
535 --	PROCEDURE LOAD_RESOURCE;
536 --	PROCEDURE LOAD_RES_INST_CHANGE;
537 
538    PROCEDURE INITIALIZE( pINSTANCE_ID NUMBER);
539 --   PROCEDURE INITIALIZE_PULL_GLOBALS( pINSTANCE_ID       IN NUMBER);
540    PROCEDURE INITIALIZE_LOAD_GLOBALS( pINSTANCE_ID       IN NUMBER);
541    PROCEDURE  COMPUTE_RES_AVAIL (ERRBUF               OUT NOCOPY VARCHAR2,
542                              RETCODE              OUT NOCOPY NUMBER,
543                              pINSTANCE_ID         IN  NUMBER,
544                              pSTART_DATE          IN  VARCHAR2);
545 
546 END MSC_CL_COLLECTION;