[Home] [Help]
PACKAGE: APPS.CTO_SUBASSEMBLY_SUP_PK
Source
1 package CTO_SUBASSEMBLY_SUP_PK as
2 /* $Header: CTOSUBSS.pls 120.3 2006/09/21 07:41:43 kkonada ship $ */
3
4
5 /*
6 ------------------------------------------------------------------------------------------
7 | Copyright (C) 1993 Oracle Corporation Belmont, California, USA |
8 | All rights reserved. |
9 | Oracle Manufacturing |
10 | |
11 | FILE NAME : CTOSUBSS.pls |
12 | |
13 | DESCRIPTION : New package created for MLSUPPLY fetaure |
14 | |
15 | |
16 | HISTORY : Created on 12-DEC-2002 KIRAN KOANDA |
17 |
18 | 02-05-2004 Kiran Konada
19 | --bugfix 3418102
20 |
21 -----------------------------------------------------------------------------------------
22 */
23
24 -- rkaza. 05/02/2005. Added sourcing org field to the record.
25
26 TYPE r_mlsupply_items IS RECORD(
27
28 order_line_id number, --sales order line id
29 t_item_details_index number,
30 item_id bom_inventory_components.component_item_id%type,
31 item_name mtl_system_items_kfv.concatenated_segments%type,
32 item_quantity bom_inventory_components.component_quantity%type,
33 needed_item_qty bom_inventory_components.component_quantity%type,
34 OPERATION_LEAD_TIME_PERCENT bom_inventory_components.OPERATION_LEAD_TIME_PERCENT%type,
35 operation_seq_num bom_inventory_components.OPERATION_seq_num%type,
36 cfm_routing_flag bom_operational_routings.cfm_routing_flag%type,
37 routing_sequence_id bom_operational_routings.routing_sequence_id%type,
38 fixed_lead_time mtl_system_items_kfv.fixed_lead_time%type,
39 variable_lead_time mtl_system_items_kfv.variable_lead_time%type,
40 processing_lead_time mtl_system_items_kfv.full_lead_time%type,
41 postprocessing_lead_time mtl_system_items_kfv.postprocessing_lead_time%type,
42 bom_item_type bom_inventory_components.bom_item_type%type,
43 auto_config_flag mtl_system_items_kfv.auto_created_config_flag%type,
44 parent_index number,
45 job_start_date date,
46 job_completion_date date,
47 populate_start_date number, -- value of 1 implies 1implies insert satrt date in wjsi instead of completion date, while finite scheduler is on
48 line_id bom_operational_routings.line_id%type,
49 line_code wip_lines.line_code%type,
50 source_type number, --buy =3 ,make =2 , transfer (sourced ) =1
51 job_name varchar2(240),
52 feeder_run varchar2(1),
53 flow_start_index number,
54 flow_end_index number,
55 comment varchar2(240),
56
57 pegging_flag varchar2(1),
58 sourcing_org number,
59 basis_type number, /* LBM Project */
60 wip_supply_type number,
61 actual_parent_idx number
62 );
63
64 TYPE t_item_details IS TABLE OF r_mlsupply_items INDEX BY BINARY_INTEGER;
65
66
67 Procedure get_child_configurations
68 (
69 pParentItemId in number,
70 pOrganization_id in number,
71 pLower_Supplytype in number,
72 pParent_index in number,
73 pitems_table in out nocopy t_item_details,
74 x_return_status out NOCOPY varchar2,
75 x_error_message out NOCOPY VARCHAR2, /* 70 bytes to hold msg */
76 x_message_name out NOCOPY VARCHAR2 /* 30 bytes to hold name */
77
78
79 );
80
81
82 Procedure create_subassembly_jobs
83 (
84
85 p_mlsupply_parameter in number,
86 p_Top_Assembly_LineId in number,
87 pSupplyQty in number,
88 p_wip_seq in number,
89 p_status_type in number,
90 p_class_code in varchar2,
91 p_conc_request_id IN NUMBER,
92 p_conc_program_id IN NUMBER,
93 p_conc_login_id IN NUMBER,
94 p_user_id IN NUMBER,
95 p_appl_conc_program_id IN NUMBER,
96 x_return_status out NOCOPY varchar2,
97 x_error_message out NOCOPY VARCHAR2, /* 70 bytes to hold msg */
98 x_message_name out NOCOPY VARCHAR2 /* 30 bytes to hold name */
99 );
100
101
102
103 end CTO_SUBASSEMBLY_SUP_PK;
104