94: /* IF statements added for 2244395 */
95:
96: -- Write message context.
97:
98: IF p_entity_code = FND_API.G_MISS_CHAR THEN
99: G_msg_context_tbl(G_msg_context_count).ENTITY_CODE := NULL;
100: ELSE
101: G_msg_context_tbl(G_msg_context_count).ENTITY_CODE := p_entity_code;
102: END IF;
100: ELSE
101: G_msg_context_tbl(G_msg_context_count).ENTITY_CODE := p_entity_code;
102: END IF;
103:
104: IF p_entity_id = FND_API.G_MISS_NUM THEN
105: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := NULL;
106: ELSE
107: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := p_entity_id;
108: END IF;
106: ELSE
107: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := p_entity_id;
108: END IF;
109:
110: IF p_entity_ref = FND_API.G_MISS_CHAR THEN
111: G_msg_context_tbl(G_msg_context_count).ENTITY_REF := NULL;
112: ELSE
113: G_msg_context_tbl(G_msg_context_count).ENTITY_REF := p_entity_ref;
114: END IF;
112: ELSE
113: G_msg_context_tbl(G_msg_context_count).ENTITY_REF := p_entity_ref;
114: END IF;
115:
116: IF p_header_id = FND_API.G_MISS_NUM THEN
117: G_msg_context_tbl(G_msg_context_count).HEADER_ID := NULL;
118: ELSE
119: G_msg_context_tbl(G_msg_context_count).HEADER_ID := p_header_id;
120: END IF;
118: ELSE
119: G_msg_context_tbl(G_msg_context_count).HEADER_ID := p_header_id;
120: END IF;
121:
122: IF p_line_id = FND_API.G_MISS_NUM THEN
123: G_msg_context_tbl(G_msg_context_count).LINE_ID := NULL;
124: ELSE
125:
126: IF p_line_id is not null
124: ELSE
125:
126: IF p_line_id is not null
127: AND (p_header_id is null
128: OR p_header_id = FND_API.G_MISS_NUM) THEN
129:
130:
131: BEGIN
132: SELECT header_id
142: END IF;
143: G_msg_context_tbl(G_msg_context_count).LINE_ID := p_line_id;
144: END IF;
145:
146: IF p_order_source_id = FND_API.G_MISS_NUM THEN
147: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := NULL;
148: ELSE
149: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := p_order_source_id;
150: END IF;
148: ELSE
149: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := p_order_source_id;
150: END IF;
151:
152: IF p_orig_sys_document_ref = FND_API.G_MISS_CHAR THEN
153: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := NULL;
154: ELSE
155: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := p_orig_sys_document_ref;
156: END IF;
154: ELSE
155: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := p_orig_sys_document_ref;
156: END IF;
157:
158: IF p_orig_sys_document_line_ref = FND_API.G_MISS_CHAR THEN
159: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := NULL;
160: ELSE
161: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := p_orig_sys_document_line_ref;
162: END IF;
160: ELSE
161: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := p_orig_sys_document_line_ref;
162: END IF;
163:
164: IF p_orig_sys_shipment_ref = FND_API.G_MISS_CHAR THEN
165: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := NULL;
166: ELSE
167: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := p_orig_sys_shipment_ref;
168: END IF;
166: ELSE
167: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := p_orig_sys_shipment_ref;
168: END IF;
169:
170: IF p_change_sequence = FND_API.G_MISS_CHAR THEN
171: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := NULL;
172: ELSE
173: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := p_change_sequence;
174: END IF;
172: ELSE
173: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := p_change_sequence;
174: END IF;
175:
176: IF p_source_document_type_id = FND_API.G_MISS_NUM THEN
177: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := NULL;
178: ELSE
179: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := p_source_document_type_id;
180: END IF;
178: ELSE
179: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := p_source_document_type_id;
180: END IF;
181:
182: IF p_source_document_id = FND_API.G_MISS_NUM THEN
183: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := NULL;
184: ELSE
185: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := p_source_document_id;
186: END IF;
184: ELSE
185: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := p_source_document_id;
186: END IF;
187:
188: IF p_source_document_line_id = FND_API.G_MISS_NUM THEN
189: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := NULL;
190: ELSE
191: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := p_source_document_line_id;
192: END IF;
190: ELSE
191: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := p_source_document_line_id;
192: END IF;
193:
194: IF p_attribute_code = FND_API.G_MISS_CHAR THEN
195: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := NULL;
196: ELSE
197: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := p_attribute_code;
198: END IF;
196: ELSE
197: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := p_attribute_code;
198: END IF;
199:
200: IF p_constraint_id = FND_API.G_MISS_NUM THEN
201: G_msg_context_tbl(G_msg_context_count).CONSTRAINT_ID := NULL;
202: ELSE
203: G_msg_context_tbl(G_msg_context_count).CONSTRAINT_ID := p_constraint_id;
204: END IF;
212: END IF;
213: END;
214:
215: PROCEDURE Update_Msg_Context (
216: p_entity_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
213: END;
214:
215: PROCEDURE Update_Msg_Context (
216: p_entity_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
214:
215: PROCEDURE Update_Msg_Context (
216: p_entity_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
215: PROCEDURE Update_Msg_Context (
216: p_entity_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
216: p_entity_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
217: ,p_entity_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
218: ,p_header_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
219: ,p_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
220: ,p_order_source_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
221: ,p_orig_sys_document_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
222: ,p_orig_sys_document_line_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
230: -- ,p_process_activity IN NUMBER DEFAULT FND_API.G_MISS_NUM
223: ,p_orig_sys_shipment_ref IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
230: -- ,p_process_activity IN NUMBER DEFAULT FND_API.G_MISS_NUM
231: ) IS
224: ,p_change_sequence IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
230: -- ,p_process_activity IN NUMBER DEFAULT FND_API.G_MISS_NUM
231: ) IS
232: --
225: ,p_source_document_type_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
230: -- ,p_process_activity IN NUMBER DEFAULT FND_API.G_MISS_NUM
231: ) IS
232: --
233: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
226: ,p_source_document_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
227: ,p_source_document_line_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
228: ,p_attribute_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
229: ,p_constraint_id IN NUMBER DEFAULT FND_API.G_MISS_NUM
230: -- ,p_process_activity IN NUMBER DEFAULT FND_API.G_MISS_NUM
231: ) IS
232: --
233: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
234: --
234: --
235: Begin
236:
237: -- if G_msg_context_tbl(G_msg_context_count).ENTITY_CODE = p_entity_code then
238: if p_entity_id <> FND_API.G_MISS_NUM then
239: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := p_entity_id;
240: end if;
241: if p_header_id <> FND_API.G_MISS_NUM then
242: G_msg_context_tbl(G_msg_context_count).HEADER_ID := p_header_id;
237: -- if G_msg_context_tbl(G_msg_context_count).ENTITY_CODE = p_entity_code then
238: if p_entity_id <> FND_API.G_MISS_NUM then
239: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := p_entity_id;
240: end if;
241: if p_header_id <> FND_API.G_MISS_NUM then
242: G_msg_context_tbl(G_msg_context_count).HEADER_ID := p_header_id;
243: end if;
244: if p_line_id <> FND_API.G_MISS_NUM then
245: G_msg_context_tbl(G_msg_context_count).LINE_ID := p_line_id;
240: end if;
241: if p_header_id <> FND_API.G_MISS_NUM then
242: G_msg_context_tbl(G_msg_context_count).HEADER_ID := p_header_id;
243: end if;
244: if p_line_id <> FND_API.G_MISS_NUM then
245: G_msg_context_tbl(G_msg_context_count).LINE_ID := p_line_id;
246: end if;
247: if p_order_source_id <> FND_API.G_MISS_NUM then
248: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := p_order_source_id;
243: end if;
244: if p_line_id <> FND_API.G_MISS_NUM then
245: G_msg_context_tbl(G_msg_context_count).LINE_ID := p_line_id;
246: end if;
247: if p_order_source_id <> FND_API.G_MISS_NUM then
248: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := p_order_source_id;
249: end if;
250: if p_orig_sys_document_ref <> FND_API.G_MISS_CHAR then
251: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := p_orig_sys_document_ref;
246: end if;
247: if p_order_source_id <> FND_API.G_MISS_NUM then
248: G_msg_context_tbl(G_msg_context_count).ORDER_SOURCE_ID := p_order_source_id;
249: end if;
250: if p_orig_sys_document_ref <> FND_API.G_MISS_CHAR then
251: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := p_orig_sys_document_ref;
252: end if;
253: if p_orig_sys_document_line_ref <> FND_API.G_MISS_CHAR then
254: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := p_orig_sys_document_line_ref;
249: end if;
250: if p_orig_sys_document_ref <> FND_API.G_MISS_CHAR then
251: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_REF := p_orig_sys_document_ref;
252: end if;
253: if p_orig_sys_document_line_ref <> FND_API.G_MISS_CHAR then
254: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := p_orig_sys_document_line_ref;
255: end if;
256: if p_orig_sys_shipment_ref <> FND_API.G_MISS_CHAR then
257: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := p_orig_sys_shipment_ref;
252: end if;
253: if p_orig_sys_document_line_ref <> FND_API.G_MISS_CHAR then
254: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_DOCUMENT_LINE_REF := p_orig_sys_document_line_ref;
255: end if;
256: if p_orig_sys_shipment_ref <> FND_API.G_MISS_CHAR then
257: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := p_orig_sys_shipment_ref;
258: end if;
259: if p_change_sequence <> FND_API.G_MISS_CHAR then
260: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := p_change_sequence;
255: end if;
256: if p_orig_sys_shipment_ref <> FND_API.G_MISS_CHAR then
257: G_msg_context_tbl(G_msg_context_count).ORIG_SYS_SHIPMENT_REF := p_orig_sys_shipment_ref;
258: end if;
259: if p_change_sequence <> FND_API.G_MISS_CHAR then
260: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := p_change_sequence;
261: end if;
262: if p_source_document_type_id <> FND_API.G_MISS_NUM then
263: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := p_source_document_type_id;
258: end if;
259: if p_change_sequence <> FND_API.G_MISS_CHAR then
260: G_msg_context_tbl(G_msg_context_count).CHANGE_SEQUENCE := p_change_sequence;
261: end if;
262: if p_source_document_type_id <> FND_API.G_MISS_NUM then
263: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := p_source_document_type_id;
264: end if;
265: if p_source_document_id <> FND_API.G_MISS_NUM then
266: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := p_source_document_id;
261: end if;
262: if p_source_document_type_id <> FND_API.G_MISS_NUM then
263: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_TYPE_ID := p_source_document_type_id;
264: end if;
265: if p_source_document_id <> FND_API.G_MISS_NUM then
266: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := p_source_document_id;
267: end if;
268: if p_source_document_line_id <> FND_API.G_MISS_NUM then
269: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := p_source_document_line_id;
264: end if;
265: if p_source_document_id <> FND_API.G_MISS_NUM then
266: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_ID := p_source_document_id;
267: end if;
268: if p_source_document_line_id <> FND_API.G_MISS_NUM then
269: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := p_source_document_line_id;
270: end if;
271: if p_attribute_code <> FND_API.G_MISS_CHAR then
272: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := p_attribute_code;
267: end if;
268: if p_source_document_line_id <> FND_API.G_MISS_NUM then
269: G_msg_context_tbl(G_msg_context_count).SOURCE_DOCUMENT_LINE_ID := p_source_document_line_id;
270: end if;
271: if p_attribute_code <> FND_API.G_MISS_CHAR then
272: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := p_attribute_code;
273: end if;
274: if p_constraint_id <> FND_API.G_MISS_NUM then
275: G_msg_context_tbl(G_msg_context_count).CONSTRAINT_ID := p_constraint_id;
270: end if;
271: if p_attribute_code <> FND_API.G_MISS_CHAR then
272: G_msg_context_tbl(G_msg_context_count).ATTRIBUTE_CODE := p_attribute_code;
273: end if;
274: if p_constraint_id <> FND_API.G_MISS_NUM then
275: G_msg_context_tbl(G_msg_context_count).CONSTRAINT_ID := p_constraint_id;
276: end if;
277: /* if p_process_activity <> FND_API.G_MISS_NUM then
278: G_msg_context_tbl(G_msg_context_count).PROCESS_ACTIVITY := p_process_activity;
273: end if;
274: if p_constraint_id <> FND_API.G_MISS_NUM then
275: G_msg_context_tbl(G_msg_context_count).CONSTRAINT_ID := p_constraint_id;
276: end if;
277: /* if p_process_activity <> FND_API.G_MISS_NUM then
278: G_msg_context_tbl(G_msg_context_count).PROCESS_ACTIVITY := p_process_activity;
279: end if;*/
280: /*
281: G_msg_context_tbl(G_msg_context_count).ENTITY_ID := p_entity_id;
346: -- PROCEDURE Count_And_Get
347: --
348:
349: PROCEDURE Count_And_Get
350: ( p_encoded IN VARCHAR2 := FND_API.G_TRUE ,
351: p_count OUT NOCOPY NUMBER ,
352:
353: p_data OUT NOCOPY VARCHAR2
354:
564: -- nothing, and no exception is raised.
565: -- If delete is passed no parameters it deletes the whole
566: -- message table.
567: --
568: -- Prameters p_msg_index IN NUMBER := FND_API.G_MISS_NUM Optional
569: -- holds the index of the message to be deleted.
570: --
571:
572: PROCEDURE Delete_Msg
727: --
728:
729: PROCEDURE Get
730: ( p_msg_index IN NUMBER := G_NEXT ,
731: p_encoded IN VARCHAR2 := FND_API.G_TRUE ,
732: p_data OUT NOCOPY VARCHAR2 ,
733:
734: p_msg_index_out OUT NOCOPY NUMBER
735:
758:
759: p_data := G_msg_tbl(G_msg_index).Message_Text;
760:
761: ELSE
762: IF FND_API.To_Boolean( p_encoded ) THEN
763:
764: p_data := G_msg_tbl( G_msg_index ).Message;
765:
766: ELSE
794: --
795:
796: FUNCTION Get
797: ( p_msg_index IN NUMBER := G_NEXT ,
798: p_encoded IN VARCHAR2 := FND_API.G_TRUE
799: )
800: RETURN VARCHAR2
801: IS
802: l_data VARCHAR2(2000) ;
862: p_procedure_name => l_procedure_name ,
863: p_error_text => 'Invalid p_mode: '||p_mode
864: );
865:
866: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
867:
868: END IF;
869:
870: EXCEPTION
897: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
898: --
899: BEGIN
900:
901: IF G_msg_level_threshold = FND_API.G_MISS_NUM THEN
902:
903: -- Read the Profile option value.
904:
905: G_msg_level_threshold :=
921: END IF;
922: END; -- Check_Msg_Level
923:
924: PROCEDURE Build_Exc_Msg
925: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
926: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
927: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR
928: )
929: IS
922: END; -- Check_Msg_Level
923:
924: PROCEDURE Build_Exc_Msg
925: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
926: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
927: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR
928: )
929: IS
930: l_error_text VARCHAR2(2000) := p_error_text ;
923:
924: PROCEDURE Build_Exc_Msg
925: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
926: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
927: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR
928: )
929: IS
930: l_error_text VARCHAR2(2000) := p_error_text ;
931: --
934: BEGIN
935:
936: -- If p_error_text is missing use SQLERRM.
937:
938: IF p_error_text = FND_API.G_MISS_CHAR THEN
939:
940: l_error_text := SUBSTR (SQLERRM , 1 , 2000);
941:
942: END IF;
942: END IF;
943:
944: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
945:
946: IF p_pkg_name <> FND_API.G_MISS_CHAR THEN
947: FND_MESSAGE.SET_TOKEN('PKG_NAME',p_pkg_name);
948: END IF;
949:
950: IF p_procedure_name <> FND_API.G_MISS_CHAR THEN
946: IF p_pkg_name <> FND_API.G_MISS_CHAR THEN
947: FND_MESSAGE.SET_TOKEN('PKG_NAME',p_pkg_name);
948: END IF;
949:
950: IF p_procedure_name <> FND_API.G_MISS_CHAR THEN
951: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME',p_procedure_name);
952: END IF;
953:
954: IF l_error_text <> FND_API.G_MISS_CHAR THEN
950: IF p_procedure_name <> FND_API.G_MISS_CHAR THEN
951: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME',p_procedure_name);
952: END IF;
953:
954: IF l_error_text <> FND_API.G_MISS_CHAR THEN
955: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_error_text);
956: END IF;
957: EXCEPTION
958: WHEN OTHERS THEN
961: END IF;
962: END; -- Build_Exc_Msg
963:
964: PROCEDURE Add_Exc_Msg
965: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
966: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
967: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
968: p_context_flag IN VARCHAR2 DEFAULT 'Y'
969: )
962: END; -- Build_Exc_Msg
963:
964: PROCEDURE Add_Exc_Msg
965: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
966: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
967: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
968: p_context_flag IN VARCHAR2 DEFAULT 'Y'
969: )
970: IS
963:
964: PROCEDURE Add_Exc_Msg
965: ( p_pkg_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
966: p_procedure_name IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
967: p_error_text IN VARCHAR2 :=FND_API.G_MISS_CHAR ,
968: p_context_flag IN VARCHAR2 DEFAULT 'Y'
969: )
970: IS
971: --
1614: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1615: --
1616: BEGIN
1617:
1618: x_return_status := FND_API.G_RET_STS_SUCCESS;
1619:
1620: IF OE_Msg_pub.Count_Msg <> 1 THEN
1621:
1622: x_return_status := FND_API.G_RET_STS_ERROR;
1618: x_return_status := FND_API.G_RET_STS_SUCCESS;
1619:
1620: IF OE_Msg_pub.Count_Msg <> 1 THEN
1621:
1622: x_return_status := FND_API.G_RET_STS_ERROR;
1623:
1624: ELSE
1625:
1626:
1642: l_WF_Roles_Tbl := Oe_PC_Constraints_Admin_Pub.Get_Authorized_WF_Roles
1643: (p_constraint_id => l_constraint_id
1644: ,x_return_status => l_return_status);
1645:
1646: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1648: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1649: RAISE FND_API.G_EXC_ERROR;
1650: END IF;
1643: (p_constraint_id => l_constraint_id
1644: ,x_return_status => l_return_status);
1645:
1646: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1648: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1649: RAISE FND_API.G_EXC_ERROR;
1650: END IF;
1651:
1644: ,x_return_status => l_return_status);
1645:
1646: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1648: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1649: RAISE FND_API.G_EXC_ERROR;
1650: END IF;
1651:
1652: l_msg_length := length(l_message);
1645:
1646: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1647: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1648: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1649: RAISE FND_API.G_EXC_ERROR;
1650: END IF;
1651:
1652: l_msg_length := length(l_message);
1653:
1683:
1684: WHEN OTHERS THEN
1685: /* l_message := 'Something wrong';
1686: Return l_message;*/
1687: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1688:
1689:
1690: END Get_Single_Message;
1691: