[Home] [Help]
PACKAGE: APPS.WIP_GLOBALS
Source
1 PACKAGE WIP_Globals AUTHID CURRENT_USER AS
2 /* $Header: WIPSGLBS.pls 115.11 2002/12/01 16:15:42 rmahidha ship $ */
3
4 -- Procedure Get_Entities_Tbl;
5 --
6 -- Used by generator to avoid overriding or duplicating existing
7 -- entity constants.
8 --
9 -- DO NOT MODIFY
10
11 PROCEDURE Get_Entities_Tbl;
12
13 -- Product entity constants.
14
15 -- START GEN entities
16 G_ENTITY_ALL CONSTANT VARCHAR2(30) := 'ALL';
17 G_ENTITY_WIP_ENTITIES CONSTANT VARCHAR2(30) := 'WIP_ENTITIES';
18 G_ENTITY_FLOWSCHEDULE CONSTANT VARCHAR2(30) := 'FLOWSCHEDULE';
19 G_ENTITY_DISCRETEJOB CONSTANT VARCHAR2(30) := 'DISCRETEJOB';
20 G_ENTITY_REPSCHEDULE CONSTANT VARCHAR2(30) := 'REPSCHEDULE';
21 G_ENTITY_WIPTRANSACTION CONSTANT VARCHAR2(30) := 'WIPTRANSACTION';
22 G_ENTITY_COMPONENTISSUE CONSTANT VARCHAR2(30) := 'COMPONENTISSUE';
23 G_ENTITY_OSP CONSTANT VARCHAR2(30) := 'OSP';
24 G_ENTITY_SHOPFLOORMOVE CONSTANT VARCHAR2(30) := 'SHOPFLOORMOVE';
25 G_ENTITY_RESOURCE CONSTANT VARCHAR2(30) := 'RESOURCE';
26 -- END GEN entities
27
28 -- Actions.
29
30 G_OPR_CREATE CONSTANT VARCHAR2(30) := 'CREATE';
31 G_OPR_UPDATE CONSTANT VARCHAR2(30) := 'UPDATE';
32 G_OPR_DELETE CONSTANT VARCHAR2(30) := 'DELETE';
33 G_OPR_LOCK CONSTANT VARCHAR2(30) := 'LOCK';
34 G_OPR_NONE CONSTANT VARCHAR2(30) := FND_API.G_MISS_CHAR;
35
36 -- Additional Actions
37
38 G_OPR_DEFAULT_USING_KANBAN CONSTANT VARCHAR2(50) := 'DFLT_USING_KANBAN';
39 G_OPR_DEFAULT_USING_PO CONSTANT VARCHAR2(50) := 'DFLT_USING_PO';
40
41 -- Validation Levels
42 -- Discrete Jobs : 10 -> 19
43 G_VAL_DISCRETE_FULL CONSTANT NUMBER := 10;
44 -- Rep Schedules : 20 -> 29
45 G_VAL_REP_SCH_FULL CONSTANT NUMBER := 20;
46 -- Flow Schedules : 40 -> 49
47 G_VAL_FLOW_SCH_FULL CONSTANT NUMBER := 40;
48
49
50 -- Max number of defaulting iterations.
51
52 G_MAX_DEF_ITERATIONS CONSTANT NUMBER:= 5;
53
54 -- Index table type used by JVC controllers.
55
56 TYPE Index_Tbl_Type IS TABLE OF BINARY_INTEGER
57 INDEX BY BINARY_INTEGER;
58
59 -- API Action control flags.
60
61 TYPE Control_Rec_Type IS RECORD
62 ( controlled_operation BOOLEAN := FALSE
63 , default_attributes BOOLEAN := TRUE
64 , change_attributes BOOLEAN := TRUE
65 , validate_entity BOOLEAN := TRUE
66 , write_to_db BOOLEAN := TRUE
67 , process BOOLEAN := TRUE
68 , process_entity VARCHAR2(30) := G_ENTITY_ALL
69 , clear_api_cache BOOLEAN := TRUE
70 , clear_api_requests BOOLEAN := TRUE
71 , request_category VARCHAR2(30):= NULL
72 , request_name VARCHAR2(30):= NULL
73 );
74
75 -- Variable representing missing control record.
76
77 G_MISS_CONTROL_REC Control_Rec_Type;
78
79 -- API request record type.
80
81 TYPE Request_Rec_Type IS RECORD
82 ( entity VARCHAR2(30) := NULL
83 , step VARCHAR2(30) := NULL
84 , name VARCHAR2(30) := NULL
85 , category VARCHAR2(30) := NULL
86 , processed BOOLEAN := FALSE
87 , attribute1 VARCHAR2(240) := NULL
88 , attribute2 VARCHAR2(240) := NULL
89 , attribute3 VARCHAR2(240) := NULL
90 , attribute4 VARCHAR2(240) := NULL
91 , attribute5 VARCHAR2(240) := NULL
92 );
93
94 -- API Request table type.
95
96 TYPE Request_Tbl_Type IS TABLE OF Request_Rec_Type
97 INDEX BY BINARY_INTEGER;
98
99 -- Table of numbers
100 TYPE Number_Tbl_Type IS TABLE OF NUMBER
101 INDEX BY BINARY_INTEGER;
102
103 -- Initialize control record.
104
105 FUNCTION Init_Control_Rec
106 ( p_action IN VARCHAR2
107 , p_control_rec IN Control_Rec_Type
108 )RETURN Control_Rec_Type;
109
110 -- Function Equal
111 -- Number comparison.
112
113 FUNCTION Equal
114 ( p_attribute1 IN NUMBER
115 , p_attribute2 IN NUMBER
116 )RETURN BOOLEAN;
117
118 -- Varchar2 comparison.
119
120 FUNCTION Equal
121 ( p_attribute1 IN VARCHAR2
122 , p_attribute2 IN VARCHAR2
123 )RETURN BOOLEAN;
124
125 -- Date comparison.
126
127 FUNCTION Equal
128 ( p_attribute1 IN DATE
129 , p_attribute2 IN DATE
130 )RETURN BOOLEAN;
131
132 PROCEDURE Add_Error_Message(p_product VARCHAR2 := 'WIP',
133 p_message_name VARCHAR2,
134 p_token1_name VARCHAR2 := FND_API.G_MISS_CHAR,
135 p_token1_value VARCHAR2 := FND_API.G_MISS_CHAR,
136 p_token2_name VARCHAR2 := FND_API.G_MISS_CHAR,
137 p_token2_value VARCHAR2 := FND_API.G_MISS_CHAR,
138 p_token3_name VARCHAR2 := FND_API.G_MISS_CHAR,
139 p_token3_value VARCHAR2 := FND_API.G_MISS_CHAR,
140 p_token4_name VARCHAR2 := FND_API.G_MISS_CHAR,
141 p_token4_value VARCHAR2 := FND_API.G_MISS_CHAR,
142 p_token5_name VARCHAR2 := FND_API.G_MISS_CHAR,
143 p_token5_value VARCHAR2 := FND_API.G_MISS_CHAR);
144
145 -- Displays 'p_msg_count' messages to the screen (dbms) then clears
146 -- the message stack.
147 Procedure Display_all_msgs ( p_msg_count IN NUMBER);
148
149 procedure get_locator_control
150 ( p_org_id IN NUMBER,
151 p_subinventory_code IN VARCHAR2,
152 p_primary_item_id IN NUMBER,
153 x_return_status OUT NOCOPY VARCHAR2,
154 x_msg_count OUT NOCOPY NUMBER,
155 x_msg_data OUT NOCOPY VARCHAR2,
156 x_locator_control OUT NOCOPY NUMBER
157 );
158
159
160 /*=====================================================================+
161 | FUNCTION
162 | USE_PHANTOM_ROUTINGS
163 |
164 | PURPOSE
165 | To check BOM parameter USE_PHANTOM_ROUTINGS
166 |
167 | ARGUMENTS
168 | p_org_id : Organization Id
169 |
170 | NOTE
171 | Returns 1(YES) if USE_PHANTOM_ROUTINGS = 1
172 | Returns 2(NO) if USE_PHANTOM_ROUTINGS <> 1
173 | Return -2 if application level error
174 | Returns -1 if SQLERROR
175 |
176 +=====================================================================*/
177
178 function USE_PHANTOM_ROUTINGS(p_org_id in number) return number ;
179
180 /*=====================================================================+
181 | FUNCTION
182 | INHERIT_PHANTOM_OP_SEQ
183 |
184 | PURPOSE
185 | To check BOM parameter INHERIT_PHANTOM_OP_SEQ
186 |
187 | ARGUMENTS
188 | p_org_id : Organization Id
189 |
190 | NOTE
191 | Returns 1(YES) if INHERIT_PHANTOM_OP_SEQ = 1
192 | Returns 2(NO) if INHERIT_PHANTOM_OP_SEQ <> 1
193 | Return -2 if application level error
194 | Returns -1 if SQLERROR
195 |
196 +=====================================================================*/
197
198 function INHERIT_PHANTOM_OP_SEQ(p_org_id in number) return number ;
199
200 END WIP_Globals;