[Home] [Help]
29: --
30: BEGIN
31: --
32: IF (l_debug <> -1) THEN
33: rlm_core_sv.dpush(k_SDEBUG,'RecDemand');
34: rlm_core_sv.dlog(k_DEBUG,'InterfaceHeaderId',x_Sched_rec.header_id);
35: END IF;
36: --
37: -- We set the return status = sucess at the start
30: BEGIN
31: --
32: IF (l_debug <> -1) THEN
33: rlm_core_sv.dpush(k_SDEBUG,'RecDemand');
34: rlm_core_sv.dlog(k_DEBUG,'InterfaceHeaderId',x_Sched_rec.header_id);
35: END IF;
36: --
37: -- We set the return status = sucess at the start
38: -- if there are errors the status will become error or else will complete
37: -- We set the return status = sucess at the start
38: -- if there are errors the status will become error or else will complete
39: -- as success
40: --
41: x_ReturnStatus := rlm_core_sv.k_PROC_SUCCESS;
42: --
43: IF (l_debug <> -1) THEN
44: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.headerId',x_Sched_rec.header_id);
45: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
40: --
41: x_ReturnStatus := rlm_core_sv.k_PROC_SUCCESS;
42: --
43: IF (l_debug <> -1) THEN
44: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.headerId',x_Sched_rec.header_id);
45: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
46: x_Sched_rec.schedule_type);
47: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
48: x_Sched_rec.schedule_purpose);
41: x_ReturnStatus := rlm_core_sv.k_PROC_SUCCESS;
42: --
43: IF (l_debug <> -1) THEN
44: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.headerId',x_Sched_rec.header_id);
45: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
46: x_Sched_rec.schedule_type);
47: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
48: x_Sched_rec.schedule_purpose);
49: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_source',
43: IF (l_debug <> -1) THEN
44: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.headerId',x_Sched_rec.header_id);
45: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
46: x_Sched_rec.schedule_type);
47: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
48: x_Sched_rec.schedule_purpose);
49: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_source',
50: x_Sched_rec.schedule_source);
51: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_generation_date',
45: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
46: x_Sched_rec.schedule_type);
47: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
48: x_Sched_rec.schedule_purpose);
49: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_source',
50: x_Sched_rec.schedule_source);
51: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_generation_date',
52: x_Sched_rec.sched_generation_date);
53: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
47: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
48: x_Sched_rec.schedule_purpose);
49: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_source',
50: x_Sched_rec.schedule_source);
51: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_generation_date',
52: x_Sched_rec.sched_generation_date);
53: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
54: x_Sched_rec.sched_horizon_start_date);
55: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
49: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_source',
50: x_Sched_rec.schedule_source);
51: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_generation_date',
52: x_Sched_rec.sched_generation_date);
53: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
54: x_Sched_rec.sched_horizon_start_date);
55: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
56: x_Sched_rec.sched_horizon_end_date);
57: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_reference_num',
51: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_generation_date',
52: x_Sched_rec.sched_generation_date);
53: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
54: x_Sched_rec.sched_horizon_start_date);
55: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
56: x_Sched_rec.sched_horizon_end_date);
57: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_reference_num',
58: x_Sched_rec.schedule_reference_num);
59: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.isSourced',
53: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
54: x_Sched_rec.sched_horizon_start_date);
55: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
56: x_Sched_rec.sched_horizon_end_date);
57: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_reference_num',
58: x_Sched_rec.schedule_reference_num);
59: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.isSourced',
60: x_Group_rec.isSourced);
61: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
55: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
56: x_Sched_rec.sched_horizon_end_date);
57: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_reference_num',
58: x_Sched_rec.schedule_reference_num);
59: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.isSourced',
60: x_Group_rec.isSourced);
61: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
62: END IF;
63: --
57: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_reference_num',
58: x_Sched_rec.schedule_reference_num);
59: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.isSourced',
60: x_Group_rec.isSourced);
61: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
62: END IF;
63: --
64: g_Reconcile_Tab.DELETE;
65: -- Bug 4223359
78: --
79: ProcessReleases(x_Sched_rec, v_ReGroup_rec, v_Processed);
80: --
81: IF (l_debug <> -1) THEN
82: rlm_core_sv.dlog(k_DEBUG, 'Releases Processed (Y/N)', v_Processed);
83: END IF;
84: --
85: v_ReGroup_rec.order_header_id := NULL;
86: v_ReGroup_rec.blanket_number := NULL;
89: RecGroupDemand(x_Sched_rec, v_ReGroup_rec);
90: END IF;
91: --
92: IF (l_debug <> -1) THEN
93: rlm_core_sv.dlog(k_DEBUG, 'Cleaning up global tables');
94: END IF;
95: --
96: g_Reconcile_Tab.DELETE;
97: g_IntransitTab.DELETE;
100: g_IsFirm := FALSE;
101: --}
102: END LOOP;
103: --
104: --x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
105: --
106: IF (l_debug <> -1) THEN
107: rlm_core_sv.dpop(k_SDEBUG);
108: END IF;
103: --
104: --x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
105: --
106: IF (l_debug <> -1) THEN
107: rlm_core_sv.dpop(k_SDEBUG);
108: END IF;
109: --
110: EXCEPTION
111: --
110: EXCEPTION
111: --
112: WHEN e_lines_locked THEN
113: --
114: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
115: --
116: rlm_message_sv.app_error(
117: x_ExceptionLevel => rlm_message_sv.k_error_level,
118: x_MessageName => 'RLM_LOCK_NOT_OBTAINED',
126: x_Token1 => 'SCHED_REF',
127: x_value1 => x_Sched_rec.schedule_reference_num);
128: --
129: IF (l_debug <> -1) THEN
130: rlm_core_sv.dpop(k_SDEBUG,'lines locked already');
131: END IF;
132: --
133: WHEN e_Group_error THEN
134: --
131: END IF;
132: --
133: WHEN e_Group_error THEN
134: --
135: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
136: --
137: IF (l_debug <> -1) THEN
138: rlm_core_sv.dpop(k_SDEBUG,'Group error');
139: END IF;
134: --
135: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
136: --
137: IF (l_debug <> -1) THEN
138: rlm_core_sv.dpop(k_SDEBUG,'Group error');
139: END IF;
140: --
141: WHEN NO_DATA_FOUND THEN
142: --
139: END IF;
140: --
141: WHEN NO_DATA_FOUND THEN
142: --
143: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
144: --
145: IF (l_debug <> -1) THEN
146: rlm_core_sv.dlog(k_DEBUG,'No data found in Interface headers for headerId',
147: x_Sched_rec.header_id);
142: --
143: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
144: --
145: IF (l_debug <> -1) THEN
146: rlm_core_sv.dlog(k_DEBUG,'No data found in Interface headers for headerId',
147: x_Sched_rec.header_id);
148: rlm_core_sv.dpop(k_SDEBUG);
149: END IF;
150: --
144: --
145: IF (l_debug <> -1) THEN
146: rlm_core_sv.dlog(k_DEBUG,'No data found in Interface headers for headerId',
147: x_Sched_rec.header_id);
148: rlm_core_sv.dpop(k_SDEBUG);
149: END IF;
150: --
151: WHEN OTHERS THEN
152: --
149: END IF;
150: --
151: WHEN OTHERS THEN
152: --
153: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
154: rlm_message_sv.sql_error('rlm_rd_sv.RecDemand',x_progress);
155: --
156: IF (l_debug <> -1) THEN
157: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
153: x_ReturnStatus := rlm_core_sv.k_PROC_ERROR;
154: rlm_message_sv.sql_error('rlm_rd_sv.RecDemand',x_progress);
155: --
156: IF (l_debug <> -1) THEN
157: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
158: END IF;
159: --
160: END RecDemand;
161:
276: --
277: BEGIN
278: --
279: IF (l_debug <> -1) THEN
280: rlm_core_sv.dpush(k_SDEBUG, 'RecGroupDemand');
281: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
282: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_purpose',
283: x_Sched_rec.schedule_purpose);
284: END IF;
277: BEGIN
278: --
279: IF (l_debug <> -1) THEN
280: rlm_core_sv.dpush(k_SDEBUG, 'RecGroupDemand');
281: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
282: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_purpose',
283: x_Sched_rec.schedule_purpose);
284: END IF;
285: --
278: --
279: IF (l_debug <> -1) THEN
280: rlm_core_sv.dpush(k_SDEBUG, 'RecGroupDemand');
281: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
282: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_purpose',
283: x_Sched_rec.schedule_purpose);
284: END IF;
285: --
286: g_Op_tab.DELETE;
307: x_Group_rec.blanket_number := x_Group_rec.setup_terms_rec.blanket_number;
308: END IF;
309: --
310: IF (l_debug <> -1) THEN
311: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_Group_Rec.setup_terms_Rec.intransit_calc_basis);
312: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id); rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
313: END IF;
314: --
315: --global_atp
308: END IF;
309: --
310: IF (l_debug <> -1) THEN
311: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_Group_Rec.setup_terms_Rec.intransit_calc_basis);
312: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id); rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
313: END IF;
314: --
315: --global_atp
316: IF RLM_MANAGE_DEMAND_SV.IsATPItem(x_group_rec.ship_from_org_id,x_group_rec.inventory_item_id) THEN
346: --
347: IF c_order_dem%FOUND THEN
348: --
349: IF (l_debug <> -1) THEN
350: rlm_core_sv.dlog(k_DEBUG,'--- Most recent existing demand populated by higher precedence schedule ---' );
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
347: IF c_order_dem%FOUND THEN
348: --
349: IF (l_debug <> -1) THEN
350: rlm_core_sv.dlog(k_DEBUG,'--- Most recent existing demand populated by higher precedence schedule ---' );
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
348: --
349: IF (l_debug <> -1) THEN
350: rlm_core_sv.dlog(k_DEBUG,'--- Most recent existing demand populated by higher precedence schedule ---' );
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
349: IF (l_debug <> -1) THEN
350: rlm_core_sv.dlog(k_DEBUG,'--- Most recent existing demand populated by higher precedence schedule ---' );
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
357: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.inventory_item_id', g_order_rec.inventory_item_id);
350: rlm_core_sv.dlog(k_DEBUG,'--- Most recent existing demand populated by higher precedence schedule ---' );
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
357: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.inventory_item_id', g_order_rec.inventory_item_id);
358: END IF;
351: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.request_date', g_order_rec.request_date);
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
357: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.inventory_item_id', g_order_rec.inventory_item_id);
358: END IF;
359: --
352: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.line_id', g_order_rec.line_id);
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
357: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.inventory_item_id', g_order_rec.inventory_item_id);
358: END IF;
359: --
360: END IF;
353: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.rla_schedule_type_code', g_order_rec.rla_schedule_type_code);
354: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.industry_attribute3', g_order_rec.industry_attribute3);
355: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.schedule_hierarchy', g_order_rec.schedule_hierarchy);
356: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.ordered_item_id', g_order_rec.ordered_item_id);
357: rlm_core_sv.dlog(k_DEBUG,'g_order_rec.inventory_item_id', g_order_rec.inventory_item_id);
358: END IF;
359: --
360: END IF;
361: --
369: --
370: --Start of bug fix 4223359
371: --
372: IF (l_debug <> -1) THEN
373: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
374: rlm_core_sv.dlog(k_DEBUG, 'x_group_rec.blanket_number',x_group_rec.blanket_number);
375: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm',g_isFirm);
376: END IF;
377: --
370: --Start of bug fix 4223359
371: --
372: IF (l_debug <> -1) THEN
373: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
374: rlm_core_sv.dlog(k_DEBUG, 'x_group_rec.blanket_number',x_group_rec.blanket_number);
375: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm',g_isFirm);
376: END IF;
377: --
378: IF NOT g_isFirm AND x_group_rec.blanket_number is NOT NULL
371: --
372: IF (l_debug <> -1) THEN
373: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
374: rlm_core_sv.dlog(k_DEBUG, 'x_group_rec.blanket_number',x_group_rec.blanket_number);
375: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm',g_isFirm);
376: END IF;
377: --
378: IF NOT g_isFirm AND x_group_rec.blanket_number is NOT NULL
379: AND x_group_rec.order_header_id = g_max_rso_hdr_id THEN
395: ExecOperations(x_Sched_rec, x_Group_rec);
396: --
397: -- Bug 2261743
398: IF (l_debug <> -1) THEN
399: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
400: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
401: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
402: END IF;
403: --
396: --
397: -- Bug 2261743
398: IF (l_debug <> -1) THEN
399: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
400: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
401: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
402: END IF;
403: --
404: IF (l_debug <> -1) THEN
397: -- Bug 2261743
398: IF (l_debug <> -1) THEN
399: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
400: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
401: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
402: END IF;
403: --
404: IF (l_debug <> -1) THEN
405: rlm_core_sv.dpop(k_SDEBUG);
401: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
402: END IF;
403: --
404: IF (l_debug <> -1) THEN
405: rlm_core_sv.dpop(k_SDEBUG);
406: END IF;
407: --
408: EXCEPTION
409: --
409: --
410: WHEN e_MRPOnly THEN
411: --
412: IF (l_debug <> -1) THEN
413: rlm_core_sv.dlog(k_DEBUG,'MRP Requirements only. There is no need to reconcile against Sales Order');
414: rlm_core_sv.dpop(k_SDEBUG);
415: END IF;
416:
417: WHEN e_group_error THEN
410: WHEN e_MRPOnly THEN
411: --
412: IF (l_debug <> -1) THEN
413: rlm_core_sv.dlog(k_DEBUG,'MRP Requirements only. There is no need to reconcile against Sales Order');
414: rlm_core_sv.dpop(k_SDEBUG);
415: END IF;
416:
417: WHEN e_group_error THEN
418: --
416:
417: WHEN e_group_error THEN
418: --
419: IF (l_debug <> -1) THEN
420: rlm_core_sv.dlog(k_DEBUG,'group error');
421: rlm_core_sv.dpop(k_SDEBUG);
422: END IF;
423: --
424: raise e_group_error;
417: WHEN e_group_error THEN
418: --
419: IF (l_debug <> -1) THEN
420: rlm_core_sv.dlog(k_DEBUG,'group error');
421: rlm_core_sv.dpop(k_SDEBUG);
422: END IF;
423: --
424: raise e_group_error;
425: --
427: --
428: rlm_message_sv.sql_error('rlm_rd_sv.RecGroupDemand',x_progress);
429: --
430: IF (l_debug <> -1) THEN
431: rlm_core_sv.dpop(k_SDEBUG);
432: END IF;
433: --
434: RAISE;
435: --
454: --
455: BEGIN
456: --
457: IF (l_debug <> -1) THEN
458: rlm_core_sv.dpush(k_SDEBUG,'CallSetups');
459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
460: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_id',x_Group_rec.customer_id);
461: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',x_Group_rec.ship_to_address_id);
462: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
455: BEGIN
456: --
457: IF (l_debug <> -1) THEN
458: rlm_core_sv.dpush(k_SDEBUG,'CallSetups');
459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
460: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_id',x_Group_rec.customer_id);
461: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',x_Group_rec.ship_to_address_id);
462: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
463: END IF;
456: --
457: IF (l_debug <> -1) THEN
458: rlm_core_sv.dpush(k_SDEBUG,'CallSetups');
459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
460: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_id',x_Group_rec.customer_id);
461: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',x_Group_rec.ship_to_address_id);
462: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
463: END IF;
464: --
457: IF (l_debug <> -1) THEN
458: rlm_core_sv.dpush(k_SDEBUG,'CallSetups');
459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
460: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_id',x_Group_rec.customer_id);
461: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',x_Group_rec.ship_to_address_id);
462: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
463: END IF;
464: --
465: -- NOTE: call rla setups to populate setup info in the group rec:
458: rlm_core_sv.dpush(k_SDEBUG,'CallSetups');
459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
460: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_id',x_Group_rec.customer_id);
461: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',x_Group_rec.ship_to_address_id);
462: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
463: END IF;
464: --
465: -- NOTE: call rla setups to populate setup info in the group rec:
466: -- schedule precedence, match within/across strings, firm disposition code
475: v_ReturnMsg,
476: v_ReturnStatus);
477: --
478: IF (l_debug <> -1) THEN
479: rlm_core_sv.dlog(k_DEBUG, 'v_TermsLevel', v_TermsLevel);
480: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
481: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.schedule_hierarchy_code',
482: v_SetupTerms_rec.schedule_hierarchy_code);
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
476: v_ReturnStatus);
477: --
478: IF (l_debug <> -1) THEN
479: rlm_core_sv.dlog(k_DEBUG, 'v_TermsLevel', v_TermsLevel);
480: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
481: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.schedule_hierarchy_code',
482: v_SetupTerms_rec.schedule_hierarchy_code);
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
484: v_SetupTerms_rec.header_id);
477: --
478: IF (l_debug <> -1) THEN
479: rlm_core_sv.dlog(k_DEBUG, 'v_TermsLevel', v_TermsLevel);
480: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
481: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.schedule_hierarchy_code',
482: v_SetupTerms_rec.schedule_hierarchy_code);
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
484: v_SetupTerms_rec.header_id);
485: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_above',
479: rlm_core_sv.dlog(k_DEBUG, 'v_TermsLevel', v_TermsLevel);
480: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
481: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.schedule_hierarchy_code',
482: v_SetupTerms_rec.schedule_hierarchy_code);
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
484: v_SetupTerms_rec.header_id);
485: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_above',
486: v_SetupTerms_rec.demand_tolerance_above);
487: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_below',
481: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.schedule_hierarchy_code',
482: v_SetupTerms_rec.schedule_hierarchy_code);
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
484: v_SetupTerms_rec.header_id);
485: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_above',
486: v_SetupTerms_rec.demand_tolerance_above);
487: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_below',
488: v_SetupTerms_rec.demand_tolerance_below);
489: END IF;
483: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.header_id',
484: v_SetupTerms_rec.header_id);
485: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_above',
486: v_SetupTerms_rec.demand_tolerance_above);
487: rlm_core_sv.dlog(k_DEBUG,'v_SetupTerms_rec.demand_tolerance_below',
488: v_SetupTerms_rec.demand_tolerance_below);
489: END IF;
490: --
491: IF NOT v_ReturnStatus THEN
492: --
493: RAISE e_SetupAPIFailed;
494: --
495: IF (l_debug <> -1) THEN
496: rlm_core_sv.dlog(k_DEBUG,'setups failed');
497: END IF;
498: --
499: ELSE
500: --
502: --
503: x_Group_rec.match_across := v_SetupTerms_rec.match_across_key;
504: --
505: IF (l_debug <> -1) THEN
506: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.match_within',
507: x_Group_rec.match_within);
508: END IF;
509: --
510: rlm_core_sv.populate_match_keys(x_Group_rec.match_within_rec,
506: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.match_within',
507: x_Group_rec.match_within);
508: END IF;
509: --
510: rlm_core_sv.populate_match_keys(x_Group_rec.match_within_rec,
511: x_Group_rec.match_within);
512: --
513: IF (l_debug <> -1) THEN
514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.match_across',
510: rlm_core_sv.populate_match_keys(x_Group_rec.match_within_rec,
511: x_Group_rec.match_within);
512: --
513: IF (l_debug <> -1) THEN
514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.match_across',
515: x_Group_rec.match_across);
516: END IF;
517: --
518: rlm_core_sv.populate_match_keys(x_Group_rec.match_across_rec,
514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.match_across',
515: x_Group_rec.match_across);
516: END IF;
517: --
518: rlm_core_sv.populate_match_keys(x_Group_rec.match_across_rec,
519: x_Group_rec.match_across);
520: --
521: IF SUBSTR(v_SetupTerms_rec.schedule_hierarchy_code,1,3) = 'PLN' THEN
522: --
576: --
577: x_Group_rec.cutoff_days := v_SetupTerms_rec.unship_firm_cutoff_days;
578: --
579: IF (l_debug <> -1) THEN
580: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',
581: x_Group_rec.disposition_code);
582: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',
583: x_Group_rec.cutoff_days);
584: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one',
578: --
579: IF (l_debug <> -1) THEN
580: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',
581: x_Group_rec.disposition_code);
582: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',
583: x_Group_rec.cutoff_days);
584: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one',
585: x_Group_rec.schedule_type_one);
586: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
580: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',
581: x_Group_rec.disposition_code);
582: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',
583: x_Group_rec.cutoff_days);
584: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one',
585: x_Group_rec.schedule_type_one);
586: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
587: x_Group_rec.schedule_type_two);
588: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
582: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',
583: x_Group_rec.cutoff_days);
584: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one',
585: x_Group_rec.schedule_type_one);
586: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
587: x_Group_rec.schedule_type_two);
588: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
589: x_Group_rec.schedule_type_three);
590: END IF;
584: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one',
585: x_Group_rec.schedule_type_one);
586: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
587: x_Group_rec.schedule_type_two);
588: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
589: x_Group_rec.schedule_type_three);
590: END IF;
591: --
592: IF x_Sched_rec.Schedule_type = k_PLANNING THEN
641: --
642: END IF;
643: --
644: IF (l_debug <> -1) THEN
645: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',
646: x_Group_rec.frozen_days );
647: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.roll_forward_frozen_flag',
648: x_Group_rec.roll_forward_frozen_flag);
649: END IF;
643: --
644: IF (l_debug <> -1) THEN
645: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',
646: x_Group_rec.frozen_days );
647: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.roll_forward_frozen_flag',
648: x_Group_rec.roll_forward_frozen_flag);
649: END IF;
650: --
651: -- Need to change the group rec to remove the cutoff days and the
655: --
656: END IF;
657: --
658: IF (l_debug <> -1) THEN
659: rlm_core_sv.dpop(k_SDEBUG);
660: END IF;
661: --
662: EXCEPTION
663: --
686: x_Token1 => 'ERROR',
687: x_value1 => v_ReturnMsg);
688: --
689: IF (l_debug <> -1) THEN
690: rlm_core_sv.dlog(k_SDEBUG,'SetupAPI failed');
691: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
692: END IF;
693: --
694: raise e_group_error;
687: x_value1 => v_ReturnMsg);
688: --
689: IF (l_debug <> -1) THEN
690: rlm_core_sv.dlog(k_SDEBUG,'SetupAPI failed');
691: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
692: END IF;
693: --
694: raise e_group_error;
695: --
697: --
698: rlm_message_sv.sql_error('rlm_rd_sv.CallSetups',x_progress);
699: --
700: IF (l_debug <> -1) THEN
701: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
702: END IF;
703: --
704: raise;
705: --
721: --
722: BEGIN
723: --
724: IF (l_debug <> -1) THEN
725: rlm_core_sv.dpush(k_SDEBUG,'ExecOperations');
726: END IF;
727: --
728: --global_atp
729: -- Need to call ProcessConstraint for g_Op_Tab_Unschedule before doing for
730: -- g_Op_Tab
731: rlm_extinterface_sv.ProcessOperation(g_Op_Tab_Unschedule,x_Sched_rec.header_id,v_ReturnStatus);
732: --
733: IF (l_debug <> -1) THEN
734: rlm_core_sv.dlog(k_DEBUG, 'After calling Process Order API (Unscheduling)');
735: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
736: END IF;
737: --
738: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
731: rlm_extinterface_sv.ProcessOperation(g_Op_Tab_Unschedule,x_Sched_rec.header_id,v_ReturnStatus);
732: --
733: IF (l_debug <> -1) THEN
734: rlm_core_sv.dlog(k_DEBUG, 'After calling Process Order API (Unscheduling)');
735: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
736: END IF;
737: --
738: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
739: --
737: --
738: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
739: --
740: IF (l_debug <> -1) THEN
741: rlm_core_sv.dpop(k_SDEBUG, 'Process Order API (Unscheduling) Failed');
742: END IF;
743: --
744: RAISE e_group_error;
745: --
745: --
746: ELSIF v_ReturnStatus = FND_API.G_RET_STS_ERROR THEN
747: --
748: IF (l_debug <> -1) THEN
749: rlm_core_sv.dpop(k_SDEBUG, 'Process Order API (Unscheduling) Failed');
750: END IF;
751: --
752: RAISE e_group_error;
753: --
757:
758: rlm_extinterface_sv.ProcessOperation(g_Op_Tab,x_Sched_rec.header_id,v_ReturnStatus);
759: --
760: IF (l_debug <> -1) THEN
761: rlm_core_sv.dlog(k_DEBUG, 'After calling Process Order API (Scheduling)');
762: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
763: END IF;
764: --
765: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
758: rlm_extinterface_sv.ProcessOperation(g_Op_Tab,x_Sched_rec.header_id,v_ReturnStatus);
759: --
760: IF (l_debug <> -1) THEN
761: rlm_core_sv.dlog(k_DEBUG, 'After calling Process Order API (Scheduling)');
762: rlm_core_sv.dlog(k_DEBUG, 'v_ReturnStatus', v_ReturnStatus);
763: END IF;
764: --
765: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
766: --
764: --
765: IF v_ReturnStatus = FND_API.G_RET_STS_UNEXP_ERROR THEN
766: --
767: IF (l_debug <> -1) THEN
768: rlm_core_sv.dpop(k_SDEBUG, 'Process Order API Failed');
769: END IF;
770: --
771: RAISE e_group_error;
772: --
772: --
773: ELSIF v_ReturnStatus = FND_API.G_RET_STS_ERROR THEN
774: --
775: IF (l_debug <> -1) THEN
776: rlm_core_sv.dpop(k_SDEBUG, 'Process Order API Failed');
777: END IF;
778: --
779: RAISE e_group_error;
780: --
780: --
781: END IF;
782: --
783: IF (l_debug <> -1) THEN
784: rlm_core_sv.dlog(k_DEBUG, 'Process Order API Suceess');
785: rlm_core_sv.dpop(k_SDEBUG);
786: END IF;
787: --
788: EXCEPTION
781: END IF;
782: --
783: IF (l_debug <> -1) THEN
784: rlm_core_sv.dlog(k_DEBUG, 'Process Order API Suceess');
785: rlm_core_sv.dpop(k_SDEBUG);
786: END IF;
787: --
788: EXCEPTION
789: WHEN e_group_error THEN
793: WHEN OTHERS THEN
794: rlm_message_sv.sql_error('rlm_rd_sv.ExecOperations', x_progress);
795: --
796: IF (l_debug <> -1) THEN
797: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
798: END IF;
799: --
800: raise;
801:
845:
846: BEGIN
847: --
848: IF (l_debug <> -1) THEN
849: rlm_core_sv.dpush(k_SDEBUG,'CancelPreHorizonNATS');
850: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',
851: x_Group_rec.order_header_id);
852: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',
853: x_Group_rec.ship_from_org_id);
846: BEGIN
847: --
848: IF (l_debug <> -1) THEN
849: rlm_core_sv.dpush(k_SDEBUG,'CancelPreHorizonNATS');
850: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',
851: x_Group_rec.order_header_id);
852: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',
853: x_Group_rec.ship_from_org_id);
854: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
848: IF (l_debug <> -1) THEN
849: rlm_core_sv.dpush(k_SDEBUG,'CancelPreHorizonNATS');
850: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',
851: x_Group_rec.order_header_id);
852: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',
853: x_Group_rec.ship_from_org_id);
854: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
855: x_Group_rec.ship_to_org_id);
856: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',
850: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',
851: x_Group_rec.order_header_id);
852: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',
853: x_Group_rec.ship_from_org_id);
854: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
855: x_Group_rec.ship_to_org_id);
856: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',
857: x_Group_rec.customer_item_id);
858: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
852: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',
853: x_Group_rec.ship_from_org_id);
854: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
855: x_Group_rec.ship_to_org_id);
856: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',
857: x_Group_rec.customer_item_id);
858: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
859: x_Group_rec.inventory_item_id);
860: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
854: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
855: x_Group_rec.ship_to_org_id);
856: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',
857: x_Group_rec.customer_item_id);
858: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
859: x_Group_rec.inventory_item_id);
860: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
861: x_Sched_rec.sched_horizon_start_date);
862: END IF;
856: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',
857: x_Group_rec.customer_item_id);
858: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
859: x_Group_rec.inventory_item_id);
860: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date',
861: x_Sched_rec.sched_horizon_start_date);
862: END IF;
863: --
864: FOR c_PreHorizonNATS_rec IN c_PreHorizonNATS LOOP
863: --
864: FOR c_PreHorizonNATS_rec IN c_PreHorizonNATS LOOP
865: --
866: IF (l_debug <> -1) THEN
867: rlm_core_sv.dlog(k_DEBUG,'c_PreHorizonNATS_rec.line_id',
868: c_PreHorizonNATS_rec.line_id);
869: END IF;
870: --
871: v_Key_rec.oe_line_id := c_PreHorizonNATS_rec.line_id;
879: --
880: END LOOP;
881: --
882: IF (l_debug <> -1) THEN
883: rlm_core_sv.dpop(k_SDEBUG);
884: END IF;
885: --
886: EXCEPTION
887: --
887: --
888: WHEN e_group_error THEN
889: --
890: IF (l_debug <> -1) THEN
891: rlm_core_sv.dlog(k_DEBUG,'group error');
892: rlm_core_sv.dpop(k_SDEBUG);
893: END IF;
894: --
895: raise e_group_error;
888: WHEN e_group_error THEN
889: --
890: IF (l_debug <> -1) THEN
891: rlm_core_sv.dlog(k_DEBUG,'group error');
892: rlm_core_sv.dpop(k_SDEBUG);
893: END IF;
894: --
895: raise e_group_error;
896:
897: WHEN OTHERS THEN
898: rlm_message_sv.sql_error('rlm_rd_sv.CancelPreHorizonNATS',x_progress);
899: --
900: IF (l_debug <> -1) THEN
901: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
902: END IF;
903: --
904: raise;
905:
922:
923: BEGIN
924: --
925: IF (l_debug <> -1) THEN
926: rlm_core_sv.dpush(k_SDEBUG,'ProcessConstraint');
927: rlm_core_sv.dlog(k_DEBUG,'x_Operation',x_Operation);
928: rlm_core_sv.dlog(k_DEBUG,'x_OperationQty',x_OperationQty);
929: END IF;
930: --
923: BEGIN
924: --
925: IF (l_debug <> -1) THEN
926: rlm_core_sv.dpush(k_SDEBUG,'ProcessConstraint');
927: rlm_core_sv.dlog(k_DEBUG,'x_Operation',x_Operation);
928: rlm_core_sv.dlog(k_DEBUG,'x_OperationQty',x_OperationQty);
929: END IF;
930: --
931: IF x_Operation = k_UPDATE_ATTR THEN
924: --
925: IF (l_debug <> -1) THEN
926: rlm_core_sv.dpush(k_SDEBUG,'ProcessConstraint');
927: rlm_core_sv.dlog(k_DEBUG,'x_Operation',x_Operation);
928: rlm_core_sv.dlog(k_DEBUG,'x_OperationQty',x_OperationQty);
929: END IF;
930: --
931: IF x_Operation = k_UPDATE_ATTR THEN
932: --
975:
976: IF b_Result THEN
977: --
978: IF (l_debug <> -1) THEN
979: rlm_core_sv.dpop(k_SDEBUG, 'true');
980: END IF;
981: --
982: ELSE
983: --
981: --
982: ELSE
983: --
984: IF (l_debug <> -1) THEN
985: rlm_core_sv.dpop(k_SDEBUG, 'false');
986: END IF;
987: --
988: END IF;
989: --
993: WHEN OTHERS THEN
994: rlm_message_sv.sql_error('rlm_rd_sv.ProcessConstraint',x_progress);
995: --
996: IF (l_debug <> -1) THEN
997: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
998: END IF;
999: --
1000: raise;
1001:
1014: x_progress VARCHAR2(3) := '010';
1015: BEGIN
1016: --
1017: IF (l_debug <> -1) THEN
1018: rlm_core_sv.dpush(k_SDEBUG,'FetchGroup');
1019: END IF;
1020: --
1021: FETCH x_Group_ref INTO
1022: x_Group_rec.customer_id,
1034: --
1035: IF x_Group_ref%NOTFOUND THEN
1036: --
1037: IF (l_debug <> -1) THEN
1038: rlm_core_sv.dpop(k_SDEBUG, 'false');
1039: END IF;
1040: --
1041: RETURN(FALSE);
1042: --
1042: --
1043: ELSE
1044: --
1045: IF (l_debug <> -1) THEN
1046: rlm_core_sv.dpop(k_SDEBUG, 'true');
1047: END IF;
1048: --
1049: RETURN(TRUE);
1050: --
1054: WHEN OTHERS THEN
1055: rlm_message_sv.sql_error('rlm_rd_sv.FetchGroup',x_progress);
1056: --
1057: IF (l_debug <> -1) THEN
1058: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
1059: END IF;
1060: --
1061: raise;
1062:
1075: v_Progress VARCHAR2(3) := '010';
1076: BEGIN
1077: --
1078: IF (l_debug <> -1) THEN
1079: rlm_core_sv.dpush(k_SDEBUG,'RemainOnFile');
1080: END IF;
1081: --
1082: IF (TO_DATE(x_key_rec.dem_rec.industry_attribute2,'RRRR/MM/DD HH24:MI:SS') < TRUNC(rlm_dp_sv.g_dsp_start_time)) AND x_key_rec.dem_rec.authorized_to_ship_flag = 'Y' THEN --Bugfix 10053830
1083: --
1083: --
1084: IF x_group_rec.disposition_code = k_REMAIN_ON_FILE THEN
1085: --
1086: IF (l_debug <> -1) THEN
1087: rlm_core_sv.dlog(k_DEBUG,'Remain on File');
1088: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
1089: END IF;
1090: RETURN TRUE;
1091: --
1084: IF x_group_rec.disposition_code = k_REMAIN_ON_FILE THEN
1085: --
1086: IF (l_debug <> -1) THEN
1087: rlm_core_sv.dlog(k_DEBUG,'Remain on File');
1088: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
1089: END IF;
1090: RETURN TRUE;
1091: --
1092: ELSIF x_group_rec.disposition_code = k_CANCEL_AFTER_N_DAYS THEN
1093: --
1094: IF TO_DATE(x_key_rec.dem_rec.industry_attribute2,'RRRR/MM/DD HH24:MI:SS') >= (TRUNC(rlm_dp_sv.g_dsp_start_time) - NVL(x_group_rec.cutoff_days,0)) THEN --Bugfix 10053830
1095: --
1096: IF (l_debug <> -1) THEN
1097: rlm_core_sv.dlog(k_DEBUG,'Between cutoff and sysdate');
1098: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
1099: END IF;
1100: RETURN TRUE;
1101: --
1094: IF TO_DATE(x_key_rec.dem_rec.industry_attribute2,'RRRR/MM/DD HH24:MI:SS') >= (TRUNC(rlm_dp_sv.g_dsp_start_time) - NVL(x_group_rec.cutoff_days,0)) THEN --Bugfix 10053830
1095: --
1096: IF (l_debug <> -1) THEN
1097: rlm_core_sv.dlog(k_DEBUG,'Between cutoff and sysdate');
1098: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
1099: END IF;
1100: RETURN TRUE;
1101: --
1102: END IF;
1105: --
1106: END IF;
1107: --
1108: IF (l_debug <> -1) THEN
1109: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
1110: END IF;
1111: --
1112: RETURN FALSE;
1113: --
1116: WHEN OTHERS THEN
1117: --
1118: rlm_message_sv.sql_error('RLM_RD_SV.RemainOnFile', v_Progress);
1119: IF (l_debug <> -1) THEN
1120: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '|| SUBSTR(SQLERRM,1,200));
1121: END IF;
1122: RAISE;
1123:
1124: END RemainOnFile;
1150:
1151: BEGIN
1152:
1153: IF (l_debug <> -1) THEN
1154: rlm_core_sv.dpush(k_SDEBUG,'DeleteRequirement');
1155: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1156: rlm_core_sv.dlog(k_DEBUG,'g_del_reconcile',g_del_reconcile); --Bugfix 6131516
1157: END IF;
1158: --
1151: BEGIN
1152:
1153: IF (l_debug <> -1) THEN
1154: rlm_core_sv.dpush(k_SDEBUG,'DeleteRequirement');
1155: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1156: rlm_core_sv.dlog(k_DEBUG,'g_del_reconcile',g_del_reconcile); --Bugfix 6131516
1157: END IF;
1158: --
1159: /*passing the header_id so it can create proper error message if
1152:
1153: IF (l_debug <> -1) THEN
1154: rlm_core_sv.dpush(k_SDEBUG,'DeleteRequirement');
1155: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1156: rlm_core_sv.dlog(k_DEBUG,'g_del_reconcile',g_del_reconcile); --Bugfix 6131516
1157: END IF;
1158: --
1159: /*passing the header_id so it can create proper error message if
1160: process order api fails*/
1173: x_Group_rec, x_key_rec.dem_rec.request_date) THEN
1174: --Bugfix 10053830
1175: --
1176: IF (l_debug <> -1) THEN
1177: rlm_core_sv.dlog(k_DEBUG,'Line cannot be deleted-- within frozen fence',
1178: x_key_rec.dem_rec.line_id);
1179: rlm_core_sv.dlog(k_DEBUG,'dem_rec.request_date',
1180: x_key_rec.dem_rec.request_date);
1181: END IF;
1175: --
1176: IF (l_debug <> -1) THEN
1177: rlm_core_sv.dlog(k_DEBUG,'Line cannot be deleted-- within frozen fence',
1178: x_key_rec.dem_rec.line_id);
1179: rlm_core_sv.dlog(k_DEBUG,'dem_rec.request_date',
1180: x_key_rec.dem_rec.request_date);
1181: END IF;
1182: --
1183: IF x_Reconcile THEN
1203: x_ScheduleLineId => NULL,
1204: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1205: x_OrderLineId => x_key_rec.dem_rec.line_id,
1206: x_Token1 => 'LINE',
1207: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1208: x_Token2 => 'ORDER',
1209: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1210: x_Token3 => 'QUANTITY',
1211: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1205: x_OrderLineId => x_key_rec.dem_rec.line_id,
1206: x_Token1 => 'LINE',
1207: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1208: x_Token2 => 'ORDER',
1209: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1210: x_Token3 => 'QUANTITY',
1211: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1212: x_Token4 => 'CUSTITEM',
1213: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1209: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1210: x_Token3 => 'QUANTITY',
1211: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1212: x_Token4 => 'CUSTITEM',
1213: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1214: x_Token5 => 'REQ_DATE',
1215: x_value5 => x_key_rec.dem_rec.request_date,
1216: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
1217: x_value6 => v_del_line_qty, --Bugfix 6159269
1222: x_Token8 => 'MATCH_ATTR',
1223: x_value8 => v_MatchAttrTxt );
1224: --
1225: IF (l_debug <> -1) THEN
1226: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE_SEQ',x_key_rec.dem_rec.line_id);
1227: END IF;
1228: --
1229: ELSE
1230: --
1237: x_ScheduleLineId => NULL,
1238: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1239: x_OrderLineId => x_key_rec.dem_rec.line_id,
1240: x_Token1 => 'LINE',
1241: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1242: x_Token2 => 'ORDER',
1243: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1244: x_Token3 => 'QUANTITY',
1245: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1239: x_OrderLineId => x_key_rec.dem_rec.line_id,
1240: x_Token1 => 'LINE',
1241: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1242: x_Token2 => 'ORDER',
1243: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1244: x_Token3 => 'QUANTITY',
1245: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1246: x_Token4 => 'CUSTITEM',
1247: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1243: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1244: x_Token3 => 'QUANTITY',
1245: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1246: x_Token4 => 'CUSTITEM',
1247: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1248: x_Token5 => 'REQ_DATE',
1249: x_value5 => x_key_rec.dem_rec.request_date,
1250: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
1251: x_value6 => v_del_line_qty, --Bugfix 6159269
1252: x_Token7 => 'MATCH_ATTR',
1253: x_value7 => v_MatchAttrTxt);
1254: --
1255: IF (l_debug <> -1) THEN
1256: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE',x_key_rec.dem_rec.line_id);
1257: END IF;
1258: --
1259: END IF;
1260:
1268: StoreReconcile(x_Sched_rec, x_Group_rec, x_Key_rec,
1269: v_Qty_rec.reconcile);
1270: END IF;
1271: --x_DeleteQty := v_Qty_rec.available_to_cancel;
1272: --rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1273: --
1274: ELSE
1275: --
1276: -- Call to check if Shipping allows delete
1276: -- Call to check if Shipping allows delete
1277: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1278: --
1279: IF (l_debug <> -1) THEN
1280: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.dem_rec.line_id',x_key_rec.dem_rec.line_id);
1281: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.oe_line_id',x_key_rec.oe_line_id);
1282: END IF;
1283: --
1284: v_changed_attributes.action_flag := 'D';
1277: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1278: --
1279: IF (l_debug <> -1) THEN
1280: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.dem_rec.line_id',x_key_rec.dem_rec.line_id);
1281: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.oe_line_id',x_key_rec.oe_line_id);
1282: END IF;
1283: --
1284: v_changed_attributes.action_flag := 'D';
1285: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id, x_key_rec.dem_rec.line_id);
1284: v_changed_attributes.action_flag := 'D';
1285: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id, x_key_rec.dem_rec.line_id);
1286: --
1287: IF (l_debug <> -1) THEN
1288: rlm_core_sv.dlog(k_DEBUG,'source_line_id',v_changed_attributes.source_line_id);
1289: END IF;
1290: --
1291: RLM_EXTINTERFACE_SV.CheckShippingConstraints(
1292: x_source_code => v_source_code,
1298: x_header_id => x_Sched_rec.header_id,
1299: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1300: --
1301: IF (l_debug <> -1) THEN
1302: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1303: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1304: END IF;
1305: --
1306: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1299: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1300: --
1301: IF (l_debug <> -1) THEN
1302: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1303: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1304: END IF;
1305: --
1306: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1307: --
1305: --
1306: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1307: --
1308: IF (l_debug <> -1) THEN
1309: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed. Unexpected Error');
1310: END IF;
1311: --
1312: RAISE e_group_error;
1313: --
1313: --
1314: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1315: --
1316: IF (l_debug <> -1) THEN
1317: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed.');
1318: END IF;
1319: --
1320: RAISE e_group_error;
1321: --
1340: -- Call again to see if Shipping allows Cancel
1341: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1342: --
1343: IF (l_debug <> -1) THEN
1344: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.oe_line_id);
1345: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.dem_rec.line_id);
1346: END IF;
1347: --
1348: v_changed_attributes.action_flag := 'C';
1341: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1342: --
1343: IF (l_debug <> -1) THEN
1344: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.oe_line_id);
1345: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.dem_rec.line_id);
1346: END IF;
1347: --
1348: v_changed_attributes.action_flag := 'C';
1349: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id,
1349: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id,
1350: x_key_rec.dem_rec.line_id);
1351: --
1352: IF (l_debug <> -1) THEN
1353: rlm_core_sv.dlog(k_DEBUG,'source_line_id',v_changed_attributes.source_line_id);
1354: END IF;
1355: --
1356: RLM_EXTINTERFACE_SV.CheckShippingConstraints(
1357: x_source_code => v_source_code,
1363: x_header_id => x_Sched_rec.header_id,
1364: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1365: --
1366: IF (l_debug <> -1) THEN
1367: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1368: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1369: END IF;
1370: --
1371: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1364: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1365: --
1366: IF (l_debug <> -1) THEN
1367: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1368: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1369: END IF;
1370: --
1371: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1372: --
1370: --
1371: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1372: --
1373: IF (l_debug <> -1) THEN
1374: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed');
1375: END IF;
1376: --
1377: RAISE e_group_error;
1378: --
1378: --
1379: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1380: --
1381: IF (l_debug <> -1) THEN
1382: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed.');
1383: END IF;
1384: --
1385: RAISE e_group_error;
1386: --
1400: x_DeleteQty := 0;
1401: SetOperation(x_Key_rec, k_UPDATE, x_DeleteQty);
1402: --
1403: IF (l_debug <> -1) THEN
1404: rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1405: END IF;
1406: --
1407: END IF;
1408: --
1433: x_OrderLineId => NULL,
1434: x_Token1 => 'QUANTITY',
1435: x_value1 => g_sch_line_qty,
1436: x_Token2 => 'GROUP',
1437: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1438: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1439: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1440: x_Token3 => 'REQ_DATE',
1441: x_value3 => x_key_rec.req_rec.request_date,
1434: x_Token1 => 'QUANTITY',
1435: x_value1 => g_sch_line_qty,
1436: x_Token2 => 'GROUP',
1437: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1438: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1439: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1440: x_Token3 => 'REQ_DATE',
1441: x_value3 => x_key_rec.req_rec.request_date,
1442: x_Token4 => 'START_DATE_TIME',
1435: x_value1 => g_sch_line_qty,
1436: x_Token2 => 'GROUP',
1437: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1438: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1439: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1440: x_Token3 => 'REQ_DATE',
1441: x_value3 => x_key_rec.req_rec.request_date,
1442: x_Token4 => 'START_DATE_TIME',
1443: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1445: x_value5 => nvl(x_Key_rec.req_rec.cust_production_seq_num,'NULL') ||'-'||
1446: nvl(x_Key_rec.req_rec.cust_model_serial_number,'NULL')||'-'||
1447: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1448: x_Token6 => 'ORDER',
1449: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1450: x_Token7 => 'LINE',
1451: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1452: x_Token8 => 'MATCH_ATTR',
1453: x_value8 => v_MatchAttrTxt);
1447: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1448: x_Token6 => 'ORDER',
1449: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1450: x_Token7 => 'LINE',
1451: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1452: x_Token8 => 'MATCH_ATTR',
1453: x_value8 => v_MatchAttrTxt);
1454: --
1455: IF (l_debug <> -1) THEN
1452: x_Token8 => 'MATCH_ATTR',
1453: x_value8 => v_MatchAttrTxt);
1454: --
1455: IF (l_debug <> -1) THEN
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1457: x_key_rec.req_rec.line_id);
1458: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1459: x_Key_rec.req_rec.cust_model_serial_number);
1460: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1454: --
1455: IF (l_debug <> -1) THEN
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1457: x_key_rec.req_rec.line_id);
1458: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1459: x_Key_rec.req_rec.cust_model_serial_number);
1460: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1461: x_Key_rec.req_rec.request_date);
1462: END IF;
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1457: x_key_rec.req_rec.line_id);
1458: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1459: x_Key_rec.req_rec.cust_model_serial_number);
1460: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1461: x_Key_rec.req_rec.request_date);
1462: END IF;
1463: --
1464: ELSE
1474: x_OrderLineId => NULL,
1475: x_Token1 => 'QUANTITY',
1476: x_value1 => g_sch_line_qty,
1477: x_Token2 => 'GROUP',
1478: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1479: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1480: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1481: x_Token3 => 'REQ_DATE',
1482: x_value3 => x_key_rec.req_rec.request_date,
1475: x_Token1 => 'QUANTITY',
1476: x_value1 => g_sch_line_qty,
1477: x_Token2 => 'GROUP',
1478: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1479: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1480: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1481: x_Token3 => 'REQ_DATE',
1482: x_value3 => x_key_rec.req_rec.request_date,
1483: x_Token4 => 'START_DATE_TIME',
1476: x_value1 => g_sch_line_qty,
1477: x_Token2 => 'GROUP',
1478: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1479: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1480: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1481: x_Token3 => 'REQ_DATE',
1482: x_value3 => x_key_rec.req_rec.request_date,
1483: x_Token4 => 'START_DATE_TIME',
1484: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1482: x_value3 => x_key_rec.req_rec.request_date,
1483: x_Token4 => 'START_DATE_TIME',
1484: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1485: x_Token5 => 'SCHEDULE_LINE',
1486: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1487: x_Token6 => 'ORDER',
1488: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1489: x_Token7 => 'LINE',
1490: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1484: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1485: x_Token5 => 'SCHEDULE_LINE',
1486: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1487: x_Token6 => 'ORDER',
1488: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1489: x_Token7 => 'LINE',
1490: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1491: x_Token8 => 'MATCH_ATTR',
1492: x_value8 => v_MatchAttrTxt);
1486: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1487: x_Token6 => 'ORDER',
1488: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1489: x_Token7 => 'LINE',
1490: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1491: x_Token8 => 'MATCH_ATTR',
1492: x_value8 => v_MatchAttrTxt);
1493: --
1494: IF (l_debug <> -1) THEN
1491: x_Token8 => 'MATCH_ATTR',
1492: x_value8 => v_MatchAttrTxt);
1493: --
1494: IF (l_debug <> -1) THEN
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1496: x_key_rec.req_rec.line_id);
1497: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1498: x_Key_rec.req_rec.cust_model_serial_number);
1499: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1493: --
1494: IF (l_debug <> -1) THEN
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1496: x_key_rec.req_rec.line_id);
1497: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1498: x_Key_rec.req_rec.cust_model_serial_number);
1499: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1500: x_Key_rec.req_rec.request_date);
1501: END IF;
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1496: x_key_rec.req_rec.line_id);
1497: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1498: x_Key_rec.req_rec.cust_model_serial_number);
1499: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1500: x_Key_rec.req_rec.request_date);
1501: END IF;
1502: --
1503: END IF; /* Exception */
1505: END IF;/* Check g_sch_line_qty*/
1506: --Bugfix 6131516 End
1507:
1508: IF (l_debug <> -1) THEN
1509: rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1510: END IF;
1511: --
1512: END IF;
1513: --
1515: --
1516: END IF;
1517: --
1518: IF (l_debug <> -1) THEN
1519: rlm_core_sv.dpop(k_SDEBUG);
1520: END IF;
1521: --
1522: EXCEPTION
1523: --
1529: --
1530: rlm_message_sv.sql_error('rlm_rd_sv.DeleteRequirement',x_progress);
1531: --
1532: IF (l_debug <> -1) THEN
1533: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
1534: END IF;
1535: --
1536: raise;
1537:
1557:
1558: BEGIN
1559: --
1560: IF (l_debug <> -1) THEN
1561: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1562: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1563: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1564: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1565: END IF;
1558: BEGIN
1559: --
1560: IF (l_debug <> -1) THEN
1561: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1562: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1563: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1564: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1565: END IF;
1566:
1559: --
1560: IF (l_debug <> -1) THEN
1561: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1562: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1563: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1564: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1565: END IF;
1566:
1567: --logic to roll forward frozen fence goes here
1560: IF (l_debug <> -1) THEN
1561: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1562: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1563: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1564: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1565: END IF;
1566:
1567: --logic to roll forward frozen fence goes here
1568:
1568:
1569: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
1570: --
1571: IF (l_debug <> -1) THEN
1572: rlm_core_sv.dlog(k_DEBUG,' Rollforward set to: ', v_RF_Enabled);
1573: END IF;
1574: --
1575: -- bug 4223359 first reconcile the quantity in the reconcile table before trying to
1576: -- insert the new requirement. If there is additional qty after reconciling then
1584: --
1585: RLM_TPA_SV.ReconcileShipments(x_Group_rec, x_Key_rec, x_Quantity);
1586: --
1587: IF (l_debug <> -1) THEN
1588: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1589: END IF;
1590: --
1591: Reconcile(x_Group_rec, x_Key_rec, x_Quantity);
1592: --
1592: --
1593: END IF;
1594: --
1595: IF (l_debug <> -1) THEN
1596: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1597: END IF;
1598: --
1599: IF x_Quantity = 0 THEN
1600: -- Bug 4297984 Start
1613: x_OrderLineId => NULL,
1614: x_Token1 => 'QUANTITY',
1615: x_value1 => v_Quantity,
1616: x_Token2 => 'GROUP',
1617: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1618: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1619: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1620: x_Token3 => 'REQ_DATE',
1621: x_value3 => x_key_rec.req_rec.request_date,
1614: x_Token1 => 'QUANTITY',
1615: x_value1 => v_Quantity,
1616: x_Token2 => 'GROUP',
1617: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1618: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1619: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1620: x_Token3 => 'REQ_DATE',
1621: x_value3 => x_key_rec.req_rec.request_date,
1622: x_Token4 => 'START_DATE_TIME',
1615: x_value1 => v_Quantity,
1616: x_Token2 => 'GROUP',
1617: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1618: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1619: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1620: x_Token3 => 'REQ_DATE',
1621: x_value3 => x_key_rec.req_rec.request_date,
1622: x_Token4 => 'START_DATE_TIME',
1623: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1628: x_Token6 => 'MATCH_ATTR',
1629: x_value6 => v_MatchAttrTxt);
1630: --
1631: IF (l_debug <> -1) THEN
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1633: x_key_rec.req_rec.line_id);
1634: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1635: x_Key_rec.req_rec.cust_model_serial_number);
1636: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1630: --
1631: IF (l_debug <> -1) THEN
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1633: x_key_rec.req_rec.line_id);
1634: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1635: x_Key_rec.req_rec.cust_model_serial_number);
1636: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1637: x_Key_rec.req_rec.request_date);
1638: END IF;
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1633: x_key_rec.req_rec.line_id);
1634: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1635: x_Key_rec.req_rec.cust_model_serial_number);
1636: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1637: x_Key_rec.req_rec.request_date);
1638: END IF;
1639: --
1640: ELSE
1650: x_OrderLineId => NULL,
1651: x_Token1 => 'QUANTITY',
1652: x_value1 => v_Quantity,
1653: x_Token2 => 'GROUP',
1654: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1655: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1656: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1657: x_Token3 => 'REQ_DATE',
1658: x_value3 => x_key_rec.req_rec.request_date,
1651: x_Token1 => 'QUANTITY',
1652: x_value1 => v_Quantity,
1653: x_Token2 => 'GROUP',
1654: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1655: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1656: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1657: x_Token3 => 'REQ_DATE',
1658: x_value3 => x_key_rec.req_rec.request_date,
1659: x_Token4 => 'START_DATE_TIME',
1652: x_value1 => v_Quantity,
1653: x_Token2 => 'GROUP',
1654: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1655: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1656: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1657: x_Token3 => 'REQ_DATE',
1658: x_value3 => x_key_rec.req_rec.request_date,
1659: x_Token4 => 'START_DATE_TIME',
1660: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1658: x_value3 => x_key_rec.req_rec.request_date,
1659: x_Token4 => 'START_DATE_TIME',
1660: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1661: x_Token5 => 'SCHEDULE_LINE',
1662: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1663: x_Token6 => 'MATCH_ATTR',
1664: x_value6 => v_MatchAttrTxt);
1665: --
1666: IF (l_debug <> -1) THEN
1663: x_Token6 => 'MATCH_ATTR',
1664: x_value6 => v_MatchAttrTxt);
1665: --
1666: IF (l_debug <> -1) THEN
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1668: x_key_rec.req_rec.line_id);
1669: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1670: x_Key_rec.req_rec.cust_model_serial_number);
1671: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1665: --
1666: IF (l_debug <> -1) THEN
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1668: x_key_rec.req_rec.line_id);
1669: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1670: x_Key_rec.req_rec.cust_model_serial_number);
1671: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1672: x_Key_rec.req_rec.request_date);
1673: END IF;
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1668: x_key_rec.req_rec.line_id);
1669: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1670: x_Key_rec.req_rec.cust_model_serial_number);
1671: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1672: x_Key_rec.req_rec.request_date);
1673: END IF;
1674: --
1675: END IF;
1676: -- Bug 4297984 End
1677: ELSE
1678: --
1679: IF (l_debug <> -1) THEN
1680: rlm_core_sv.dlog(k_DEBUG,'schedule_source',x_Sched_rec.schedule_source);
1681: END IF;
1682: --
1683: -- start of bug fix 4223359
1684: --
1691: IsFrozen(TRUNC(rlm_dp_sv.g_dsp_start_time),x_Group_rec,x_key_rec.req_rec.schedule_date) THEN
1692: --Bugfix 10053830 End
1693: --
1694: IF (l_debug <> -1) THEN
1695: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1696: x_key_rec.req_rec.line_id);
1697: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1698: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1699: END IF;
1693: --
1694: IF (l_debug <> -1) THEN
1695: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1696: x_key_rec.req_rec.line_id);
1697: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1698: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1699: END IF;
1700: --
1701: -- If not able to insert the new quantity due to frozen fence
1694: IF (l_debug <> -1) THEN
1695: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1696: x_key_rec.req_rec.line_id);
1697: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1698: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1699: END IF;
1700: --
1701: -- If not able to insert the new quantity due to frozen fence
1702: -- store that quantity with a negative quantity in the g_reconcile_tab
1709: StoreShipments(x_Sched_rec, x_Group_rec, x_Key_rec, -x_quantity);
1710: --
1711: IF (l_debug <> -1) THEN
1712: --
1713: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.schedule_type',
1714: x_Key_rec.req_rec.schedule_type);
1715: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.shipment_flag',
1716: x_Key_rec.req_rec.shipment_flag);
1717: --
1711: IF (l_debug <> -1) THEN
1712: --
1713: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.schedule_type',
1714: x_Key_rec.req_rec.schedule_type);
1715: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.shipment_flag',
1716: x_Key_rec.req_rec.shipment_flag);
1717: --
1718: END IF;
1719: --
1733: x_Sched_rec.schedule_source <> 'MANUAL' THEN
1734: --Bugfix 10053830 End
1735: --
1736: IF (l_debug <> -1) THEN
1737: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',x_Group_rec.frozen_days);
1738: END IF;
1739:
1740: -- Bugfix 8279132 Start
1741: GetMatchAttributes(x_sched_rec, x_group_rec, x_key_rec.req_rec,v_MatchAttrTxt);
1750: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
1751: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1752: x_OrderLineId => x_key_rec.dem_rec.line_id,
1753: x_Token1 => 'GROUP',
1754: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1755: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1756: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1757: x_Token2 => 'REQ_DATE',
1758: x_value2 => x_key_rec.req_rec.request_date,
1751: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1752: x_OrderLineId => x_key_rec.dem_rec.line_id,
1753: x_Token1 => 'GROUP',
1754: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1755: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1756: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1757: x_Token2 => 'REQ_DATE',
1758: x_value2 => x_key_rec.req_rec.request_date,
1759: x_Token3 => 'REC_LINE_QTY',
1752: x_OrderLineId => x_key_rec.dem_rec.line_id,
1753: x_Token1 => 'GROUP',
1754: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1755: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1756: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1757: x_Token2 => 'REQ_DATE',
1758: x_value2 => x_key_rec.req_rec.request_date,
1759: x_Token3 => 'REC_LINE_QTY',
1760: x_value3 => x_Quantity,
1767: x_Token6 => 'MATCH_ATTR',
1768: x_value6 => v_MatchAttrTxt);
1769: --
1770: IF (l_debug <> -1) THEN
1771: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
1772: x_key_rec.req_rec.line_id);
1773: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD_SEQ',
1774: x_key_rec.req_rec.line_id);
1775: END IF;
1769: --
1770: IF (l_debug <> -1) THEN
1771: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
1772: x_key_rec.req_rec.line_id);
1773: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD_SEQ',
1774: x_key_rec.req_rec.line_id);
1775: END IF;
1776:
1777: ELSE
1784: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
1785: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1786: x_OrderLineId => x_key_rec.dem_rec.line_id,
1787: x_Token1 => 'GROUP',
1788: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1789: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1790: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1791: x_Token2 => 'REQ_DATE',
1792: x_value2 => x_key_rec.req_rec.request_date,
1785: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1786: x_OrderLineId => x_key_rec.dem_rec.line_id,
1787: x_Token1 => 'GROUP',
1788: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1789: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1790: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1791: x_Token2 => 'REQ_DATE',
1792: x_value2 => x_key_rec.req_rec.request_date,
1793: x_Token3 => 'REC_LINE_QTY',
1786: x_OrderLineId => x_key_rec.dem_rec.line_id,
1787: x_Token1 => 'GROUP',
1788: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1789: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1790: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1791: x_Token2 => 'REQ_DATE',
1792: x_value2 => x_key_rec.req_rec.request_date,
1793: x_Token3 => 'REC_LINE_QTY',
1794: x_value3 => x_Quantity,
1794: x_value3 => x_Quantity,
1795: x_Token4 => 'NEW_REQ_DATE',
1796: x_value4 => TRUNC(rlm_dp_sv.g_dsp_start_time)+nvl(x_Group_rec.frozen_days,0), --Bugfix 10053830
1797: x_Token5 => 'SCHEDULE_LINE',
1798: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1799: x_Token6 => 'MATCH_ATTR',
1800: x_value6 => v_MatchAttrTxt);
1801: --
1802: IF (l_debug <> -1) THEN
1799: x_Token6 => 'MATCH_ATTR',
1800: x_value6 => v_MatchAttrTxt);
1801: --
1802: IF (l_debug <> -1) THEN
1803: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
1804: x_key_rec.req_rec.line_id);
1805: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD',
1806: x_key_rec.req_rec.line_id);
1807: END IF;
1801: --
1802: IF (l_debug <> -1) THEN
1803: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
1804: x_key_rec.req_rec.line_id);
1805: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD',
1806: x_key_rec.req_rec.line_id);
1807: END IF;
1808: END IF;
1809: -- Bugfix 8279132 End
1812: x_key_rec.req_rec.request_date := TRUNC(rlm_dp_sv.g_dsp_start_time) --Bugfix 10053830
1813: + nvl(x_Group_rec.frozen_days,0);
1814: --
1815: IF (l_debug <> -1) THEN
1816: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1817: END IF;
1818: --
1819: END IF;
1820: --
1826: x_Sched_rec.schedule_source <> 'MANUAL' THEN
1827: --Bugfix 10053830 End
1828: --
1829: IF (l_debug <> -1) THEN
1830: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',x_Group_rec.frozen_days);
1831: END IF;
1832: --pdue
1833: --x_key_rec.req_rec.schedule_date := TRUNC(SYSDATE) --Bugfix 10053830
1834: x_key_rec.req_rec.schedule_date := TRUNC(rlm_dp_sv.g_dsp_start_time) --Bugfix 10053830
1834: x_key_rec.req_rec.schedule_date := TRUNC(rlm_dp_sv.g_dsp_start_time) --Bugfix 10053830
1835: + nvl(x_Group_rec.frozen_days,0);
1836: --
1837: IF (l_debug <> -1) THEN
1838: rlm_core_sv.dlog(k_DEBUG,'schedule_date',x_key_rec.req_rec.schedule_date);
1839: END IF;
1840: --
1841: END IF;
1842: --
1851: ELSE
1852: --
1853: IF (l_debug <> -1) THEN
1854: --
1855: rlm_core_sv.dlog(k_DEBUG,'Insertion will not happen as a demand populated by higher precedence ' ||
1856: g_order_rec.rla_schedule_type_code || ' schedule exists on ' ||
1857: g_order_rec.request_date);
1858: --
1859: END IF;
1873: x_OrderLineId => NULL,
1874: x_Token1 => 'QUANTITY',
1875: x_value1 => x_Key_rec.req_rec.primary_quantity,
1876: x_Token2 => 'GROUP',
1877: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1878: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1879: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1880: x_Token3 => 'REQ_DATE',
1881: x_value3 => x_key_rec.req_rec.request_date,
1874: x_Token1 => 'QUANTITY',
1875: x_value1 => x_Key_rec.req_rec.primary_quantity,
1876: x_Token2 => 'GROUP',
1877: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1878: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1879: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1880: x_Token3 => 'REQ_DATE',
1881: x_value3 => x_key_rec.req_rec.request_date,
1882: x_Token4 => 'START_DATE_TIME',
1875: x_value1 => x_Key_rec.req_rec.primary_quantity,
1876: x_Token2 => 'GROUP',
1877: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1878: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1879: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1880: x_Token3 => 'REQ_DATE',
1881: x_value3 => x_key_rec.req_rec.request_date,
1882: x_Token4 => 'START_DATE_TIME',
1883: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1887: x_value6 => g_order_rec.industry_attribute3,
1888: x_Token7 => 'RECENT_REQ_DATE',
1889: x_value7 => g_order_rec.request_date,
1890: x_Token8 => 'ORDER',
1891: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1892: x_Token9 => 'SEQ_INFO',
1893: x_value9 => nvl(x_Key_rec.req_rec.cust_production_seq_num,'NULL') ||'-'||
1894: nvl(x_Key_rec.req_rec.cust_model_serial_number,'NULL')||'-'||
1895: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1896: x_Token10 => 'MATCH_ATTR',
1897: x_value10 => v_MatchAttrTxt);
1898: --
1899: IF (l_debug <> -1) THEN
1900: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1901: x_key_rec.req_rec.line_id);
1902: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1903: x_Key_rec.req_rec.cust_model_serial_number);
1904: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1898: --
1899: IF (l_debug <> -1) THEN
1900: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1901: x_key_rec.req_rec.line_id);
1902: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1903: x_Key_rec.req_rec.cust_model_serial_number);
1904: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1905: x_Key_rec.req_rec.request_date);
1906: END IF;
1900: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1901: x_key_rec.req_rec.line_id);
1902: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1903: x_Key_rec.req_rec.cust_model_serial_number);
1904: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1905: x_Key_rec.req_rec.request_date);
1906: END IF;
1907: --
1908: ELSE
1918: x_OrderLineId => NULL,
1919: x_Token1 => 'QUANTITY',
1920: x_value1 => x_Key_rec.req_rec.primary_quantity,
1921: x_Token2 => 'GROUP',
1922: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1923: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1924: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1925: x_Token3 => 'REQ_DATE',
1926: x_value3 => x_key_rec.req_rec.request_date,
1919: x_Token1 => 'QUANTITY',
1920: x_value1 => x_Key_rec.req_rec.primary_quantity,
1921: x_Token2 => 'GROUP',
1922: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1923: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1924: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1925: x_Token3 => 'REQ_DATE',
1926: x_value3 => x_key_rec.req_rec.request_date,
1927: x_Token4 => 'START_DATE_TIME',
1920: x_value1 => x_Key_rec.req_rec.primary_quantity,
1921: x_Token2 => 'GROUP',
1922: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1923: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1924: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1925: x_Token3 => 'REQ_DATE',
1926: x_value3 => x_key_rec.req_rec.request_date,
1927: x_Token4 => 'START_DATE_TIME',
1928: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1932: x_value6 => g_order_rec.industry_attribute3,
1933: x_Token7 => 'RECENT_REQ_DATE',
1934: x_value7 => g_order_rec.request_date,
1935: x_Token8 => 'ORDER',
1936: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1937: x_Token9 => 'SCHEDULE_LINE',
1938: x_value9 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1939: x_Token10 => 'MATCH_ATTR',
1940: x_value10 => v_MatchAttrTxt);
1934: x_value7 => g_order_rec.request_date,
1935: x_Token8 => 'ORDER',
1936: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1937: x_Token9 => 'SCHEDULE_LINE',
1938: x_value9 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1939: x_Token10 => 'MATCH_ATTR',
1940: x_value10 => v_MatchAttrTxt);
1941: --
1942: IF (l_debug <> -1) THEN
1939: x_Token10 => 'MATCH_ATTR',
1940: x_value10 => v_MatchAttrTxt);
1941: --
1942: IF (l_debug <> -1) THEN
1943: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1944: x_key_rec.req_rec.line_id);
1945: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1946: x_Key_rec.req_rec.cust_model_serial_number);
1947: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1941: --
1942: IF (l_debug <> -1) THEN
1943: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1944: x_key_rec.req_rec.line_id);
1945: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1946: x_Key_rec.req_rec.cust_model_serial_number);
1947: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1948: x_Key_rec.req_rec.request_date);
1949: END IF;
1943: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1944: x_key_rec.req_rec.line_id);
1945: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1946: x_Key_rec.req_rec.cust_model_serial_number);
1947: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1948: x_Key_rec.req_rec.request_date);
1949: END IF;
1950: --
1951: END IF;
1964: --
1965: END IF;
1966: --
1967: IF (l_debug <> -1) THEN
1968: rlm_core_sv.dpop(k_SDEBUG);
1969: END IF;
1970:
1971: EXCEPTION
1972: WHEN e_FrozenFences THEN
1987: x_OrderLineId => NULL,
1988: x_Token1 => 'QUANTITY',
1989: x_value1 => x_Key_rec.req_rec.primary_quantity,
1990: x_Token2 => 'GROUP',
1991: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1992: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1993: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1994: x_Token3 => 'REQ_DATE',
1995: x_value3 => x_key_rec.req_rec.request_date,
1988: x_Token1 => 'QUANTITY',
1989: x_value1 => x_Key_rec.req_rec.primary_quantity,
1990: x_Token2 => 'GROUP',
1991: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1992: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1993: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1994: x_Token3 => 'REQ_DATE',
1995: x_value3 => x_key_rec.req_rec.request_date,
1996: x_Token4 => 'START_DATE_TIME',
1989: x_value1 => x_Key_rec.req_rec.primary_quantity,
1990: x_Token2 => 'GROUP',
1991: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1992: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1993: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1994: x_Token3 => 'REQ_DATE',
1995: x_value3 => x_key_rec.req_rec.request_date,
1996: x_Token4 => 'START_DATE_TIME',
1997: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
2002: x_Token6 => 'MATCH_ATTR',
2003: x_value6 => v_MatchAttrTxt);
2004: --
2005: IF (l_debug <> -1) THEN
2006: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT_SEQ',
2007: x_key_rec.req_rec.line_id);
2008: rlm_core_sv.dpop(k_SDEBUG);
2009: END IF;
2010: --
2004: --
2005: IF (l_debug <> -1) THEN
2006: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT_SEQ',
2007: x_key_rec.req_rec.line_id);
2008: rlm_core_sv.dpop(k_SDEBUG);
2009: END IF;
2010: --
2011: ELSE
2012: --
2021: x_OrderLineId => NULL,
2022: x_Token1 => 'QUANTITY',
2023: x_value1 => x_Key_rec.req_rec.primary_quantity,
2024: x_Token2 => 'GROUP',
2025: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2026: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2027: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2028: x_Token3 => 'REQ_DATE',
2029: x_value3 => x_key_rec.req_rec.request_date,
2022: x_Token1 => 'QUANTITY',
2023: x_value1 => x_Key_rec.req_rec.primary_quantity,
2024: x_Token2 => 'GROUP',
2025: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2026: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2027: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2028: x_Token3 => 'REQ_DATE',
2029: x_value3 => x_key_rec.req_rec.request_date,
2030: x_Token4 => 'START_DATE_TIME',
2023: x_value1 => x_Key_rec.req_rec.primary_quantity,
2024: x_Token2 => 'GROUP',
2025: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2026: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2027: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2028: x_Token3 => 'REQ_DATE',
2029: x_value3 => x_key_rec.req_rec.request_date,
2030: x_Token4 => 'START_DATE_TIME',
2031: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
2029: x_value3 => x_key_rec.req_rec.request_date,
2030: x_Token4 => 'START_DATE_TIME',
2031: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
2032: x_Token5 => 'SCHEDULE_LINE',
2033: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
2034: x_Token6 => 'MATCH_ATTR',
2035: x_value6 => v_MatchAttrTxt);
2036: --
2037: IF (l_debug <> -1) THEN
2034: x_Token6 => 'MATCH_ATTR',
2035: x_value6 => v_MatchAttrTxt);
2036: --
2037: IF (l_debug <> -1) THEN
2038: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT',
2039: x_key_rec.req_rec.line_id);
2040: rlm_core_sv.dpop(k_SDEBUG);
2041: END IF;
2042: --
2036: --
2037: IF (l_debug <> -1) THEN
2038: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT',
2039: x_key_rec.req_rec.line_id);
2040: rlm_core_sv.dpop(k_SDEBUG);
2041: END IF;
2042: --
2043: END IF;
2044: END IF; /*IF g_inc_exception */ --Bugfix 6159269
2047: WHEN OTHERS THEN
2048: rlm_message_sv.sql_error('rlm_rd_sv.InsertRequirement',x_progress);
2049: --
2050: IF (l_debug <> -1) THEN
2051: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2052: END IF;
2053: --
2054: raise;
2055:
2074:
2075: BEGIN
2076: --
2077: IF (l_debug <> -1) THEN
2078: rlm_core_sv.dpush(k_SDEBUG,'UpdateRequirement');
2079: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
2080: END IF;
2081: --
2082: -- logic to get roll forward values
2075: BEGIN
2076: --
2077: IF (l_debug <> -1) THEN
2078: rlm_core_sv.dpush(k_SDEBUG,'UpdateRequirement');
2079: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
2080: END IF;
2081: --
2082: -- logic to get roll forward values
2083: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
2082: -- logic to get roll forward values
2083: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
2084: --
2085: IF (l_debug <> -1) THEN
2086: rlm_core_sv.dlog(k_DEBUG, 'Rollforward set to: ', v_RF_Enabled);
2087: END IF;
2088: --
2089: --pdue
2090: --
2114: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2115: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2116: x_OrderLineId => x_key_rec.dem_rec.line_id,
2117: x_Token1 => 'LINE',
2118: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2119: x_Token2 => 'ORDER',
2120: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2121: x_Token3 => 'QUANTITY',
2122: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2116: x_OrderLineId => x_key_rec.dem_rec.line_id,
2117: x_Token1 => 'LINE',
2118: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2119: x_Token2 => 'ORDER',
2120: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2121: x_Token3 => 'QUANTITY',
2122: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2123: x_Token4 => 'CUSTITEM',
2124: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2120: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2121: x_Token3 => 'QUANTITY',
2122: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2123: x_Token4 => 'CUSTITEM',
2124: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2125: x_Token5 => 'REQ_DATE',
2126: x_value5 => x_key_rec.dem_rec.request_date,
2127: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
2128: x_value6 => g_sch_line_qty, --Bugfix 6159269
2133: x_Token8 => 'MATCH_ATTR',
2134: x_value8 => v_MatchAttrTxt);
2135: --
2136: IF (l_debug <> -1) THEN
2137: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2138: x_key_rec.req_rec.line_id);
2139: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
2140: x_key_rec.req_rec.line_id);
2141: END IF;
2135: --
2136: IF (l_debug <> -1) THEN
2137: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2138: x_key_rec.req_rec.line_id);
2139: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
2140: x_key_rec.req_rec.line_id);
2141: END IF;
2142: --
2143: ELSE
2151: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2152: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2153: x_OrderLineId => x_key_rec.dem_rec.line_id,
2154: x_Token1 => 'LINE',
2155: x_value1 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2156: x_Token2 => 'ORDER',
2157: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2158: x_Token3 => 'QUANTITY',
2159: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2153: x_OrderLineId => x_key_rec.dem_rec.line_id,
2154: x_Token1 => 'LINE',
2155: x_value1 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2156: x_Token2 => 'ORDER',
2157: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2158: x_Token3 => 'QUANTITY',
2159: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2160: x_Token4 => 'CUSTITEM',
2161: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2157: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2158: x_Token3 => 'QUANTITY',
2159: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2160: x_Token4 => 'CUSTITEM',
2161: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2162: x_Token5 => 'REQ_DATE',
2163: x_value5 => x_key_rec.dem_rec.request_date,
2164: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
2165: x_value6 => g_sch_line_qty, --Bugfix 6159269
2166: x_Token7 => 'MATCH_ATTR',
2167: x_value7 => v_MatchAttrTxt);
2168: --
2169: IF (l_debug <> -1) THEN
2170: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2171: x_key_rec.req_rec.line_id);
2172: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
2173: x_key_rec.req_rec.line_id);
2174: END IF;
2168: --
2169: IF (l_debug <> -1) THEN
2170: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2171: x_key_rec.req_rec.line_id);
2172: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
2173: x_key_rec.req_rec.line_id);
2174: END IF;
2175: --
2176: END IF;
2180: --}
2181: ELSE
2182: --{
2183: IF (l_debug <> -1) THEN
2184: rlm_core_sv.dlog(k_DEBUG,'dem_rec.ordered_quantity:',
2185: x_key_rec.dem_rec.ordered_quantity);
2186: rlm_core_sv.dlog(k_DEBUG,'frozen_days:',
2187: x_Group_rec.frozen_days);
2188: END IF;
2182: --{
2183: IF (l_debug <> -1) THEN
2184: rlm_core_sv.dlog(k_DEBUG,'dem_rec.ordered_quantity:',
2185: x_key_rec.dem_rec.ordered_quantity);
2186: rlm_core_sv.dlog(k_DEBUG,'frozen_days:',
2187: x_Group_rec.frozen_days);
2188: END IF;
2189: --
2190: -- Bugfix 8279132 Start
2200: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2201: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2202: x_OrderLineId => x_key_rec.dem_rec.line_id,
2203: x_Token1 => 'GROUP',
2204: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2205: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2206: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2207: x_Token2 => 'REQ_DATE',
2208: x_value2 => x_key_rec.req_rec.request_date,
2201: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2202: x_OrderLineId => x_key_rec.dem_rec.line_id,
2203: x_Token1 => 'GROUP',
2204: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2205: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2206: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2207: x_Token2 => 'REQ_DATE',
2208: x_value2 => x_key_rec.req_rec.request_date,
2209: x_Token3 => 'REC_LINE_QTY',
2202: x_OrderLineId => x_key_rec.dem_rec.line_id,
2203: x_Token1 => 'GROUP',
2204: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2205: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2206: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2207: x_Token2 => 'REQ_DATE',
2208: x_value2 => x_key_rec.req_rec.request_date,
2209: x_Token3 => 'REC_LINE_QTY',
2210: x_value3 => x_Quantity,
2217: x_Token6 => 'MATCH_ATTR',
2218: x_value6 => v_MatchAttrTxt);
2219: --
2220: IF (l_debug <> -1) THEN
2221: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
2222: x_key_rec.req_rec.line_id);
2223: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD_SEQ',
2224: x_key_rec.req_rec.line_id);
2225: END IF;
2219: --
2220: IF (l_debug <> -1) THEN
2221: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
2222: x_key_rec.req_rec.line_id);
2223: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD_SEQ',
2224: x_key_rec.req_rec.line_id);
2225: END IF;
2226:
2227: ELSE
2234: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2235: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2236: x_OrderLineId => x_key_rec.dem_rec.line_id,
2237: x_Token1 => 'GROUP',
2238: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2239: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2240: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2241: x_Token2 => 'REQ_DATE',
2242: x_value2 => x_key_rec.req_rec.request_date,
2235: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2236: x_OrderLineId => x_key_rec.dem_rec.line_id,
2237: x_Token1 => 'GROUP',
2238: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2239: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2240: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2241: x_Token2 => 'REQ_DATE',
2242: x_value2 => x_key_rec.req_rec.request_date,
2243: x_Token3 => 'REC_LINE_QTY',
2236: x_OrderLineId => x_key_rec.dem_rec.line_id,
2237: x_Token1 => 'GROUP',
2238: x_value1 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
2239: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
2240: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2241: x_Token2 => 'REQ_DATE',
2242: x_value2 => x_key_rec.req_rec.request_date,
2243: x_Token3 => 'REC_LINE_QTY',
2244: x_value3 => x_Quantity,
2244: x_value3 => x_Quantity,
2245: x_Token4 => 'NEW_REQ_DATE',
2246: x_value4 => TRUNC(rlm_dp_sv.g_dsp_start_time)+nvl(x_Group_rec.frozen_days,0), --Bugfix 10053830
2247: x_Token5 => 'SCHEDULE_LINE',
2248: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
2249: x_Token6 => 'MATCH_ATTR',
2250: x_value6 => v_MatchAttrTxt);
2251: --
2252: IF (l_debug <> -1) THEN
2249: x_Token6 => 'MATCH_ATTR',
2250: x_value6 => v_MatchAttrTxt);
2251: --
2252: IF (l_debug <> -1) THEN
2253: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
2254: x_key_rec.req_rec.line_id);
2255: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD',
2256: x_key_rec.req_rec.line_id);
2257: END IF;
2251: --
2252: IF (l_debug <> -1) THEN
2253: rlm_core_sv.dlog(k_DEBUG,'The line is roll forwarded due to frozen fence',
2254: x_key_rec.req_rec.line_id);
2255: rlm_core_sv.dlog(k_DEBUG,'RLM_ROLL_FORWARD',
2256: x_key_rec.req_rec.line_id);
2257: END IF;
2258: END IF;
2259: -- Bugfix 8279132 End
2301:
2302: END IF;
2303: --
2304: IF (l_debug <> -1) THEN
2305: rlm_core_sv.dpop(k_SDEBUG);
2306: END IF;
2307: --
2308: EXCEPTION
2309: WHEN OTHERS THEN
2309: WHEN OTHERS THEN
2310: rlm_message_sv.sql_error('rlm_rd_sv.UpdateRequirement',x_progress);
2311: --
2312: IF (l_debug <> -1) THEN
2313: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2314: END IF;
2315: --
2316: raise;
2317:
2329: x_progress VARCHAR2(3) := '010';
2330: BEGIN
2331:
2332: IF (l_debug <> -1) THEN
2333: rlm_core_sv.dpush(k_SDEBUG,'GetQtyRec');
2334: rlm_core_sv.dpop(k_SDEBUG);
2335: END IF;
2336:
2337: EXCEPTION
2330: BEGIN
2331:
2332: IF (l_debug <> -1) THEN
2333: rlm_core_sv.dpush(k_SDEBUG,'GetQtyRec');
2334: rlm_core_sv.dpop(k_SDEBUG);
2335: END IF;
2336:
2337: EXCEPTION
2338: WHEN OTHERS THEN
2338: WHEN OTHERS THEN
2339: rlm_message_sv.sql_error('rlm_rd_sv.GetQtyRec',x_progress);
2340: --
2341: IF (l_debug <> -1) THEN
2342: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2343: END IF;
2344: --
2345: raise;
2346:
2358:
2359: BEGIN
2360: --
2361: IF (l_debug <> -1) THEN
2362: rlm_core_sv.dpush(k_SDEBUG,'GetReq');
2363: END IF;
2364: --
2365: IF x_Key_rec.rlm_line_id IS NOT NULL THEN
2366: IF x_Key_rec.rlm_line_id <> NVL(x_Key_rec.req_rec.line_id,k_NNULL) THEN
2368: END IF;
2369: END IF;
2370: --
2371: IF (l_debug <> -1) THEN
2372: rlm_core_sv.dpop(k_SDEBUG);
2373: END IF;
2374: --
2375: EXCEPTION
2376: WHEN OTHERS THEN
2376: WHEN OTHERS THEN
2377: rlm_message_sv.sql_error('rlm_rd_sv.GetReq',x_progress);
2378: --
2379: IF (l_debug <> -1) THEN
2380: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2381: END IF;
2382: --
2383: raise;
2384:
2437:
2438: BEGIN
2439: --
2440: IF (l_debug <> -1) THEN
2441: rlm_core_sv.dpush(k_SDEBUG,'GetDemand');
2442: END IF;
2443: --
2444: IF x_Group_rec.setup_terms_rec.blanket_number IS NOT NULL THEN
2445: --
2571: --
2572: END IF;
2573: --
2574: IF (l_debug <> -1) THEN
2575: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.order_header_id',
2576: x_Key_rec.dem_rec.order_header_id);
2577: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.blanket_number',
2578: x_Key_rec.dem_rec.blanket_number);
2579: END IF;
2573: --
2574: IF (l_debug <> -1) THEN
2575: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.order_header_id',
2576: x_Key_rec.dem_rec.order_header_id);
2577: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.blanket_number',
2578: x_Key_rec.dem_rec.blanket_number);
2579: END IF;
2580: --
2581: IF (l_debug <> -1) THEN
2578: x_Key_rec.dem_rec.blanket_number);
2579: END IF;
2580: --
2581: IF (l_debug <> -1) THEN
2582: rlm_core_sv.dpop(k_SDEBUG);
2583: END IF;
2584: --
2585: EXCEPTION
2586: WHEN OTHERS THEN
2586: WHEN OTHERS THEN
2587: rlm_message_sv.sql_error('rlm_rd_sv.GetDemand',x_progress);
2588: --
2589: IF (l_debug <> -1) THEN
2590: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2591: END IF;
2592: --
2593: raise;
2594:
2614: v_request_date_str VARCHAR2(30);
2615: BEGIN
2616: --
2617: IF (l_debug <> -1) THEN
2618: rlm_core_sv.dpush(k_SDEBUG,'InitializeDemand');
2619: END IF;
2620: --
2621: g_InitDemandTab.DELETE;
2622: --
3493: v_where_clause := v_where_clause || ' AND authorized_to_ship_flag = :x_DemandType ORDER BY request_date DESC';
3494: g_InitDemandTab(g_InitDemandTab.COUNT+1) := x_DemandType;
3495: --
3496: IF (l_debug <> -1) THEN
3497: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3498: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3499: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3500: END IF;
3501: --
3494: g_InitDemandTab(g_InitDemandTab.COUNT+1) := x_DemandType;
3495: --
3496: IF (l_debug <> -1) THEN
3497: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3498: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3499: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3500: END IF;
3501: --
3502: v_sql := v_select_clause || v_where_clause;
3495: --
3496: IF (l_debug <> -1) THEN
3497: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3498: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3499: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3500: END IF;
3501: --
3502: v_sql := v_select_clause || v_where_clause;
3503: --
3500: END IF;
3501: --
3502: v_sql := v_select_clause || v_where_clause;
3503: --
3504: RLM_CORE_SV.OpenDynamicCursor(x_Demand_ref, v_sql, g_InitDemandTab);
3505: --
3506: IF (l_debug <> -1) THEN
3507: rlm_core_sv.dpop(k_SDEBUG);
3508: END IF;
3503: --
3504: RLM_CORE_SV.OpenDynamicCursor(x_Demand_ref, v_sql, g_InitDemandTab);
3505: --
3506: IF (l_debug <> -1) THEN
3507: rlm_core_sv.dpop(k_SDEBUG);
3508: END IF;
3509: --
3510: EXCEPTION
3511: WHEN e_no_init THEN
3508: END IF;
3509: --
3510: EXCEPTION
3511: WHEN e_no_init THEN
3512: rlm_core_sv.dpop(k_SDEBUG,'Demand Type is not ATS or NATS');
3513:
3514: WHEN OTHERS THEN
3515: rlm_message_sv.sql_error('rlm_rd_sv.InitializeDemand',x_progress);
3516: --
3514: WHEN OTHERS THEN
3515: rlm_message_sv.sql_error('rlm_rd_sv.InitializeDemand',x_progress);
3516: --
3517: IF (l_debug <> -1) THEN
3518: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3519: END IF;
3520: --
3521: raise;
3522:
3535:
3536: BEGIN
3537: --
3538: IF (l_debug <> -1) THEN
3539: rlm_core_sv.dpush(k_SDEBUG,'InitializeSoGroup');
3540: END IF;
3541: --
3542: OPEN x_Group_ref FOR
3543: SELECT rih.customer_id,
3557: WHERE rih.header_id = x_Sched_rec.header_id
3558: AND rih.org_id = ril.org_id
3559: AND ril.header_id = rih.header_id
3560: AND ril.industry_attribute15 = x_Group_rec.ship_from_org_id
3561: AND ril.process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
3562: --AND ril.inventory_item_id = x_Group_rec.inventory_item_id
3563: AND ril.customer_item_id = x_Group_rec.customer_item_id
3564: AND ril.ship_to_address_id = x_Group_rec.ship_to_address_id
3565: -- blankets
3579: ORDER BY ril.ship_to_org_id,
3580: ril.customer_item_id;
3581: --
3582: IF (l_debug <> -1) THEN
3583: rlm_core_sv.dpop(k_SDEBUG);
3584: END IF;
3585: --
3586: EXCEPTION
3587: WHEN OTHERS THEN
3587: WHEN OTHERS THEN
3588: rlm_message_sv.sql_error('rlm_rd_sv.InitializeSoGroup',x_progress);
3589: --
3590: IF (l_debug <> -1) THEN
3591: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3592: END IF;
3593: --
3594: raise e_group_error;
3595:
3610:
3611: BEGIN
3612: --
3613: IF (l_debug <> -1) THEN
3614: rlm_core_sv.dpush(k_SDEBUG,'InitializeReq');
3615: rlm_core_sv.dlog(k_DEBUG,'x_ReqType', x_ReqType);
3616: END IF;
3617: --
3618: IF x_ReqType IN (k_NATS, k_ATS) THEN
3611: BEGIN
3612: --
3613: IF (l_debug <> -1) THEN
3614: rlm_core_sv.dpush(k_SDEBUG,'InitializeReq');
3615: rlm_core_sv.dlog(k_DEBUG,'x_ReqType', x_ReqType);
3616: END IF;
3617: --
3618: IF x_ReqType IN (k_NATS, k_ATS) THEN
3619: --
3617: --
3618: IF x_ReqType IN (k_NATS, k_ATS) THEN
3619: --
3620: IF (l_debug <> -1) THEN
3621: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3618: IF x_ReqType IN (k_NATS, k_ATS) THEN
3619: --
3620: IF (l_debug <> -1) THEN
3621: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3626: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3619: --
3620: IF (l_debug <> -1) THEN
3621: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3626: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3627: END IF;
3620: IF (l_debug <> -1) THEN
3621: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3626: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3627: END IF;
3628: --
3621: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3626: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3627: END IF;
3628: --
3629: IF (x_ReqType = k_ATS) THEN
3622: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3623: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3624: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3625: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3626: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3627: END IF;
3628: --
3629: IF (x_ReqType = k_ATS) THEN
3630:
3719: AND customer_item_id = x_Group_rec.customer_item_id
3720: AND inventory_item_id = x_Group_rec.inventory_item_id
3721: AND order_header_id = x_Group_rec.order_header_id
3722: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3723: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3724: rlm_core_sv.k_PS_FROZEN_FIRM)
3725: AND (item_detail_type = k_FIRM OR item_detail_type = k_PAST_DUE_FIRM)
3726: ORDER BY request_date;
3727:
3720: AND inventory_item_id = x_Group_rec.inventory_item_id
3721: AND order_header_id = x_Group_rec.order_header_id
3722: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3723: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3724: rlm_core_sv.k_PS_FROZEN_FIRM)
3725: AND (item_detail_type = k_FIRM OR item_detail_type = k_PAST_DUE_FIRM)
3726: ORDER BY request_date;
3727:
3728: ELSE
3818: AND customer_item_id = x_Group_rec.customer_item_id
3819: AND inventory_item_id = x_Group_rec.inventory_item_id
3820: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3821: AND order_header_id = x_Group_rec.order_header_id
3822: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3823: rlm_core_sv.k_PS_FROZEN_FIRM)
3824: AND item_detail_type = k_FORECAST
3825: ORDER BY request_date;
3826:
3819: AND inventory_item_id = x_Group_rec.inventory_item_id
3820: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3821: AND order_header_id = x_Group_rec.order_header_id
3822: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3823: rlm_core_sv.k_PS_FROZEN_FIRM)
3824: AND item_detail_type = k_FORECAST
3825: ORDER BY request_date;
3826:
3827: END IF;
3828:
3829: END IF;
3830: --
3831: IF (l_debug <> -1) THEN
3832: rlm_core_sv.dpop(k_SDEBUG);
3833: END IF;
3834: --
3835: EXCEPTION
3836: WHEN OTHERS THEN
3836: WHEN OTHERS THEN
3837: rlm_message_sv.sql_error('rlm_rd_sv.InitializeReq',x_progress);
3838: --
3839: IF (l_debug <> -1) THEN
3840: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3841: END IF;
3842: --
3843: raise e_group_error;
3844:
3860:
3861: BEGIN
3862: --
3863: IF (l_debug <> -1) THEN
3864: rlm_core_sv.dpush(k_SDEBUG,'CancelRequirement');
3865: rlm_core_sv.dlog(k_DEBUG,'x_CancelQty',x_CancelQty);
3866: END IF;
3867: --
3868: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3861: BEGIN
3862: --
3863: IF (l_debug <> -1) THEN
3864: rlm_core_sv.dpush(k_SDEBUG,'CancelRequirement');
3865: rlm_core_sv.dlog(k_DEBUG,'x_CancelQty',x_CancelQty);
3866: END IF;
3867: --
3868: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3869: --
3867: --
3868: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3869: --
3870: IF (l_debug <> -1) THEN
3871: rlm_core_sv.dpop(k_SDEBUG);
3872: END IF;
3873: --
3874: EXCEPTION
3875: WHEN OTHERS THEN
3875: WHEN OTHERS THEN
3876: rlm_message_sv.sql_error('rlm_rd_sv.CancelRequirement',x_progress);
3877: --
3878: IF (l_debug <> -1) THEN
3879: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3880: END IF;
3881: --
3882: raise;
3883:
3913: --
3914: v_match_ref t_Cursor_ref;
3915: v_Index NUMBER;
3916: v_intransit_calc_basis VARCHAR2(15);
3917: v_match_across_rule RLM_CORE_SV.t_Match_rec;
3918: v_match_within_rule RLM_CORE_SV.t_Match_rec;
3919: v_header_id NUMBER;
3920: v_Intransit NUMBER := 0;
3921: v_LineID NUMBER;
3914: v_match_ref t_Cursor_ref;
3915: v_Index NUMBER;
3916: v_intransit_calc_basis VARCHAR2(15);
3917: v_match_across_rule RLM_CORE_SV.t_Match_rec;
3918: v_match_within_rule RLM_CORE_SV.t_Match_rec;
3919: v_header_id NUMBER;
3920: v_Intransit NUMBER := 0;
3921: v_LineID NUMBER;
3922: v_min_horizon_date VARCHAR2(30);
3924:
3925: BEGIN
3926: --
3927: IF (l_debug <> -1) THEN
3928: rlm_core_sv.dpush(k_SDEBUG,'SynchronizeShipments');
3929: END IF;
3930: --
3931: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
3932: --
3931: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
3932: --
3933: --
3934: IF (l_debug <> -1) THEN
3935: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3932: --
3933: --
3934: IF (l_debug <> -1) THEN
3935: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3933: --
3934: IF (l_debug <> -1) THEN
3935: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3934: IF (l_debug <> -1) THEN
3935: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3935: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3936: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3944: x_Group_rec.setup_terms_rec.cum_org_level_code);
3937: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3944: x_Group_rec.setup_terms_rec.cum_org_level_code);
3945: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3938: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3944: x_Group_rec.setup_terms_rec.cum_org_level_code);
3945: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3946: END IF;
3939: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3940: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3944: x_Group_rec.setup_terms_rec.cum_org_level_code);
3945: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3946: END IF;
3947: --
3941: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3942: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3943: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3944: x_Group_rec.setup_terms_rec.cum_org_level_code);
3945: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3946: END IF;
3947: --
3948: v_match_across_rule := x_Group_rec.match_across_rec;
3949: v_match_within_rule := x_Group_rec.match_within_rec;
3950: --
3951: IF (v_intransit_calc_basis = k_NONE OR v_intransit_calc_basis is NULL) THEN
3952: --
3953: IF (l_debug <> -1) THEN
3954: rlm_core_sv.dlog(k_DEBUG, 'All shipments assumed to have been received');
3955: rlm_core_sv.dpop(k_SDEBUG, 'Processing rule set to NONE or NULL');
3956: END IF;
3957: --
3958: RETURN;
3951: IF (v_intransit_calc_basis = k_NONE OR v_intransit_calc_basis is NULL) THEN
3952: --
3953: IF (l_debug <> -1) THEN
3954: rlm_core_sv.dlog(k_DEBUG, 'All shipments assumed to have been received');
3955: rlm_core_sv.dpop(k_SDEBUG, 'Processing rule set to NONE or NULL');
3956: END IF;
3957: --
3958: RETURN;
3959: --
3977: AND sl.qty_type_code = rlm_manage_demand_sv.k_CUMULATIVE
3978: AND il.org_id = sl.org_id;
3979: --
3980: IF (l_debug <> -1) THEN
3981: rlm_core_sv.dlog(k_DEBUG,'v_cumDiscrete', v_cumDiscrete);
3982: END IF;
3983: --
3984: IF v_cumDiscrete > 0 THEN
3985: --
4028: CalculateCUMIntransit(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count).line_id, g_IntransitQty);
4029: END IF;
4030: --
4031: IF (l_debug <> -1) THEN
4032: rlm_core_sv.dlog(k_DEBUG, 'Intransit Qty', g_IntransitQty);
4033: END IF;
4034: --
4035: IF g_IntransitQty > 0 THEN
4036: SourceCUMIntransitQty(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count));
4050: --
4051: CalculateCUMIntransit(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count).line_id, v_Intransit);
4052: --
4053: IF (l_debug <> -1) THEN
4054: rlm_core_sv.dlog(k_DEBUG, 'Intransit Qty', v_Intransit);
4055: END IF;
4056: --
4057: IF v_Intransit > 0 THEN
4058: --
4087: --}
4088: END IF; -- cum_org_level_code
4089: --
4090: IF (l_debug <> -1) THEN
4091: rlm_core_sv.dpop(k_SDEBUG);
4092: END IF;
4093: --
4094: IF (x_Group_rec.blanket_number IS NOT NULL AND NOT g_BlktIntransits) THEN
4095: g_BlktIntransits := TRUE;
4107: --
4108: InitializeMatchRec(x_Sched_rec, x_Group_rec, v_match_ref);
4109: --
4110: IF (l_debug <> -1) THEN
4111: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_type', x_Sched_rec.schedule_type);
4112: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.sched_generation_date', x_Sched_rec.sched_generation_date);
4113: END IF;
4114: --
4115: WHILE FetchMatchRec(v_match_ref, v_match_rec) LOOP
4108: InitializeMatchRec(x_Sched_rec, x_Group_rec, v_match_ref);
4109: --
4110: IF (l_debug <> -1) THEN
4111: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_type', x_Sched_rec.schedule_type);
4112: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.sched_generation_date', x_Sched_rec.sched_generation_date);
4113: END IF;
4114: --
4115: WHILE FetchMatchRec(v_match_ref, v_match_rec) LOOP
4116: --
4139: v_return_status);
4140:
4141: --
4142: IF (l_debug <> -1) THEN
4143: rlm_core_sv.dlog(k_DEBUG, 'v_return_status', v_return_status);
4144: rlm_core_sv.dlog(k_DEBUG, 'v_InTransitQty', v_InTransitQty);
4145: END IF;
4146: --
4147: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4140:
4141: --
4142: IF (l_debug <> -1) THEN
4143: rlm_core_sv.dlog(k_DEBUG, 'v_return_status', v_return_status);
4144: rlm_core_sv.dlog(k_DEBUG, 'v_InTransitQty', v_InTransitQty);
4145: END IF;
4146: --
4147: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4148: --
4146: --
4147: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4148: --
4149: IF (l_debug <> -1) THEN
4150: rlm_core_sv.dpop(k_SDEBUG, 'GetIntransitQtyAPI Failed');
4151: END IF;
4152: --
4153: RAISE e_group_error;
4154: --
4154: --
4155: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4156: --
4157: IF (l_debug <> -1) THEN
4158: rlm_core_sv.dpop(k_SDEBUG, 'GetIntransitQtyAPI Failed');
4159: END IF;
4160: --
4161: RAISE e_group_error;
4162: --
4232: --}
4233: END IF; /*Intransit Basis*/
4234: --
4235: IF (l_debug <> -1) THEN
4236: rlm_core_sv.dpop(k_SDEBUG);
4237: END IF;
4238: --
4239: EXCEPTION
4240: --
4240: --
4241: WHEN e_cumDiscrete THEN
4242: --
4243: IF (l_debug <> -1) THEN
4244: rlm_core_sv.dlog(k_DEBUG,'Intransit Calculations not needed as more than one CUM lines exist');
4245: rlm_core_sv.dpop(k_SDEBUG,'e_cumDiscrete');
4246: END IF;
4247: --
4248: WHEN OTHERS THEN
4241: WHEN e_cumDiscrete THEN
4242: --
4243: IF (l_debug <> -1) THEN
4244: rlm_core_sv.dlog(k_DEBUG,'Intransit Calculations not needed as more than one CUM lines exist');
4245: rlm_core_sv.dpop(k_SDEBUG,'e_cumDiscrete');
4246: END IF;
4247: --
4248: WHEN OTHERS THEN
4249: rlm_message_sv.sql_error('rlm_rd_sv.SynchronizeShipments',x_progress);
4248: WHEN OTHERS THEN
4249: rlm_message_sv.sql_error('rlm_rd_sv.SynchronizeShipments',x_progress);
4250: --
4251: IF (l_debug <> -1) THEN
4252: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4253: END IF;
4254: --
4255: raise;
4256:
4271:
4272: BEGIN
4273: --
4274: IF (l_debug <> -1) THEN
4275: rlm_core_sv.dpush(k_SDEBUG,'MatchWithin');
4276: rlm_core_sv.dpop(k_SDEBUG);
4277: END IF;
4278: --
4279: RETURN('Y');
4272: BEGIN
4273: --
4274: IF (l_debug <> -1) THEN
4275: rlm_core_sv.dpush(k_SDEBUG,'MatchWithin');
4276: rlm_core_sv.dpop(k_SDEBUG);
4277: END IF;
4278: --
4279: RETURN('Y');
4280:
4282: WHEN OTHERS THEN
4283: rlm_message_sv.sql_error('rlm_rd_sv.MatchWithin',x_progress);
4284: --
4285: IF (l_debug <> -1) THEN
4286: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4287: END IF;
4288: --
4289: raise;
4290:
4304:
4305: BEGIN
4306: --
4307: IF (l_debug <> -1) THEN
4308: rlm_core_sv.dpush(k_SDEBUG,'MatchAcross');
4309: rlm_core_sv.dpop(k_SDEBUG);
4310: END IF;
4311: --
4312: RETURN('Y');
4305: BEGIN
4306: --
4307: IF (l_debug <> -1) THEN
4308: rlm_core_sv.dpush(k_SDEBUG,'MatchAcross');
4309: rlm_core_sv.dpop(k_SDEBUG);
4310: END IF;
4311: --
4312: RETURN('Y');
4313:
4315: WHEN OTHERS THEN
4316: rlm_message_sv.sql_error('rlm_rd_sv.MatchAcross',x_progress);
4317: --
4318: IF (l_debug <> -1) THEN
4319: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4320: END IF;
4321: --
4322: raise;
4323:
4340:
4341: BEGIN
4342: --
4343: IF (l_debug <> -1) THEN
4344: rlm_core_sv.dpush(k_SDEBUG,'StoreShipments');
4345: END IF;
4346: --
4347: -- start of bug fix 4223359
4348: --
4350: --
4351: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4352: --
4353: IF (l_debug <> -1) THEN
4354: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4355: END IF;
4356: --
4357: g_Reconcile_tab(v_Index).ordered_quantity :=
4358: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4371: --
4372: END IF;
4373: --
4374: IF (l_debug <> -1) THEN
4375: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4376: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4377: END IF;
4378: --
4379: END IF;
4372: END IF;
4373: --
4374: IF (l_debug <> -1) THEN
4375: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4376: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4377: END IF;
4378: --
4379: END IF;
4380: --
4385: g_Reconcile_tab(v_Index).ordered_quantity :=
4386: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4387: --
4388: IF (l_debug <> -1) THEN
4389: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4390: rlm_core_sv.dlog(k_DEBUG,'g_reconcile_tab.ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
4391: END IF;
4392: --
4393: ELSE
4386: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4387: --
4388: IF (l_debug <> -1) THEN
4389: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4390: rlm_core_sv.dlog(k_DEBUG,'g_reconcile_tab.ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
4391: END IF;
4392: --
4393: ELSE
4394: --
4404: --
4405: END IF;
4406: --
4407: IF (l_debug <> -1) THEN
4408: rlm_core_sv.dlog(k_DEBUG,'New Line x_quantity',x_quantity);
4409: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4410: END IF;
4411: --
4412: END IF;
4405: END IF;
4406: --
4407: IF (l_debug <> -1) THEN
4408: rlm_core_sv.dlog(k_DEBUG,'New Line x_quantity',x_quantity);
4409: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4410: END IF;
4411: --
4412: END IF;
4413: --
4415: --
4416: -- end of bug fix 4223359
4417: --
4418: IF (l_debug <> -1) THEN
4419: rlm_core_sv.dpop(k_SDEBUG);
4420: END IF;
4421: --
4422: EXCEPTION
4423: WHEN OTHERS THEN
4423: WHEN OTHERS THEN
4424: rlm_message_sv.sql_error('rlm_rd_sv.StoreShipments',x_progress);
4425: --
4426: IF (l_debug <> -1) THEN
4427: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4428: END IF;
4429: --
4430: raise;
4431:
4447:
4448: BEGIN
4449: --
4450: IF (l_debug <> -1) THEN
4451: rlm_core_sv.dpush(k_SDEBUG,'ReconcileShipments');
4452: END IF;
4453: --
4454: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4455: --
4453: --
4454: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4455: --
4456: IF (l_debug <> -1) THEN
4457: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4458: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab(v_Index).ordered_quantity',
4459: g_Reconcile_tab(v_Index).ordered_quantity);
4460: END IF;
4461: --
4454: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4455: --
4456: IF (l_debug <> -1) THEN
4457: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4458: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab(v_Index).ordered_quantity',
4459: g_Reconcile_tab(v_Index).ordered_quantity);
4460: END IF;
4461: --
4462: -- start of bug fix 4223359
4467: g_Reconcile_tab(v_Index).ordered_quantity :=
4468: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0)
4469: - NVL(x_Quantity,0);
4470: IF (l_debug <> -1) THEN
4471: rlm_core_sv.dlog(k_DEBUG,'new g_Reconcile_tab(v_Index).ordered_quantity',
4472: g_Reconcile_tab(v_Index).ordered_quantity);
4473: END IF;
4474: --
4475: x_Quantity := 0;
4479: x_Quantity := NVL(x_Quantity,0)
4480: - nvl(g_Reconcile_tab(v_Index).ordered_quantity,0);
4481: --
4482: IF (l_debug <> -1) THEN
4483: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4484: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4485: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4486: g_Reconcile_tab(v_Index).ordered_quantity);
4487:
4480: - nvl(g_Reconcile_tab(v_Index).ordered_quantity,0);
4481: --
4482: IF (l_debug <> -1) THEN
4483: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4484: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4485: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4486: g_Reconcile_tab(v_Index).ordered_quantity);
4487:
4488: END IF;
4481: --
4482: IF (l_debug <> -1) THEN
4483: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4484: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4485: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4486: g_Reconcile_tab(v_Index).ordered_quantity);
4487:
4488: END IF;
4489: --
4495: --
4496: -- end of bug fix 4223359
4497: --
4498: IF (l_debug <> -1) THEN
4499: rlm_core_sv.dpop(k_SDEBUG);
4500: END IF;
4501: --
4502: EXCEPTION
4503: WHEN OTHERS THEN
4503: WHEN OTHERS THEN
4504: rlm_message_sv.sql_error('rlm_rd_sv.ReconcileShipments',x_progress);
4505: --
4506: IF (l_debug <> -1) THEN
4507: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4508: END IF;
4509: --
4510: raise;
4511:
4530:
4531: BEGIN
4532: --
4533: IF (l_debug <> -1) THEN
4534: rlm_core_sv.dpush(k_SDEBUG,'MatchShipments');
4535: END IF;
4536: --
4537: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4538: --
4536: --
4537: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4538: --
4539: IF (l_debug <> -1) THEN
4540: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4541: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4542: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4543: END IF;
4544: --
4537: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4538: --
4539: IF (l_debug <> -1) THEN
4540: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4541: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4542: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4543: END IF;
4544: --
4545: -- Bug 2261743
4538: --
4539: IF (l_debug <> -1) THEN
4540: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4541: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4542: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4543: END IF;
4544: --
4545: -- Bug 2261743
4546: --
4580: --
4581: END IF;
4582: --
4583: IF (l_debug <> -1) THEN
4584: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4585: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4586: rlm_core_sv.dpop(k_SDEBUG);
4587: END IF;
4588: --
4581: END IF;
4582: --
4583: IF (l_debug <> -1) THEN
4584: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4585: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4586: rlm_core_sv.dpop(k_SDEBUG);
4587: END IF;
4588: --
4589: RETURN(b_Match);
4582: --
4583: IF (l_debug <> -1) THEN
4584: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4585: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4586: rlm_core_sv.dpop(k_SDEBUG);
4587: END IF;
4588: --
4589: RETURN(b_Match);
4590:
4592: WHEN OTHERS THEN
4593: rlm_message_sv.sql_error('rlm_rd_sv.MatchShipments',x_progress);
4594: --
4595: IF (l_debug <> -1) THEN
4596: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4597: END IF;
4598: --
4599: raise;
4600:
4622:
4623: BEGIN
4624: --
4625: IF (l_debug <> -1) THEN
4626: rlm_core_sv.dpush(k_SDEBUG,'MatchFrozen');
4627: END IF;
4628: --
4629: IF (l_debug <> -1) THEN
4630: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4626: rlm_core_sv.dpush(k_SDEBUG,'MatchFrozen');
4627: END IF;
4628: --
4629: IF (l_debug <> -1) THEN
4630: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4631: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4632: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4633: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4634: END IF;
4627: END IF;
4628: --
4629: IF (l_debug <> -1) THEN
4630: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4631: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4632: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4633: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4634: END IF;
4635: --
4628: --
4629: IF (l_debug <> -1) THEN
4630: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4631: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4632: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4633: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4634: END IF;
4635: --
4636: IF g_Reconcile_tab.COUNT <> 0 THEN
4629: IF (l_debug <> -1) THEN
4630: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4631: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4632: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4633: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4634: END IF;
4635: --
4636: IF g_Reconcile_tab.COUNT <> 0 THEN
4637: --
4641: --{
4642: b_Match := TRUE;
4643: --
4644: IF (l_debug <> -1) THEN
4645: rlm_core_sv.dlog(k_DEBUG,'schedule_type', g_Reconcile_tab(v_Count).schedule_type);
4646: END IF;
4647: --
4648: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
4649: --{
4647: --
4648: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
4649: --{
4650: IF (l_debug <> -1) THEN
4651: rlm_core_sv.dlog(k_DEBUG,'Match Within Schedules only ');
4652: END IF;
4653: --
4654: IF x_Group_rec.match_within_rec.cust_po_number = 'Y' THEN
4655: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
4658: END IF;
4659: END IF;
4660: --
4661: IF (l_debug <> -1) THEN
4662: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4663: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4664: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4665: END IF;
4666: --
4659: END IF;
4660: --
4661: IF (l_debug <> -1) THEN
4662: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4663: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4664: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4665: END IF;
4666: --
4667: IF b_Match THEN
4660: --
4661: IF (l_debug <> -1) THEN
4662: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4663: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4664: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4665: END IF;
4666: --
4667: IF b_Match THEN
4668: IF x_Group_rec.match_within_rec.customer_item_revision = 'Y' THEN
4673: END IF;
4674: END IF;
4675: --
4676: IF (l_debug <> -1) THEN
4677: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4678: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4679: g_Reconcile_tab(v_Count).customer_item_revision);
4680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4681: END IF;
4674: END IF;
4675: --
4676: IF (l_debug <> -1) THEN
4677: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4678: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4679: g_Reconcile_tab(v_Count).customer_item_revision);
4680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4681: END IF;
4682: --
4676: IF (l_debug <> -1) THEN
4677: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4678: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4679: g_Reconcile_tab(v_Count).customer_item_revision);
4680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4681: END IF;
4682: --
4683: IF b_Match THEN
4684: IF x_Group_rec.match_within_rec.customer_dock_code = 'Y' THEN
4689: END IF;
4690: END IF;
4691: --
4692: IF (l_debug <> -1) THEN
4693: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4694: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4696: END IF;
4697: --
4690: END IF;
4691: --
4692: IF (l_debug <> -1) THEN
4693: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4694: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4696: END IF;
4697: --
4698: IF b_Match THEN
4691: --
4692: IF (l_debug <> -1) THEN
4693: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4694: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4696: END IF;
4697: --
4698: IF b_Match THEN
4699: IF x_Group_rec.match_within_rec.customer_job = 'Y' THEN
4704: END IF;
4705: END IF;
4706: --
4707: IF (l_debug <> -1) THEN
4708: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4709: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4711: END IF;
4712: --
4705: END IF;
4706: --
4707: IF (l_debug <> -1) THEN
4708: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4709: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4711: END IF;
4712: --
4713: IF b_Match THEN
4706: --
4707: IF (l_debug <> -1) THEN
4708: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4709: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4711: END IF;
4712: --
4713: IF b_Match THEN
4714: IF x_Group_rec.match_within_rec.cust_production_line = 'Y' THEN
4719: END IF;
4720: END IF;
4721: --
4722: IF (l_debug <> -1) THEN
4723: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4724: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4726: END IF;
4727: --
4720: END IF;
4721: --
4722: IF (l_debug <> -1) THEN
4723: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4724: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4726: END IF;
4727: --
4728: IF b_Match THEN
4721: --
4722: IF (l_debug <> -1) THEN
4723: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4724: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4726: END IF;
4727: --
4728: IF b_Match THEN
4729: IF x_Group_rec.match_within_rec.cust_model_serial_number = 'Y' THEN
4734: END IF;
4735: END IF;
4736: --
4737: IF (l_debug <> -1) THEN
4738: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4739: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4740: g_Reconcile_tab(v_Count).cust_model_serial_number);
4741: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4742: END IF;
4735: END IF;
4736: --
4737: IF (l_debug <> -1) THEN
4738: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4739: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4740: g_Reconcile_tab(v_Count).cust_model_serial_number);
4741: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4742: END IF;
4743: --
4737: IF (l_debug <> -1) THEN
4738: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4739: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4740: g_Reconcile_tab(v_Count).cust_model_serial_number);
4741: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4742: END IF;
4743: --
4744: IF b_Match THEN
4745: IF x_Group_rec.match_within_rec.cust_production_seq_num = 'Y' THEN
4750: END IF;
4751: END IF;
4752: --
4753: IF (l_debug <> -1) THEN
4754: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4755: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4756: g_Reconcile_tab(v_Count).cust_production_seq_num);
4757: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4758: END IF;
4751: END IF;
4752: --
4753: IF (l_debug <> -1) THEN
4754: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4755: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4756: g_Reconcile_tab(v_Count).cust_production_seq_num);
4757: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4758: END IF;
4759: --
4753: IF (l_debug <> -1) THEN
4754: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4755: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4756: g_Reconcile_tab(v_Count).cust_production_seq_num);
4757: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4758: END IF;
4759: --
4760: IF b_Match THEN
4761: IF x_Group_rec.match_within_rec.industry_attribute1 = 'Y' THEN
4766: END IF;
4767: END IF;
4768: --
4769: IF (l_debug <> -1) THEN
4770: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4767: END IF;
4768: --
4769: IF (l_debug <> -1) THEN
4770: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4768: --
4769: IF (l_debug <> -1) THEN
4770: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4769: IF (l_debug <> -1) THEN
4770: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4777: --
4770: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4777: --
4778: IF b_Match THEN
4771: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4772: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4773: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4777: --
4778: IF b_Match THEN
4779: IF x_Group_rec.match_within_rec.industry_attribute4 = 'Y' THEN
4784: END IF;
4785: END IF;
4786: --
4787: IF (l_debug <> -1) THEN
4788: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4790: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4791: END IF;
4792: --
4785: END IF;
4786: --
4787: IF (l_debug <> -1) THEN
4788: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4790: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4791: END IF;
4792: --
4793: IF b_Match THEN
4786: --
4787: IF (l_debug <> -1) THEN
4788: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4790: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4791: END IF;
4792: --
4793: IF b_Match THEN
4794: IF x_Group_rec.match_within_rec.industry_attribute5 = 'Y' THEN
4799: END IF;
4800: END IF;
4801: --
4802: IF (l_debug <> -1) THEN
4803: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4805: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4806: END IF;
4807: --
4800: END IF;
4801: --
4802: IF (l_debug <> -1) THEN
4803: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4805: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4806: END IF;
4807: --
4808: IF b_Match THEN
4801: --
4802: IF (l_debug <> -1) THEN
4803: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4805: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4806: END IF;
4807: --
4808: IF b_Match THEN
4809: IF x_Group_rec.match_within_rec.industry_attribute6 = 'Y' THEN
4814: END IF;
4815: END IF;
4816: --
4817: IF (l_debug <> -1) THEN
4818: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4820: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4821: END IF;
4822: --
4815: END IF;
4816: --
4817: IF (l_debug <> -1) THEN
4818: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4820: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4821: END IF;
4822: --
4823: IF b_Match THEN
4816: --
4817: IF (l_debug <> -1) THEN
4818: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4820: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4821: END IF;
4822: --
4823: IF b_Match THEN
4824: IF x_Group_rec.match_within_rec.industry_attribute10 = 'Y' THEN
4829: END IF;
4830: END IF;
4831: --
4832: IF (l_debug <> -1) THEN
4833: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4835: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4836: END IF;
4837: --
4830: END IF;
4831: --
4832: IF (l_debug <> -1) THEN
4833: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4835: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4836: END IF;
4837: --
4838: IF b_Match THEN
4831: --
4832: IF (l_debug <> -1) THEN
4833: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4835: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4836: END IF;
4837: --
4838: IF b_Match THEN
4839: IF x_Group_rec.match_within_rec.industry_attribute11 = 'Y' THEN
4844: END IF;
4845: END IF;
4846: --
4847: IF (l_debug <> -1) THEN
4848: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4850: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4851: END IF;
4852: --
4845: END IF;
4846: --
4847: IF (l_debug <> -1) THEN
4848: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4850: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4851: END IF;
4852: --
4853: IF b_Match THEN
4846: --
4847: IF (l_debug <> -1) THEN
4848: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4850: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4851: END IF;
4852: --
4853: IF b_Match THEN
4854: IF x_Group_rec.match_within_rec.industry_attribute12 = 'Y' THEN
4859: END IF;
4860: END IF;
4861: --
4862: IF (l_debug <> -1) THEN
4863: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4865: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4866: END IF;
4867: --
4860: END IF;
4861: --
4862: IF (l_debug <> -1) THEN
4863: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4865: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4866: END IF;
4867: --
4868: IF b_Match THEN
4861: --
4862: IF (l_debug <> -1) THEN
4863: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4865: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4866: END IF;
4867: --
4868: IF b_Match THEN
4869: IF x_Group_rec.match_within_rec.industry_attribute13 = 'Y' THEN
4874: END IF;
4875: END IF;
4876: --
4877: IF (l_debug <> -1) THEN
4878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4881: END IF;
4882: --
4875: END IF;
4876: --
4877: IF (l_debug <> -1) THEN
4878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4881: END IF;
4882: --
4883: IF b_Match THEN
4876: --
4877: IF (l_debug <> -1) THEN
4878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4881: END IF;
4882: --
4883: IF b_Match THEN
4884: IF x_Group_rec.match_within_rec.industry_attribute14 = 'Y' THEN
4889: END IF;
4890: END IF;
4891: --
4892: IF (l_debug <> -1) THEN
4893: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4895: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4896: END IF;
4897: --
4890: END IF;
4891: --
4892: IF (l_debug <> -1) THEN
4893: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4895: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4896: END IF;
4897: --
4898: IF b_Match THEN
4891: --
4892: IF (l_debug <> -1) THEN
4893: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4895: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4896: END IF;
4897: --
4898: IF b_Match THEN
4899: IF x_Group_rec.match_within_rec.industry_attribute15 = 'Y' THEN
4904: END IF;
4905: END IF;
4906: --
4907: IF (l_debug <> -1) THEN
4908: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4910: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4911: END IF;
4912: --
4905: END IF;
4906: --
4907: IF (l_debug <> -1) THEN
4908: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4910: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4911: END IF;
4912: --
4913: IF b_Match THEN
4906: --
4907: IF (l_debug <> -1) THEN
4908: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4910: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4911: END IF;
4912: --
4913: IF b_Match THEN
4914: IF x_Group_rec.match_within_rec.attribute1 = 'Y' THEN
4919: END IF;
4920: END IF;
4921: --
4922: IF (l_debug <> -1) THEN
4923: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4925: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4926: END IF;
4927: --
4920: END IF;
4921: --
4922: IF (l_debug <> -1) THEN
4923: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4925: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4926: END IF;
4927: --
4928: IF b_Match THEN
4921: --
4922: IF (l_debug <> -1) THEN
4923: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4925: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4926: END IF;
4927: --
4928: IF b_Match THEN
4929: IF x_Group_rec.match_within_rec.attribute2 = 'Y' THEN
4934: END IF;
4935: END IF;
4936: --
4937: IF (l_debug <> -1) THEN
4938: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
4940: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4941: END IF;
4942: --
4935: END IF;
4936: --
4937: IF (l_debug <> -1) THEN
4938: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
4940: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4941: END IF;
4942: --
4943: IF b_Match THEN
4936: --
4937: IF (l_debug <> -1) THEN
4938: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
4940: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4941: END IF;
4942: --
4943: IF b_Match THEN
4944: IF x_Group_rec.match_within_rec.attribute3 = 'Y' THEN
4949: END IF;
4950: END IF;
4951: --
4952: IF (l_debug <> -1) THEN
4953: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
4955: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4956: END IF;
4957: --
4950: END IF;
4951: --
4952: IF (l_debug <> -1) THEN
4953: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
4955: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4956: END IF;
4957: --
4958: IF b_Match THEN
4951: --
4952: IF (l_debug <> -1) THEN
4953: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
4955: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4956: END IF;
4957: --
4958: IF b_Match THEN
4959: IF x_Group_rec.match_within_rec.attribute4 = 'Y' THEN
4964: END IF;
4965: END IF;
4966: --
4967: IF (l_debug <> -1) THEN
4968: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
4970: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4971: END IF;
4972: --
4965: END IF;
4966: --
4967: IF (l_debug <> -1) THEN
4968: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
4970: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4971: END IF;
4972: --
4973: IF b_Match THEN
4966: --
4967: IF (l_debug <> -1) THEN
4968: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
4970: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4971: END IF;
4972: --
4973: IF b_Match THEN
4974: IF x_Group_rec.match_within_rec.attribute5 = 'Y' THEN
4979: END IF;
4980: END IF;
4981: --
4982: IF (l_debug <> -1) THEN
4983: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
4984: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
4985: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4986: END IF;
4987: --
4980: END IF;
4981: --
4982: IF (l_debug <> -1) THEN
4983: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
4984: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
4985: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4986: END IF;
4987: --
4988: IF b_Match THEN
4981: --
4982: IF (l_debug <> -1) THEN
4983: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
4984: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
4985: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4986: END IF;
4987: --
4988: IF b_Match THEN
4989: IF x_Group_rec.match_within_rec.attribute6 = 'Y' THEN
4994: END IF;
4995: END IF;
4996: --
4997: IF (l_debug <> -1) THEN
4998: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
4999: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5000: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5001: END IF;
5002: --
4995: END IF;
4996: --
4997: IF (l_debug <> -1) THEN
4998: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
4999: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5000: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5001: END IF;
5002: --
5003: IF b_Match THEN
4996: --
4997: IF (l_debug <> -1) THEN
4998: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
4999: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5000: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5001: END IF;
5002: --
5003: IF b_Match THEN
5004: IF x_Group_rec.match_within_rec.attribute7 = 'Y' THEN
5009: END IF;
5010: END IF;
5011: --
5012: IF (l_debug <> -1) THEN
5013: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5014: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5015: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5016: END IF;
5017: --
5010: END IF;
5011: --
5012: IF (l_debug <> -1) THEN
5013: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5014: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5015: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5016: END IF;
5017: --
5018: IF b_Match THEN
5011: --
5012: IF (l_debug <> -1) THEN
5013: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5014: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5015: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5016: END IF;
5017: --
5018: IF b_Match THEN
5019: IF x_Group_rec.match_within_rec.attribute8 = 'Y' THEN
5024: END IF;
5025: END IF;
5026: --
5027: IF (l_debug <> -1) THEN
5028: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5029: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5030: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5031: END IF;
5032: --
5025: END IF;
5026: --
5027: IF (l_debug <> -1) THEN
5028: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5029: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5030: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5031: END IF;
5032: --
5033: IF b_Match THEN
5026: --
5027: IF (l_debug <> -1) THEN
5028: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5029: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5030: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5031: END IF;
5032: --
5033: IF b_Match THEN
5034: IF x_Group_rec.match_within_rec.attribute9 = 'Y' THEN
5039: END IF;
5040: END IF;
5041: --
5042: IF (l_debug <> -1) THEN
5043: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5044: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5045: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5046: END IF;
5047: --
5040: END IF;
5041: --
5042: IF (l_debug <> -1) THEN
5043: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5044: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5045: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5046: END IF;
5047: --
5048: IF b_Match THEN
5041: --
5042: IF (l_debug <> -1) THEN
5043: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5044: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5045: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5046: END IF;
5047: --
5048: IF b_Match THEN
5049: IF x_Group_rec.match_within_rec.attribute10 = 'Y' THEN
5054: END IF;
5055: END IF;
5056: --
5057: IF (l_debug <> -1) THEN
5058: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5059: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5060: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5061: END IF;
5062: --
5055: END IF;
5056: --
5057: IF (l_debug <> -1) THEN
5058: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5059: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5060: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5061: END IF;
5062: --
5063: IF b_Match THEN
5056: --
5057: IF (l_debug <> -1) THEN
5058: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5059: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5060: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5061: END IF;
5062: --
5063: IF b_Match THEN
5064: IF x_Group_rec.match_within_rec.attribute11 = 'Y' THEN
5069: END IF;
5070: END IF;
5071: --
5072: IF (l_debug <> -1) THEN
5073: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5074: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5075: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5076: END IF;
5077: --
5070: END IF;
5071: --
5072: IF (l_debug <> -1) THEN
5073: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5074: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5075: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5076: END IF;
5077: --
5078: IF b_Match THEN
5071: --
5072: IF (l_debug <> -1) THEN
5073: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5074: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5075: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5076: END IF;
5077: --
5078: IF b_Match THEN
5079: IF x_Group_rec.match_within_rec.attribute12 = 'Y' THEN
5084: END IF;
5085: END IF;
5086: --
5087: IF (l_debug <> -1) THEN
5088: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5089: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5090: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5091: END IF;
5092: --
5085: END IF;
5086: --
5087: IF (l_debug <> -1) THEN
5088: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5089: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5090: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5091: END IF;
5092: --
5093: IF b_Match THEN
5086: --
5087: IF (l_debug <> -1) THEN
5088: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5089: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5090: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5091: END IF;
5092: --
5093: IF b_Match THEN
5094: IF x_Group_rec.match_within_rec.attribute13 = 'Y' THEN
5099: END IF;
5100: END IF;
5101: --
5102: IF (l_debug <> -1) THEN
5103: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5104: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5105: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5106: END IF;
5107: --
5100: END IF;
5101: --
5102: IF (l_debug <> -1) THEN
5103: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5104: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5105: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5106: END IF;
5107: --
5108: IF b_Match THEN
5101: --
5102: IF (l_debug <> -1) THEN
5103: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5104: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5105: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5106: END IF;
5107: --
5108: IF b_Match THEN
5109: IF x_Group_rec.match_within_rec.attribute14 = 'Y' THEN
5114: END IF;
5115: END IF;
5116: --
5117: IF (l_debug <> -1) THEN
5118: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5119: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5120: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5121: END IF;
5122: --
5115: END IF;
5116: --
5117: IF (l_debug <> -1) THEN
5118: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5119: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5120: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5121: END IF;
5122: --
5123: IF b_Match THEN
5116: --
5117: IF (l_debug <> -1) THEN
5118: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5119: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5120: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5121: END IF;
5122: --
5123: IF b_Match THEN
5124: IF x_Group_rec.match_within_rec.attribute15 = 'Y' THEN
5129: END IF;
5130: END IF;
5131: --
5132: IF (l_debug <> -1) THEN
5133: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5134: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5135: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5136: END IF;
5137: --
5130: END IF;
5131: --
5132: IF (l_debug <> -1) THEN
5133: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5134: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5135: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5136: END IF;
5137: --
5138: --
5131: --
5132: IF (l_debug <> -1) THEN
5133: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5134: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5135: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5136: END IF;
5137: --
5138: --
5139: --}
5141: --
5142: --
5143: --{
5144: IF (l_debug <> -1) THEN
5145: rlm_core_sv.dlog(k_DEBUG,'Match across Schedules only ');
5146: END IF;
5147: --
5148: IF x_Group_rec.match_across_rec.cust_po_number = 'Y' THEN
5149: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
5152: END IF;
5153: END IF;
5154: --
5155: IF (l_debug <> -1) THEN
5156: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5157: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5158: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5159: END IF;
5160: --
5153: END IF;
5154: --
5155: IF (l_debug <> -1) THEN
5156: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5157: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5158: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5159: END IF;
5160: --
5161: IF b_Match THEN
5154: --
5155: IF (l_debug <> -1) THEN
5156: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5157: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5158: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5159: END IF;
5160: --
5161: IF b_Match THEN
5162: IF x_Group_rec.match_across_rec.customer_item_revision = 'Y' THEN
5167: END IF;
5168: END IF;
5169: --
5170: IF (l_debug <> -1) THEN
5171: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5172: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5173: g_Reconcile_tab(v_Count).customer_item_revision);
5174: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5175: END IF;
5168: END IF;
5169: --
5170: IF (l_debug <> -1) THEN
5171: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5172: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5173: g_Reconcile_tab(v_Count).customer_item_revision);
5174: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5175: END IF;
5176: --
5170: IF (l_debug <> -1) THEN
5171: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5172: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5173: g_Reconcile_tab(v_Count).customer_item_revision);
5174: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5175: END IF;
5176: --
5177: IF b_Match THEN
5178: IF x_Group_rec.match_across_rec.customer_dock_code = 'Y' THEN
5183: END IF;
5184: END IF;
5185: --
5186: IF (l_debug <> -1) THEN
5187: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5188: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5189: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5190: END IF;
5191: --
5184: END IF;
5185: --
5186: IF (l_debug <> -1) THEN
5187: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5188: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5189: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5190: END IF;
5191: --
5192: IF b_Match THEN
5185: --
5186: IF (l_debug <> -1) THEN
5187: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5188: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5189: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5190: END IF;
5191: --
5192: IF b_Match THEN
5193: IF x_Group_rec.match_across_rec.customer_job = 'Y' THEN
5198: END IF;
5199: END IF;
5200: --
5201: IF (l_debug <> -1) THEN
5202: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5203: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5204: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5205: END IF;
5206: --
5199: END IF;
5200: --
5201: IF (l_debug <> -1) THEN
5202: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5203: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5204: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5205: END IF;
5206: --
5207: IF b_Match THEN
5200: --
5201: IF (l_debug <> -1) THEN
5202: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5203: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5204: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5205: END IF;
5206: --
5207: IF b_Match THEN
5208: IF x_Group_rec.match_across_rec.cust_production_line = 'Y' THEN
5213: END IF;
5214: END IF;
5215: --
5216: IF (l_debug <> -1) THEN
5217: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5218: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5219: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5220: END IF;
5221: --
5214: END IF;
5215: --
5216: IF (l_debug <> -1) THEN
5217: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5218: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5219: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5220: END IF;
5221: --
5222: IF b_Match THEN
5215: --
5216: IF (l_debug <> -1) THEN
5217: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5218: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5219: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5220: END IF;
5221: --
5222: IF b_Match THEN
5223: IF x_Group_rec.match_across_rec.cust_model_serial_number = 'Y' THEN
5228: END IF;
5229: END IF;
5230: --
5231: IF (l_debug <> -1) THEN
5232: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5233: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5234: g_Reconcile_tab(v_Count).cust_model_serial_number);
5235: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5236: END IF;
5229: END IF;
5230: --
5231: IF (l_debug <> -1) THEN
5232: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5233: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5234: g_Reconcile_tab(v_Count).cust_model_serial_number);
5235: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5236: END IF;
5237: --
5231: IF (l_debug <> -1) THEN
5232: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5233: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5234: g_Reconcile_tab(v_Count).cust_model_serial_number);
5235: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5236: END IF;
5237: --
5238: IF b_Match THEN
5239: IF x_Group_rec.match_across_rec.cust_production_seq_num = 'Y' THEN
5244: END IF;
5245: END IF;
5246: --
5247: IF (l_debug <> -1) THEN
5248: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5249: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5250: g_Reconcile_tab(v_Count).cust_production_seq_num);
5251: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5252: END IF;
5245: END IF;
5246: --
5247: IF (l_debug <> -1) THEN
5248: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5249: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5250: g_Reconcile_tab(v_Count).cust_production_seq_num);
5251: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5252: END IF;
5253: --
5247: IF (l_debug <> -1) THEN
5248: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5249: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5250: g_Reconcile_tab(v_Count).cust_production_seq_num);
5251: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5252: END IF;
5253: --
5254: IF b_Match THEN
5255: IF x_Group_rec.match_across_rec.industry_attribute1 = 'Y' THEN
5260: END IF;
5261: END IF;
5262: --
5263: IF (l_debug <> -1) THEN
5264: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5266: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5267: END IF;
5268: --
5261: END IF;
5262: --
5263: IF (l_debug <> -1) THEN
5264: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5266: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5267: END IF;
5268: --
5269: IF b_Match THEN
5262: --
5263: IF (l_debug <> -1) THEN
5264: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5266: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5267: END IF;
5268: --
5269: IF b_Match THEN
5270: IF x_Group_rec.match_across_rec.industry_attribute2 = 'Y' THEN
5275: END IF;
5276: END IF;
5277: --
5278: IF (l_debug <> -1) THEN
5279: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5282: END IF;
5283: --
5276: END IF;
5277: --
5278: IF (l_debug <> -1) THEN
5279: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5282: END IF;
5283: --
5284: IF b_Match THEN
5277: --
5278: IF (l_debug <> -1) THEN
5279: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5282: END IF;
5283: --
5284: IF b_Match THEN
5285: IF x_Group_rec.match_across_rec.industry_attribute4 = 'Y' THEN
5290: END IF;
5291: END IF;
5292: --
5293: IF (l_debug <> -1) THEN
5294: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5296: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5297: END IF;
5298: --
5291: END IF;
5292: --
5293: IF (l_debug <> -1) THEN
5294: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5296: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5297: END IF;
5298: --
5299: IF b_Match THEN
5292: --
5293: IF (l_debug <> -1) THEN
5294: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5296: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5297: END IF;
5298: --
5299: IF b_Match THEN
5300: IF x_Group_rec.match_across_rec.industry_attribute5 = 'Y' THEN
5305: END IF;
5306: END IF;
5307: --
5308: IF (l_debug <> -1) THEN
5309: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5311: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5312: END IF;
5313: --
5306: END IF;
5307: --
5308: IF (l_debug <> -1) THEN
5309: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5311: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5312: END IF;
5313: --
5314: IF b_Match THEN
5307: --
5308: IF (l_debug <> -1) THEN
5309: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5311: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5312: END IF;
5313: --
5314: IF b_Match THEN
5315: IF x_Group_rec.match_across_rec.industry_attribute6 = 'Y' THEN
5320: END IF;
5321: END IF;
5322: --
5323: IF (l_debug <> -1) THEN
5324: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5326: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5327: END IF;
5328: --
5321: END IF;
5322: --
5323: IF (l_debug <> -1) THEN
5324: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5326: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5327: END IF;
5328: --
5329: IF b_Match THEN
5322: --
5323: IF (l_debug <> -1) THEN
5324: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5326: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5327: END IF;
5328: --
5329: IF b_Match THEN
5330: IF x_Group_rec.match_across_rec.industry_attribute10 = 'Y' THEN
5335: END IF;
5336: END IF;
5337: --
5338: IF (l_debug <> -1) THEN
5339: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5341: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5342: END IF;
5343: --
5336: END IF;
5337: --
5338: IF (l_debug <> -1) THEN
5339: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5341: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5342: END IF;
5343: --
5344: IF b_Match THEN
5337: --
5338: IF (l_debug <> -1) THEN
5339: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5341: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5342: END IF;
5343: --
5344: IF b_Match THEN
5345: IF x_Group_rec.match_across_rec.industry_attribute11 = 'Y' THEN
5350: END IF;
5351: END IF;
5352: --
5353: IF (l_debug <> -1) THEN
5354: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5356: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5357: END IF;
5358: --
5351: END IF;
5352: --
5353: IF (l_debug <> -1) THEN
5354: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5356: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5357: END IF;
5358: --
5359: IF b_Match THEN
5352: --
5353: IF (l_debug <> -1) THEN
5354: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5356: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5357: END IF;
5358: --
5359: IF b_Match THEN
5360: IF x_Group_rec.match_across_rec.industry_attribute12 = 'Y' THEN
5365: END IF;
5366: END IF;
5367: --
5368: IF (l_debug <> -1) THEN
5369: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5371: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5372: END IF;
5373: --
5366: END IF;
5367: --
5368: IF (l_debug <> -1) THEN
5369: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5371: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5372: END IF;
5373: --
5374: IF b_Match THEN
5367: --
5368: IF (l_debug <> -1) THEN
5369: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5371: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5372: END IF;
5373: --
5374: IF b_Match THEN
5375: IF x_Group_rec.match_across_rec.industry_attribute13 = 'Y' THEN
5380: END IF;
5381: END IF;
5382: --
5383: IF (l_debug <> -1) THEN
5384: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5386: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5387: END IF;
5388: --
5381: END IF;
5382: --
5383: IF (l_debug <> -1) THEN
5384: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5386: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5387: END IF;
5388: --
5389: IF b_Match THEN
5382: --
5383: IF (l_debug <> -1) THEN
5384: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5386: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5387: END IF;
5388: --
5389: IF b_Match THEN
5390: IF x_Group_rec.match_across_rec.industry_attribute14 = 'Y' THEN
5395: END IF;
5396: END IF;
5397: --
5398: IF (l_debug <> -1) THEN
5399: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5401: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5402: END IF;
5403: --
5396: END IF;
5397: --
5398: IF (l_debug <> -1) THEN
5399: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5401: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5402: END IF;
5403: --
5404: IF b_Match THEN
5397: --
5398: IF (l_debug <> -1) THEN
5399: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5401: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5402: END IF;
5403: --
5404: IF b_Match THEN
5405: IF x_Group_rec.match_across_rec.industry_attribute15 = 'Y' THEN
5410: END IF;
5411: END IF;
5412: --
5413: IF (l_debug <> -1) THEN
5414: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5416: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5417: END IF;
5418: --
5411: END IF;
5412: --
5413: IF (l_debug <> -1) THEN
5414: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5416: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5417: END IF;
5418: --
5419: IF b_Match THEN
5412: --
5413: IF (l_debug <> -1) THEN
5414: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5416: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5417: END IF;
5418: --
5419: IF b_Match THEN
5420: IF x_Group_rec.match_across_rec.attribute1 = 'Y' THEN
5425: END IF;
5426: END IF;
5427: --
5428: IF (l_debug <> -1) THEN
5429: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5431: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5432: END IF;
5433: --
5426: END IF;
5427: --
5428: IF (l_debug <> -1) THEN
5429: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5431: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5432: END IF;
5433: --
5434: IF b_Match THEN
5427: --
5428: IF (l_debug <> -1) THEN
5429: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5431: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5432: END IF;
5433: --
5434: IF b_Match THEN
5435: IF x_Group_rec.match_across_rec.attribute2 = 'Y' THEN
5440: END IF;
5441: END IF;
5442: --
5443: IF (l_debug <> -1) THEN
5444: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5446: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5447: END IF;
5448: --
5441: END IF;
5442: --
5443: IF (l_debug <> -1) THEN
5444: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5446: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5447: END IF;
5448: --
5449: IF b_Match THEN
5442: --
5443: IF (l_debug <> -1) THEN
5444: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5446: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5447: END IF;
5448: --
5449: IF b_Match THEN
5450: IF x_Group_rec.match_across_rec.attribute3 = 'Y' THEN
5455: END IF;
5456: END IF;
5457: --
5458: IF (l_debug <> -1) THEN
5459: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
5461: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5462: END IF;
5463: --
5456: END IF;
5457: --
5458: IF (l_debug <> -1) THEN
5459: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
5461: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5462: END IF;
5463: --
5464: IF b_Match THEN
5457: --
5458: IF (l_debug <> -1) THEN
5459: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
5461: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5462: END IF;
5463: --
5464: IF b_Match THEN
5465: IF x_Group_rec.match_across_rec.attribute4 = 'Y' THEN
5470: END IF;
5471: END IF;
5472: --
5473: IF (l_debug <> -1) THEN
5474: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
5476: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5477: END IF;
5478: --
5471: END IF;
5472: --
5473: IF (l_debug <> -1) THEN
5474: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
5476: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5477: END IF;
5478: --
5479: IF b_Match THEN
5472: --
5473: IF (l_debug <> -1) THEN
5474: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
5476: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5477: END IF;
5478: --
5479: IF b_Match THEN
5480: IF x_Group_rec.match_across_rec.attribute5 = 'Y' THEN
5485: END IF;
5486: END IF;
5487: --
5488: IF (l_debug <> -1) THEN
5489: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
5490: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
5491: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5492: END IF;
5493: --
5486: END IF;
5487: --
5488: IF (l_debug <> -1) THEN
5489: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
5490: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
5491: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5492: END IF;
5493: --
5494: IF b_Match THEN
5487: --
5488: IF (l_debug <> -1) THEN
5489: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
5490: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
5491: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5492: END IF;
5493: --
5494: IF b_Match THEN
5495: IF x_Group_rec.match_across_rec.attribute6 = 'Y' THEN
5500: END IF;
5501: END IF;
5502: --
5503: IF (l_debug <> -1) THEN
5504: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
5505: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5506: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5507: END IF;
5508: --
5501: END IF;
5502: --
5503: IF (l_debug <> -1) THEN
5504: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
5505: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5506: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5507: END IF;
5508: --
5509: IF b_Match THEN
5502: --
5503: IF (l_debug <> -1) THEN
5504: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
5505: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
5506: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5507: END IF;
5508: --
5509: IF b_Match THEN
5510: IF x_Group_rec.match_across_rec.attribute7 = 'Y' THEN
5515: END IF;
5516: END IF;
5517: --
5518: IF (l_debug <> -1) THEN
5519: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5520: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5521: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5522: END IF;
5523: --
5516: END IF;
5517: --
5518: IF (l_debug <> -1) THEN
5519: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5520: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5521: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5522: END IF;
5523: --
5524: IF b_Match THEN
5517: --
5518: IF (l_debug <> -1) THEN
5519: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5520: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
5521: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5522: END IF;
5523: --
5524: IF b_Match THEN
5525: IF x_Group_rec.match_across_rec.attribute8 = 'Y' THEN
5530: END IF;
5531: END IF;
5532: --
5533: IF (l_debug <> -1) THEN
5534: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5535: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5536: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5537: END IF;
5538: --
5531: END IF;
5532: --
5533: IF (l_debug <> -1) THEN
5534: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5535: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5536: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5537: END IF;
5538: --
5539: IF b_Match THEN
5532: --
5533: IF (l_debug <> -1) THEN
5534: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5535: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
5536: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5537: END IF;
5538: --
5539: IF b_Match THEN
5540: IF x_Group_rec.match_across_rec.attribute9 = 'Y' THEN
5545: END IF;
5546: END IF;
5547: --
5548: IF (l_debug <> -1) THEN
5549: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5550: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5551: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5552: END IF;
5553: --
5546: END IF;
5547: --
5548: IF (l_debug <> -1) THEN
5549: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5550: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5551: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5552: END IF;
5553: --
5554: IF b_Match THEN
5547: --
5548: IF (l_debug <> -1) THEN
5549: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5550: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
5551: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5552: END IF;
5553: --
5554: IF b_Match THEN
5555: IF x_Group_rec.match_across_rec.attribute10 = 'Y' THEN
5560: END IF;
5561: END IF;
5562: --
5563: IF (l_debug <> -1) THEN
5564: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5565: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5566: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5567: END IF;
5568: --
5561: END IF;
5562: --
5563: IF (l_debug <> -1) THEN
5564: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5565: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5566: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5567: END IF;
5568: --
5569: IF b_Match THEN
5562: --
5563: IF (l_debug <> -1) THEN
5564: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5565: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
5566: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5567: END IF;
5568: --
5569: IF b_Match THEN
5570: IF x_Group_rec.match_across_rec.attribute11 = 'Y' THEN
5575: END IF;
5576: END IF;
5577: --
5578: IF (l_debug <> -1) THEN
5579: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5580: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5581: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5582: END IF;
5583: --
5576: END IF;
5577: --
5578: IF (l_debug <> -1) THEN
5579: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5580: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5581: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5582: END IF;
5583: --
5584: IF b_Match THEN
5577: --
5578: IF (l_debug <> -1) THEN
5579: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5580: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
5581: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5582: END IF;
5583: --
5584: IF b_Match THEN
5585: IF x_Group_rec.match_across_rec.attribute12 = 'Y' THEN
5590: END IF;
5591: END IF;
5592: --
5593: IF (l_debug <> -1) THEN
5594: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5595: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5596: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5597: END IF;
5598: --
5591: END IF;
5592: --
5593: IF (l_debug <> -1) THEN
5594: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5595: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5596: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5597: END IF;
5598: --
5599: IF b_Match THEN
5592: --
5593: IF (l_debug <> -1) THEN
5594: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5595: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
5596: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5597: END IF;
5598: --
5599: IF b_Match THEN
5600: IF x_Group_rec.match_across_rec.attribute13 = 'Y' THEN
5605: END IF;
5606: END IF;
5607: --
5608: IF (l_debug <> -1) THEN
5609: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5610: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5611: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5612: END IF;
5613: --
5606: END IF;
5607: --
5608: IF (l_debug <> -1) THEN
5609: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5610: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5611: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5612: END IF;
5613: --
5614: IF b_Match THEN
5607: --
5608: IF (l_debug <> -1) THEN
5609: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5610: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
5611: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5612: END IF;
5613: --
5614: IF b_Match THEN
5615: IF x_Group_rec.match_across_rec.attribute14 = 'Y' THEN
5620: END IF;
5621: END IF;
5622: --
5623: IF (l_debug <> -1) THEN
5624: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5625: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5626: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5627: END IF;
5628: --
5621: END IF;
5622: --
5623: IF (l_debug <> -1) THEN
5624: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5625: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5626: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5627: END IF;
5628: --
5629: IF b_Match THEN
5622: --
5623: IF (l_debug <> -1) THEN
5624: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5625: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
5626: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5627: END IF;
5628: --
5629: IF b_Match THEN
5630: IF x_Group_rec.match_across_rec.attribute15 = 'Y' THEN
5635: END IF;
5636: END IF;
5637: --
5638: IF (l_debug <> -1) THEN
5639: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5640: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5641: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5642: END IF;
5643: --}
5636: END IF;
5637: --
5638: IF (l_debug <> -1) THEN
5639: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5640: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5641: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5642: END IF;
5643: --}
5644: ELSE
5637: --
5638: IF (l_debug <> -1) THEN
5639: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5640: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5641: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5642: END IF;
5643: --}
5644: ELSE
5645: --{
5644: ELSE
5645: --{
5646: b_Match := FALSE;
5647: IF (l_debug <> -1) THEN
5648: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5649: END IF;
5650: --}
5651: END IF;
5652: --
5662: --
5663: END IF;
5664: --
5665: IF (l_debug <> -1) THEN
5666: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5667: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5668: rlm_core_sv.dpop(k_SDEBUG);
5669: END IF;
5670: --
5663: END IF;
5664: --
5665: IF (l_debug <> -1) THEN
5666: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5667: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5668: rlm_core_sv.dpop(k_SDEBUG);
5669: END IF;
5670: --
5671: RETURN(b_Match);
5664: --
5665: IF (l_debug <> -1) THEN
5666: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5667: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5668: rlm_core_sv.dpop(k_SDEBUG);
5669: END IF;
5670: --
5671: RETURN(b_Match);
5672: --
5674: WHEN OTHERS THEN
5675: rlm_message_sv.sql_error('rlm_rd_sv.MatchFrozen',x_progress);
5676: --
5677: IF (l_debug <> -1) THEN
5678: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
5679: END IF;
5680: --
5681: raise;
5682:
5701:
5702: BEGIN
5703: --
5704: IF (l_debug <> -1) THEN
5705: rlm_core_sv.dpush(k_SDEBUG,'MatchReconcile');
5706: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
5707: x_Current_rec.schedule_type);
5708: END IF;
5709: --
5702: BEGIN
5703: --
5704: IF (l_debug <> -1) THEN
5705: rlm_core_sv.dpush(k_SDEBUG,'MatchReconcile');
5706: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
5707: x_Current_rec.schedule_type);
5708: END IF;
5709: --
5710: -- Bug 2261743
5708: END IF;
5709: --
5710: -- Bug 2261743
5711: IF (l_debug <> -1) THEN
5712: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5713: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5714: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5715: END IF;
5716:
5709: --
5710: -- Bug 2261743
5711: IF (l_debug <> -1) THEN
5712: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5713: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5714: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5715: END IF;
5716:
5717: IF g_Reconcile_tab.COUNT <> 0 THEN
5710: -- Bug 2261743
5711: IF (l_debug <> -1) THEN
5712: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5713: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5714: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5715: END IF;
5716:
5717: IF g_Reconcile_tab.COUNT <> 0 THEN
5718: --
5724: --{
5725: b_Match := TRUE;
5726: --
5727: IF (l_debug <> -1) THEN
5728: rlm_core_sv.dlog(k_DEBUG, 'g_Reconcile_Tab('||v_Count||').schedule_type',
5729: g_Reconcile_Tab(v_Count).schedule_type);
5730: END IF;
5731: -- Bug 5608510
5732: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
5731: -- Bug 5608510
5732: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
5733: --
5734: IF (l_debug <> -1) THEN
5735: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis ',x_Group_rec.setup_terms_rec.intransit_calc_basis);
5736: END IF;
5737: --
5738: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
5739: --
5737: --
5738: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
5739: --
5740: IF (l_debug <> -1) THEN
5741: rlm_core_sv.dlog(k_DEBUG,'Match Within Schedules only ');
5742: END IF;
5743: --
5744: IF x_Group_rec.match_within_rec.cust_po_number = 'Y' THEN
5745: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
5748: END IF;
5749: END IF;
5750: --
5751: IF (l_debug <> -1) THEN
5752: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5753: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5754: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5755: END IF;
5756: --
5749: END IF;
5750: --
5751: IF (l_debug <> -1) THEN
5752: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5753: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5754: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5755: END IF;
5756: --
5757: IF b_Match THEN
5750: --
5751: IF (l_debug <> -1) THEN
5752: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5753: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5754: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5755: END IF;
5756: --
5757: IF b_Match THEN
5758: IF x_Group_rec.match_within_rec.customer_item_revision = 'Y' THEN
5763: END IF;
5764: END IF;
5765: --
5766: IF (l_debug <> -1) THEN
5767: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5768: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5769: g_Reconcile_tab(v_Count).customer_item_revision);
5770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5771: END IF;
5764: END IF;
5765: --
5766: IF (l_debug <> -1) THEN
5767: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5768: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5769: g_Reconcile_tab(v_Count).customer_item_revision);
5770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5771: END IF;
5772: --
5766: IF (l_debug <> -1) THEN
5767: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5768: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5769: g_Reconcile_tab(v_Count).customer_item_revision);
5770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5771: END IF;
5772: --
5773: IF b_Match THEN
5774: IF x_Group_rec.match_within_rec.customer_dock_code = 'Y' THEN
5779: END IF;
5780: END IF;
5781: --
5782: IF (l_debug <> -1) THEN
5783: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5784: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5786: END IF;
5787: --
5780: END IF;
5781: --
5782: IF (l_debug <> -1) THEN
5783: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5784: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5786: END IF;
5787: --
5788: IF b_Match THEN
5781: --
5782: IF (l_debug <> -1) THEN
5783: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5784: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5786: END IF;
5787: --
5788: IF b_Match THEN
5789: IF x_Group_rec.match_within_rec.customer_job = 'Y' THEN
5794: END IF;
5795: END IF;
5796: --
5797: IF (l_debug <> -1) THEN
5798: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5799: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5800: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5801: END IF;
5802: --
5795: END IF;
5796: --
5797: IF (l_debug <> -1) THEN
5798: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5799: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5800: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5801: END IF;
5802: --
5803: IF b_Match THEN
5796: --
5797: IF (l_debug <> -1) THEN
5798: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5799: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5800: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5801: END IF;
5802: --
5803: IF b_Match THEN
5804: IF x_Group_rec.match_within_rec.cust_production_line = 'Y' THEN
5809: END IF;
5810: END IF;
5811: --
5812: IF (l_debug <> -1) THEN
5813: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5814: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5815: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5816: END IF;
5817: --
5810: END IF;
5811: --
5812: IF (l_debug <> -1) THEN
5813: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5814: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5815: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5816: END IF;
5817: --
5818: IF b_Match THEN
5811: --
5812: IF (l_debug <> -1) THEN
5813: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5814: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5815: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5816: END IF;
5817: --
5818: IF b_Match THEN
5819: IF x_Group_rec.match_within_rec.cust_model_serial_number = 'Y' THEN
5824: END IF;
5825: END IF;
5826: --
5827: IF (l_debug <> -1) THEN
5828: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5829: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5830: g_Reconcile_tab(v_Count).cust_model_serial_number);
5831: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5832: END IF;
5825: END IF;
5826: --
5827: IF (l_debug <> -1) THEN
5828: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5829: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5830: g_Reconcile_tab(v_Count).cust_model_serial_number);
5831: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5832: END IF;
5833: --
5827: IF (l_debug <> -1) THEN
5828: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5829: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5830: g_Reconcile_tab(v_Count).cust_model_serial_number);
5831: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5832: END IF;
5833: --
5834: IF b_Match THEN
5835: IF x_Group_rec.match_within_rec.cust_production_seq_num = 'Y' THEN
5840: END IF;
5841: END IF;
5842: --
5843: IF (l_debug <> -1) THEN
5844: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5845: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5846: g_Reconcile_tab(v_Count).cust_production_seq_num);
5847: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5848: END IF;
5841: END IF;
5842: --
5843: IF (l_debug <> -1) THEN
5844: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5845: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5846: g_Reconcile_tab(v_Count).cust_production_seq_num);
5847: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5848: END IF;
5849: --
5843: IF (l_debug <> -1) THEN
5844: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5845: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5846: g_Reconcile_tab(v_Count).cust_production_seq_num);
5847: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5848: END IF;
5849: --
5850: IF b_Match THEN
5851: IF x_Group_rec.match_within_rec.industry_attribute1 = 'Y' THEN
5856: END IF;
5857: END IF;
5858: --
5859: IF (l_debug <> -1) THEN
5860: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5861: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5862: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5863: END IF;
5864: --
5857: END IF;
5858: --
5859: IF (l_debug <> -1) THEN
5860: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5861: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5862: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5863: END IF;
5864: --
5865: --Bug 5608510
5858: --
5859: IF (l_debug <> -1) THEN
5860: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5861: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5862: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5863: END IF;
5864: --
5865: --Bug 5608510
5866: --
5874: END IF;
5875: END IF;
5876: --
5877: IF (l_debug <> -1) THEN
5878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5881: END IF;
5882: --
5875: END IF;
5876: --
5877: IF (l_debug <> -1) THEN
5878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5881: END IF;
5882: --
5883: IF b_Match THEN
5876: --
5877: IF (l_debug <> -1) THEN
5878: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5879: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5880: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5881: END IF;
5882: --
5883: IF b_Match THEN
5884: IF x_Group_rec.match_within_rec.request_date = 'Y' THEN
5890: END IF;
5891: --
5892: --
5893: IF (l_debug <> -1) THEN
5894: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5895: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5896: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5897: END IF;
5898: --
5891: --
5892: --
5893: IF (l_debug <> -1) THEN
5894: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5895: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5896: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5897: END IF;
5898: --
5899: END IF; --bugfix 5608510 ends
5892: --
5893: IF (l_debug <> -1) THEN
5894: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5895: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5896: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5897: END IF;
5898: --
5899: END IF; --bugfix 5608510 ends
5900: --
5907: END IF;
5908: END IF;
5909: --
5910: IF (l_debug <> -1) THEN
5911: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5913: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5914: END IF;
5915: --
5908: END IF;
5909: --
5910: IF (l_debug <> -1) THEN
5911: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5913: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5914: END IF;
5915: --
5916: IF b_Match THEN
5909: --
5910: IF (l_debug <> -1) THEN
5911: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5913: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5914: END IF;
5915: --
5916: IF b_Match THEN
5917: IF x_Group_rec.match_within_rec.industry_attribute5 = 'Y' THEN
5922: END IF;
5923: END IF;
5924: --
5925: IF (l_debug <> -1) THEN
5926: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5928: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5929: END IF;
5930: --
5923: END IF;
5924: --
5925: IF (l_debug <> -1) THEN
5926: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5928: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5929: END IF;
5930: --
5931: IF b_Match THEN
5924: --
5925: IF (l_debug <> -1) THEN
5926: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5928: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5929: END IF;
5930: --
5931: IF b_Match THEN
5932: IF x_Group_rec.match_within_rec.industry_attribute6 = 'Y' THEN
5937: END IF;
5938: END IF;
5939: --
5940: IF (l_debug <> -1) THEN
5941: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5943: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5944: END IF;
5945: --
5938: END IF;
5939: --
5940: IF (l_debug <> -1) THEN
5941: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5943: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5944: END IF;
5945: --
5946: IF b_Match THEN
5939: --
5940: IF (l_debug <> -1) THEN
5941: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5943: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5944: END IF;
5945: --
5946: IF b_Match THEN
5947: IF x_Group_rec.match_within_rec.industry_attribute10 = 'Y' THEN
5952: END IF;
5953: END IF;
5954: --
5955: IF (l_debug <> -1) THEN
5956: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5958: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5959: END IF;
5960: --
5953: END IF;
5954: --
5955: IF (l_debug <> -1) THEN
5956: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5958: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5959: END IF;
5960: --
5961: IF b_Match THEN
5954: --
5955: IF (l_debug <> -1) THEN
5956: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5958: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5959: END IF;
5960: --
5961: IF b_Match THEN
5962: IF x_Group_rec.match_within_rec.industry_attribute11 = 'Y' THEN
5967: END IF;
5968: END IF;
5969: --
5970: IF (l_debug <> -1) THEN
5971: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5973: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5974: END IF;
5975: --
5968: END IF;
5969: --
5970: IF (l_debug <> -1) THEN
5971: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5973: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5974: END IF;
5975: --
5976: IF b_Match THEN
5969: --
5970: IF (l_debug <> -1) THEN
5971: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5973: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5974: END IF;
5975: --
5976: IF b_Match THEN
5977: IF x_Group_rec.match_within_rec.industry_attribute12 = 'Y' THEN
5982: END IF;
5983: END IF;
5984: --
5985: IF (l_debug <> -1) THEN
5986: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5988: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5989: END IF;
5990: --
5983: END IF;
5984: --
5985: IF (l_debug <> -1) THEN
5986: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5988: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5989: END IF;
5990: --
5991: IF b_Match THEN
5984: --
5985: IF (l_debug <> -1) THEN
5986: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5988: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5989: END IF;
5990: --
5991: IF b_Match THEN
5992: IF x_Group_rec.match_within_rec.industry_attribute13 = 'Y' THEN
5997: END IF;
5998: END IF;
5999: --
6000: IF (l_debug <> -1) THEN
6001: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6003: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6004: END IF;
6005: --
5998: END IF;
5999: --
6000: IF (l_debug <> -1) THEN
6001: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6003: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6004: END IF;
6005: --
6006: IF b_Match THEN
5999: --
6000: IF (l_debug <> -1) THEN
6001: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6003: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6004: END IF;
6005: --
6006: IF b_Match THEN
6007: IF x_Group_rec.match_within_rec.industry_attribute14 = 'Y' THEN
6012: END IF;
6013: END IF;
6014: --
6015: IF (l_debug <> -1) THEN
6016: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6018: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6019: END IF;
6020: --
6013: END IF;
6014: --
6015: IF (l_debug <> -1) THEN
6016: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6018: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6019: END IF;
6020: --
6021: IF b_Match THEN
6014: --
6015: IF (l_debug <> -1) THEN
6016: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6018: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6019: END IF;
6020: --
6021: IF b_Match THEN
6022: IF x_Group_rec.match_within_rec.industry_attribute15 = 'Y' THEN
6027: END IF;
6028: END IF;
6029: --
6030: IF (l_debug <> -1) THEN
6031: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6033: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6034: END IF;
6035: --
6028: END IF;
6029: --
6030: IF (l_debug <> -1) THEN
6031: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6033: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6034: END IF;
6035: --
6036: IF b_Match THEN
6029: --
6030: IF (l_debug <> -1) THEN
6031: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6033: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6034: END IF;
6035: --
6036: IF b_Match THEN
6037: IF x_Group_rec.match_within_rec.attribute1 = 'Y' THEN
6042: END IF;
6043: END IF;
6044: --
6045: IF (l_debug <> -1) THEN
6046: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6048: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6049: END IF;
6050: --
6043: END IF;
6044: --
6045: IF (l_debug <> -1) THEN
6046: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6048: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6049: END IF;
6050: --
6051: IF b_Match THEN
6044: --
6045: IF (l_debug <> -1) THEN
6046: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6048: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6049: END IF;
6050: --
6051: IF b_Match THEN
6052: IF x_Group_rec.match_within_rec.attribute2 = 'Y' THEN
6057: END IF;
6058: END IF;
6059: --
6060: IF (l_debug <> -1) THEN
6061: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6063: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6064: END IF;
6065: --
6058: END IF;
6059: --
6060: IF (l_debug <> -1) THEN
6061: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6063: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6064: END IF;
6065: --
6066: IF b_Match THEN
6059: --
6060: IF (l_debug <> -1) THEN
6061: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6063: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6064: END IF;
6065: --
6066: IF b_Match THEN
6067: IF x_Group_rec.match_within_rec.attribute3 = 'Y' THEN
6072: END IF;
6073: END IF;
6074: --
6075: IF (l_debug <> -1) THEN
6076: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6078: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6079: END IF;
6080: --
6073: END IF;
6074: --
6075: IF (l_debug <> -1) THEN
6076: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6078: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6079: END IF;
6080: --
6081: IF b_Match THEN
6074: --
6075: IF (l_debug <> -1) THEN
6076: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6078: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6079: END IF;
6080: --
6081: IF b_Match THEN
6082: IF x_Group_rec.match_within_rec.attribute4 = 'Y' THEN
6087: END IF;
6088: END IF;
6089: --
6090: IF (l_debug <> -1) THEN
6091: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6093: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6094: END IF;
6095: --
6088: END IF;
6089: --
6090: IF (l_debug <> -1) THEN
6091: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6093: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6094: END IF;
6095: --
6096: IF b_Match THEN
6089: --
6090: IF (l_debug <> -1) THEN
6091: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6093: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6094: END IF;
6095: --
6096: IF b_Match THEN
6097: IF x_Group_rec.match_within_rec.attribute5 = 'Y' THEN
6102: END IF;
6103: END IF;
6104: --
6105: IF (l_debug <> -1) THEN
6106: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6107: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6108: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6109: END IF;
6110: --
6103: END IF;
6104: --
6105: IF (l_debug <> -1) THEN
6106: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6107: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6108: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6109: END IF;
6110: --
6111: IF b_Match THEN
6104: --
6105: IF (l_debug <> -1) THEN
6106: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6107: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6108: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6109: END IF;
6110: --
6111: IF b_Match THEN
6112: IF x_Group_rec.match_within_rec.attribute6 = 'Y' THEN
6117: END IF;
6118: END IF;
6119: --
6120: IF (l_debug <> -1) THEN
6121: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6122: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6123: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6124: END IF;
6125: --
6118: END IF;
6119: --
6120: IF (l_debug <> -1) THEN
6121: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6122: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6123: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6124: END IF;
6125: --
6126: IF b_Match THEN
6119: --
6120: IF (l_debug <> -1) THEN
6121: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6122: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6123: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6124: END IF;
6125: --
6126: IF b_Match THEN
6127: IF x_Group_rec.match_within_rec.attribute7 = 'Y' THEN
6132: END IF;
6133: END IF;
6134: --
6135: IF (l_debug <> -1) THEN
6136: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6137: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6138: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6139: END IF;
6140: --
6133: END IF;
6134: --
6135: IF (l_debug <> -1) THEN
6136: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6137: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6138: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6139: END IF;
6140: --
6141: IF b_Match THEN
6134: --
6135: IF (l_debug <> -1) THEN
6136: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6137: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6138: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6139: END IF;
6140: --
6141: IF b_Match THEN
6142: IF x_Group_rec.match_within_rec.attribute8 = 'Y' THEN
6147: END IF;
6148: END IF;
6149: --
6150: IF (l_debug <> -1) THEN
6151: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6152: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6153: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6154: END IF;
6155: --
6148: END IF;
6149: --
6150: IF (l_debug <> -1) THEN
6151: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6152: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6153: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6154: END IF;
6155: --
6156: IF b_Match THEN
6149: --
6150: IF (l_debug <> -1) THEN
6151: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6152: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6153: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6154: END IF;
6155: --
6156: IF b_Match THEN
6157: IF x_Group_rec.match_within_rec.attribute9 = 'Y' THEN
6162: END IF;
6163: END IF;
6164: --
6165: IF (l_debug <> -1) THEN
6166: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6167: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6168: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6169: END IF;
6170: --
6163: END IF;
6164: --
6165: IF (l_debug <> -1) THEN
6166: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6167: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6168: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6169: END IF;
6170: --
6171: IF b_Match THEN
6164: --
6165: IF (l_debug <> -1) THEN
6166: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6167: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6168: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6169: END IF;
6170: --
6171: IF b_Match THEN
6172: IF x_Group_rec.match_within_rec.attribute10 = 'Y' THEN
6177: END IF;
6178: END IF;
6179: --
6180: IF (l_debug <> -1) THEN
6181: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6182: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6183: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6184: END IF;
6185: --
6178: END IF;
6179: --
6180: IF (l_debug <> -1) THEN
6181: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6182: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6183: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6184: END IF;
6185: --
6186: IF b_Match THEN
6179: --
6180: IF (l_debug <> -1) THEN
6181: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6182: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6183: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6184: END IF;
6185: --
6186: IF b_Match THEN
6187: IF x_Group_rec.match_within_rec.attribute11 = 'Y' THEN
6192: END IF;
6193: END IF;
6194: --
6195: IF (l_debug <> -1) THEN
6196: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6197: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6198: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6199: END IF;
6200: --
6193: END IF;
6194: --
6195: IF (l_debug <> -1) THEN
6196: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6197: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6198: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6199: END IF;
6200: --
6201: IF b_Match THEN
6194: --
6195: IF (l_debug <> -1) THEN
6196: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6197: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6198: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6199: END IF;
6200: --
6201: IF b_Match THEN
6202: IF x_Group_rec.match_within_rec.attribute12 = 'Y' THEN
6207: END IF;
6208: END IF;
6209: --
6210: IF (l_debug <> -1) THEN
6211: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6212: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6213: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6214: END IF;
6215: --
6208: END IF;
6209: --
6210: IF (l_debug <> -1) THEN
6211: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6212: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6213: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6214: END IF;
6215: --
6216: IF b_Match THEN
6209: --
6210: IF (l_debug <> -1) THEN
6211: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6212: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6213: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6214: END IF;
6215: --
6216: IF b_Match THEN
6217: IF x_Group_rec.match_within_rec.attribute13 = 'Y' THEN
6222: END IF;
6223: END IF;
6224: --
6225: IF (l_debug <> -1) THEN
6226: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6227: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6228: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6229: END IF;
6230: --
6223: END IF;
6224: --
6225: IF (l_debug <> -1) THEN
6226: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6227: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6228: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6229: END IF;
6230: --
6231: IF b_Match THEN
6224: --
6225: IF (l_debug <> -1) THEN
6226: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6227: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6228: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6229: END IF;
6230: --
6231: IF b_Match THEN
6232: IF x_Group_rec.match_within_rec.attribute14 = 'Y' THEN
6237: END IF;
6238: END IF;
6239: --
6240: IF (l_debug <> -1) THEN
6241: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6243: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6244: END IF;
6245: --
6238: END IF;
6239: --
6240: IF (l_debug <> -1) THEN
6241: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6243: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6244: END IF;
6245: --
6246: IF b_Match THEN
6239: --
6240: IF (l_debug <> -1) THEN
6241: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6243: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6244: END IF;
6245: --
6246: IF b_Match THEN
6247: IF x_Group_rec.match_within_rec.attribute15 = 'Y' THEN
6252: END IF;
6253: END IF;
6254: --
6255: IF (l_debug <> -1) THEN
6256: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6257: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6258: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6259: END IF;
6260: --
6253: END IF;
6254: --
6255: IF (l_debug <> -1) THEN
6256: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6257: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6258: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6259: END IF;
6260: --
6261: --
6254: --
6255: IF (l_debug <> -1) THEN
6256: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6257: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6258: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6259: END IF;
6260: --
6261: --
6262: --
6264: --
6265: --
6266: --
6267: IF (l_debug <> -1) THEN
6268: rlm_core_sv.dlog(k_DEBUG,'Match across Schedules only ');
6269: END IF;
6270: --
6271: IF x_Group_rec.match_across_rec.cust_po_number = 'Y' THEN
6272: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
6275: END IF;
6276: END IF;
6277: --
6278: IF (l_debug <> -1) THEN
6279: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6280: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6282: END IF;
6283: --
6276: END IF;
6277: --
6278: IF (l_debug <> -1) THEN
6279: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6280: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6282: END IF;
6283: --
6284: IF b_Match THEN
6277: --
6278: IF (l_debug <> -1) THEN
6279: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6280: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6281: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6282: END IF;
6283: --
6284: IF b_Match THEN
6285: IF x_Group_rec.match_across_rec.customer_item_revision = 'Y' THEN
6290: END IF;
6291: END IF;
6292: --
6293: IF (l_debug <> -1) THEN
6294: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6295: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6296: g_Reconcile_tab(v_Count).customer_item_revision);
6297: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6298: END IF;
6291: END IF;
6292: --
6293: IF (l_debug <> -1) THEN
6294: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6295: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6296: g_Reconcile_tab(v_Count).customer_item_revision);
6297: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6298: END IF;
6299: --
6293: IF (l_debug <> -1) THEN
6294: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6295: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6296: g_Reconcile_tab(v_Count).customer_item_revision);
6297: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6298: END IF;
6299: --
6300: IF b_Match THEN
6301: IF x_Group_rec.match_across_rec.customer_dock_code = 'Y' THEN
6306: END IF;
6307: END IF;
6308: --
6309: IF (l_debug <> -1) THEN
6310: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6311: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6312: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6313: END IF;
6314: --
6307: END IF;
6308: --
6309: IF (l_debug <> -1) THEN
6310: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6311: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6312: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6313: END IF;
6314: --
6315: IF b_Match THEN
6308: --
6309: IF (l_debug <> -1) THEN
6310: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6311: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6312: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6313: END IF;
6314: --
6315: IF b_Match THEN
6316: IF x_Group_rec.match_across_rec.customer_job = 'Y' THEN
6321: END IF;
6322: END IF;
6323: --
6324: IF (l_debug <> -1) THEN
6325: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6326: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6327: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6328: END IF;
6329: --
6322: END IF;
6323: --
6324: IF (l_debug <> -1) THEN
6325: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6326: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6327: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6328: END IF;
6329: --
6330: IF b_Match THEN
6323: --
6324: IF (l_debug <> -1) THEN
6325: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6326: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6327: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6328: END IF;
6329: --
6330: IF b_Match THEN
6331: IF x_Group_rec.match_across_rec.cust_production_line = 'Y' THEN
6336: END IF;
6337: END IF;
6338: --
6339: IF (l_debug <> -1) THEN
6340: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6341: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6342: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6343: END IF;
6344: --
6337: END IF;
6338: --
6339: IF (l_debug <> -1) THEN
6340: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6341: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6342: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6343: END IF;
6344: --
6345: IF b_Match THEN
6338: --
6339: IF (l_debug <> -1) THEN
6340: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6341: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6342: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6343: END IF;
6344: --
6345: IF b_Match THEN
6346: IF x_Group_rec.match_across_rec.cust_model_serial_number = 'Y' THEN
6351: END IF;
6352: END IF;
6353: --
6354: IF (l_debug <> -1) THEN
6355: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6356: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6357: g_Reconcile_tab(v_Count).cust_model_serial_number);
6358: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6359: END IF;
6352: END IF;
6353: --
6354: IF (l_debug <> -1) THEN
6355: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6356: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6357: g_Reconcile_tab(v_Count).cust_model_serial_number);
6358: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6359: END IF;
6360: --
6354: IF (l_debug <> -1) THEN
6355: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6356: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6357: g_Reconcile_tab(v_Count).cust_model_serial_number);
6358: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6359: END IF;
6360: --
6361: IF b_Match THEN
6362: IF x_Group_rec.match_across_rec.cust_production_seq_num = 'Y' THEN
6367: END IF;
6368: END IF;
6369: --
6370: IF (l_debug <> -1) THEN
6371: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6372: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6373: g_Reconcile_tab(v_Count).cust_production_seq_num);
6374: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6375: END IF;
6368: END IF;
6369: --
6370: IF (l_debug <> -1) THEN
6371: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6372: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6373: g_Reconcile_tab(v_Count).cust_production_seq_num);
6374: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6375: END IF;
6376: --
6370: IF (l_debug <> -1) THEN
6371: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6372: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6373: g_Reconcile_tab(v_Count).cust_production_seq_num);
6374: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6375: END IF;
6376: --
6377: IF b_Match THEN
6378: IF x_Group_rec.match_across_rec.industry_attribute1 = 'Y' THEN
6383: END IF;
6384: END IF;
6385: --
6386: IF (l_debug <> -1) THEN
6387: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6388: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6389: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6390: END IF;
6391: --
6384: END IF;
6385: --
6386: IF (l_debug <> -1) THEN
6387: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6388: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6389: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6390: END IF;
6391: --
6392: -- Bugfix 5608510
6385: --
6386: IF (l_debug <> -1) THEN
6387: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6388: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6389: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6390: END IF;
6391: --
6392: -- Bugfix 5608510
6393: IF v_intransit_calc_basis = 'PART_SHIP_LINES' THEN
6402: END IF;
6403: --
6404:
6405: IF (l_debug <> -1) THEN
6406: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
6407: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
6408: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6409: END IF;
6410: --
6403: --
6404:
6405: IF (l_debug <> -1) THEN
6406: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
6407: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
6408: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6409: END IF;
6410: --
6411: IF b_Match THEN
6404:
6405: IF (l_debug <> -1) THEN
6406: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
6407: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
6408: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6409: END IF;
6410: --
6411: IF b_Match THEN
6412: IF x_Group_rec.match_across_rec.request_date = 'Y' THEN
6418: END IF;
6419: --
6420: --
6421: IF (l_debug <> -1) THEN
6422: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6423: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6424: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6425: END IF;
6426: --
6419: --
6420: --
6421: IF (l_debug <> -1) THEN
6422: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6423: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6424: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6425: END IF;
6426: --
6427: END IF ; -- bugfix 5608510
6420: --
6421: IF (l_debug <> -1) THEN
6422: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6423: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6424: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6425: END IF;
6426: --
6427: END IF ; -- bugfix 5608510
6428: IF b_Match THEN
6434: END IF;
6435: END IF;
6436: --
6437: IF (l_debug <> -1) THEN
6438: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6440: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6441: END IF;
6442: --
6435: END IF;
6436: --
6437: IF (l_debug <> -1) THEN
6438: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6440: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6441: END IF;
6442: --
6443: IF b_Match THEN
6436: --
6437: IF (l_debug <> -1) THEN
6438: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6440: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6441: END IF;
6442: --
6443: IF b_Match THEN
6444: IF x_Group_rec.match_across_rec.industry_attribute5 = 'Y' THEN
6449: END IF;
6450: END IF;
6451: --
6452: IF (l_debug <> -1) THEN
6453: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6455: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6456: END IF;
6457: --
6450: END IF;
6451: --
6452: IF (l_debug <> -1) THEN
6453: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6455: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6456: END IF;
6457: --
6458: IF b_Match THEN
6451: --
6452: IF (l_debug <> -1) THEN
6453: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6455: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6456: END IF;
6457: --
6458: IF b_Match THEN
6459: IF x_Group_rec.match_across_rec.industry_attribute6 = 'Y' THEN
6464: END IF;
6465: END IF;
6466: --
6467: IF (l_debug <> -1) THEN
6468: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6470: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6471: END IF;
6472: --
6465: END IF;
6466: --
6467: IF (l_debug <> -1) THEN
6468: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6470: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6471: END IF;
6472: --
6473: IF b_Match THEN
6466: --
6467: IF (l_debug <> -1) THEN
6468: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6470: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6471: END IF;
6472: --
6473: IF b_Match THEN
6474: IF x_Group_rec.match_across_rec.industry_attribute10 = 'Y' THEN
6479: END IF;
6480: END IF;
6481: --
6482: IF (l_debug <> -1) THEN
6483: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6485: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6486: END IF;
6487: --
6480: END IF;
6481: --
6482: IF (l_debug <> -1) THEN
6483: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6485: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6486: END IF;
6487: --
6488: IF b_Match THEN
6481: --
6482: IF (l_debug <> -1) THEN
6483: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6485: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6486: END IF;
6487: --
6488: IF b_Match THEN
6489: IF x_Group_rec.match_across_rec.industry_attribute11 = 'Y' THEN
6494: END IF;
6495: END IF;
6496: --
6497: IF (l_debug <> -1) THEN
6498: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6500: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6501: END IF;
6502: --
6495: END IF;
6496: --
6497: IF (l_debug <> -1) THEN
6498: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6500: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6501: END IF;
6502: --
6503: IF b_Match THEN
6496: --
6497: IF (l_debug <> -1) THEN
6498: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6500: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6501: END IF;
6502: --
6503: IF b_Match THEN
6504: IF x_Group_rec.match_across_rec.industry_attribute12 = 'Y' THEN
6509: END IF;
6510: END IF;
6511: --
6512: IF (l_debug <> -1) THEN
6513: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6516: END IF;
6517: --
6510: END IF;
6511: --
6512: IF (l_debug <> -1) THEN
6513: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6516: END IF;
6517: --
6518: IF b_Match THEN
6511: --
6512: IF (l_debug <> -1) THEN
6513: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6516: END IF;
6517: --
6518: IF b_Match THEN
6519: IF x_Group_rec.match_across_rec.industry_attribute13 = 'Y' THEN
6524: END IF;
6525: END IF;
6526: --
6527: IF (l_debug <> -1) THEN
6528: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6531: END IF;
6532: --
6525: END IF;
6526: --
6527: IF (l_debug <> -1) THEN
6528: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6531: END IF;
6532: --
6533: IF b_Match THEN
6526: --
6527: IF (l_debug <> -1) THEN
6528: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6531: END IF;
6532: --
6533: IF b_Match THEN
6534: IF x_Group_rec.match_across_rec.industry_attribute14 = 'Y' THEN
6539: END IF;
6540: END IF;
6541: --
6542: IF (l_debug <> -1) THEN
6543: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6546: END IF;
6547: --
6540: END IF;
6541: --
6542: IF (l_debug <> -1) THEN
6543: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6546: END IF;
6547: --
6548: IF b_Match THEN
6541: --
6542: IF (l_debug <> -1) THEN
6543: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6546: END IF;
6547: --
6548: IF b_Match THEN
6549: IF x_Group_rec.match_across_rec.industry_attribute15 = 'Y' THEN
6554: END IF;
6555: END IF;
6556: --
6557: IF (l_debug <> -1) THEN
6558: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6561: END IF;
6562: --
6555: END IF;
6556: --
6557: IF (l_debug <> -1) THEN
6558: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6561: END IF;
6562: --
6563: IF b_Match THEN
6556: --
6557: IF (l_debug <> -1) THEN
6558: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6561: END IF;
6562: --
6563: IF b_Match THEN
6564: IF x_Group_rec.match_across_rec.attribute1 = 'Y' THEN
6569: END IF;
6570: END IF;
6571: --
6572: IF (l_debug <> -1) THEN
6573: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6575: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6576: END IF;
6577: --
6570: END IF;
6571: --
6572: IF (l_debug <> -1) THEN
6573: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6575: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6576: END IF;
6577: --
6578: IF b_Match THEN
6571: --
6572: IF (l_debug <> -1) THEN
6573: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6575: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6576: END IF;
6577: --
6578: IF b_Match THEN
6579: IF x_Group_rec.match_across_rec.attribute2 = 'Y' THEN
6584: END IF;
6585: END IF;
6586: --
6587: IF (l_debug <> -1) THEN
6588: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6590: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6591: END IF;
6592: --
6585: END IF;
6586: --
6587: IF (l_debug <> -1) THEN
6588: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6590: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6591: END IF;
6592: --
6593: IF b_Match THEN
6586: --
6587: IF (l_debug <> -1) THEN
6588: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6590: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6591: END IF;
6592: --
6593: IF b_Match THEN
6594: IF x_Group_rec.match_across_rec.attribute3 = 'Y' THEN
6599: END IF;
6600: END IF;
6601: --
6602: IF (l_debug <> -1) THEN
6603: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6606: END IF;
6607: --
6600: END IF;
6601: --
6602: IF (l_debug <> -1) THEN
6603: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6606: END IF;
6607: --
6608: IF b_Match THEN
6601: --
6602: IF (l_debug <> -1) THEN
6603: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
6605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6606: END IF;
6607: --
6608: IF b_Match THEN
6609: IF x_Group_rec.match_across_rec.attribute4 = 'Y' THEN
6614: END IF;
6615: END IF;
6616: --
6617: IF (l_debug <> -1) THEN
6618: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6621: END IF;
6622: --
6615: END IF;
6616: --
6617: IF (l_debug <> -1) THEN
6618: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6621: END IF;
6622: --
6623: IF b_Match THEN
6616: --
6617: IF (l_debug <> -1) THEN
6618: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
6620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6621: END IF;
6622: --
6623: IF b_Match THEN
6624: IF x_Group_rec.match_across_rec.attribute5 = 'Y' THEN
6629: END IF;
6630: END IF;
6631: --
6632: IF (l_debug <> -1) THEN
6633: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6634: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6636: END IF;
6637: --
6630: END IF;
6631: --
6632: IF (l_debug <> -1) THEN
6633: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6634: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6636: END IF;
6637: --
6638: IF b_Match THEN
6631: --
6632: IF (l_debug <> -1) THEN
6633: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6634: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
6635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6636: END IF;
6637: --
6638: IF b_Match THEN
6639: IF x_Group_rec.match_across_rec.attribute6 = 'Y' THEN
6644: END IF;
6645: END IF;
6646: --
6647: IF (l_debug <> -1) THEN
6648: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6649: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6651: END IF;
6652: --
6645: END IF;
6646: --
6647: IF (l_debug <> -1) THEN
6648: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6649: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6651: END IF;
6652: --
6653: IF b_Match THEN
6646: --
6647: IF (l_debug <> -1) THEN
6648: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6649: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
6650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6651: END IF;
6652: --
6653: IF b_Match THEN
6654: IF x_Group_rec.match_across_rec.attribute7 = 'Y' THEN
6659: END IF;
6660: END IF;
6661: --
6662: IF (l_debug <> -1) THEN
6663: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6664: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6665: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6666: END IF;
6667: --
6660: END IF;
6661: --
6662: IF (l_debug <> -1) THEN
6663: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6664: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6665: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6666: END IF;
6667: --
6668: IF b_Match THEN
6661: --
6662: IF (l_debug <> -1) THEN
6663: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6664: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
6665: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6666: END IF;
6667: --
6668: IF b_Match THEN
6669: IF x_Group_rec.match_across_rec.attribute8 = 'Y' THEN
6674: END IF;
6675: END IF;
6676: --
6677: IF (l_debug <> -1) THEN
6678: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6679: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6681: END IF;
6682: --
6675: END IF;
6676: --
6677: IF (l_debug <> -1) THEN
6678: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6679: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6681: END IF;
6682: --
6683: IF b_Match THEN
6676: --
6677: IF (l_debug <> -1) THEN
6678: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6679: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
6680: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6681: END IF;
6682: --
6683: IF b_Match THEN
6684: IF x_Group_rec.match_across_rec.attribute9 = 'Y' THEN
6689: END IF;
6690: END IF;
6691: --
6692: IF (l_debug <> -1) THEN
6693: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6694: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6696: END IF;
6697: --
6690: END IF;
6691: --
6692: IF (l_debug <> -1) THEN
6693: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6694: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6696: END IF;
6697: --
6698: IF b_Match THEN
6691: --
6692: IF (l_debug <> -1) THEN
6693: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6694: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
6695: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6696: END IF;
6697: --
6698: IF b_Match THEN
6699: IF x_Group_rec.match_across_rec.attribute10 = 'Y' THEN
6704: END IF;
6705: END IF;
6706: --
6707: IF (l_debug <> -1) THEN
6708: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6709: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6711: END IF;
6712: --
6705: END IF;
6706: --
6707: IF (l_debug <> -1) THEN
6708: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6709: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6711: END IF;
6712: --
6713: IF b_Match THEN
6706: --
6707: IF (l_debug <> -1) THEN
6708: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6709: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
6710: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6711: END IF;
6712: --
6713: IF b_Match THEN
6714: IF x_Group_rec.match_across_rec.attribute11 = 'Y' THEN
6719: END IF;
6720: END IF;
6721: --
6722: IF (l_debug <> -1) THEN
6723: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6724: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6726: END IF;
6727: --
6720: END IF;
6721: --
6722: IF (l_debug <> -1) THEN
6723: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6724: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6726: END IF;
6727: --
6728: IF b_Match THEN
6721: --
6722: IF (l_debug <> -1) THEN
6723: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6724: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
6725: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6726: END IF;
6727: --
6728: IF b_Match THEN
6729: IF x_Group_rec.match_across_rec.attribute12 = 'Y' THEN
6734: END IF;
6735: END IF;
6736: --
6737: IF (l_debug <> -1) THEN
6738: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6739: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6740: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6741: END IF;
6742: --
6735: END IF;
6736: --
6737: IF (l_debug <> -1) THEN
6738: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6739: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6740: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6741: END IF;
6742: --
6743: IF b_Match THEN
6736: --
6737: IF (l_debug <> -1) THEN
6738: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6739: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
6740: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6741: END IF;
6742: --
6743: IF b_Match THEN
6744: IF x_Group_rec.match_across_rec.attribute13 = 'Y' THEN
6749: END IF;
6750: END IF;
6751: --
6752: IF (l_debug <> -1) THEN
6753: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6754: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6755: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6756: END IF;
6757: --
6750: END IF;
6751: --
6752: IF (l_debug <> -1) THEN
6753: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6754: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6755: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6756: END IF;
6757: --
6758: IF b_Match THEN
6751: --
6752: IF (l_debug <> -1) THEN
6753: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6754: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
6755: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6756: END IF;
6757: --
6758: IF b_Match THEN
6759: IF x_Group_rec.match_across_rec.attribute14 = 'Y' THEN
6764: END IF;
6765: END IF;
6766: --
6767: IF (l_debug <> -1) THEN
6768: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6769: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6771: END IF;
6772: --
6765: END IF;
6766: --
6767: IF (l_debug <> -1) THEN
6768: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6769: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6771: END IF;
6772: --
6773: IF b_Match THEN
6766: --
6767: IF (l_debug <> -1) THEN
6768: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6769: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
6770: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6771: END IF;
6772: --
6773: IF b_Match THEN
6774: IF x_Group_rec.match_across_rec.attribute15 = 'Y' THEN
6779: END IF;
6780: END IF;
6781: --
6782: IF (l_debug <> -1) THEN
6783: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6784: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6786: END IF;
6787: --
6780: END IF;
6781: --
6782: IF (l_debug <> -1) THEN
6783: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6784: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6786: END IF;
6787: --
6788: END IF;
6781: --
6782: IF (l_debug <> -1) THEN
6783: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6784: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6785: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6786: END IF;
6787: --
6788: END IF;
6789: --
6800: --}
6801: END IF;
6802: --
6803: IF (l_debug <> -1) THEN
6804: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
6805: rlm_core_sv.dpop(k_SDEBUG);
6806: END IF;
6807: --
6808: RETURN(b_Match);
6801: END IF;
6802: --
6803: IF (l_debug <> -1) THEN
6804: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
6805: rlm_core_sv.dpop(k_SDEBUG);
6806: END IF;
6807: --
6808: RETURN(b_Match);
6809: --
6811: WHEN OTHERS THEN
6812: rlm_message_sv.sql_error('rlm_rd_sv.MatchReconcile',x_progress);
6813: --
6814: IF (l_debug <> -1) THEN
6815: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6816: END IF;
6817: --
6818: raise;
6819:
6837: BEGIN
6838: /*Bug 2263253 : Reverted the modifications done under bug 2194938 */
6839: --
6840: IF (l_debug <> -1) THEN
6841: rlm_core_sv.dpush(k_SDEBUG,'StoreReconcile');
6842: rlm_core_sv.dlog(k_DEBUG,'Quantity to be reconciled', x_Quantity);
6843: END IF;
6844: --
6845: IF MatchReconcile(x_Group_rec, x_Key_rec.dem_rec, v_Index) THEN
6838: /*Bug 2263253 : Reverted the modifications done under bug 2194938 */
6839: --
6840: IF (l_debug <> -1) THEN
6841: rlm_core_sv.dpush(k_SDEBUG,'StoreReconcile');
6842: rlm_core_sv.dlog(k_DEBUG,'Quantity to be reconciled', x_Quantity);
6843: END IF;
6844: --
6845: IF MatchReconcile(x_Group_rec, x_Key_rec.dem_rec, v_Index) THEN
6846: --
6847: g_Reconcile_tab(v_Index).ordered_quantity:=
6848: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + x_Quantity;
6849: --
6850: IF (l_debug <> -1) THEN
6851: rlm_core_sv.dlog(k_DEBUG,' Match Quantity ', g_Reconcile_tab(v_Index).ordered_quantity);
6852: END IF;
6853: --
6854: ELSE
6855: --
6868: --
6869: END IF;
6870: --
6871: IF (l_debug <> -1) THEN
6872: rlm_core_sv.dlog(k_DEBUG,' New Line Quantity ', g_Reconcile_tab(g_Reconcile_tab.COUNT).ordered_quantity);
6873: END IF;
6874: --
6875: END IF;
6876: --
6874: --
6875: END IF;
6876: --
6877: IF (l_debug <> -1) THEN
6878: rlm_core_sv.dpop(k_SDEBUG);
6879: END IF;
6880:
6881: EXCEPTION
6882: WHEN OTHERS THEN
6882: WHEN OTHERS THEN
6883: rlm_message_sv.sql_error('rlm_rd_sv.StoreReconcile',x_progress);
6884: --
6885: IF (l_debug <> -1) THEN
6886: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6887: END IF;
6888: --
6889: raise;
6890:
6906:
6907: BEGIN
6908: --
6909: IF (l_debug <> -1) THEN
6910: rlm_core_sv.dpush(k_SDEBUG,'Reconcile');
6911: END IF;
6912: --
6913: IF MatchReconcile(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
6914: --
6912: --
6913: IF MatchReconcile(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
6914: --
6915: IF (l_debug <> -1) THEN
6916: rlm_core_sv.dlog(k_DEBUG,'v_Index',v_Index);
6917: END IF;
6918: --
6919: --start of bug 4223359
6920: --
6921: IF NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) < 0 THEN
6922: --
6923: IF (l_debug <> -1) THEN
6924: --
6925: rlm_core_sv.dlog(k_DEBUG,'ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
6926: rlm_core_sv.dpop(k_SDEBUG);
6927: --
6928: END IF;
6929: --
6922: --
6923: IF (l_debug <> -1) THEN
6924: --
6925: rlm_core_sv.dlog(k_DEBUG,'ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
6926: rlm_core_sv.dpop(k_SDEBUG);
6927: --
6928: END IF;
6929: --
6930: return;
6940: ELSE
6941: --
6942: IF (l_debug <> -1) THEN
6943: --
6944: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6945: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6946: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6947: g_Reconcile_tab(v_Index).ordered_quantity);
6948: --
6941: --
6942: IF (l_debug <> -1) THEN
6943: --
6944: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6945: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6946: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6947: g_Reconcile_tab(v_Index).ordered_quantity);
6948: --
6949: END IF;
6942: IF (l_debug <> -1) THEN
6943: --
6944: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6945: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6946: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6947: g_Reconcile_tab(v_Index).ordered_quantity);
6948: --
6949: END IF;
6950: --
6956: --
6957: --end of bug 4223359
6958: --
6959: IF (l_debug <> -1) THEN
6960: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
6961: END IF;
6962: --
6963: END IF;
6964: --
6962: --
6963: END IF;
6964: --
6965: IF (l_debug <> -1) THEN
6966: rlm_core_sv.dpop(k_SDEBUG);
6967: END IF;
6968: --
6969: EXCEPTION
6970: WHEN OTHERS THEN
6970: WHEN OTHERS THEN
6971: rlm_message_sv.sql_error('rlm_rd_sv.Reconcile',x_progress);
6972: --
6973: IF (l_debug <> -1) THEN
6974: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6975: END IF;
6976: --
6977: raise;
6978:
6995:
6996: BEGIN
6997: --
6998: IF (l_debug <> -1) THEN
6999: rlm_core_sv.dpush(k_SDEBUG,'AttributeChange');
7000: END IF;
7001: --
7002: /*checks for an attribute change between dem rec
7003: and req rec. */
7194: END IF;
7195:
7196: IF b_Change THEN
7197: IF (l_debug <> -1) THEN
7198: rlm_core_sv.dpop(k_SDEBUG, 'true');
7199: END IF;
7200: ELSE
7201: --
7202: IF (l_debug <> -1) THEN
7199: END IF;
7200: ELSE
7201: --
7202: IF (l_debug <> -1) THEN
7203: rlm_core_sv.dpop(k_SDEBUG, 'false');
7204: END IF;
7205: --
7206: END IF;
7207:
7211: WHEN OTHERS THEN
7212: rlm_message_sv.sql_error('rlm_rd_sv.AttributeChange',x_progress);
7213: --
7214: IF (l_debug <> -1) THEN
7215: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
7216: END IF;
7217: --
7218: raise;
7219:
7259:
7260: BEGIN
7261: --
7262: IF (l_debug <> -1) THEN
7263: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7260: BEGIN
7261: --
7262: IF (l_debug <> -1) THEN
7263: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7261: --
7262: IF (l_debug <> -1) THEN
7263: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7262: IF (l_debug <> -1) THEN
7263: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7270: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7263: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7270: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7271: END IF;
7264: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7270: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7271: END IF;
7272: --
7265: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7270: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7271: END IF;
7272: --
7273: IF x_Group_rec.disposition_code IN (k_CANCEL_ALL, k_CANCEL_AFTER_N_DAYS) THEN
7266: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7267: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7268: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7269: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7270: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7271: END IF;
7272: --
7273: IF x_Group_rec.disposition_code IN (k_CANCEL_ALL, k_CANCEL_AFTER_N_DAYS) THEN
7274: --
7276: --
7277: v_Key_rec.oe_line_id := c_PreHorizonDisp_rec.line_id;
7278: --
7279: IF (l_debug <> -1) THEN
7280: rlm_core_sv.dlog(k_DEBUG,'c_PreHorizonDisp_rec.line_id',
7281: c_PreHorizonDisp_rec.line_id);
7282: END IF;
7283: --
7284: GetDemand(v_Key_rec, x_Group_rec);
7308: x_Token2 => 'SCHEDTYPE',
7309: x_value2 => c_PreHorizonDisp_rec.rla_schedule_type_code );
7310: --
7311: IF (l_debug <> -1) THEN
7312: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
7313: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
7314: END IF;
7315: --
7316: END IF;
7309: x_value2 => c_PreHorizonDisp_rec.rla_schedule_type_code );
7310: --
7311: IF (l_debug <> -1) THEN
7312: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
7313: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
7314: END IF;
7315: --
7316: END IF;
7317: --
7325: --
7326: END IF;
7327: --
7328: IF (l_debug <> -1) THEN
7329: rlm_core_sv.dpop(k_SDEBUG);
7330: END IF;
7331: --
7332: EXCEPTION
7333:
7333:
7334: WHEN e_group_error THEN
7335: --
7336: IF (l_debug <> -1) THEN
7337: rlm_core_sv.dlog(k_DEBUG,'group error');
7338: rlm_core_sv.dpop(k_SDEBUG);
7339: END IF;
7340: --
7341: raise e_group_error;
7334: WHEN e_group_error THEN
7335: --
7336: IF (l_debug <> -1) THEN
7337: rlm_core_sv.dlog(k_DEBUG,'group error');
7338: rlm_core_sv.dpop(k_SDEBUG);
7339: END IF;
7340: --
7341: raise e_group_error;
7342:
7343: WHEN OTHERS THEN
7344: rlm_message_sv.sql_error('rlm_rd_sv.ProcessPreHorizonATS',x_progress);
7345: --
7346: IF (l_debug <> -1) THEN
7347: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
7348: END IF;
7349: --
7350: raise;
7351:
7509: --
7510: BEGIN
7511: --
7512: IF (l_debug <> -1) THEN
7513: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7510: BEGIN
7511: --
7512: IF (l_debug <> -1) THEN
7513: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7511: --
7512: IF (l_debug <> -1) THEN
7513: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7512: IF (l_debug <> -1) THEN
7513: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7520: x_Group_rec.ship_to_org_id);
7513: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7514: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7520: x_Group_rec.ship_to_org_id);
7521: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7515: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7516: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7520: x_Group_rec.ship_to_org_id);
7521: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7522: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7523: x_Group_rec.schedule_type_two);
7517: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7520: x_Group_rec.ship_to_org_id);
7521: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7522: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7523: x_Group_rec.schedule_type_two);
7524: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7525: x_Group_rec.schedule_type_three);
7518: x_Group_rec.inventory_item_id);
7519: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7520: x_Group_rec.ship_to_org_id);
7521: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7522: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7523: x_Group_rec.schedule_type_two);
7524: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7525: x_Group_rec.schedule_type_three);
7526: END IF;
7520: x_Group_rec.ship_to_org_id);
7521: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7522: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7523: x_Group_rec.schedule_type_two);
7524: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7525: x_Group_rec.schedule_type_three);
7526: END IF;
7527: --
7528: /* We need to initialize the consume tab before the oldrec because the
7550: v_NATS_start_date := x_Sched_rec.sched_horizon_start_date;
7551: END IF;
7552:
7553: IF (l_debug <> -1) THEN
7554: rlm_core_sv.dlog(k_DEBUG,'x_ATS_start_date', v_ATS_start_date);
7555: rlm_core_sv.dlog(k_DEBUG,'x_NATS_start_date', v_NATS_start_date);
7556: END IF;
7557:
7558: OPEN c_OldDemand(v_ATS_start_date , v_NATS_start_date);
7551: END IF;
7552:
7553: IF (l_debug <> -1) THEN
7554: rlm_core_sv.dlog(k_DEBUG,'x_ATS_start_date', v_ATS_start_date);
7555: rlm_core_sv.dlog(k_DEBUG,'x_NATS_start_date', v_NATS_start_date);
7556: END IF;
7557:
7558: OPEN c_OldDemand(v_ATS_start_date , v_NATS_start_date);
7559: --End of FP Bug 3933822 changes --jckwok
7571: END IF;
7572:
7573: --
7574: IF (l_debug <> -1) THEN
7575: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7576: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7577: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7578: c_OldDemand_rec.schedule_hierarchy);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7572:
7573: --
7574: IF (l_debug <> -1) THEN
7575: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7576: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7577: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7578: c_OldDemand_rec.schedule_hierarchy);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7580: c_OldDemand_rec.end_date_time);
7573: --
7574: IF (l_debug <> -1) THEN
7575: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7576: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7577: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7578: c_OldDemand_rec.schedule_hierarchy);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7580: c_OldDemand_rec.end_date_time);
7581: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7575: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7576: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7577: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7578: c_OldDemand_rec.schedule_hierarchy);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7580: c_OldDemand_rec.end_date_time);
7581: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7582: c_OldDemand_rec.schedule_ship_date);
7583: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7577: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7578: c_OldDemand_rec.schedule_hierarchy);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7580: c_OldDemand_rec.end_date_time);
7581: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7582: c_OldDemand_rec.schedule_ship_date);
7583: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7584: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7585: c_OldDemand_rec.rla_schedule_type_code);
7579: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7580: c_OldDemand_rec.end_date_time);
7581: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7582: c_OldDemand_rec.schedule_ship_date);
7583: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7584: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7585: c_OldDemand_rec.rla_schedule_type_code);
7586: END IF;
7587:
7580: c_OldDemand_rec.end_date_time);
7581: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7582: c_OldDemand_rec.schedule_ship_date);
7583: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7584: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7585: c_OldDemand_rec.rla_schedule_type_code);
7586: END IF;
7587:
7588: --
7603: AND customer_item_id = x_Group_rec.customer_item_id
7604: AND inventory_item_id= x_Group_rec.inventory_item_id
7605: AND order_header_id= x_Group_rec.order_header_id
7606: AND item_detail_subtype = c_OldDemand_rec.demand_bucket_type_code
7607: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
7608: rlm_core_sv.k_PS_FROZEN_FIRM)
7609: --bug 2031077
7610: --AND NVL(invoice_to_org_id, k_NNULL) =
7611: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
7604: AND inventory_item_id= x_Group_rec.inventory_item_id
7605: AND order_header_id= x_Group_rec.order_header_id
7606: AND item_detail_subtype = c_OldDemand_rec.demand_bucket_type_code
7607: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
7608: rlm_core_sv.k_PS_FROZEN_FIRM)
7609: --bug 2031077
7610: --AND NVL(invoice_to_org_id, k_NNULL) =
7611: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
7612: -- bug 4502559
7885: --
7886: FETCH c_NewReq_ref INTO v_newref_line_id, v_newref_qty;
7887: --
7888: IF (l_debug <> -1) THEN
7889: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7890: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7891: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7892: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7893: END IF;
7886: FETCH c_NewReq_ref INTO v_newref_line_id, v_newref_qty;
7887: --
7888: IF (l_debug <> -1) THEN
7889: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7890: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7891: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7892: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7893: END IF;
7894: --
7887: --
7888: IF (l_debug <> -1) THEN
7889: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7890: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7891: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7892: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7893: END IF;
7894: --
7895: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7888: IF (l_debug <> -1) THEN
7889: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7890: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7891: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7892: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7893: END IF;
7894: --
7895: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7896: --
7894: --
7895: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7896: --
7897: IF (l_debug <> -1) THEN
7898: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
7899: x_Sched_rec.sched_horizon_end_date);
7900: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7901: c_OldDemand_rec.end_date_time);
7902: END IF;
7896: --
7897: IF (l_debug <> -1) THEN
7898: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
7899: x_Sched_rec.sched_horizon_end_date);
7900: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7901: c_OldDemand_rec.end_date_time);
7902: END IF;
7903: --
7904: --pdue
7909: --Bugfix 10053830 End
7910: AND x_Sched_rec.schedule_purpose <> k_ADD THEN
7911: --
7912: IF (l_debug <> -1) THEN
7913: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7914: c_OldDemand_rec.line_id);
7915: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7916: c_OldDemand_rec.request_date);
7917: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7911: --
7912: IF (l_debug <> -1) THEN
7913: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7914: c_OldDemand_rec.line_id);
7915: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7916: c_OldDemand_rec.request_date);
7917: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7918: c_OldDemand_rec.schedule_ship_date);
7919: END IF;
7913: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7914: c_OldDemand_rec.line_id);
7915: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7916: c_OldDemand_rec.request_date);
7917: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7918: c_OldDemand_rec.schedule_ship_date);
7919: END IF;
7920: --
7921: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
7936: x_ScheduleLineId => NULL,
7937: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
7938: x_OrderLineId => c_OldDemand_rec.line_id,
7939: x_Token1 => 'LINE',
7940: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7941: x_Token2 => 'ORDER',
7942: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7943: x_Token3 => 'QUANTITY',
7944: x_value3 => c_OldDemand_rec.ordered_quantity,
7938: x_OrderLineId => c_OldDemand_rec.line_id,
7939: x_Token1 => 'LINE',
7940: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7941: x_Token2 => 'ORDER',
7942: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7943: x_Token3 => 'QUANTITY',
7944: x_value3 => c_OldDemand_rec.ordered_quantity,
7945: x_Token4 => 'CUSTITEM',
7946: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7942: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7943: x_Token3 => 'QUANTITY',
7944: x_value3 => c_OldDemand_rec.ordered_quantity,
7945: x_Token4 => 'CUSTITEM',
7946: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7947: x_Token5 => 'REQ_DATE',
7948: x_value5 => c_OldDemand_rec.request_date,
7949: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
7950: x_value6 => v_del_line_qty, --Bugfix 6159269
7955: x_Token8 => 'MATCH_ATTR',
7956: x_value8 => v_MatchAttrTxt);
7957: --
7958: IF (l_debug <> -1) THEN
7959: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE_SEQ',
7960: c_OldDemand_rec.line_id);
7961: END IF;
7962: --
7963: ELSE
7971: x_ScheduleLineId => NULL,
7972: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
7973: x_OrderLineId => c_OldDemand_rec.line_id,
7974: x_Token1 => 'LINE',
7975: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7976: x_Token2 => 'ORDER',
7977: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7978: x_Token3 => 'QUANTITY',
7979: x_value3 => c_OldDemand_rec.ordered_quantity,
7973: x_OrderLineId => c_OldDemand_rec.line_id,
7974: x_Token1 => 'LINE',
7975: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7976: x_Token2 => 'ORDER',
7977: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7978: x_Token3 => 'QUANTITY',
7979: x_value3 => c_OldDemand_rec.ordered_quantity,
7980: x_Token4 => 'CUSTITEM',
7981: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7977: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7978: x_Token3 => 'QUANTITY',
7979: x_value3 => c_OldDemand_rec.ordered_quantity,
7980: x_Token4 => 'CUSTITEM',
7981: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7982: x_Token5 => 'REQ_DATE',
7983: x_value5 => c_OldDemand_rec.request_date,
7984: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
7985: x_value6 => v_del_line_qty, --Bugfix 6159269
7986: x_Token7 => 'MATCH_ATTR',
7987: x_value7 => v_MatchAttrTxt);
7988: --
7989: IF (l_debug <> -1) THEN
7990: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE',
7991: c_OldDemand_rec.line_id);
7992: END IF;
7993: --
7994: END IF;
7999: x_Sched_rec.schedule_purpose <> k_ADD THEN
8000: --bug 1680657
8001: --
8002: IF (l_debug <> -1) THEN
8003: rlm_core_sv.dlog(k_DEBUG,'in no consume delete ');
8004: END IF;
8005: --
8006: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
8007: --
8012: --
8013: ELSE
8014: --
8015: IF (l_debug <> -1) THEN
8016: rlm_core_sv.dlog(k_DEBUG,'In consume -- c_OldDemand_rec.end_date_time',
8017: c_OldDemand_rec.end_date_time);
8018: END IF;
8019: --
8020: /* Consume demand -- We may need to loop through the new demand
8059: <= c_OldDemand_rec.demand_bucket_type_code
8060: -- AND request_date BETWEEN c_OldDemand_rec.request_date --Bugfix 10277088
8061: AND to_date(industry_attribute2,'RRRR/MM/DD HH24:MI:SS') BETWEEN to_date(c_OldDemand_rec.industry_attribute2,'RRRR/MM/DD HH24:MI:SS') --Bugfix 10277088
8062: AND c_OldDemand_rec.end_date_time
8063: AND process_status = rlm_core_sv.k_PS_AVAILABLE
8064: --bug 2031077
8065: --AND NVL(invoice_to_org_id, k_NNULL) =
8066: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
8067: AND NVL(intmed_ship_to_org_id, k_NNULL) =
8339: --
8340: EXIT WHEN c_consume_ref%NOTFOUND;
8341: --
8342: IF (l_debug <> -1) THEN
8343: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_line_id' , v_line_id);
8344: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_qty', v_qty);
8345: END IF;
8346: --
8347: IF isLineConsumable(v_consume_line_tab,v_line_id, v_index) THEN
8340: EXIT WHEN c_consume_ref%NOTFOUND;
8341: --
8342: IF (l_debug <> -1) THEN
8343: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_line_id' , v_line_id);
8344: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_qty', v_qty);
8345: END IF;
8346: --
8347: IF isLineConsumable(v_consume_line_tab,v_line_id, v_index) THEN
8348: --
8351: IF c_OldDemand_rec.ordered_quantity >
8352: (v_consume_quantity + v_qty) THEN
8353: --
8354: IF (l_debug <> -1) THEN
8355: rlm_core_sv.dlog(k_DEBUG,'complete consumtion of qty' , v_qty);
8356: END IF;
8357: --
8358: v_consume_line_tab(j).quantity := v_qty;
8359: v_consume_line_tab(j).line_id := v_line_id;
8359: v_consume_line_tab(j).line_id := v_line_id;
8360: v_consume_quantity := v_consume_quantity + v_qty;
8361: --
8362: IF (l_debug <> -1) THEN
8363: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',
8364: v_consume_quantity);
8365: END IF;
8366: --
8367: ELSE
8368: --
8369: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8370: --
8371: IF (l_debug <> -1) THEN
8372: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of qty', v_qty);
8373: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of line',v_line_id);
8374: END IF;
8375: --
8376: v_consume_line_tab(j).quantity := v_qty;
8369: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8370: --
8371: IF (l_debug <> -1) THEN
8372: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of qty', v_qty);
8373: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of line',v_line_id);
8374: END IF;
8375: --
8376: v_consume_line_tab(j).quantity := v_qty;
8377: v_consume_line_tab(j).line_id := v_line_id;
8379: --
8380: END IF;
8381: --
8382: IF (l_debug <> -1) THEN
8383: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).line_id',
8384: v_consume_line_tab(j).line_id);
8385: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).quantity',
8386: v_consume_line_tab(j).quantity);
8387: END IF;
8381: --
8382: IF (l_debug <> -1) THEN
8383: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).line_id',
8384: v_consume_line_tab(j).line_id);
8385: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).quantity',
8386: v_consume_line_tab(j).quantity);
8387: END IF;
8388: --
8389: ELSE
8392: has been partially consumed in which case we need to consume
8393: the remaining qty */
8394: --
8395: IF (l_debug <> -1) THEN
8396: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8397: v_consume_line_tab(v_Index).line_id);
8398: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8399: v_consume_line_tab(v_Index).quantity);
8400: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8394: --
8395: IF (l_debug <> -1) THEN
8396: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8397: v_consume_line_tab(v_Index).line_id);
8398: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8399: v_consume_line_tab(v_Index).quantity);
8400: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8401: END IF;
8402: --
8396: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8397: v_consume_line_tab(v_Index).line_id);
8398: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8399: v_consume_line_tab(v_Index).quantity);
8400: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8401: END IF;
8402: --
8403: IF v_consume_line_tab(v_Index).quantity <> v_qty THEN
8404: --
8406: we need to take into account only the difference between the
8407: two quantities */
8408: --
8409: IF (l_debug <> -1) THEN
8410: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line', v_line_id);
8411: END IF;
8412: --
8413: v_qty := v_qty - v_consume_line_tab(v_Index).quantity;
8414: --
8412: --
8413: v_qty := v_qty - v_consume_line_tab(v_Index).quantity;
8414: --
8415: IF (l_debug <> -1) THEN
8416: rlm_core_sv.dlog(k_DEBUG,'v_qty',v_qty);
8417: END IF;
8418: --
8419: IF c_OldDemand_rec.ordered_quantity >
8420: (v_consume_quantity + v_qty) THEN
8419: IF c_OldDemand_rec.ordered_quantity >
8420: (v_consume_quantity + v_qty) THEN
8421: --
8422: IF (l_debug <> -1) THEN
8423: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8424: completely', v_line_id);
8425: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8426: completely qty ', v_qty);
8427: END IF;
8421: --
8422: IF (l_debug <> -1) THEN
8423: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8424: completely', v_line_id);
8425: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8426: completely qty ', v_qty);
8427: END IF;
8428: --
8429: v_consume_line_tab(v_index).quantity :=
8434: --
8435: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8436: --
8437: IF (l_debug <> -1) THEN
8438: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8439: again partially',v_line_id);
8440: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8441: again partially qty ', v_qty);
8442: END IF;
8436: --
8437: IF (l_debug <> -1) THEN
8438: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8439: again partially',v_line_id);
8440: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8441: again partially qty ', v_qty);
8442: END IF;
8443: --
8444: v_consume_line_tab(v_index).quantity :=
8453: --
8454: END LOOP;
8455: --
8456: IF (l_debug <> -1) THEN
8457: rlm_core_sv.dlog(k_DEBUG,'Total quantity to be consumed ',
8458: v_consume_quantity);
8459: END IF;
8460: --
8461: IF c_consume_ref%ROWCOUNT = 0 THEN
8463: -- If the rowcount is = 0 means that there are no lines to be consumed
8464: -- so the old line needs to be deleted
8465: --
8466: IF (l_debug <> -1) THEN
8467: rlm_core_sv.dlog(k_DEBUG,'in rowcount = 0');
8468: rlm_core_sv.dlog(k_DEBUG,'No lines came into the
8469: schedule to be consumed so keep line as it is');
8470: END IF;
8471: --
8464: -- so the old line needs to be deleted
8465: --
8466: IF (l_debug <> -1) THEN
8467: rlm_core_sv.dlog(k_DEBUG,'in rowcount = 0');
8468: rlm_core_sv.dlog(k_DEBUG,'No lines came into the
8469: schedule to be consumed so keep line as it is');
8470: END IF;
8471: --
8472: ELSIF v_consume_quantity > 0 THEN
8473: --
8474: v_Key_rec.oe_line_id := c_OldDemand_rec.line_id;
8475: --
8476: IF (l_debug <> -1) THEN
8477: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',v_Key_rec.oe_line_id);
8478: END IF;
8479: --
8480: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
8481: --
8483: --
8484: v_quantity := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8485: --
8486: IF (l_debug <> -1) THEN
8487: rlm_core_sv.dlog(k_DEBUG,'v_quantity',v_quantity);
8488: END IF;
8489: --
8490: IF v_quantity = 0 THEN
8491: --
8506: --Bugfix 10053830 End
8507: AND NOT ProcessConstraint(v_Key_rec,v_Qty_rec,k_UPDATE,v_Quantity) THEN
8508: --
8509: IF (l_debug <> -1) THEN
8510: rlm_core_sv.dlog(k_DEBUG,'v_quantity',v_quantity);
8511: END IF;
8512: --
8513: --global_atp
8514: UpdateRequirement(x_Sched_rec, x_Group_rec, v_Key_rec,
8541: v_consume_line_tab(v_Count).line_id := v_Newref_line_id;
8542: v_consume_line_tab(v_Count).quantity := c_OldDemand_rec.ordered_quantity;
8543: --
8544: IF (l_debug <> -1) THEN
8545: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8546: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8547: v_consume_line_tab(v_Count).line_id);
8548: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8549: v_consume_line_tab(v_Count).quantity);
8542: v_consume_line_tab(v_Count).quantity := c_OldDemand_rec.ordered_quantity;
8543: --
8544: IF (l_debug <> -1) THEN
8545: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8546: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8547: v_consume_line_tab(v_Count).line_id);
8548: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8549: v_consume_line_tab(v_Count).quantity);
8550: END IF;
8544: IF (l_debug <> -1) THEN
8545: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8546: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8547: v_consume_line_tab(v_Count).line_id);
8548: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8549: v_consume_line_tab(v_Count).quantity);
8550: END IF;
8551: --
8552: END IF;
8561: FROM oe_order_lines
8562: WHERE line_id = c_OldDemand_rec.line_id;
8563: --
8564: IF (l_debug <> -1) THEN
8565: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8566: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8567: c_OldDemand_rec.rla_schedule_type_code);
8568: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8569: x_Sched_rec.schedule_type);
8562: WHERE line_id = c_OldDemand_rec.line_id;
8563: --
8564: IF (l_debug <> -1) THEN
8565: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8566: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8567: c_OldDemand_rec.rla_schedule_type_code);
8568: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8569: x_Sched_rec.schedule_type);
8570: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8564: IF (l_debug <> -1) THEN
8565: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8566: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8567: c_OldDemand_rec.rla_schedule_type_code);
8568: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8569: x_Sched_rec.schedule_type);
8570: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8571: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8572: END IF;
8566: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8567: c_OldDemand_rec.rla_schedule_type_code);
8568: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8569: x_Sched_rec.schedule_type);
8570: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8571: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8572: END IF;
8573: --
8574: rlm_message_sv.app_error(
8567: c_OldDemand_rec.rla_schedule_type_code);
8568: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8569: x_Sched_rec.schedule_type);
8570: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8571: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8572: END IF;
8573: --
8574: rlm_message_sv.app_error(
8575: x_ExceptionLevel => rlm_message_sv.k_warn_level,
8592: END LOOP;
8593: CLOSE c_OldDemand; --bug 4570658
8594: --
8595: IF (l_debug <> -1) THEN
8596: rlm_core_sv.dpop(k_SDEBUG);
8597: END IF;
8598: --
8599: EXCEPTION
8600:
8600:
8601: WHEN e_group_error THEN
8602: --
8603: IF (l_debug <> -1) THEN
8604: rlm_core_sv.dlog(k_DEBUG,'group error');
8605: rlm_core_sv.dpop(k_SDEBUG);
8606: END IF;
8607: --
8608: raise e_group_error;
8601: WHEN e_group_error THEN
8602: --
8603: IF (l_debug <> -1) THEN
8604: rlm_core_sv.dlog(k_DEBUG,'group error');
8605: rlm_core_sv.dpop(k_SDEBUG);
8606: END IF;
8607: --
8608: raise e_group_error;
8609:
8610: WHEN OTHERS THEN
8611: rlm_message_sv.sql_error('rlm_rd_sv.ProcessOld',x_progress);
8612: --
8613: IF (l_debug <> -1) THEN
8614: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8615: END IF;
8616: --
8617: raise;
8618:
8635:
8636: BEGIN
8637: --
8638: IF (l_debug <> -1) THEN
8639: rlm_core_sv.dpush(k_SDEBUG,'FetchReq');
8640: END IF;
8641: --
8642: FETCH x_Req_Ref INTO
8643: x_oe_line_id,
8728: x_Key_rec.req_rec.blanket_number;
8729:
8730: --
8731: IF (l_debug <> -1) THEN
8732: rlm_core_sv.dlog(k_DEBUG, 'after fetch');
8733: END IF;
8734: --
8735: IF x_Req_ref%NOTFOUND THEN
8736: --
8734: --
8735: IF x_Req_ref%NOTFOUND THEN
8736: --
8737: IF (l_debug <> -1) THEN
8738: rlm_core_sv.dpop(k_SDEBUG, 'false');
8739: END IF;
8740: --
8741: RETURN(FALSE);
8742: --
8742: --
8743: ELSE
8744: --
8745: IF (l_debug <> -1) THEN
8746: rlm_core_sv.dpop(k_SDEBUG, 'true');
8747: END IF;
8748: --
8749: RETURN(TRUE);
8750: --
8754: WHEN OTHERS THEN
8755: rlm_message_sv.sql_error('rlm_rd_sv.FetchReq',x_progress);
8756: --
8757: IF (l_debug <> -1) THEN
8758: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8759: END IF;
8760: --
8761: raise;
8762:
8776:
8777: BEGIN
8778: --
8779: IF (l_debug <> -1) THEN
8780: rlm_core_sv.dpush(k_SDEBUG,'FetchDemand');
8781: END IF;
8782: --
8783: FETCH x_Demand_ref INTO
8784: x_Key_rec.dem_rec.line_id,
8862: --
8863: IF x_Demand_ref%NOTFOUND THEN
8864: --
8865: IF (l_debug <> -1) THEN
8866: rlm_core_sv.dpop(k_SDEBUG, 'false');
8867: END IF;
8868: --
8869: RETURN(FALSE);
8870: --
8870: --
8871: ELSE
8872: --
8873: IF (l_debug <> -1) THEN
8874: rlm_core_sv.dpop(k_SDEBUG, 'true');
8875: END IF;
8876: --
8877: RETURN(TRUE);
8878: --
8882: WHEN OTHERS THEN
8883: rlm_message_sv.sql_error('rlm_rd_sv.FetchDemand',x_progress);
8884: --
8885: IF (l_debug <> -1) THEN
8886: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8887: END IF;
8888: --
8889: raise;
8890:
8905: x_progress VARCHAR2(3) := '010';
8906: BEGIN
8907: --
8908: IF (l_debug <> -1) THEN
8909: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8906: BEGIN
8907: --
8908: IF (l_debug <> -1) THEN
8909: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8914: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8907: --
8908: IF (l_debug <> -1) THEN
8909: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8914: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8915: END IF;
8908: IF (l_debug <> -1) THEN
8909: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8914: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8915: END IF;
8916: --
8909: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8914: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8915: END IF;
8916: --
8917: -- If the given schedule line is less in hierarchy than the oe line
8910: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8911: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8912: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8913: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8914: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8915: END IF;
8916: --
8917: -- If the given schedule line is less in hierarchy than the oe line
8918: -- schedule line then return false else return true
8926: INTO v_cannot_replace
8927: FROM dual;
8928: --
8929: IF (l_debug <> -1) THEN
8930: rlm_core_sv.dlog(k_DEBUG,'v_cannot_replace', v_cannot_replace);
8931: END IF;
8932: --
8933: IF v_cannot_replace <= 0 THEN
8934: --
8932: --
8933: IF v_cannot_replace <= 0 THEN
8934: --
8935: IF (l_debug <> -1) THEN
8936: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
8937: END IF;
8938: --
8939: RETURN TRUE;
8940: --
8940: --
8941: ELSE
8942: --
8943: IF (l_debug <> -1) THEN
8944: rlm_core_sv.dpop(k_SDEBUG, 'false');
8945: END IF;
8946: --
8947: RETURN FALSE;
8948: --
8952: WHEN OTHERS THEN
8953: rlm_message_sv.sql_error('rlm_rd_sv.SchedulePrecedence',x_progress);
8954: --
8955: IF (l_debug <> -1) THEN
8956: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8957: END IF;
8958: --
8959: raise;
8960:
8972: x_progress VARCHAR2(3) := '010';
8973: BEGIN
8974: --
8975: IF (l_debug <> -1) THEN
8976: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8973: BEGIN
8974: --
8975: IF (l_debug <> -1) THEN
8976: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8974: --
8975: IF (l_debug <> -1) THEN
8976: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8975: IF (l_debug <> -1) THEN
8976: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8976: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8984: x_Key_rec.req_rec.item_detail_subtype);
8977: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8978: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8984: x_Key_rec.req_rec.item_detail_subtype);
8985: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8979: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8980: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8984: x_Key_rec.req_rec.item_detail_subtype);
8985: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8986: x_Key_rec.req_rec.invoice_to_org_id);
8987: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8981: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8982: x_Sched_rec.schedule_type);
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8984: x_Key_rec.req_rec.item_detail_subtype);
8985: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8986: x_Key_rec.req_rec.invoice_to_org_id);
8987: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8988: x_Key_rec.req_rec.ship_to_org_id);
8989: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8983: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8984: x_Key_rec.req_rec.item_detail_subtype);
8985: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8986: x_Key_rec.req_rec.invoice_to_org_id);
8987: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8988: x_Key_rec.req_rec.ship_to_org_id);
8989: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8990: x_key_rec.req_rec.intmed_ship_to_org_id);
8991: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8985: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8986: x_Key_rec.req_rec.invoice_to_org_id);
8987: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8988: x_Key_rec.req_rec.ship_to_org_id);
8989: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8990: x_key_rec.req_rec.intmed_ship_to_org_id);
8991: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8992: x_key_rec.req_rec.cust_production_line);
8993: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8987: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8988: x_Key_rec.req_rec.ship_to_org_id);
8989: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8990: x_key_rec.req_rec.intmed_ship_to_org_id);
8991: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8992: x_key_rec.req_rec.cust_production_line);
8993: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8994: x_key_rec.req_rec.cust_production_seq_num);
8995: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8989: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8990: x_key_rec.req_rec.intmed_ship_to_org_id);
8991: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8992: x_key_rec.req_rec.cust_production_line);
8993: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8994: x_key_rec.req_rec.cust_production_seq_num);
8995: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8996: x_key_rec.req_rec.primary_quantity);
8997: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8991: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8992: x_key_rec.req_rec.cust_production_line);
8993: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8994: x_key_rec.req_rec.cust_production_seq_num);
8995: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8996: x_key_rec.req_rec.primary_quantity);
8997: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8998: x_key_rec.req_rec.cust_production_line);
8999: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8993: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8994: x_key_rec.req_rec.cust_production_seq_num);
8995: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8996: x_key_rec.req_rec.primary_quantity);
8997: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8998: x_key_rec.req_rec.cust_production_line);
8999: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9000: x_key_rec.req_rec.primary_quantity);
9001: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8995: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8996: x_key_rec.req_rec.primary_quantity);
8997: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8998: x_key_rec.req_rec.cust_production_line);
8999: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9000: x_key_rec.req_rec.primary_quantity);
9001: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
9002: x_key_rec.req_rec.customer_item_revision);
9003: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8997: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8998: x_key_rec.req_rec.cust_production_line);
8999: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9000: x_key_rec.req_rec.primary_quantity);
9001: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
9002: x_key_rec.req_rec.customer_item_revision);
9003: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
9004: x_key_rec.req_rec.customer_job);
9005: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8999: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9000: x_key_rec.req_rec.primary_quantity);
9001: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
9002: x_key_rec.req_rec.customer_item_revision);
9003: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
9004: x_key_rec.req_rec.customer_job);
9005: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
9006: x_key_rec.req_rec.cust_po_number);
9007: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
9001: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
9002: x_key_rec.req_rec.customer_item_revision);
9003: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
9004: x_key_rec.req_rec.customer_job);
9005: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
9006: x_key_rec.req_rec.cust_po_number);
9007: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
9008: x_key_rec.req_rec.customer_dock_code);
9009: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
9003: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
9004: x_key_rec.req_rec.customer_job);
9005: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
9006: x_key_rec.req_rec.cust_po_number);
9007: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
9008: x_key_rec.req_rec.customer_dock_code);
9009: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
9010: x_key_rec.req_rec.cust_model_serial_number);
9011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
9005: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
9006: x_key_rec.req_rec.cust_po_number);
9007: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
9008: x_key_rec.req_rec.customer_dock_code);
9009: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
9010: x_key_rec.req_rec.cust_model_serial_number);
9011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
9012: x_key_rec.req_rec.request_date);
9013: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
9007: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
9008: x_key_rec.req_rec.customer_dock_code);
9009: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
9010: x_key_rec.req_rec.cust_model_serial_number);
9011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
9012: x_key_rec.req_rec.request_date);
9013: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
9014: x_key_rec.req_rec.schedule_date);
9015: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
9009: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
9010: x_key_rec.req_rec.cust_model_serial_number);
9011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
9012: x_key_rec.req_rec.request_date);
9013: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
9014: x_key_rec.req_rec.schedule_date);
9015: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
9016: x_Sched_rec.schedule_purpose);
9017: END IF;
9011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
9012: x_key_rec.req_rec.request_date);
9013: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
9014: x_key_rec.req_rec.schedule_date);
9015: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
9016: x_Sched_rec.schedule_purpose);
9017: END IF;
9018: --
9019: x_SumOrderedQty := x_SumOrderedQty + x_SumOrderedQtyTmp;
9020: --
9021: x_DemandCount := x_DemandCount + 1;
9022: --
9023: IF (l_debug <> -1) THEN
9024: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
9025: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
9026: rlm_core_sv.dpop(k_SDEBUG);
9027: END IF;
9028: --
9021: x_DemandCount := x_DemandCount + 1;
9022: --
9023: IF (l_debug <> -1) THEN
9024: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
9025: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
9026: rlm_core_sv.dpop(k_SDEBUG);
9027: END IF;
9028: --
9029: EXCEPTION
9022: --
9023: IF (l_debug <> -1) THEN
9024: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
9025: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
9026: rlm_core_sv.dpop(k_SDEBUG);
9027: END IF;
9028: --
9029: EXCEPTION
9030:
9030:
9031: WHEN e_group_error THEN
9032: --
9033: IF (l_debug <> -1) THEN
9034: rlm_core_sv.dlog(k_DEBUG,'group error');
9035: rlm_core_sv.dpop(k_SDEBUG);
9036: END IF;
9037: --
9038: raise e_group_error;
9031: WHEN e_group_error THEN
9032: --
9033: IF (l_debug <> -1) THEN
9034: rlm_core_sv.dlog(k_DEBUG,'group error');
9035: rlm_core_sv.dpop(k_SDEBUG);
9036: END IF;
9037: --
9038: raise e_group_error;
9039:
9040: WHEN OTHERS THEN
9041: rlm_message_sv.sql_error('rlm_rd_sv.CountMatchedDemand',x_progress);
9042: --
9043: IF (l_debug <> -1) THEN
9044: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
9045: END IF;
9046: --
9047: raise;
9048:
9060: x_progress VARCHAR2(3) := '010';
9061: BEGIN
9062: --
9063: IF (l_debug <> -1) THEN
9064: rlm_core_sv.dpush(k_SDEBUG, 'ReconcileAction');
9065: END IF;
9066: --
9067: IF (x_DemandCount > 0) AND (NOT AlreadyUpdated(x_line_id_tab)) THEN
9068: --
9068: --
9069: IF x_Sched_rec.schedule_purpose IN (k_DELETE, k_CANCEL) THEN
9070: --
9071: IF (l_debug <> -1) THEN
9072: rlm_core_sv.dlog(k_DEBUG,'Deleting requirement due to purpose code of '
9073: ,x_Sched_rec.schedule_purpose);
9074: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9075: x_key_rec.req_rec.primary_quantity);
9076: END IF;
9070: --
9071: IF (l_debug <> -1) THEN
9072: rlm_core_sv.dlog(k_DEBUG,'Deleting requirement due to purpose code of '
9073: ,x_Sched_rec.schedule_purpose);
9074: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9075: x_key_rec.req_rec.primary_quantity);
9076: END IF;
9077: --
9078: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty -
9078: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty -
9079: x_key_rec.req_rec.primary_quantity;
9080: --
9081: IF (l_debug <> -1) THEN
9082: rlm_core_sv.dlog(k_DEBUG,'new x_key_rec.req_rec.primary_quantity',
9083: x_key_rec.req_rec.primary_quantity);
9084: END IF;
9085: --
9086: ELSIF x_Sched_rec.schedule_purpose = k_ADD THEN
9085: --
9086: ELSIF x_Sched_rec.schedule_purpose = k_ADD THEN
9087: --
9088: IF (l_debug <> -1) THEN
9089: rlm_core_sv.dlog(k_DEBUG,'Adding requirement due to purpose code of ',
9090: x_Sched_rec.schedule_purpose);
9091: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9092: x_key_rec.req_rec.primary_quantity);
9093: END IF;
9087: --
9088: IF (l_debug <> -1) THEN
9089: rlm_core_sv.dlog(k_DEBUG,'Adding requirement due to purpose code of ',
9090: x_Sched_rec.schedule_purpose);
9091: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
9092: x_key_rec.req_rec.primary_quantity);
9093: END IF;
9094: --
9095: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty +
9095: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty +
9096: x_key_rec.req_rec.primary_quantity;
9097: --
9098: IF (l_debug <> -1) THEN
9099: rlm_core_sv.dlog(k_DEBUG,'new x_key_rec.req_rec.primary_quantity',
9100: x_key_rec.req_rec.primary_quantity);
9101: END IF;
9102: --
9103: END IF;
9109: -- only insert the new requirement
9110: ELSIF x_Sched_rec.schedule_purpose NOT IN (k_DELETE,k_CANCEL) THEN
9111: --
9112: IF (l_debug <> -1) THEN
9113: rlm_core_sv.dlog(k_DEBUG,'insert x_key_rec.req_rec.primary_quantity',
9114: x_key_rec.req_rec.primary_quantity);
9115: END IF;
9116: --
9117: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
9120: --
9121: END IF;
9122: --
9123: IF (l_debug <> -1) THEN
9124: rlm_core_sv.dpop(k_SDEBUG);
9125: END IF;
9126: --
9127: EXCEPTION
9128:
9128:
9129: WHEN e_group_error THEN
9130: --
9131: IF (l_debug <> -1) THEN
9132: rlm_core_sv.dlog(k_DEBUG,'group error');
9133: rlm_core_sv.dpop(k_SDEBUG);
9134: END IF;
9135: --
9136: raise e_group_error;
9129: WHEN e_group_error THEN
9130: --
9131: IF (l_debug <> -1) THEN
9132: rlm_core_sv.dlog(k_DEBUG,'group error');
9133: rlm_core_sv.dpop(k_SDEBUG);
9134: END IF;
9135: --
9136: raise e_group_error;
9137:
9138: WHEN OTHERS THEN
9139: rlm_message_sv.sql_error('rlm_rd_sv.ReconcileAction',x_progress);
9140: --
9141: IF (l_debug <> -1) THEN
9142: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
9143: END IF;
9144: --
9145: raise;
9146:
9194: --
9195: BEGIN
9196: --
9197: IF (l_debug <> -1) THEN
9198: rlm_core_sv.dpush(k_SDEBUG, 'BuildMatchQuery');
9199: rlm_core_sv.dlog(k_DEBUG, 'Disposition Code', x_Group_rec.disposition_code);
9200: END IF;
9201:
9202: v_select_clause :=
9195: BEGIN
9196: --
9197: IF (l_debug <> -1) THEN
9198: rlm_core_sv.dpush(k_SDEBUG, 'BuildMatchQuery');
9199: rlm_core_sv.dlog(k_DEBUG, 'Disposition Code', x_Group_rec.disposition_code);
9200: END IF;
9201:
9202: v_select_clause :=
9203:
9281: ' AND o.inventory_item_id = r.inventory_item_id ' ||
9282: ' AND o.inventory_item_id = :inventory_item_id '||
9283: ' AND r.inventory_item_id = :inventory_item_id ' ||
9284: ' AND o.demand_bucket_type_code = r.item_detail_subtype ' ||
9285: ' AND r.process_status IN ('||rlm_core_sv.k_PS_AVAILABLE||','||rlm_core_sv.k_PS_FROZEN_FIRM||')';
9286: --
9287: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Group_rec.order_header_id;
9288: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Group_rec.order_header_id;
9289: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Sched_rec.header_id;
9994: ' AND r1.industry_attribute15 = :industry_attribute15' ||
9995: ' AND r1.ship_to_org_id = :ship_to_org_id' ||
9996: ' AND r1.customer_item_id = :customer_item_id' ||
9997: ' AND r1.inventory_item_id = :inventory_item_id' ||
9998: ' AND r1.process_status IN ('||rlm_core_sv.k_PS_AVAILABLE||','||rlm_core_sv.k_PS_FROZEN_FIRM||')';
9999: --
10000: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Group_rec.order_header_id;
10001: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Sched_rec.header_id;
10002: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Group_rec.ship_from_org_id;
10046: --
10047: ELSIF x_Group_rec.disposition_code = k_CANCEL_AFTER_N_DAYS THEN
10048: --
10049: v_Date := rlm_dp_sv.g_dsp_start_time - nvl(x_Group_rec.cutoff_days, 0); --Bugfix 10053830
10050: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.cutoff_days', x_Group_rec.cutoff_days);
10051: rlm_core_sv.dlog(k_DEBUG, 'v_Date', v_Date);
10052: --
10053: v_ATSWhere := ' TO_DATE(o.industry_attribute2,''RRRR/MM/DD HH24:MI:SS'') BETWEEN TO_DATE(:sched_horizon_start_date,''RRRR/MM/DD HH24:MI:SS'') AND TO_DATE(:sched_horizon_end_date,''RRRR/MM/DD HH24:MI:SS'') ';
10054: --
10047: ELSIF x_Group_rec.disposition_code = k_CANCEL_AFTER_N_DAYS THEN
10048: --
10049: v_Date := rlm_dp_sv.g_dsp_start_time - nvl(x_Group_rec.cutoff_days, 0); --Bugfix 10053830
10050: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.cutoff_days', x_Group_rec.cutoff_days);
10051: rlm_core_sv.dlog(k_DEBUG, 'v_Date', v_Date);
10052: --
10053: v_ATSWhere := ' TO_DATE(o.industry_attribute2,''RRRR/MM/DD HH24:MI:SS'') BETWEEN TO_DATE(:sched_horizon_start_date,''RRRR/MM/DD HH24:MI:SS'') AND TO_DATE(:sched_horizon_end_date,''RRRR/MM/DD HH24:MI:SS'') ';
10054: --
10055: g_WhereTab1(g_WhereTab1.COUNT+1):= TO_CHAR(TRUNC(v_Date),'RRRR/MM/DD HH24:MI:SS');
10154: v_where_clause2 ||
10155: ' GROUP BY r.line_id ORDER BY line_id';
10156:
10157: IF (l_debug <> -1) THEN
10158: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10155: ' GROUP BY r.line_id ORDER BY line_id';
10156:
10157: IF (l_debug <> -1) THEN
10158: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10156:
10157: IF (l_debug <> -1) THEN
10158: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10157: IF (l_debug <> -1) THEN
10158: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10158: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10159: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10160: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10161: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10162: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10163: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10164: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10165: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10166: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10174: rlm_core_sv.dpop(k_SDEBUG);
10167: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10174: rlm_core_sv.dpop(k_SDEBUG);
10175: END IF;
10168: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10174: rlm_core_sv.dpop(k_SDEBUG);
10175: END IF;
10176: --
10169: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10174: rlm_core_sv.dpop(k_SDEBUG);
10175: END IF;
10176: --
10177:
10170: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
10171: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
10172: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
10173: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10174: rlm_core_sv.dpop(k_SDEBUG);
10175: END IF;
10176: --
10177:
10178: EXCEPTION
10179:
10180: WHEN OTHERS THEN
10181: rlm_message_sv.sql_error('rlm_rd_sv.BuildMatchQuery',x_progress);
10182: IF (l_debug <> -1) THEN
10183: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10184: END IF;
10185: RAISE;
10186:
10187: END;
10230: --
10231: BEGIN
10232: --
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10231: BEGIN
10232: --
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10232: --
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10240: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10240: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10241: END IF;
10234: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10240: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10241: END IF;
10242:
10235: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10240: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10241: END IF;
10242:
10243: IF(UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis) IN ('SHIPPED_LINES', 'PART_SHIP_LINES' )) THEN
10236: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10237: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10238: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10239: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10240: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10241: END IF;
10242:
10243: IF(UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis) IN ('SHIPPED_LINES', 'PART_SHIP_LINES' )) THEN
10244: --
10259: AND sl.qty_type_code = rlm_manage_demand_sv.k_ACTUAL
10260: AND il.org_id = sl.org_id;
10261: --
10262: IF (l_debug <> -1) THEN
10263: rlm_core_sv.dlog(k_DEBUG,'number of lines with qty_type_code ACTUAL: ',v_ActualCount);
10264: END IF;
10265: --
10266: IF (v_ActualCount > 0 ) THEN
10267: --
10274: AND Ship_from_org_id=x_group_rec.ship_from_org_id
10275: AND Ship_to_address_id=x_group_rec.ship_to_address_id;
10276:
10277: IF (l_debug <> -1) THEN
10278: rlm_core_sv.dlog(k_DEBUG, 'v_min_request_date', v_min_horizon_date);
10279: END IF;
10280: --
10281: IF TO_DATE(v_min_horizon_date,'RRRR/MM/DD HH24:MI:SS') > x_Sched_rec.sched_horizon_start_date THEN
10282: --
10284: --
10285: END IF;
10286: --
10287: IF (l_debug <> -1) THEN
10288: rlm_core_sv.dlog(k_DEBUG, 'v_min_horizon_date', v_min_horizon_date);
10289: END IF;
10290: END IF;
10291: END IF;
10292: --
10309: --
10310: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10311: --
10312: IF (l_debug <> -1) THEN
10313: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10314: END IF;
10315: --
10316: RLM_CORE_SV.OpenDynamicCursor(c_NATS, v_NatsDemand, g_BindVarTab);
10317: --
10312: IF (l_debug <> -1) THEN
10313: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10314: END IF;
10315: --
10316: RLM_CORE_SV.OpenDynamicCursor(c_NATS, v_NatsDemand, g_BindVarTab);
10317: --
10318: WHILE FetchReq(c_NATS,
10319: v_Key_rec,
10320: v_line_id_tmp,
10326: EXIT WHEN c_NATS%NOTFOUND;
10327: --
10328: IF (l_debug <> -1) THEN
10329: --
10330: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10327: --
10328: IF (l_debug <> -1) THEN
10329: --
10330: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10328: IF (l_debug <> -1) THEN
10329: --
10330: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10329: --
10330: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10330: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10331: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10332: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10333: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10334: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10335: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10336: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10344: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10337: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10344: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10345: --
10338: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10344: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10345: --
10346: END IF;
10339: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10344: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10345: --
10346: END IF;
10347:
10340: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10341: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10342: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10343: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10344: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10345: --
10346: END IF;
10347:
10348: IF x_Sched_rec.schedule_purpose NOT IN (k_DELETE, k_CANCEL, k_ADD) THEN
10349: --
10350: v_Key_rec.oe_line_id := v_line_id_tmp;
10351: --
10352: IF (l_debug <> -1) THEN
10353: rlm_core_sv.dlog(k_DEBUG, 'OM NATS Line Id', v_line_id_tmp);
10354: END IF;
10355: --
10356: GetDemand(v_Key_rec, x_Group_rec);
10357: --
10372: --
10373: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10374: --
10375: IF (l_debug <> -1) THEN
10376: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10377: END IF;
10378: --
10379: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10380: --
10375: IF (l_debug <> -1) THEN
10376: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10377: END IF;
10378: --
10379: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10380: --
10381: FETCH c_Sum INTO v_LowestLineId,
10382: v_SumOrderedQtyTmp,
10383: v_DemandCount,
10388: v_LineMatch(0).match_count := v_DemandCount;
10389: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10390: --
10391: IF (l_debug <> -1) THEN
10392: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10393: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10394: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10395: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10396: END IF;
10389: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10390: --
10391: IF (l_debug <> -1) THEN
10392: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10393: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10394: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10395: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10396: END IF;
10397: --
10390: --
10391: IF (l_debug <> -1) THEN
10392: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10393: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10394: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10395: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10396: END IF;
10397: --
10398: LOOP
10391: IF (l_debug <> -1) THEN
10392: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10393: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10394: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10395: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10396: END IF;
10397: --
10398: LOOP
10399: FETCH c_Sum INTO v_LineId,
10404: v_LineMatch(v_LineId-v_LowestLineId).sum_qty := v_SumOrderedQtyTmp;
10405: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10406: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10407: IF (l_debug <> -1) THEN
10408: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10409: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10410: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10411: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10412: END IF;
10405: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10406: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10407: IF (l_debug <> -1) THEN
10408: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10409: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10410: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10411: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10412: END IF;
10413: END LOOP;
10406: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10407: IF (l_debug <> -1) THEN
10408: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10409: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10410: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10411: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10412: END IF;
10413: END LOOP;
10414: --
10407: IF (l_debug <> -1) THEN
10408: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10409: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10410: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10411: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10412: END IF;
10413: END LOOP;
10414: --
10415: END IF;
10415: END IF;
10416: CLOSE c_Sum;
10417: --
10418: IF (l_debug <> -1) THEN
10419: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10420: END IF;
10421: --
10422: IF v_LineMatch.COUNT > 0 THEN
10423: --
10425: --
10426: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10427: --
10428: IF (l_debug <> -1) THEN
10429: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10430: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10431: END IF;
10432: --
10433: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10426: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10427: --
10428: IF (l_debug <> -1) THEN
10429: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10430: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10431: END IF;
10432: --
10433: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10434: --
10429: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10430: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10431: END IF;
10432: --
10433: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10434: --
10435: ELSE
10436: --
10437: -- (4) Find all ATS demand that did not match with lines in OM
10438: --
10439: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10440: --
10441: IF (l_debug <> -1) THEN
10442: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10443: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10444: END IF;
10445: --
10446: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10439: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10440: --
10441: IF (l_debug <> -1) THEN
10442: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10443: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10444: END IF;
10445: --
10446: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10447: --
10442: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10443: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10444: END IF;
10445: --
10446: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10447: --
10448: END IF;
10449: --
10450: WHILE FetchReq(c_Matched,
10457: EXIT WHEN c_Matched%NOTFOUND;
10458: --
10459: IF (l_debug <> -1) THEN
10460: --
10461: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10458: --
10459: IF (l_debug <> -1) THEN
10460: --
10461: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10459: IF (l_debug <> -1) THEN
10460: --
10461: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10460: --
10461: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10461: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10462: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10463: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10464: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10465: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10466: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10467: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10475: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10468: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10475: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10476: --
10469: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10475: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10476: --
10477: END IF;
10470: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10475: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10476: --
10477: END IF;
10478: --
10471: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10472: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10473: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10474: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10475: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10476: --
10477: END IF;
10478: --
10479: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6131516
10478: --
10479: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6131516
10480: -- start of bug fix 4223359
10481: --
10482: IF (v_key_rec.req_rec.process_status <> rlm_core_sv.k_PS_FROZEN_FIRM) THEN
10483: --
10484: FrozenFenceWarning(x_sched_rec, x_group_rec);
10485: --
10486: END IF;
10518: --
10519: v_NewCount := v_NewCount +1;
10520: --
10521: IF (l_debug <> -1) THEN
10522: rlm_core_sv.dlog(k_DEBUG,'v_NewCount', v_NewCount);
10523: END IF;
10524: --
10525: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
10526: v_Key_rec, k_RECONCILE,
10530: -- When there is a MATCH
10531: ELSE
10532:
10533: IF (l_debug <> -1) THEN
10534: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', v_Key_rec.req_rec.line_id);
10535: END IF;
10536: --
10537: IF v_line_id_tmp = v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).lowest_oelineid THEN
10538: --
10568: FROM oe_order_lines ol
10569: WHERE ol.line_id = v_line_id_tmp);
10570: --
10571: IF (l_debug <> -1) THEN
10572: rlm_core_sv.dlog(k_DEBUG,' Total Order Quantity', v_total_ordered_qty);
10573: rlm_core_sv.dlog(k_DEBUG,' Partial Shipped Quantity' , v_total_partial_shipped_qty);
10574: END IF;
10575: --
10576: EXCEPTION
10569: WHERE ol.line_id = v_line_id_tmp);
10570: --
10571: IF (l_debug <> -1) THEN
10572: rlm_core_sv.dlog(k_DEBUG,' Total Order Quantity', v_total_ordered_qty);
10573: rlm_core_sv.dlog(k_DEBUG,' Partial Shipped Quantity' , v_total_partial_shipped_qty);
10574: END IF;
10575: --
10576: EXCEPTION
10577: WHEN OTHERS THEN
10576: EXCEPTION
10577: WHEN OTHERS THEN
10578: --
10579: IF (l_debug <> -1) THEN
10580: rlm_core_sv.dlog(k_DEBUG,'When Other Exception PART_SHIP_LINES',substr(sqlerrm,1,200));
10581: END IF;
10582: --
10583: END;
10584:
10592: v_check_partial_flag := 'Y';
10593: END IF;
10594: --
10595: IF (l_debug <> -1) THEN
10596: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10597: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10598: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10599: END IF;
10600: --
10593: END IF;
10594: --
10595: IF (l_debug <> -1) THEN
10596: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10597: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10598: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10599: END IF;
10600: --
10601: ELSE
10594: --
10595: IF (l_debug <> -1) THEN
10596: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10597: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10598: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10599: END IF;
10600: --
10601: ELSE
10602: --
10634: CLOSE c_Matched;
10635: --
10636: g_sch_line_qty :=0; --Bugfix 6159269
10637: IF (l_debug <> -1) THEN
10638: rlm_core_sv.dpop(k_SDEBUG);
10639: END IF;
10640: --
10641: EXCEPTION
10642:
10642:
10643: WHEN e_group_error THEN
10644: --
10645: IF (l_debug <> -1) THEN
10646: rlm_core_sv.dlog(k_DEBUG,'group error');
10647: rlm_core_sv.dpop(k_SDEBUG);
10648: END IF;
10649: --
10650: raise e_group_error;
10643: WHEN e_group_error THEN
10644: --
10645: IF (l_debug <> -1) THEN
10646: rlm_core_sv.dlog(k_DEBUG,'group error');
10647: rlm_core_sv.dpop(k_SDEBUG);
10648: END IF;
10649: --
10650: raise e_group_error;
10651:
10652: WHEN OTHERS THEN
10653: rlm_message_sv.sql_error('rlm_rd_sv.ProcessATS',x_progress);
10654: --
10655: IF (l_debug <> -1) THEN
10656: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10657: END IF;
10658: --
10659: raise;
10660:
10697: --
10698: BEGIN
10699: --
10700: IF (l_debug <> -1) THEN
10701: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10698: BEGIN
10699: --
10700: IF (l_debug <> -1) THEN
10701: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10699: --
10700: IF (l_debug <> -1) THEN
10701: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10707: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10700: IF (l_debug <> -1) THEN
10701: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10707: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10708: END IF;
10701: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10707: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10708: END IF;
10709: --
10702: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10707: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10708: END IF;
10709: --
10710: -- Delete all the bind variable tables
10703: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10704: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10705: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10706: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10707: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10708: END IF;
10709: --
10710: -- Delete all the bind variable tables
10711: --
10726: --
10727: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10728: --
10729: IF (l_debug <> -1) THEN
10730: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10731: END IF;
10732: --
10733: RLM_CORE_SV.OpenDynamicCursor(c_ATS, v_ATSDemand, g_BindVarTab);
10734: --
10729: IF (l_debug <> -1) THEN
10730: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10731: END IF;
10732: --
10733: RLM_CORE_SV.OpenDynamicCursor(c_ATS, v_ATSDemand, g_BindVarTab);
10734: --
10735: WHILE FetchReq(c_ATS,
10736: v_Key_rec,
10737: v_line_id_tmp,
10742: EXIT WHEN c_ATS%NOTFOUND;
10743: --
10744: IF (l_debug <> -1) THEN
10745: --
10746: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10743: --
10744: IF (l_debug <> -1) THEN
10745: --
10746: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10744: IF (l_debug <> -1) THEN
10745: --
10746: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10745: --
10746: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10746: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10747: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10748: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10749: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10750: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10751: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10752: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10760: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10753: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10760: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10761: --
10754: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10760: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10761: --
10762: END IF;
10755: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10760: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10761: --
10762: END IF;
10763:
10756: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10757: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10758: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10759: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10760: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10761: --
10762: END IF;
10763:
10764: IF x_Sched_rec.schedule_purpose NOT IN (k_DELETE, k_CANCEL, k_ADD) THEN
10765: --
10766: v_Key_rec.oe_line_id := v_line_id_tmp;
10767: --
10768: IF (l_debug <> -1) THEN
10769: rlm_core_sv.dlog(k_DEBUG, 'OM NATS Line Id', v_line_id_tmp);
10770: END IF;
10771: --
10772: GetDemand(v_Key_rec, x_Group_rec);
10773: --
10789: --
10790: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10791: --
10792: IF (l_debug <> -1) THEN
10793: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10794: END IF;
10795: --
10796: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10797: --
10792: IF (l_debug <> -1) THEN
10793: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10794: END IF;
10795: --
10796: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10797: --
10798: FETCH c_Sum INTO v_LowestLineId,
10799: v_SumOrderedQtyTmp,
10800: v_DemandCount,
10806: v_LineMatch(0).match_count := v_DemandCount;
10807: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10808: --
10809: IF (l_debug <> -1) THEN
10810: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10811: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10812: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10813: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10814: END IF;
10807: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10808: --
10809: IF (l_debug <> -1) THEN
10810: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10811: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10812: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10813: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10814: END IF;
10815: --
10808: --
10809: IF (l_debug <> -1) THEN
10810: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10811: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10812: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10813: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10814: END IF;
10815: --
10816: LOOP
10809: IF (l_debug <> -1) THEN
10810: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10811: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10812: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10813: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10814: END IF;
10815: --
10816: LOOP
10817: FETCH c_Sum INTO v_LineId,
10823: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10824: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10825: --
10826: IF (l_debug <> -1) THEN
10827: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10828: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10829: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10830: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10831: END IF;
10824: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10825: --
10826: IF (l_debug <> -1) THEN
10827: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10828: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10829: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10830: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10831: END IF;
10832: --
10825: --
10826: IF (l_debug <> -1) THEN
10827: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10828: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10829: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10830: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10831: END IF;
10832: --
10833: END LOOP;
10826: IF (l_debug <> -1) THEN
10827: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10828: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10829: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10830: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10831: END IF;
10832: --
10833: END LOOP;
10834: --
10841: --
10842: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10843: --
10844: IF (l_debug <> -1) THEN
10845: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10846: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10847: END IF;
10848: --
10849: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10842: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10843: --
10844: IF (l_debug <> -1) THEN
10845: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10846: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10847: END IF;
10848: --
10849: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10850: --
10845: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10846: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10847: END IF;
10848: --
10849: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10850: --
10851: ELSE
10852: --
10853: -- (4) Find all NATS demand that did not match in OM
10854: --
10855: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10856: --
10857: IF (l_debug <> -1) THEN
10858: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10859: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10860: END IF;
10861: --
10862: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10855: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10856: --
10857: IF (l_debug <> -1) THEN
10858: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10859: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10860: END IF;
10861: --
10862: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10863: --
10858: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10859: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10860: END IF;
10861: --
10862: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10863: --
10864: END IF;
10865: --
10866: WHILE FetchReq(c_Matched,
10873: EXIT WHEN c_Matched%NOTFOUND;
10874: --
10875: IF (l_debug <> -1) THEN
10876: --
10877: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10874: --
10875: IF (l_debug <> -1) THEN
10876: --
10877: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10875: IF (l_debug <> -1) THEN
10876: --
10877: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10876: --
10877: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10877: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10878: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10879: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10880: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10881: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10882: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.intmed_ship_to_org_id', v_Key_rec.req_rec.intmed_ship_to_org_id);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10883: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10891: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10884: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10891: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10892: --
10885: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10891: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10892: --
10893: END IF;
10886: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10891: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10892: --
10893: END IF;
10894: --
10887: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10888: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10889: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10890: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10891: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10892: --
10893: END IF;
10894: --
10895: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6159269
10900: --
10901: v_NewCount := v_NewCount +1;
10902: --
10903: IF (l_debug <> -1) THEN
10904: rlm_core_sv.dlog(k_DEBUG,'v_NewCount', v_NewCount);
10905: END IF;
10906: --
10907: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
10908: v_Key_rec, k_RECONCILE,
10912: -- When there is a MATCH
10913: ELSE
10914: --
10915: IF (l_debug <> -1) THEN
10916: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', v_Key_rec.req_rec.line_id);
10917: END IF;
10918: --
10919: IF v_line_id_tmp = v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).lowest_oelineid THEN
10920: v_DemandCount := v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).match_count;
10940: --
10941: g_sch_line_qty :=0; --Bugfix 6159269
10942: --
10943: IF (l_debug <> -1) THEN
10944: rlm_core_sv.dpop(k_SDEBUG);
10945: END IF;
10946: --
10947: EXCEPTION
10948:
10948:
10949: WHEN e_group_error THEN
10950: --
10951: IF (l_debug <> -1) THEN
10952: rlm_core_sv.dlog(k_DEBUG,'group error');
10953: rlm_core_sv.dpop(k_SDEBUG);
10954: END IF;
10955: --
10956: raise e_group_error;
10949: WHEN e_group_error THEN
10950: --
10951: IF (l_debug <> -1) THEN
10952: rlm_core_sv.dlog(k_DEBUG,'group error');
10953: rlm_core_sv.dpop(k_SDEBUG);
10954: END IF;
10955: --
10956: raise e_group_error;
10957:
10958: WHEN OTHERS THEN
10959: rlm_message_sv.sql_error('rlm_rd_sv.ProcessNATS',x_progress);
10960: --
10961: IF (l_debug <> -1) THEN
10962: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10963: END IF;
10964: --
10965: raise;
10966:
10987:
10988: BEGIN
10989: --
10990: IF (l_debug <> -1) THEN
10991: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10992: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10993: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10994: END IF;
10995: --
10988: BEGIN
10989: --
10990: IF (l_debug <> -1) THEN
10991: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10992: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10993: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10994: END IF;
10995: --
10996: RLM_TPA_SV.ReconcileShipments(x_Group_rec,
10989: --
10990: IF (l_debug <> -1) THEN
10991: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10992: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10993: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10994: END IF;
10995: --
10996: RLM_TPA_SV.ReconcileShipments(x_Group_rec,
10997: x_Key_rec,
11007: v_Demand_ref,
11008: x_DemandType);
11009: --
11010: IF (l_debug <> -1) THEN
11011: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
11012: x_key_rec.req_rec.primary_quantity);
11013: END IF;
11014: --
11015: CheckTolerance(x_Sched_rec,
11052: END IF;
11053: CLOSE v_Demand_ref;
11054: --
11055: IF (l_debug <> -1) THEN
11056: rlm_core_sv.dpop(k_SDEBUG);
11057: END IF;
11058: --
11059: EXCEPTION
11060: WHEN OTHERS THEN
11060: WHEN OTHERS THEN
11061: rlm_message_sv.sql_error('rlm_rd_sv.UpdateDemand',x_progress);
11062: --
11063: IF (l_debug <> -1) THEN
11064: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11065: END IF;
11066: --
11067: raise;
11068:
11085:
11086: BEGIN
11087: --
11088: IF (l_debug <> -1) THEN
11089: rlm_core_sv.dpush(k_SDEBUG,'DeleteDemand');
11090: END IF;
11091: --
11092: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
11093: --
11103: --
11104: g_del_reconcile := 'N'; --Bugfix 6131516
11105: --
11106: IF (l_debug <> -1) THEN
11107: rlm_core_sv.dpop(k_SDEBUG);
11108: END IF;
11109: --
11110: EXCEPTION
11111:
11111:
11112: WHEN e_group_error THEN
11113: --
11114: IF (l_debug <> -1) THEN
11115: rlm_core_sv.dlog(k_DEBUG,'group error');
11116: rlm_core_sv.dpop(k_SDEBUG);
11117: END IF;
11118: --
11119: raise e_group_error;
11112: WHEN e_group_error THEN
11113: --
11114: IF (l_debug <> -1) THEN
11115: rlm_core_sv.dlog(k_DEBUG,'group error');
11116: rlm_core_sv.dpop(k_SDEBUG);
11117: END IF;
11118: --
11119: raise e_group_error;
11120:
11121: WHEN OTHERS THEN
11122: rlm_message_sv.sql_error('rlm_rd_sv.DeleteDemand',x_progress);
11123: --
11124: IF (l_debug <> -1) THEN
11125: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11126: END IF;
11127: --
11128: raise;
11129:
11151: --
11152: BEGIN
11153: --
11154: IF (l_debug <> -1) THEN
11155: rlm_core_sv.dpush(k_SDEBUG,'IncreaseDemand');
11156: END IF;
11157: --
11158: v_QtyDelta := x_Key_rec.req_rec.primary_quantity - x_SumOrderedQty;
11159: --
11157: --
11158: v_QtyDelta := x_Key_rec.req_rec.primary_quantity - x_SumOrderedQty;
11159: --
11160: IF (l_debug <> -1) THEN
11161: rlm_core_sv.dlog(k_DEBUG,'v_QtyDelta',v_QtyDelta);
11162: END IF;
11163: --
11164: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
11165: --
11165: --
11166: IF SchedulePrecedence(x_Group_rec, x_sched_rec,x_Key_rec.dem_rec.schedule_type) THEN
11167: --
11168: IF (l_debug <> -1) THEN
11169: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
11170: x_Key_rec.dem_rec.ordered_quantity);
11171: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
11172: x_Key_rec.dem_rec.line_id);
11173: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
11167: --
11168: IF (l_debug <> -1) THEN
11169: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
11170: x_Key_rec.dem_rec.ordered_quantity);
11171: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
11172: x_Key_rec.dem_rec.line_id);
11173: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
11174: END IF;
11175: --
11169: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
11170: x_Key_rec.dem_rec.ordered_quantity);
11171: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
11172: x_Key_rec.dem_rec.line_id);
11173: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
11174: END IF;
11175: --
11176: IsSchedulePrecedence := TRUE;
11177: --
11209: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11210: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11211: x_OrderLineId => x_key_rec.dem_rec.line_id,
11212: x_Token1 => 'LINE',
11213: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11214: x_Token2 => 'ORDER',
11215: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11216: x_Token3 => 'QUANTITY',
11217: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11211: x_OrderLineId => x_key_rec.dem_rec.line_id,
11212: x_Token1 => 'LINE',
11213: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11214: x_Token2 => 'ORDER',
11215: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11216: x_Token3 => 'QUANTITY',
11217: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11218: x_Token4 => 'CUSTITEM',
11219: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11215: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11216: x_Token3 => 'QUANTITY',
11217: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11218: x_Token4 => 'CUSTITEM',
11219: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11220: x_Token5 => 'REQ_DATE',
11221: x_value5 => x_key_rec.dem_rec.request_date,
11222: x_Token6 => 'SCH_LINE_QTY',
11223: x_value6 => g_sch_line_qty,
11228: x_Token8 => 'MATCH_ATTR',
11229: x_value8 => v_MatchAttrTxt);
11230: --
11231: IF (l_debug <> -1) THEN
11232: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11233: x_key_rec.req_rec.line_id);
11234: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11235: x_key_rec.req_rec.line_id);
11236: END IF;
11230: --
11231: IF (l_debug <> -1) THEN
11232: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11233: x_key_rec.req_rec.line_id);
11234: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11235: x_key_rec.req_rec.line_id);
11236: END IF;
11237: --
11238: ELSE
11246: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11247: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11248: x_OrderLineId => x_key_rec.dem_rec.line_id,
11249: x_Token1 => 'LINE',
11250: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11251: x_Token2 => 'ORDER',
11252: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11253: x_Token3 => 'QUANTITY',
11254: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11248: x_OrderLineId => x_key_rec.dem_rec.line_id,
11249: x_Token1 => 'LINE',
11250: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11251: x_Token2 => 'ORDER',
11252: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11253: x_Token3 => 'QUANTITY',
11254: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11255: x_Token4 => 'CUSTITEM',
11256: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11252: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11253: x_Token3 => 'QUANTITY',
11254: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11255: x_Token4 => 'CUSTITEM',
11256: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11257: x_Token5 => 'REQ_DATE',
11258: x_value5 => x_key_rec.dem_rec.request_date,
11259: x_Token6 => 'SCH_LINE_QTY',
11260: x_value6 => g_sch_line_qty,
11261: x_Token7 => 'MATCH_ATTR',
11262: x_value7 => v_MatchAttrTxt);
11263: --
11264: IF (l_debug <> -1) THEN
11265: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11266: x_key_rec.req_rec.line_id);
11267: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11268: x_key_rec.req_rec.line_id);
11269: END IF;
11263: --
11264: IF (l_debug <> -1) THEN
11265: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11266: x_key_rec.req_rec.line_id);
11267: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11268: x_key_rec.req_rec.line_id);
11269: END IF;
11270: --
11271: END IF; /* Exception */
11289: --
11290: IsSchedulePrecedence := FALSE;
11291: --
11292: IF (l_debug <> -1) THEN
11293: rlm_core_sv.dlog(k_DEBUG,'New Schedule of Lower Precedence -- FALSE');
11294: END IF;
11295: --
11296: END IF;
11297: --
11305: END IF;
11306: g_inc_exception := 'N'; --Bugfix 6159269
11307: --
11308: IF (l_debug <> -1) THEN
11309: rlm_core_sv.dpop(k_SDEBUG);
11310: END IF;
11311: --
11312: EXCEPTION
11313: WHEN OTHERS THEN
11313: WHEN OTHERS THEN
11314: rlm_message_sv.sql_error('rlm_rd_sv.IncreaseDemand',x_progress);
11315: --
11316: IF (l_debug <> -1) THEN
11317: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11318: END IF;
11319: --
11320: raise;
11321:
11342: v_MatchAttrTxt VARCHAR2(2000); --Bugfix 6159269
11343: BEGIN
11344: --
11345: IF (l_debug <> -1) THEN
11346: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11347: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11348: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11349: x_Key_rec.req_rec.primary_quantity);
11350: END IF;
11343: BEGIN
11344: --
11345: IF (l_debug <> -1) THEN
11346: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11347: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11348: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11349: x_Key_rec.req_rec.primary_quantity);
11350: END IF;
11351: --
11344: --
11345: IF (l_debug <> -1) THEN
11346: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11347: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11348: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11349: x_Key_rec.req_rec.primary_quantity);
11350: END IF;
11351: --
11352: v_QtyDelta := x_SumOrderedQty - x_Key_rec.req_rec.primary_quantity;
11351: --
11352: v_QtyDelta := x_SumOrderedQty - x_Key_rec.req_rec.primary_quantity;
11353: --
11354: IF (l_debug <> -1) THEN
11355: rlm_core_sv.dlog(k_DEBUG,'v_QtyDelta',v_QtyDelta);
11356: END IF;
11357: --
11358: WHILE FetchDemand(x_Demand_ref, x_Key_rec) AND v_QtyDelta >0 LOOP
11359: --
11357: --
11358: WHILE FetchDemand(x_Demand_ref, x_Key_rec) AND v_QtyDelta >0 LOOP
11359: --
11360: IF (l_debug <> -1) THEN
11361: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',x_Key_rec.dem_rec.ordered_quantity);
11362: END IF;
11363: --
11364: IF SchedulePrecedence(x_Group_rec, x_sched_rec,x_Key_rec.dem_rec.schedule_type) THEN
11365: --
11418: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11419: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11420: x_OrderLineId => x_key_rec.dem_rec.line_id,
11421: x_Token1 => 'LINE',
11422: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11423: x_Token2 => 'ORDER',
11424: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11425: x_Token3 => 'QUANTITY',
11426: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11420: x_OrderLineId => x_key_rec.dem_rec.line_id,
11421: x_Token1 => 'LINE',
11422: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11423: x_Token2 => 'ORDER',
11424: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11425: x_Token3 => 'QUANTITY',
11426: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11427: x_Token4 => 'CUSTITEM',
11428: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11424: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11425: x_Token3 => 'QUANTITY',
11426: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11427: x_Token4 => 'CUSTITEM',
11428: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11429: x_Token5 => 'REQ_DATE',
11430: x_value5 => x_key_rec.dem_rec.request_date,
11431: x_Token6 => 'SCH_LINE_QTY',
11432: x_value6 => g_sch_line_qty,
11437: x_Token8 => 'MATCH_ATTR',
11438: x_value8 => v_MatchAttrTxt);
11439: --
11440: IF (l_debug <> -1) THEN
11441: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11442: x_key_rec.req_rec.line_id);
11443: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11444: x_key_rec.req_rec.line_id);
11445: END IF;
11439: --
11440: IF (l_debug <> -1) THEN
11441: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11442: x_key_rec.req_rec.line_id);
11443: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11444: x_key_rec.req_rec.line_id);
11445: END IF;
11446: --
11447: ELSE
11455: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11456: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11457: x_OrderLineId => x_key_rec.dem_rec.line_id,
11458: x_Token1 => 'LINE',
11459: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11460: x_Token2 => 'ORDER',
11461: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11462: x_Token3 => 'QUANTITY',
11463: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11457: x_OrderLineId => x_key_rec.dem_rec.line_id,
11458: x_Token1 => 'LINE',
11459: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11460: x_Token2 => 'ORDER',
11461: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11462: x_Token3 => 'QUANTITY',
11463: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11464: x_Token4 => 'CUSTITEM',
11465: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11461: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11462: x_Token3 => 'QUANTITY',
11463: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11464: x_Token4 => 'CUSTITEM',
11465: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11466: x_Token5 => 'REQ_DATE',
11467: x_value5 => x_key_rec.dem_rec.request_date,
11468: x_Token6 => 'SCH_LINE_QTY',
11469: x_value6 => g_sch_line_qty,
11470: x_Token7 => 'MATCH_ATTR',
11471: x_value7 => v_MatchAttrTxt);
11472: --
11473: IF (l_debug <> -1) THEN
11474: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11475: x_key_rec.req_rec.line_id);
11476: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11477: x_key_rec.req_rec.line_id);
11478: END IF;
11472: --
11473: IF (l_debug <> -1) THEN
11474: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11475: x_key_rec.req_rec.line_id);
11476: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11477: x_key_rec.req_rec.line_id);
11478: END IF;
11479: --
11480: END IF; /* Exception */
11505: v_QtyDelta);
11506: END IF;
11507: --
11508: IF (l_debug <> -1) THEN
11509: rlm_core_sv.dpop(k_SDEBUG);
11510: END IF;
11511: --
11512: EXCEPTION
11513:
11513:
11514: WHEN e_group_error THEN
11515: --
11516: IF (l_debug <> -1) THEN
11517: rlm_core_sv.dlog(k_DEBUG,'group error');
11518: rlm_core_sv.dpop(k_SDEBUG);
11519: END IF;
11520: --
11521: raise e_group_error;
11514: WHEN e_group_error THEN
11515: --
11516: IF (l_debug <> -1) THEN
11517: rlm_core_sv.dlog(k_DEBUG,'group error');
11518: rlm_core_sv.dpop(k_SDEBUG);
11519: END IF;
11520: --
11521: raise e_group_error;
11522:
11523: WHEN OTHERS THEN
11524: rlm_message_sv.sql_error('rlm_rd_sv.DecreaseDemand',x_progress);
11525: --
11526: IF (l_debug <> -1) THEN
11527: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11528: END IF;
11529: --
11530: raise;
11531:
11549: v_MatchAttrTxt VARCHAR2(2000); -- Bug 4297984
11550: BEGIN
11551: --
11552: IF (l_debug <> -1) THEN
11553: rlm_core_sv.dpush(k_SDEBUG,'OtherDemand');
11554: END IF;
11555: --
11556: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
11557: --
11558: IF SchedulePrecedence(x_Group_rec, x_sched_rec,x_Key_rec.dem_rec.schedule_type) THEN
11559:
11560: --
11561: IF (l_debug <> -1) THEN
11562: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.ordered_quantity',
11563: x_Key_rec.dem_rec.ordered_quantity);
11564: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.primary_quantity',
11565: x_Key_rec.req_rec.primary_quantity);
11566: END IF;
11560: --
11561: IF (l_debug <> -1) THEN
11562: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.ordered_quantity',
11563: x_Key_rec.dem_rec.ordered_quantity);
11564: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.primary_quantity',
11565: x_Key_rec.req_rec.primary_quantity);
11566: END IF;
11567:
11568: --bug2308608
11609: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
11610: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11611: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11612: x_Token1 => 'LINE',
11613: x_value1 =>rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11614: x_Token2 => 'ORDER',
11615: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11616: x_Token3 => 'QUANTITY',
11617: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11611: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11612: x_Token1 => 'LINE',
11613: x_value1 =>rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11614: x_Token2 => 'ORDER',
11615: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11616: x_Token3 => 'QUANTITY',
11617: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11618: x_Token4 => 'CUSTITEM',
11619: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11615: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11616: x_Token3 => 'QUANTITY',
11617: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11618: x_Token4 => 'CUSTITEM',
11619: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11620: x_Token5 => 'REQ_DATE',
11621: x_value5 => x_key_rec.dem_rec.request_date,
11622: x_Token6 => 'SEQ_INFO',
11623: x_value6 => nvl(x_key_rec.dem_rec.cust_production_seq_num,'NULL') ||'-'||
11626: x_Token7 => 'MATCH_ATTR',
11627: x_value7 => v_MatchAttrTxt);
11628: --
11629: IF (l_debug <> -1) THEN
11630: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11631: x_key_rec.req_rec.line_id);
11632: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE_SEQ',
11633: x_key_rec.req_rec.line_id);
11634: END IF;
11628: --
11629: IF (l_debug <> -1) THEN
11630: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11631: x_key_rec.req_rec.line_id);
11632: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE_SEQ',
11633: x_key_rec.req_rec.line_id);
11634: END IF;
11635: --
11636: ELSE
11644: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
11645: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11646: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11647: x_Token1 => 'LINE',
11648: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11649: x_Token2 => 'ORDER',
11650: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11651: x_Token3 => 'QUANTITY',
11652: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11646: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11647: x_Token1 => 'LINE',
11648: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11649: x_Token2 => 'ORDER',
11650: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11651: x_Token3 => 'QUANTITY',
11652: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11653: x_Token4 => 'CUSTITEM',
11654: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11650: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11651: x_Token3 => 'QUANTITY',
11652: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11653: x_Token4 => 'CUSTITEM',
11654: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11655: x_Token5 => 'REQ_DATE',
11656: x_value5 => x_key_rec.dem_rec.request_date,
11657: x_Token6 => 'MATCH_ATTR',
11658: x_value6 => v_MatchAttrTxt);
11657: x_Token6 => 'MATCH_ATTR',
11658: x_value6 => v_MatchAttrTxt);
11659: --
11660: IF (l_debug <> -1) THEN
11661: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11662: x_key_rec.req_rec.line_id);
11663: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE',
11664: x_key_rec.req_rec.line_id);
11665: END IF;
11659: --
11660: IF (l_debug <> -1) THEN
11661: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11662: x_key_rec.req_rec.line_id);
11663: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE',
11664: x_key_rec.req_rec.line_id);
11665: END IF;
11666: --
11667: END IF;
11683: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11684: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11685: x_OrderLineId => x_key_rec.dem_rec.line_id,
11686: x_Token1 => 'LINE',
11687: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11688: x_Token2 => 'ORDER',
11689: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11690: x_Token3 => 'QUANTITY',
11691: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11685: x_OrderLineId => x_key_rec.dem_rec.line_id,
11686: x_Token1 => 'LINE',
11687: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11688: x_Token2 => 'ORDER',
11689: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11690: x_Token3 => 'QUANTITY',
11691: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11692: x_Token4 => 'CUSTITEM',
11693: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11689: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11690: x_Token3 => 'QUANTITY',
11691: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11692: x_Token4 => 'CUSTITEM',
11693: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11694: x_Token5 => 'REQ_DATE',
11695: x_value5 => x_key_rec.dem_rec.request_date,
11696: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
11697: x_value6 => g_sch_line_qty, --Bugfix 6159269
11702: x_Token8 => 'MATCH_ATTR',
11703: x_value8 => v_MatchAttrTxt);
11704: --
11705: IF (l_debug <> -1) THEN
11706: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11707: x_key_rec.req_rec.line_id);
11708: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11709: x_key_rec.req_rec.line_id);
11710: END IF;
11704: --
11705: IF (l_debug <> -1) THEN
11706: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11707: x_key_rec.req_rec.line_id);
11708: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11709: x_key_rec.req_rec.line_id);
11710: END IF;
11711: --
11712: ELSE
11720: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11721: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11722: x_OrderLineId => x_key_rec.dem_rec.line_id,
11723: x_Token1 => 'LINE',
11724: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11725: x_Token2 => 'ORDER',
11726: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11727: x_Token3 => 'QUANTITY',
11728: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11722: x_OrderLineId => x_key_rec.dem_rec.line_id,
11723: x_Token1 => 'LINE',
11724: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11725: x_Token2 => 'ORDER',
11726: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11727: x_Token3 => 'QUANTITY',
11728: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11729: x_Token4 => 'CUSTITEM',
11730: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11726: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11727: x_Token3 => 'QUANTITY',
11728: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11729: x_Token4 => 'CUSTITEM',
11730: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11731: x_Token5 => 'REQ_DATE',
11732: x_value5 => x_key_rec.dem_rec.request_date,
11733: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
11734: x_value6 => g_sch_line_qty, --Bugfix 6159269
11735: x_Token7 => 'MATCH_ATTR',
11736: x_value7 => v_MatchAttrTxt);
11737: --
11738: IF (l_debug <> -1) THEN
11739: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11740: x_key_rec.req_rec.line_id);
11741: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11742: x_key_rec.req_rec.line_id);
11743: END IF;
11737: --
11738: IF (l_debug <> -1) THEN
11739: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11740: x_key_rec.req_rec.line_id);
11741: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11742: x_key_rec.req_rec.line_id);
11743: END IF;
11744: --
11745: END IF;
11761: --
11762: END LOOP;
11763: --
11764: IF (l_debug <> -1) THEN
11765: rlm_core_sv.dpop(k_SDEBUG);
11766: END IF;
11767: --
11768: EXCEPTION
11769: WHEN OTHERS THEN
11769: WHEN OTHERS THEN
11770: rlm_message_sv.sql_error('rlm_rd_sv.OtherDemand',x_progress);
11771: --
11772: IF (l_debug <> -1) THEN
11773: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11774: END IF;
11775: --
11776: raise;
11777:
11795:
11796: BEGIN
11797: --
11798: IF (l_debug <> -1) THEN
11799: rlm_core_sv.dpush(k_SDEBUG,'SetOperation');
11800: rlm_core_sv.dlog(k_DEBUG, 'x_Quantity',
11801: x_Quantity);
11802: END IF;
11803: --
11796: BEGIN
11797: --
11798: IF (l_debug <> -1) THEN
11799: rlm_core_sv.dpush(k_SDEBUG,'SetOperation');
11800: rlm_core_sv.dlog(k_DEBUG, 'x_Quantity',
11801: x_Quantity);
11802: END IF;
11803: --
11804: IF x_Operation = k_DELETE THEN
11811: g_Op_tab_Unschedule(v_Index).operation := OE_GLOBALS.G_OPR_DELETE;
11812: g_Op_tab_Unschedule(v_Index).ordered_quantity := x_Quantity;
11813: --
11814: IF (l_debug <> -1) THEN
11815: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11816: g_Op_tab_Unschedule(v_Index).line_id);
11817: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11818: g_Op_tab_Unschedule(v_Index).operation);
11819: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11813: --
11814: IF (l_debug <> -1) THEN
11815: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11816: g_Op_tab_Unschedule(v_Index).line_id);
11817: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11818: g_Op_tab_Unschedule(v_Index).operation);
11819: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11820: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11821: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11815: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11816: g_Op_tab_Unschedule(v_Index).line_id);
11817: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11818: g_Op_tab_Unschedule(v_Index).operation);
11819: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11820: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11821: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11822: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11823: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11817: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11818: g_Op_tab_Unschedule(v_Index).operation);
11819: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11820: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11821: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11822: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11823: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11824: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11825: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11819: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11820: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11821: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11822: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11823: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11824: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11825: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11826: g_Op_tab_Unschedule(v_Index).schedule_date);
11827: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11821: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11822: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11823: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11824: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11825: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11826: g_Op_tab_Unschedule(v_Index).schedule_date);
11827: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11828: g_Op_tab_Unschedule(v_Index).request_date);
11829: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11823: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11824: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11825: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11826: g_Op_tab_Unschedule(v_Index).schedule_date);
11827: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11828: g_Op_tab_Unschedule(v_Index).request_date);
11829: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11830: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11831: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11825: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11826: g_Op_tab_Unschedule(v_Index).schedule_date);
11827: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11828: g_Op_tab_Unschedule(v_Index).request_date);
11829: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11830: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11831: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11832: g_Op_tab_Unschedule(v_Index).UOM_code);
11833: END IF;
11827: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11828: g_Op_tab_Unschedule(v_Index).request_date);
11829: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11830: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11831: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11832: g_Op_tab_Unschedule(v_Index).UOM_code);
11833: END IF;
11834: --
11835: END IF;
11854: g_Op_tab_Unschedule(v_Index).line_id := x_Key_rec.dem_rec.line_id;
11855: g_Op_tab_Unschedule(v_Index).ordered_quantity := x_Quantity;
11856: --
11857: IF (l_debug <> -1) THEN
11858: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11859: g_Op_tab_Unschedule(v_Index).line_id);
11860: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11861: g_Op_tab_Unschedule(v_Index).operation);
11862: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11856: --
11857: IF (l_debug <> -1) THEN
11858: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11859: g_Op_tab_Unschedule(v_Index).line_id);
11860: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11861: g_Op_tab_Unschedule(v_Index).operation);
11862: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11863: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11864: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11858: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11859: g_Op_tab_Unschedule(v_Index).line_id);
11860: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11861: g_Op_tab_Unschedule(v_Index).operation);
11862: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11863: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11864: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11865: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11866: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11860: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11861: g_Op_tab_Unschedule(v_Index).operation);
11862: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11863: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11864: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11865: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11866: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11867: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11868: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11862: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11863: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11864: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11865: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11866: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11867: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11868: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11869: g_Op_tab_Unschedule(v_Index).schedule_date);
11870: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11864: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11865: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11866: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11867: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11868: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11869: g_Op_tab_Unschedule(v_Index).schedule_date);
11870: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11871: g_Op_tab_Unschedule(v_Index).request_date);
11872: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11866: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11867: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11868: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11869: g_Op_tab_Unschedule(v_Index).schedule_date);
11870: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11871: g_Op_tab_Unschedule(v_Index).request_date);
11872: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11873: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11874: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11868: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11869: g_Op_tab_Unschedule(v_Index).schedule_date);
11870: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11871: g_Op_tab_Unschedule(v_Index).request_date);
11872: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11873: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11874: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11875: g_Op_tab_Unschedule(v_Index).UOM_code);
11876: END IF;
11870: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11871: g_Op_tab_Unschedule(v_Index).request_date);
11872: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11873: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11874: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11875: g_Op_tab_Unschedule(v_Index).UOM_code);
11876: END IF;
11877: --
11878: ELSE
11883: g_Op_tab(v_Index).line_id := x_Key_rec.dem_rec.line_id;
11884: g_Op_tab(v_Index).ordered_quantity := x_Quantity;
11885: --
11886: IF (l_debug <> -1) THEN
11887: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11888: g_Op_tab(v_Index).line_id);
11889: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11890: g_Op_tab(v_Index).operation);
11891: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11885: --
11886: IF (l_debug <> -1) THEN
11887: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11888: g_Op_tab(v_Index).line_id);
11889: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11890: g_Op_tab(v_Index).operation);
11891: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11892: g_Op_tab(v_Index).ship_to_org_id);
11893: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11887: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11888: g_Op_tab(v_Index).line_id);
11889: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11890: g_Op_tab(v_Index).operation);
11891: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11892: g_Op_tab(v_Index).ship_to_org_id);
11893: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11894: g_Op_tab(v_Index).invoice_to_org_id);
11895: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11889: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11890: g_Op_tab(v_Index).operation);
11891: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11892: g_Op_tab(v_Index).ship_to_org_id);
11893: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11894: g_Op_tab(v_Index).invoice_to_org_id);
11895: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11896: g_Op_tab(v_Index).inventory_item_id);
11897: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11891: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11892: g_Op_tab(v_Index).ship_to_org_id);
11893: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11894: g_Op_tab(v_Index).invoice_to_org_id);
11895: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11896: g_Op_tab(v_Index).inventory_item_id);
11897: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11898: g_Op_tab(v_Index).schedule_date);
11899: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11893: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11894: g_Op_tab(v_Index).invoice_to_org_id);
11895: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11896: g_Op_tab(v_Index).inventory_item_id);
11897: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11898: g_Op_tab(v_Index).schedule_date);
11899: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11900: g_Op_tab(v_Index).request_date);
11901: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11895: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11896: g_Op_tab(v_Index).inventory_item_id);
11897: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11898: g_Op_tab(v_Index).schedule_date);
11899: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11900: g_Op_tab(v_Index).request_date);
11901: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11902: g_Op_tab(v_Index).ordered_quantity);
11903: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11897: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11898: g_Op_tab(v_Index).schedule_date);
11899: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11900: g_Op_tab(v_Index).request_date);
11901: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11902: g_Op_tab(v_Index).ordered_quantity);
11903: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11904: g_Op_tab(v_Index).UOM_code);
11905: END IF;
11899: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11900: g_Op_tab(v_Index).request_date);
11901: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11902: g_Op_tab(v_Index).ordered_quantity);
11903: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11904: g_Op_tab(v_Index).UOM_code);
11905: END IF;
11906: --
11907: END IF;
11910: --
11911: END IF;
11912: --
11913: IF (l_debug <> -1) THEN
11914: rlm_core_sv.dpop(k_SDEBUG);
11915: END IF;
11916: --
11917: EXCEPTION
11918: WHEN OTHERS THEN
11918: WHEN OTHERS THEN
11919: rlm_message_sv.sql_error('rlm_rd_sv.SetOperation',x_progress);
11920: --
11921: IF (l_debug <> -1) THEN
11922: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11923: END IF;
11924: --
11925: raise;
11926:
11940: x_progress VARCHAR2(3) := '010';
11941: BEGIN
11942: --
11943: IF (l_debug <> -1) THEN
11944: rlm_core_sv.dpush(k_SDEBUG, 'IsLineConsumable');
11945: END IF;
11946: --
11947: FOR i IN 1..x_consume_tab.COUNT LOOP
11948: --
11950: --
11951: x_Index := i;
11952: --
11953: IF (l_debug <> -1) THEN
11954: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11955: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11956: rlm_core_sv.dpop(k_SDEBUG);
11957: END IF;
11958: --
11951: x_Index := i;
11952: --
11953: IF (l_debug <> -1) THEN
11954: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11955: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11956: rlm_core_sv.dpop(k_SDEBUG);
11957: END IF;
11958: --
11959: RETURN FALSE;
11952: --
11953: IF (l_debug <> -1) THEN
11954: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11955: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11956: rlm_core_sv.dpop(k_SDEBUG);
11957: END IF;
11958: --
11959: RETURN FALSE;
11960: --
11962: --
11963: END LOOP;
11964: --
11965: IF (l_debug <> -1) THEN
11966: rlm_core_sv.dlog(k_DEBUG, 'returning true');
11967: rlm_core_sv.dpop(k_SDEBUG);
11968: END IF;
11969: --
11970: RETURN TRUE;
11963: END LOOP;
11964: --
11965: IF (l_debug <> -1) THEN
11966: rlm_core_sv.dlog(k_DEBUG, 'returning true');
11967: rlm_core_sv.dpop(k_SDEBUG);
11968: END IF;
11969: --
11970: RETURN TRUE;
11971: --
11973: WHEN OTHERS THEN
11974: rlm_message_sv.sql_error('rlm_rd_sv.IsLineConsumable',x_progress);
11975: --
11976: IF (l_debug <> -1) THEN
11977: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11978: END IF;
11979: --
11980: raise;
11981:
11997:
11998: BEGIN
11999: --
12000: IF (l_debug <> -1) THEN
12001: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
12002: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
12003: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
11998: BEGIN
11999: --
12000: IF (l_debug <> -1) THEN
12001: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
12002: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
12003: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11999: --
12000: IF (l_debug <> -1) THEN
12001: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
12002: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
12003: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
12007: x_Group_rec.order_header_id);
12000: IF (l_debug <> -1) THEN
12001: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
12002: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
12003: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
12007: x_Group_rec.order_header_id);
12008: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
12002: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
12003: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
12007: x_Group_rec.order_header_id);
12008: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
12009: x_Group_rec.ship_to_org_id);
12010: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
12004: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
12005: x_Group_rec.ship_from_org_id);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
12007: x_Group_rec.order_header_id);
12008: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
12009: x_Group_rec.ship_to_org_id);
12010: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
12011: x_Group_rec.customer_item_id);
12012: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
12006: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
12007: x_Group_rec.order_header_id);
12008: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
12009: x_Group_rec.ship_to_org_id);
12010: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
12011: x_Group_rec.customer_item_id);
12012: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
12013: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
12014: END IF;
12008: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
12009: x_Group_rec.ship_to_org_id);
12010: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
12011: x_Group_rec.customer_item_id);
12012: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
12013: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
12014: END IF;
12015: --
12016: IF x_UpdateLevel <> 'GROUP' THEN
12009: x_Group_rec.ship_to_org_id);
12010: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
12011: x_Group_rec.customer_item_id);
12012: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
12013: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
12014: END IF;
12015: --
12016: IF x_UpdateLevel <> 'GROUP' THEN
12017: --
12017: --
12018: UPDATE rlm_interface_lines
12019: SET process_status = x_Status
12020: WHERE header_id = x_header_id
12021: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12022: rlm_core_sv.k_PS_FROZEN_FIRM)
12023: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12024: --
12025: UPDATE rlm_schedule_lines
12018: UPDATE rlm_interface_lines
12019: SET process_status = x_Status
12020: WHERE header_id = x_header_id
12021: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12022: rlm_core_sv.k_PS_FROZEN_FIRM)
12023: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12024: --
12025: UPDATE rlm_schedule_lines
12026: SET process_status = x_Status
12024: --
12025: UPDATE rlm_schedule_lines
12026: SET process_status = x_Status
12027: WHERE header_id = x_ScheduleHeaderid
12028: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12029: rlm_core_sv.k_PS_FROZEN_FIRM)
12030: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12031: --
12032: ELSE
12025: UPDATE rlm_schedule_lines
12026: SET process_status = x_Status
12027: WHERE header_id = x_ScheduleHeaderid
12028: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12029: rlm_core_sv.k_PS_FROZEN_FIRM)
12030: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12031: --
12032: ELSE
12033: --
12031: --
12032: ELSE
12033: --
12034: IF (l_debug <> -1) THEN
12035: rlm_core_sv.dlog(k_DEBUG,'Update Group');
12036: END IF;
12037: --
12038: UPDATE rlm_interface_lines
12039: SET process_status = x_Status
12044: AND inventory_item_id = x_Group_rec.inventory_item_id
12045: AND order_header_id = x_Group_rec.order_header_id
12046: /*AND nvl(cust_production_seq_num,k_VNULL) =
12047: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)
12048: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12049: rlm_core_sv.k_PS_FROZEN_FIRM) */
12050: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12051: --
12052: IF (l_debug <> -1) THEN
12045: AND order_header_id = x_Group_rec.order_header_id
12046: /*AND nvl(cust_production_seq_num,k_VNULL) =
12047: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)
12048: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12049: rlm_core_sv.k_PS_FROZEN_FIRM) */
12050: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12051: --
12052: IF (l_debug <> -1) THEN
12053: rlm_core_sv.dlog(k_DEBUG,'No of interface Lines Updated ', SQL%ROWCOUNT);
12049: rlm_core_sv.k_PS_FROZEN_FIRM) */
12050: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12051: --
12052: IF (l_debug <> -1) THEN
12053: rlm_core_sv.dlog(k_DEBUG,'No of interface Lines Updated ', SQL%ROWCOUNT);
12054: END IF;
12055: --
12056: UPDATE rlm_schedule_lines
12057: SET process_status = x_Status
12062: AND inventory_item_id = x_Group_rec.inventory_item_id
12063: --AND order_header_id = x_Group_rec.order_header_id
12064: /*AND nvl(cust_production_seq_num, k_VNULL) =
12065: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
12066: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12067: rlm_core_sv.k_PS_FROZEN_FIRM, rlm_core_sv.k_PS_ERROR)
12068: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12069: --
12070: END IF;
12063: --AND order_header_id = x_Group_rec.order_header_id
12064: /*AND nvl(cust_production_seq_num, k_VNULL) =
12065: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
12066: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
12067: rlm_core_sv.k_PS_FROZEN_FIRM, rlm_core_sv.k_PS_ERROR)
12068: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
12069: --
12070: END IF;
12071: --
12069: --
12070: END IF;
12071: --
12072: IF (l_debug <> -1) THEN
12073: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
12074: rlm_core_sv.dpop(k_SDEBUG);
12075: END IF;
12076: --
12077: EXCEPTION
12070: END IF;
12071: --
12072: IF (l_debug <> -1) THEN
12073: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
12074: rlm_core_sv.dpop(k_SDEBUG);
12075: END IF;
12076: --
12077: EXCEPTION
12078: --
12080: --
12081: rlm_message_sv.sql_error('rlm_rd_sv.UpdateGroupStatus',x_progress);
12082: --
12083: IF (l_debug <> -1) THEN
12084: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12085: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12086: END IF;
12087: --
12088: RAISE ;
12081: rlm_message_sv.sql_error('rlm_rd_sv.UpdateGroupStatus',x_progress);
12082: --
12083: IF (l_debug <> -1) THEN
12084: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12085: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12086: END IF;
12087: --
12088: RAISE ;
12089: --
12104:
12105: BEGIN
12106: --
12107: IF (l_debug <> -1) THEN
12108: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12105: BEGIN
12106: --
12107: IF (l_debug <> -1) THEN
12108: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12113: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
12106: --
12107: IF (l_debug <> -1) THEN
12108: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12113: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
12114: END IF;
12107: IF (l_debug <> -1) THEN
12108: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12113: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
12114: END IF;
12115: --
12108: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12113: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
12114: END IF;
12115: --
12116: /*
12109: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
12110: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
12111: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
12112: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
12113: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
12114: END IF;
12115: --
12116: /*
12117: --global_atp
12117: --global_atp
12118: IF g_ATP = k_ATP THEN
12119: --
12120: IF (l_debug <> -1) THEN
12121: rlm_core_sv.dpop(k_SDEBUG,'FALSE');
12122: END IF;
12123: --
12124: RETURN FALSE;
12125: --
12132: (to_date(to_char(x_horizon_start_date,'DD-MM-YYYY'),'DD-MM-YYYY') +
12133: x_Group_rec.frozen_days )) AND x_Group_rec.frozen_days <> 0 THEN
12134: --
12135: IF (l_debug <> -1) THEN
12136: rlm_core_sv.dpop(k_SDEBUG,'TRUE');
12137: END IF;
12138: --
12139: RETURN(TRUE);
12140: --
12140: --
12141: ELSE
12142: --
12143: IF (l_debug <> -1) THEN
12144: rlm_core_sv.dpop(k_SDEBUG,'FALSE');
12145: END IF;
12146: --
12147: RETURN(FALSE);
12148: --
12154: --
12155: rlm_message_sv.sql_error('rlm_rd_sv.IsFrozen', x_progress);
12156: --
12157: IF (l_debug <> -1) THEN
12158: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12159: END IF;
12160: --
12161: RAISE;
12162: --
12175: CURSOR c IS
12176: SELECT *
12177: FROM rlm_interface_headers
12178: WHERE header_id = x_header_id
12179: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,rlm_core_sv.k_PS_PARTIAL_PROCESSED)
12180: FOR UPDATE NOWAIT;
12181:
12182: BEGIN
12183: --
12181:
12182: BEGIN
12183: --
12184: IF (l_debug <> -1) THEN
12185: rlm_core_sv.dpush(k_SDEBUG,'LockHeaders');
12186: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_HEADERS');
12187: END IF;
12188: --
12189: OPEN c;
12182: BEGIN
12183: --
12184: IF (l_debug <> -1) THEN
12185: rlm_core_sv.dpush(k_SDEBUG,'LockHeaders');
12186: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_HEADERS');
12187: END IF;
12188: --
12189: OPEN c;
12190: --
12190: --
12191: CLOSE c;
12192: --
12193: IF (l_debug <> -1) THEN
12194: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12195: rlm_core_sv.dpop(k_SDEBUG);
12196: END IF;
12197: --
12198: RETURN TRUE;
12191: CLOSE c;
12192: --
12193: IF (l_debug <> -1) THEN
12194: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12195: rlm_core_sv.dpop(k_SDEBUG);
12196: END IF;
12197: --
12198: RETURN TRUE;
12199: --
12200: EXCEPTION
12201: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12202: --
12203: IF (l_debug <> -1) THEN
12204: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12205: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12206: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12207: END IF;
12208: --
12201: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12202: --
12203: IF (l_debug <> -1) THEN
12204: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12205: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12206: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12207: END IF;
12208: --
12209: RETURN FALSE;
12202: --
12203: IF (l_debug <> -1) THEN
12204: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12205: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12206: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12207: END IF;
12208: --
12209: RETURN FALSE;
12210: --
12211: WHEN OTHERS THEN
12212: rlm_message_sv.sql_error('rlm_rd_sv.LockHeaders',x_progress);
12213: --
12214: IF (l_debug <> -1) THEN
12215: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12216: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12217: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12218: END IF;
12219: --
12212: rlm_message_sv.sql_error('rlm_rd_sv.LockHeaders',x_progress);
12213: --
12214: IF (l_debug <> -1) THEN
12215: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12216: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12217: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12218: END IF;
12219: --
12220: RETURN FALSE;
12213: --
12214: IF (l_debug <> -1) THEN
12215: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12216: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12217: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12218: END IF;
12219: --
12220: RETURN FALSE;
12221:
12234:
12235: BEGIN
12236: --
12237: IF (l_debug <> -1) THEN
12238: rlm_core_sv.dpush(k_SDEBUG,'UpdateHeaderStatus');
12239: rlm_core_sv.dlog(k_DEBUG,'UpdateHeaderStatus to ', x_status);
12240: END IF;
12241: --
12242: UPDATE rlm_interface_headers
12235: BEGIN
12236: --
12237: IF (l_debug <> -1) THEN
12238: rlm_core_sv.dpush(k_SDEBUG,'UpdateHeaderStatus');
12239: rlm_core_sv.dlog(k_DEBUG,'UpdateHeaderStatus to ', x_status);
12240: END IF;
12241: --
12242: UPDATE rlm_interface_headers
12243: SET process_status = x_Status
12248: WHERE header_id = x_ScheduleHeaderId;
12249:
12250: --
12251: IF (l_debug <> -1) THEN
12252: rlm_core_sv.dpop(k_SDEBUG);
12253: END IF;
12254: --
12255: EXCEPTION
12256: --
12258: --
12259: rlm_message_sv.sql_error('rlm_rd_sv.UpdateHeaderStatus',x_progress);
12260: --
12261: IF (l_debug <> -1) THEN
12262: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12263: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12264: END IF;
12265: --
12266: RAISE ;
12259: rlm_message_sv.sql_error('rlm_rd_sv.UpdateHeaderStatus',x_progress);
12260: --
12261: IF (l_debug <> -1) THEN
12262: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12263: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12264: END IF;
12265: --
12266: RAISE ;
12267: --
12288: AND inventory_item_id = x_Group_rec.inventory_item_id
12289: --AND nvl(schedule_item_num,k_NNULL) = nvl(x_Group_rec.schedule_item_num, k_NNULL)
12290: AND order_header_id = x_Group_rec.order_header_id
12291: /*AND nvl(cust_production_seq_num,k_VNULL) = nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
12292: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
12293: FOR UPDATE NOWAIT;
12294:
12295: BEGIN
12296: --
12294:
12295: BEGIN
12296: --
12297: IF (l_debug <> -1) THEN
12298: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
12299: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
12300: END IF;
12301: --
12302: OPEN c;
12295: BEGIN
12296: --
12297: IF (l_debug <> -1) THEN
12298: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
12299: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
12300: END IF;
12301: --
12302: OPEN c;
12303: --
12303: --
12304: CLOSE c;
12305: --
12306: IF (l_debug <> -1) THEN
12307: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12308: rlm_core_sv.dpop(k_SDEBUG);
12309: END IF;
12310: --
12311: RETURN TRUE;
12304: CLOSE c;
12305: --
12306: IF (l_debug <> -1) THEN
12307: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12308: rlm_core_sv.dpop(k_SDEBUG);
12309: END IF;
12310: --
12311: RETURN TRUE;
12312: --
12313: EXCEPTION
12314: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12315: --
12316: IF (l_debug <> -1) THEN
12317: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12318: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12319: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12320: END IF;
12321: --
12314: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12315: --
12316: IF (l_debug <> -1) THEN
12317: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12318: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12319: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12320: END IF;
12321: --
12322: RETURN FALSE;
12315: --
12316: IF (l_debug <> -1) THEN
12317: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12318: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12319: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12320: END IF;
12321: --
12322: RETURN FALSE;
12323: --
12324: WHEN OTHERS THEN
12325: rlm_message_sv.sql_error('rlm_rd_sv.LockLines',x_progress);
12326: --
12327: IF (l_debug <> -1) THEN
12328: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12329: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12330: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12331: END IF;
12332: --
12325: rlm_message_sv.sql_error('rlm_rd_sv.LockLines',x_progress);
12326: --
12327: IF (l_debug <> -1) THEN
12328: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12329: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12330: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12331: END IF;
12332: --
12333: RETURN FALSE;
12326: --
12327: IF (l_debug <> -1) THEN
12328: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12329: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12330: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12331: END IF;
12332: --
12333: RETURN FALSE;
12334: --
12355: x_DemandToleranceNeg NUMBER;
12356: BEGIN
12357: --
12358: IF (l_debug <> -1) THEN
12359: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12360: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12356: BEGIN
12357: --
12358: IF (l_debug <> -1) THEN
12359: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12360: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12364: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12357: --
12358: IF (l_debug <> -1) THEN
12359: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12360: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12364: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12365: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12358: IF (l_debug <> -1) THEN
12359: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12360: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12364: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12365: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12366: x_group_rec.setup_terms_rec.demand_tolerance_below);
12359: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12360: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12364: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12365: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12366: x_group_rec.setup_terms_rec.demand_tolerance_below);
12367: END IF;
12361: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12362: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12363: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12364: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12365: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12366: x_group_rec.setup_terms_rec.demand_tolerance_below);
12367: END IF;
12368: --
12369: -- Verify that the quantity change falls within the defined tolerance limits
12377: v_PctDelta := ((x_NewQty - x_OldQty)/x_OldQty)*100;
12378: v_PctDelta := round(v_PctDelta,2);
12379: --
12380: IF (l_debug <> -1) THEN
12381: rlm_core_sv.dlog(k_DEBUG,'v_PctDelta',v_PctDelta);
12382: END IF;
12383: --
12384: IF (x_DemandTolerancePos < v_PctDelta) OR
12385: (x_DemandToleranceNeg < ABS(v_PctDelta)) THEN
12393: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
12394: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
12395: x_OrderLineId => x_Key_rec.dem_rec.line_id,
12396: x_token1=>'CUSITEM',
12397: x_value1=>rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
12398: x_token2=>'PCT_DELTA1',
12399: x_value2=>v_PctDelta,
12400: x_token3=>'PCT_DELTA_POSITIVE',
12401: x_value3=>x_DemandTolerancePos,
12402: x_token4=>'PCT_DELTA_NEGATIVE',
12403: x_value4=>x_DemandToleranceNeg);
12404: --
12405: IF (l_debug <> -1) THEN
12406: rlm_core_sv.dlog(k_DEBUG,'WARNING:RLM_TOLERANCE_CHECK_FAILED');
12407: rlm_core_sv.dlog(k_DEBUG,'tolerance check failed');
12408: END IF;
12409: --
12410: END IF;
12403: x_value4=>x_DemandToleranceNeg);
12404: --
12405: IF (l_debug <> -1) THEN
12406: rlm_core_sv.dlog(k_DEBUG,'WARNING:RLM_TOLERANCE_CHECK_FAILED');
12407: rlm_core_sv.dlog(k_DEBUG,'tolerance check failed');
12408: END IF;
12409: --
12410: END IF;
12411: --
12411: --
12412: END IF;
12413: --
12414: IF (l_debug <> -1) THEN
12415: rlm_core_sv.dpop(k_SDEBUG);
12416: END IF;
12417: --
12418: EXCEPTION
12419: --
12421: --
12422: rlm_message_sv.sql_error('rlm_rd_sv.CheckTolerance', v_Progress);
12423: --
12424: IF (l_debug <> -1) THEN
12425: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHERS - sql error');
12426: END IF;
12427: --
12428: raise;
12429: --
12442: BEGIN
12443: --
12444: IF (l_debug <> -1) THEN
12445: --{
12446: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12443: --
12444: IF (l_debug <> -1) THEN
12445: --{
12446: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12444: IF (l_debug <> -1) THEN
12445: --{
12446: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12452: --
12445: --{
12446: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12452: --
12453: IF g_Op_tab.COUNT <> 0 THEN
12446: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12452: --
12453: IF g_Op_tab.COUNT <> 0 THEN
12454: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12447: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12448: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12449: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12450: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12452: --
12453: IF g_Op_tab.COUNT <> 0 THEN
12454: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12455: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab('||i||').line_id',
12451: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12452: --
12453: IF g_Op_tab.COUNT <> 0 THEN
12454: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12455: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab('||i||').line_id',
12456: g_Op_Tab(i).line_id);
12457: END LOOP;
12458: END IF;
12459: --
12458: END IF;
12459: --
12460: IF g_Op_Tab_Unschedule.COUNT <> 0 THEN
12461: FOR i IN g_Op_Tab_Unschedule.FIRST..g_Op_Tab_unschedule.LAST LOOP
12462: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab_Unschedule('||i||').line_id',
12463: g_Op_Tab_Unschedule(i).line_id);
12464: END LOOP;
12465: END IF;
12466: --
12465: END IF;
12466: --
12467: IF g_Accounted_Tab.COUNT <> 0 THEN
12468: FOR i IN g_Accounted_Tab.FIRST..g_Accounted_Tab.LAST LOOP
12469: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab('||i||').line_id',
12470: g_Accounted_Tab(i).line_id);
12471: END LOOP;
12472: END IF;
12473: --}
12475: --
12476: IF (x_line_id_tab.COUNT = 0) THEN
12477: --
12478: IF (l_debug <> -1) THEN
12479: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12480: END IF;
12481: --
12482: RETURN FALSE;
12483: --
12491: --
12492: IF x_line_id_tab(i) = g_Op_tab(j).line_id THEN
12493: --
12494: IF (l_debug <> -1) THEN
12495: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12496: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12497: END IF;
12498: --
12499: RETURN TRUE;
12492: IF x_line_id_tab(i) = g_Op_tab(j).line_id THEN
12493: --
12494: IF (l_debug <> -1) THEN
12495: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12496: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12497: END IF;
12498: --
12499: RETURN TRUE;
12500: --
12515: --
12516: IF x_line_id_tab(i) = g_Accounted_tab(j).line_id THEN
12517: --
12518: IF (l_debug <> -1) THEN
12519: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12520: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12521: END IF;
12522: --
12523: RETURN TRUE;
12516: IF x_line_id_tab(i) = g_Accounted_tab(j).line_id THEN
12517: --
12518: IF (l_debug <> -1) THEN
12519: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12520: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12521: END IF;
12522: --
12523: RETURN TRUE;
12524: --
12541: --
12542: IF x_line_id_tab(k) = g_Op_tab_Unschedule(l).line_id THEN
12543: --
12544: IF (l_debug <> -1) THEN
12545: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(k));
12546: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12547: END IF;
12548: --
12549: RETURN TRUE;
12542: IF x_line_id_tab(k) = g_Op_tab_Unschedule(l).line_id THEN
12543: --
12544: IF (l_debug <> -1) THEN
12545: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(k));
12546: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12547: END IF;
12548: --
12549: RETURN TRUE;
12550: --
12554: --
12555: END LOOP;
12556: --
12557: IF (l_debug <> -1) THEN
12558: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12559: END IF;
12560: --
12561: RETURN FALSE;
12562: --
12562: --
12563: ELSE
12564: --
12565: IF (l_debug <> -1) THEN
12566: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12567: END IF;
12568: --
12569: RETURN FALSE;
12570: --
12574: --
12575: WHEN OTHERS THEN
12576: --
12577: IF (l_debug <> -1) THEN
12578: rlm_core_sv.dlog(k_DEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12579: rlm_core_sv.dpop(k_SDEBUG, 'When Others - FALSE');
12580: END IF;
12581: --
12582: RETURN FALSE;
12575: WHEN OTHERS THEN
12576: --
12577: IF (l_debug <> -1) THEN
12578: rlm_core_sv.dlog(k_DEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12579: rlm_core_sv.dpop(k_SDEBUG, 'When Others - FALSE');
12580: END IF;
12581: --
12582: RETURN FALSE;
12583: --
12608: BEGIN
12609: --
12610: --
12611: IF (l_debug <> -1) THEN
12612: rlm_core_sv.dpush(k_SDEBUG,'GetTPContext');
12613: END IF;
12614: --
12615: IF(x_sched_rec.header_id is not null) then
12616: --
12614: --
12615: IF(x_sched_rec.header_id is not null) then
12616: --
12617: IF (l_debug <> -1) THEN
12618: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12619: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12620: x_sched_rec.ece_tp_translator_code);
12621: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12622: x_sched_rec.ece_tp_location_code_ext);
12615: IF(x_sched_rec.header_id is not null) then
12616: --
12617: IF (l_debug <> -1) THEN
12618: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12619: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12620: x_sched_rec.ece_tp_translator_code);
12621: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12622: x_sched_rec.ece_tp_location_code_ext);
12623: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12617: IF (l_debug <> -1) THEN
12618: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12619: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12620: x_sched_rec.ece_tp_translator_code);
12621: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12622: x_sched_rec.ece_tp_location_code_ext);
12623: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12624: x_group_rec.ship_to_address_id);
12625: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12619: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12620: x_sched_rec.ece_tp_translator_code);
12621: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12622: x_sched_rec.ece_tp_location_code_ext);
12623: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12624: x_group_rec.ship_to_address_id);
12625: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12626: x_group_rec.bill_to_address_id);
12627: END IF;
12621: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12622: x_sched_rec.ece_tp_location_code_ext);
12623: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12624: x_group_rec.ship_to_address_id);
12625: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12626: x_group_rec.bill_to_address_id);
12627: END IF;
12628: --
12629: IF x_sched_rec.ECE_TP_LOCATION_CODE_EXT is NOT NULL THEN
12674: --
12675: END IF;
12676: --
12677: IF (l_debug <> -1) THEN
12678: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12679: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12680: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12681: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12682: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12675: END IF;
12676: --
12677: IF (l_debug <> -1) THEN
12678: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12679: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12680: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12681: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12682: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12683: END IF;
12676: --
12677: IF (l_debug <> -1) THEN
12678: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12679: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12680: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12681: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12682: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12683: END IF;
12684: --
12677: IF (l_debug <> -1) THEN
12678: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12679: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12680: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12681: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12682: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12683: END IF;
12684: --
12685: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12678: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12679: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12680: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12681: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12682: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12683: END IF;
12684: --
12685: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12686: --
12684: --
12685: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12686: --
12687: IF (l_debug <> -1) THEN
12688: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12689: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12690: x_key_rec.req_rec.ship_to_address_id);
12691: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12692: x_key_rec.req_rec.bill_to_address_id);
12685: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12686: --
12687: IF (l_debug <> -1) THEN
12688: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12689: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12690: x_key_rec.req_rec.ship_to_address_id);
12691: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12692: x_key_rec.req_rec.bill_to_address_id);
12693: END IF;
12687: IF (l_debug <> -1) THEN
12688: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12689: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12690: x_key_rec.req_rec.ship_to_address_id);
12691: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12692: x_key_rec.req_rec.bill_to_address_id);
12693: END IF;
12694: --
12695: SELECT ECE_TP_LOCATION_CODE_EXT, ECE_TP_TRANSLATOR_CODE
12741: --
12742: END IF;
12743: --
12744: IF (l_debug <> -1) THEN
12745: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12746: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12747: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12748: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12749: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12742: END IF;
12743: --
12744: IF (l_debug <> -1) THEN
12745: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12746: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12747: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12748: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12749: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12750: END IF;
12743: --
12744: IF (l_debug <> -1) THEN
12745: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12746: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12747: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12748: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12749: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12750: END IF;
12751: --
12744: IF (l_debug <> -1) THEN
12745: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12746: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12747: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12748: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12749: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12750: END IF;
12751: --
12752: ELSE
12745: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12746: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12747: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12748: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12749: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12750: END IF;
12751: --
12752: ELSE
12753: --
12780: --
12781: END IF;
12782: --
12783: IF (l_debug <> -1) THEN
12784: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12785: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12786: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12787: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12788: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12781: END IF;
12782: --
12783: IF (l_debug <> -1) THEN
12784: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12785: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12786: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12787: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12788: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12789: END IF;
12782: --
12783: IF (l_debug <> -1) THEN
12784: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12785: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12786: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12787: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12788: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12789: END IF;
12790: --
12783: IF (l_debug <> -1) THEN
12784: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12785: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12786: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12787: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12788: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12789: END IF;
12790: --
12791: END IF;
12784: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12785: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12786: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12787: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12788: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12789: END IF;
12790: --
12791: END IF;
12792: --
12790: --
12791: END IF;
12792: --
12793: IF (l_debug <> -1) THEN
12794: rlm_core_sv.dpop(k_SDEBUG);
12795: END IF;
12796: --
12797: EXCEPTION
12798: --
12800: --
12801: x_customer_number := NULL;
12802: --
12803: IF (l_debug <> -1) THEN
12804: rlm_core_sv.dlog(k_DEBUG, 'No data found for' , x_sched_rec.customer_id);
12805: rlm_core_sv.dpop(k_SDEBUG);
12806: END IF;
12807: --
12808: WHEN OTHERS THEN
12801: x_customer_number := NULL;
12802: --
12803: IF (l_debug <> -1) THEN
12804: rlm_core_sv.dlog(k_DEBUG, 'No data found for' , x_sched_rec.customer_id);
12805: rlm_core_sv.dpop(k_SDEBUG);
12806: END IF;
12807: --
12808: WHEN OTHERS THEN
12809: rlm_message_sv.sql_error('rlm_rd_sv.GetTPContext',v_Progress);
12808: WHEN OTHERS THEN
12809: rlm_message_sv.sql_error('rlm_rd_sv.GetTPContext',v_Progress);
12810: --
12811: IF (l_debug <> -1) THEN
12812: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12813: END IF;
12814: --
12815: raise;
12816: --
12826: --
12827: BEGIN
12828: --
12829: IF (l_debug <> -1) THEN
12830: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12827: BEGIN
12828: --
12829: IF (l_debug <> -1) THEN
12830: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12828: --
12829: IF (l_debug <> -1) THEN
12830: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12836: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12829: IF (l_debug <> -1) THEN
12830: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12836: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12837: END IF;
12830: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12836: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12837: END IF;
12838: --
12831: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12836: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12837: END IF;
12838: --
12839: OPEN x_match_ref FOR
12832: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12833: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12834: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12835: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12836: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12837: END IF;
12838: --
12839: OPEN x_match_ref FOR
12840: SELECT
12886: AND order_header_id = x_Group_rec.order_header_id
12887: AND item_detail_type IN (k_FIRM, k_FORECAST, k_PAST_DUE_FIRM);
12888: --
12889: IF (l_debug <> -1) THEN
12890: rlm_core_sv.dpop(k_SDEBUG, 'InitializeMatchRec');
12891: END IF;
12892: --
12893: EXCEPTION
12894: WHEN OTHERS THEN
12894: WHEN OTHERS THEN
12895: rlm_message_sv.sql_error('RLM_RD_SV.InitializeMatchRec', x_progress);
12896: --
12897: IF (l_debug <> -1) THEN
12898: rlm_core_sv.dpop(k_SDEBUG, 'EXCEPTION: ' || SUBSTR(SQLERRM,1,200));
12899: END IF;
12900: --
12901: RAISE e_group_error;
12902:
12911:
12912: BEGIN
12913: --
12914: IF (l_debug <> -1) THEN
12915: rlm_core_sv.dpush('FetchMatchRec');
12916: END IF;
12917: --
12918: FETCH x_match_ref INTO
12919: x_opt_match_rec.cust_production_line,
12958: --
12959: IF x_match_ref%NOTFOUND THEN
12960: --
12961: IF (l_debug <> -1) THEN
12962: rlm_core_sv.dpop(k_SDEBUG, 'false');
12963: END IF;
12964: --
12965: RETURN (FALSE);
12966: --
12966: --
12967: ELSE
12968: --
12969: IF (l_debug <> -1) THEN
12970: rlm_core_sv.dpop(k_SDEBUG, 'true');
12971: END IF;
12972: --
12973: RETURN (TRUE);
12974: --
12978: WHEN OTHERS THEN
12979: rlm_message_sv.sql_error('RLM_RD_SV.FetchMatchRec', x_progress);
12980: --
12981: IF (l_debug <> -1) THEN
12982: rlm_core_sv.dpop(k_SDEBUG, 'EXCEPTION: ' || SUBSTR(SQLERRM,1,200));
12983: END IF;
12984: --
12985: RAISE e_group_error;
12986: --
12991:
12992: BEGIN
12993: --
12994: IF (l_debug <> -1) THEN
12995: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12992: BEGIN
12993: --
12994: IF (l_debug <> -1) THEN
12995: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12993: --
12994: IF (l_debug <> -1) THEN
12995: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12994: IF (l_debug <> -1) THEN
12995: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12995: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12996: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12997: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12998: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12999: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13000: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13001: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13002: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13003: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13004: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13005: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13006: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13007: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13008: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13009: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13010: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13011: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13012: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13013: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13014: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13015: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13016: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13017: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13018: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13019: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13020: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13021: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13022: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13030: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
13023: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13030: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
13031: END IF;
13024: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13030: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
13031: END IF;
13032: --
13025: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13030: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
13031: END IF;
13032: --
13033: END PrintMatchRec;
13026: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
13027: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
13028: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
13029: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
13030: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
13031: END IF;
13032: --
13033: END PrintMatchRec;
13034:
13044: --
13045: BEGIN
13046: --
13047: IF (l_debug <> -1) THEN
13048: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyMatched');
13049: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit tab', g_IntransitTab.COUNT);
13050: END IF;
13051: --
13052: b_Match := FALSE;
13045: BEGIN
13046: --
13047: IF (l_debug <> -1) THEN
13048: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyMatched');
13049: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit tab', g_IntransitTab.COUNT);
13050: END IF;
13051: --
13052: b_Match := FALSE;
13053: --
13053: --
13054: IF g_IntransitTab.COUNT = 0 THEN
13055: --
13056: IF (l_debug <> -1) THEN
13057: rlm_core_sv.dpop(k_SDEBUG, 'false');
13058: END IF;
13059: --
13060: RETURN (FALSE);
13061: --
13068: IF (x_Group_rec.match_within_rec.cust_production_line = 'Y') THEN
13069: IF NVL(g_IntransitTab(i).cust_production_line, k_VNULL) <> NVL(x_match_rec.cust_production_line, k_VNULL) THEN
13070: --
13071: IF (l_debug <> -1) THEN
13072: rlm_core_sv.dlog(k_DEBUG, 'prod line didnt match');
13073: END IF;
13074: --
13075: RAISE e_NoMatch;
13076: END IF;
13079: IF (x_Group_rec.match_within_rec.customer_dock_code = 'Y') THEN
13080: IF NVL(g_IntransitTab(i).customer_dock_code, k_VNULL) <> NVL(x_match_rec.customer_dock_code, k_VNULL) THEN
13081: --
13082: IF (l_debug <> -1) THEN
13083: rlm_core_sv.dlog(k_DEBUG, 'dock code didnt match');
13084: END IF;
13085: --
13086: RAISE e_NoMatch;
13087: --
13091: IF (x_Group_rec.match_within_rec.cust_po_number = 'Y') THEN
13092: IF NVL(g_IntransitTab(i).cust_po_number, k_VNULL) <> NVL(x_match_rec.cust_po_number, k_VNULL) THEN
13093: --
13094: IF (l_debug <> -1) THEN
13095: rlm_core_sv.dlog(k_DEBUG, 'po num didnt match');
13096: END IF;
13097: --
13098: RAISE e_NoMatch;
13099: END IF;
13102: IF (x_Group_rec.match_within_rec.customer_item_revision = 'Y') THEN
13103: IF NVL(g_IntransitTab(i).customer_item_revision, k_VNULL) <> NVL(x_match_rec.customer_item_revision, k_VNULL) THEN
13104: --
13105: IF (l_debug <> -1) THEN
13106: rlm_core_sv.dlog(k_DEBUG, 'cust item rev didnt match');
13107: END IF;
13108: --
13109: RAISE e_NoMatch;
13110: END IF;
13113: IF (x_Group_rec.match_within_rec.customer_job = 'Y') THEN
13114: IF NVL(g_IntransitTab(i).customer_job, k_VNULL) <> NVL(x_match_rec.customer_job, k_VNULL) THEN
13115: --
13116: IF (l_debug <> -1) THEN
13117: rlm_core_sv.dlog(k_DEBUG, 'customer job didnt match');
13118: END IF;
13119: --
13120: RAISE e_NoMatch;
13121: END IF;
13124: IF (x_Group_rec.match_within_rec.cust_model_serial_number = 'Y') THEN
13125: IF NVL(g_IntransitTab(i).cust_model_serial_number, k_VNULL) <> NVL(x_match_rec.cust_model_serial_number, k_VNULL) THEN
13126: --
13127: IF (l_debug <> -1) THEN
13128: rlm_core_sv.dlog(k_DEBUG, 'model serial no. didnt match');
13129: END IF;
13130: --
13131: RAISE e_NoMatch;
13132: END IF;
13135: IF (x_Group_rec.match_within_rec.cust_production_seq_num = 'Y') THEN
13136: IF NVL(g_IntransitTab(i).cust_production_seq_num, k_VNULL) <> NVL(x_match_rec.cust_production_seq_num, k_VNULL) THEN
13137: --
13138: IF (l_debug <> -1) THEN
13139: rlm_core_sv.dlog(k_DEBUG, 'PSQ num didnt match');
13140: END IF;
13141: --
13142: RAISE e_NoMatch;
13143: END IF;
13146: IF (x_Group_rec.match_within_rec.industry_attribute1 = 'Y') THEN
13147: IF NVL(g_IntransitTab(i).industry_attribute1, k_VNULL) <> NVL(x_match_rec.industry_attribute1, k_VNULL) THEN
13148: --
13149: IF (l_debug <> -1) THEN
13150: rlm_core_sv.dlog(k_DEBUG, 'IA1 num didnt match');
13151: END IF;
13152: --
13153: RAISE e_NoMatch;
13154: END IF;
13157: IF (x_Group_rec.match_within_rec.industry_attribute4 = 'Y') THEN
13158: IF NVL(g_IntransitTab(i).industry_attribute4, k_VNULL) <> NVL(x_match_rec.industry_attribute4, k_VNULL) THEN
13159: --
13160: IF (l_debug <> -1) THEN
13161: rlm_core_sv.dlog(k_DEBUG, 'IA4 num didnt match');
13162: END IF;
13163: --
13164: RAISE e_NoMatch;
13165: END IF;
13168: IF (x_Group_rec.match_within_rec.industry_attribute5 = 'Y') THEN
13169: IF NVL(g_IntransitTab(i).industry_attribute5, k_VNULL) <> NVL(x_match_rec.industry_attribute5, k_VNULL) THEN
13170: --
13171: IF (l_debug <> -1) THEN
13172: rlm_core_sv.dlog(k_DEBUG, 'IA5 num didnt match');
13173: END IF;
13174: --
13175: RAISE e_NoMatch;
13176: END IF;
13179: IF (x_Group_rec.match_within_rec.industry_attribute6 = 'Y') THEN
13180: IF NVL(g_IntransitTab(i).industry_attribute6, k_VNULL) <> NVL(x_match_rec.industry_attribute6, k_VNULL) THEN
13181: --
13182: IF (l_debug <> -1) THEN
13183: rlm_core_sv.dlog(k_DEBUG, 'IA6 num didnt match');
13184: END IF;
13185: --
13186: RAISE e_NoMatch;
13187: END IF;
13190: IF (x_Group_rec.match_within_rec.industry_attribute9 = 'Y') THEN
13191: IF NVL(g_IntransitTab(i).industry_attribute9, k_VNULL) <> NVL(x_match_rec.industry_attribute9, k_VNULL) THEN
13192: --
13193: IF (l_debug <> -1) THEN
13194: rlm_core_sv.dlog(k_DEBUG, 'IA9 num didnt match');
13195: END IF;
13196: --
13197: RAISE e_NoMatch;
13198: END IF;
13201: IF (x_Group_rec.match_within_rec.industry_attribute10 = 'Y') THEN
13202: IF NVL(g_IntransitTab(i).industry_attribute10, k_VNULL) <> NVL(x_match_rec.industry_attribute10, k_VNULL) THEN
13203: --
13204: IF (l_debug <> -1) THEN
13205: rlm_core_sv.dlog(k_DEBUG, 'IA10 num didnt match');
13206: END IF;
13207: --
13208: RAISE e_NoMatch;
13209: END IF;
13212: IF (x_Group_rec.match_within_rec.industry_attribute11 = 'Y') THEN
13213: IF NVL(g_IntransitTab(i).industry_attribute11, k_VNULL) <> NVL(x_match_rec.industry_attribute11, k_VNULL) THEN
13214: --
13215: IF (l_debug <> -1) THEN
13216: rlm_core_sv.dlog(k_DEBUG, 'IA11 num didnt match');
13217: END IF;
13218: --
13219: RAISE e_NoMatch;
13220: END IF;
13223: IF (x_Group_rec.match_within_rec.industry_attribute12 = 'Y') THEN
13224: IF NVL(g_IntransitTab(i).industry_attribute12, k_VNULL) <> NVL(x_match_rec.industry_attribute12, k_VNULL) THEN
13225: --
13226: IF (l_debug <> -1) THEN
13227: rlm_core_sv.dlog(k_DEBUG, 'IA12 num didnt match');
13228: END IF;
13229: --
13230: RAISE e_NoMatch;
13231: END IF;
13234: IF (x_Group_rec.match_within_rec.industry_attribute13 = 'Y') THEN
13235: IF NVL(g_IntransitTab(i).industry_attribute13, k_VNULL) <> NVL(x_match_rec.industry_attribute13, k_VNULL) THEN
13236: --
13237: IF (l_debug <> -1) THEN
13238: rlm_core_sv.dlog(k_DEBUG, 'IA13 num didnt match');
13239: END IF;
13240: --
13241: RAISE e_NoMatch;
13242: END IF;
13245: IF (x_Group_rec.match_within_rec.industry_attribute14 = 'Y') THEN
13246: IF NVL(g_IntransitTab(i).industry_attribute14, k_VNULL) <> NVL(x_match_rec.industry_attribute14, k_VNULL) THEN
13247: --
13248: IF (l_debug <> -1) THEN
13249: rlm_core_sv.dlog(k_DEBUG, 'IA14 num didnt match');
13250: END IF;
13251: --
13252: RAISE e_NoMatch;
13253: END IF;
13256: IF (x_Group_rec.match_within_rec.attribute1 = 'Y') THEN
13257: IF NVL(g_IntransitTab(i).attribute1, k_VNULL) <> NVL(x_match_rec.attribute1, k_VNULL) THEN
13258: --
13259: IF (l_debug <> -1) THEN
13260: rlm_core_sv.dlog(k_DEBUG, 'A1 num didnt match');
13261: END IF;
13262: --
13263: RAISE e_NoMatch;
13264: END IF;
13267: IF (x_Group_rec.match_within_rec.attribute2 = 'Y') THEN
13268: IF NVL(g_IntransitTab(i).attribute2, k_VNULL) <> NVL(x_match_rec.attribute2, k_VNULL) THEN
13269: --
13270: IF (l_debug <> -1) THEN
13271: rlm_core_sv.dlog(k_DEBUG, 'A2 num didnt match');
13272: END IF;
13273: --
13274: RAISE e_NoMatch;
13275: END IF;
13278: IF (x_Group_rec.match_within_rec.attribute3 = 'Y') THEN
13279: IF NVL(g_IntransitTab(i).attribute3, k_VNULL) <> NVL(x_match_rec.attribute3, k_VNULL) THEN
13280: --
13281: IF (l_debug <> -1) THEN
13282: rlm_core_sv.dlog(k_DEBUG, 'A3 num didnt match');
13283: END IF;
13284: --
13285: RAISE e_NoMatch;
13286: END IF;
13289: IF (x_Group_rec.match_within_rec.attribute4 = 'Y') THEN
13290: IF NVL(g_IntransitTab(i).attribute4, k_VNULL) <> NVL(x_match_rec.attribute4, k_VNULL) THEN
13291: --
13292: IF (l_debug <> -1) THEN
13293: rlm_core_sv.dlog(k_DEBUG, 'A4 num didnt match');
13294: END IF;
13295: --
13296: RAISE e_NoMatch;
13297: END IF;
13300: IF (x_Group_rec.match_within_rec.attribute5 = 'Y') THEN
13301: IF NVL(g_IntransitTab(i).attribute5, k_VNULL) <> NVL(x_match_rec.attribute5, k_VNULL) THEN
13302: --
13303: IF (l_debug <> -1) THEN
13304: rlm_core_sv.dlog(k_DEBUG, 'A5 num didnt match');
13305: END IF;
13306: --
13307: RAISE e_NoMatch;
13308: END IF;
13311: IF (x_Group_rec.match_within_rec.attribute6 = 'Y') THEN
13312: IF NVL(g_IntransitTab(i).attribute6, k_VNULL) <> NVL(x_match_rec.attribute6, k_VNULL) THEN
13313: --
13314: IF (l_debug <> -1) THEN
13315: rlm_core_sv.dlog(k_DEBUG, 'A6 num didnt match');
13316: END IF;
13317: --
13318: RAISE e_NoMatch;
13319: END IF;
13322: IF (x_Group_rec.match_within_rec.attribute7 = 'Y') THEN
13323: IF NVL(g_IntransitTab(i).attribute7, k_VNULL) <> NVL(x_match_rec.attribute7, k_VNULL) THEN
13324: --
13325: IF (l_debug <> -1) THEN
13326: rlm_core_sv.dlog(k_DEBUG, 'A7 num didnt match');
13327: END IF;
13328: --
13329: RAISE e_NoMatch;
13330: END IF;
13333: IF (x_Group_rec.match_within_rec.attribute8 = 'Y') THEN
13334: IF NVL(g_IntransitTab(i).attribute8, k_VNULL) <> NVL(x_match_rec.attribute8, k_VNULL) THEN
13335: --
13336: IF (l_debug <> -1) THEN
13337: rlm_core_sv.dlog(k_DEBUG, 'A8 num didnt match');
13338: END IF;
13339: --
13340: RAISE e_NoMatch;
13341: END IF;
13344: IF (x_Group_rec.match_within_rec.attribute9 = 'Y') THEN
13345: IF NVL(g_IntransitTab(i).attribute9, k_VNULL) <> NVL(x_match_rec.attribute9, k_VNULL) THEN
13346: --
13347: IF (l_debug <> -1) THEN
13348: rlm_core_sv.dlog(k_DEBUG, 'A9 num didnt match');
13349: END IF;
13350: --
13351: RAISE e_NoMatch;
13352: END IF;
13355: IF (x_Group_rec.match_within_rec.attribute10 = 'Y') THEN
13356: IF NVL(g_IntransitTab(i).attribute10, k_VNULL) <> NVL(x_match_rec.attribute10, k_VNULL) THEN
13357: --
13358: IF (l_debug <> -1) THEN
13359: rlm_core_sv.dlog(k_DEBUG, 'A10 num didnt match');
13360: END IF;
13361: --
13362: RAISE e_NoMatch;
13363: END IF;
13366: IF (x_Group_rec.match_within_rec.attribute11 = 'Y') THEN
13367: IF NVL(g_IntransitTab(i).attribute11, k_VNULL) <> NVL(x_match_rec.attribute11, k_VNULL) THEN
13368: --
13369: IF (l_debug <> -1) THEN
13370: rlm_core_sv.dlog(k_DEBUG, 'A11 num didnt match');
13371: END IF;
13372: --
13373: RAISE e_NoMatch;
13374: END IF;
13377: IF (x_Group_rec.match_within_rec.attribute12 = 'Y') THEN
13378: IF NVL(g_IntransitTab(i).attribute12, k_VNULL) <> NVL(x_match_rec.attribute12, k_VNULL) THEN
13379: --
13380: IF (l_debug <> -1) THEN
13381: rlm_core_sv.dlog(k_DEBUG, 'A12 num didnt match');
13382: END IF;
13383: --
13384: RAISE e_NoMatch;
13385: END IF;
13388: IF (x_Group_rec.match_within_rec.attribute13 = 'Y') THEN
13389: IF NVL(g_IntransitTab(i).attribute13, k_VNULL) <> NVL(x_match_rec.attribute13, k_VNULL) THEN
13390: --
13391: IF (l_debug <> -1) THEN
13392: rlm_core_sv.dlog(k_DEBUG, 'A13 num didnt match');
13393: END IF;
13394: --
13395: RAISE e_NoMatch;
13396: END IF;
13399: IF (x_Group_rec.match_within_rec.attribute14 = 'Y') THEN
13400: IF NVL(g_IntransitTab(i).attribute14, k_VNULL) <> NVL(x_match_rec.attribute14, k_VNULL) THEN
13401: --
13402: IF (l_debug <> -1) THEN
13403: rlm_core_sv.dlog(k_DEBUG, 'A14 num didnt match');
13404: END IF;
13405: --
13406: RAISE e_NoMatch;
13407: END IF;
13410: IF (x_Group_rec.match_within_rec.attribute15 = 'Y') THEN
13411: IF NVL(g_IntransitTab(i).attribute15, k_VNULL) <> NVL(x_match_rec.attribute15, k_VNULL) THEN
13412: --
13413: IF (l_debug <> -1) THEN
13414: rlm_core_sv.dlog(k_DEBUG, 'A15 num didnt match');
13415: END IF;
13416: --
13417: RAISE e_NoMatch;
13418: END IF;
13420: --
13421: b_Match := TRUE;
13422: --
13423: IF (l_debug <> -1) THEN
13424: rlm_core_sv.dlog(k_DEBUG, 'Matched with index', i);
13425: END IF;
13426: --
13427: x_Index := i;
13428: EXIT;
13434: --
13435: END LOOP;
13436: --
13437: IF (l_debug <> -1) THEN
13438: rlm_core_sv.dpop(k_SDEBUG, 'AlreadyMatched');
13439: END IF;
13440: --
13441: RETURN (b_Match);
13442: --
13458: --
13459: BEGIN
13460: --
13461: IF (l_debug <> -1) THEN
13462: rlm_core_sv.dpush(k_SDEBUG, 'MRPOnly');
13463: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
13464: END IF;
13465: --
13466: IF x_Sched_rec.Schedule_Source <> 'MANUAL' THEN
13459: BEGIN
13460: --
13461: IF (l_debug <> -1) THEN
13462: rlm_core_sv.dpush(k_SDEBUG, 'MRPOnly');
13463: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
13464: END IF;
13465: --
13466: IF x_Sched_rec.Schedule_Source <> 'MANUAL' THEN
13467:
13467:
13468: IF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_PLANNING THEN
13469: --
13470: IF (l_debug <> -1) THEN
13471: rlm_core_sv.dlog(k_DEBUG, 'pln_mrp_forecast_day_from',
13472: x_group_rec.setup_terms_rec.pln_mrp_forecast_day_from);
13473: END IF;
13474: --
13475: IF x_Group_rec.setup_terms_rec.pln_mrp_forecast_day_from = 1 THEN
13474: --
13475: IF x_Group_rec.setup_terms_rec.pln_mrp_forecast_day_from = 1 THEN
13476: --
13477: IF (l_debug <> -1) THEN
13478: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13479: END IF;
13480: --
13481: RETURN TRUE;
13482: --
13482: --
13483: ELSE
13484: --
13485: IF (l_debug <> -1) THEN
13486: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13487: END IF;
13488: --
13489: RETURN FALSE;
13490: --
13492: --
13493: ELSIF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_SHIPPING THEN
13494: --
13495: IF (l_debug <> -1) THEN
13496: rlm_core_sv.dlog(k_DEBUG, 'shp_mrp_forecast_day_from',
13497: x_group_rec.setup_terms_rec.shp_mrp_forecast_day_from);
13498: END IF;
13499: --
13500: IF x_Group_rec.setup_terms_rec.shp_mrp_forecast_day_from = 1 THEN
13499: --
13500: IF x_Group_rec.setup_terms_rec.shp_mrp_forecast_day_from = 1 THEN
13501: --
13502: IF (l_debug <> -1) THEN
13503: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13504: END IF;
13505: --
13506: RETURN TRUE;
13507: --
13507: --
13508: ELSE
13509: --
13510: IF (l_debug <> -1) THEN
13511: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13512: END IF;
13513: --
13514: RETURN FALSE;
13515: --
13517: --
13518: ELSIF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_SEQUENCED THEN
13519: --
13520: IF (l_debug <> -1) THEN
13521: rlm_core_sv.dlog(k_DEBUG, 'seq_mrp_forecast_day_from',
13522: x_group_rec.setup_terms_rec.seq_mrp_forecast_day_from);
13523: END IF;
13524: --
13525: IF x_Group_rec.setup_terms_rec.seq_mrp_forecast_day_from = 1 THEN
13524: --
13525: IF x_Group_rec.setup_terms_rec.seq_mrp_forecast_day_from = 1 THEN
13526: --
13527: IF (l_debug <> -1) THEN
13528: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13529: END IF;
13530: --
13531: RETURN TRUE;
13532: --
13532: --
13533: ELSE
13534: --
13535: IF (l_debug <> -1) THEN
13536: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13537: END IF;
13538: --
13539: RETURN FALSE;
13540: --
13542: --
13543: ELSE
13544: --
13545: IF (l_debug <> -1) THEN
13546: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13547: END IF;
13548: --
13549: RETURN FALSE;
13550: --
13552: --
13553: ELSE
13554: --
13555: IF (l_debug <> -1) THEN
13556: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13557: END IF;
13558: --
13559: RETURN FALSE;
13560: --
13566: --
13567: rlm_message_sv.sql_error('RLM_RD_SV.MRPOnly', v_Progress);
13568: --
13569: IF (l_debug <> -1) THEN
13570: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '|| SUBSTR(SQLERRM,1,200));
13571: END IF;
13572: --
13573: raise;
13574: --
13581:
13582: BEGIN
13583: --
13584: IF (l_debug <> -1) THEN
13585: rlm_core_sv.dpush(k_SDEBUG, 'InsertIntransitMatchRec');
13586: END IF;
13587: --
13588: v_Index := g_IntransitTab.COUNT;
13589: --
13587: --
13588: v_Index := g_IntransitTab.COUNT;
13589: --
13590: IF (l_debug <> -1) THEN
13591: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit table', v_Index);
13592: END IF;
13593: --
13594: g_IntransitTab(v_Index+1).cust_production_line := x_match_rec.cust_production_line;
13595: g_IntransitTab(v_Index+1).customer_dock_code := x_match_rec.customer_dock_code;
13632: g_IntransitTab(v_Index+1).attribute15 := x_match_rec.attribute15;
13633: g_IntransitTab(v_Index+1).intransit_qty := x_Quantity;
13634: --
13635: IF (l_debug <> -1) THEN
13636: rlm_core_sv.dpop(k_SDEBUG, 'InsertIntransitMatchRec');
13637: END IF;
13638: --
13639: END InsertIntransitMatchRec;
13640:
13735:
13736: BEGIN
13737: --
13738: IF (l_debug <> -1) THEN
13739: rlm_core_sv.dpush(k_SDEBUG, 'InitializeIntransitParam');
13740: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_intransit_calc_basis);
13741: END IF;
13742: --
13743: IF (x_Group_rec.setup_terms_rec.time_uom_code = 'HR') THEN
13736: BEGIN
13737: --
13738: IF (l_debug <> -1) THEN
13739: rlm_core_sv.dpush(k_SDEBUG, 'InitializeIntransitParam');
13740: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_intransit_calc_basis);
13741: END IF;
13742: --
13743: IF (x_Group_rec.setup_terms_rec.time_uom_code = 'HR') THEN
13744: v_intransit_time := nvl(x_Group_rec.setup_terms_rec.intransit_time,0)/24;
13753: --
13754: IF (c_LastReceipt%NOTFOUND) THEN
13755: --
13756: IF (l_debug <> -1) THEN
13757: rlm_core_sv.dlog(k_DEBUG, 'No receipt line, so shipment date = sched_gen_Date - intransit');
13758: END IF;
13759: --
13760: v_shipment_date := x_Sched_rec.sched_generation_date - v_intransit_time;
13761: x_shipper_rec.shipper_Id1 := NULL;
13766: --
13767: ELSIF (v_deliveryID is NOT NULL) THEN
13768: --
13769: IF (l_debug <> -1) THEN
13770: rlm_core_sv.dlog('Delivery ID present on schedule');
13771: END IF;
13772: --
13773: FOR v_RctSID IN c_RctShipperIds LOOP
13774: --
13778: --
13779: v_count := v_count + 1;
13780: --
13781: IF (l_debug <> -1) THEN
13782: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13783: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13784: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13785: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13786: END IF;
13779: v_count := v_count + 1;
13780: --
13781: IF (l_debug <> -1) THEN
13782: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13783: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13784: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13785: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13786: END IF;
13787: --
13780: --
13781: IF (l_debug <> -1) THEN
13782: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13783: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13784: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13785: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13786: END IF;
13787: --
13788: IF v_count = 1 THEN
13781: IF (l_debug <> -1) THEN
13782: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13783: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13784: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13785: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13786: END IF;
13787: --
13788: IF v_count = 1 THEN
13789: --
13811: --
13812: ELSIF (v_shipment_date IS NOT NULL) THEN
13813: --
13814: IF (l_debug <> -1) THEN
13815: rlm_core_sv.dlog(k_DEBUG, 'No delivery ID present on schedule');
13816: END IF;
13817: --
13818: v_shipment_date := v_shipment_date - v_intransit_time;
13819: x_shipper_rec.shipper_Id1 := NULL;
13824: --
13825: END IF;
13826: --
13827: IF (l_debug <> -1) THEN
13828: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13829: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13830: END IF;
13831: --
13832: x_Shipment_date := v_shipment_date;
13825: END IF;
13826: --
13827: IF (l_debug <> -1) THEN
13828: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13829: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13830: END IF;
13831: --
13832: x_Shipment_date := v_shipment_date;
13833: CLOSE c_LastReceipt;
13839: --
13840: IF (c_LastShipment%NOTFOUND) THEN
13841: --
13842: IF (l_debug <> -1) THEN
13843: rlm_core_sv.dlog(k_DEBUG, 'No shipment line, so shipment date = sched_gen_Date');
13844: END IF;
13845: --
13846: v_shipment_date := x_Sched_rec.sched_generation_date;
13847: x_shipper_rec.shipper_Id1 := NULL;
13852: --
13853: ELSIF (v_deliveryID is NOT NULL) THEN
13854: --
13855: IF (l_debug <> -1) THEN
13856: rlm_core_sv.dlog('Delivery ID present on schedule');
13857: END IF;
13858: --
13859: FOR v_ShpSID IN c_ShpShipperIds LOOP
13860: --
13864: --
13865: v_count := v_count + 1;
13866: --
13867: IF (l_debug <> -1) THEN
13868: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13869: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13870: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13871: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13872: END IF;
13865: v_count := v_count + 1;
13866: --
13867: IF (l_debug <> -1) THEN
13868: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13869: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13870: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13871: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13872: END IF;
13873: --
13866: --
13867: IF (l_debug <> -1) THEN
13868: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13869: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13870: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13871: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13872: END IF;
13873: --
13874: IF v_count = 1 THEN
13867: IF (l_debug <> -1) THEN
13868: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13869: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13870: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13871: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13872: END IF;
13873: --
13874: IF v_count = 1 THEN
13875: --
13897: --
13898: ELSIF (v_shipment_date IS NOT NULL) THEN
13899: --
13900: IF (l_debug <> -1) THEN
13901: rlm_core_sv.dlog(k_DEBUG, 'No delivery ID present on schedule');
13902: END IF;
13903: --
13904: x_shipper_rec.shipper_Id1 := NULL;
13905: x_Shipper_rec.shipper_Id2 := NULL;
13909: --
13910: END IF;
13911: --
13912: IF (l_debug <> -1) THEN
13913: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13914: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13915: END IF;
13916: --
13917: x_Shipment_date := v_shipment_date;
13910: END IF;
13911: --
13912: IF (l_debug <> -1) THEN
13913: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13914: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13915: END IF;
13916: --
13917: x_Shipment_date := v_shipment_date;
13918: CLOSE c_LastShipment;
13919: --
13920: END IF; /* if intransit_calc_basis */
13921: --
13922: IF (l_debug <> -1) THEN
13923: rlm_core_sv.dpop(k_SDEBUG, 'InitializeIntransitParam');
13924: END IF;
13925: --
13926: END InitializeIntransitParam;
13927:
13943: --
13944: BEGIN
13945: --
13946: IF (l_debug <> -1) THEN
13947: rlm_core_sv.dpush(k_SDEBUG,'InitializeBlktGroup');
13948: END IF;
13949: --
13950: OPEN x_Group_ref FOR
13951: SELECT rih.customer_id,
13966: WHERE rih.header_id = x_Sched_rec.header_id
13967: AND rih.org_id = ril.org_id
13968: AND ril.header_id = rih.header_id
13969: AND ril.ship_from_org_id = x_Group_rec.ship_from_org_id
13970: AND ril.process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
13971: AND ril.customer_item_id = x_Group_rec.customer_item_id
13972: AND ril.ship_to_address_id = x_Group_rec.ship_to_address_id
13973: AND ril.blanket_number = rso.blanket_number
13974: AND rih.customer_id = rso.customer_id
13992: ril.customer_item_id,
13993: rso.effective_start_date;
13994: --
13995: IF (l_debug <> -1) THEN
13996: rlm_core_sv.dpop(k_SDEBUG);
13997: END IF;
13998: --
13999: EXCEPTION
14000: --
14001: WHEN OTHERS THEN
14002: rlm_message_sv.sql_error('rlm_rd_sv.InitializeBlktGrp',x_progress);
14003: --
14004: IF (l_debug <> -1) THEN
14005: rlm_core_sv.dlog(k_DEBUG, 'When others of InitializeBlktGrp');
14006: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14007: END IF;
14008: --
14009: raise e_group_error;
14002: rlm_message_sv.sql_error('rlm_rd_sv.InitializeBlktGrp',x_progress);
14003: --
14004: IF (l_debug <> -1) THEN
14005: rlm_core_sv.dlog(k_DEBUG, 'When others of InitializeBlktGrp');
14006: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14007: END IF;
14008: --
14009: raise e_group_error;
14010: --
14026: --
14027: BEGIN
14028: --
14029: IF (l_debug <> -1) THEN
14030: rlm_core_sv.dpush(k_SDEBUG,'FetchBlktGroup');
14031: END IF;
14032: --
14033: FETCH x_Group_ref INTO
14034: x_Group_rec.customer_id,
14044: x_Group_rec.intrmd_ship_to_id, --Bugfix 5911991
14045: x_Group_rec.intmed_ship_to_org_id ; --Bugfix 5911991
14046: --
14047: IF (l_debug <> -1) THEN
14048: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
14049: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
14050: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
14051: END IF;
14052: --
14045: x_Group_rec.intmed_ship_to_org_id ; --Bugfix 5911991
14046: --
14047: IF (l_debug <> -1) THEN
14048: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
14049: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
14050: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
14051: END IF;
14052: --
14053: IF x_Group_ref%NOTFOUND THEN
14046: --
14047: IF (l_debug <> -1) THEN
14048: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
14049: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
14050: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
14051: END IF;
14052: --
14053: IF x_Group_ref%NOTFOUND THEN
14054: --
14052: --
14053: IF x_Group_ref%NOTFOUND THEN
14054: --
14055: IF (l_debug <> -1) THEN
14056: rlm_core_sv.dpop(k_SDEBUG, 'false');
14057: END IF;
14058: --
14059: RETURN(FALSE);
14060: ELSE
14059: RETURN(FALSE);
14060: ELSE
14061: --
14062: IF (l_debug <> -1) THEN
14063: rlm_core_sv.dpop(k_SDEBUG, 'true');
14064: END IF;
14065: --
14066: RETURN(TRUE);
14067: END IF;
14071: WHEN OTHERS THEN
14072: rlm_message_sv.sql_error('rlm_rd_sv.FetchBlktGrp',x_progress);
14073: --
14074: IF (l_debug <> -1) THEN
14075: rlm_core_sv.dlog(k_DEBUG, 'When others of FetchBlktGrp');
14076: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14077: END IF;
14078: --
14079: raise;
14072: rlm_message_sv.sql_error('rlm_rd_sv.FetchBlktGrp',x_progress);
14073: --
14074: IF (l_debug <> -1) THEN
14075: rlm_core_sv.dlog(k_DEBUG, 'When others of FetchBlktGrp');
14076: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14077: END IF;
14078: --
14079: raise;
14080: --
14082:
14083:
14084: /* *
14085: * SQL Bind Project: These functions just build a combined table *
14086: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
14087: */
14088: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14084: /* *
14085: * SQL Bind Project: These functions just build a combined table *
14086: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
14087: */
14088: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14091: RETURN RLM_CORE_SV.t_dynamic_tab IS
14092: --
14085: * SQL Bind Project: These functions just build a combined table *
14086: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
14087: */
14088: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14091: RETURN RLM_CORE_SV.t_dynamic_tab IS
14092: --
14093: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14086: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
14087: */
14088: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14091: RETURN RLM_CORE_SV.t_dynamic_tab IS
14092: --
14093: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14094: x_Progress VARCHAR2(3) := '010';
14087: */
14088: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14091: RETURN RLM_CORE_SV.t_dynamic_tab IS
14092: --
14093: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14094: x_Progress VARCHAR2(3) := '010';
14095: --
14089: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14090: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
14091: RETURN RLM_CORE_SV.t_dynamic_tab IS
14092: --
14093: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14094: x_Progress VARCHAR2(3) := '010';
14095: --
14096: BEGIN
14097: --
14095: --
14096: BEGIN
14097: --
14098: IF (l_debug <> -1) THEN
14099: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab3');
14100: END IF;
14101: --
14102: FOR i IN 1..p_Tab1.COUNT LOOP
14103: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
14111: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab3(i);
14112: END LOOP;
14113: --
14114: IF (l_debug <> -1) THEN
14115: rlm_core_sv.dpop(k_SDEBUG);
14116: END IF;
14117: --
14118: RETURN x_BindVarTab;
14119: --
14123: --
14124: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab3',x_progress);
14125: --
14126: IF (l_debug <> -1) THEN
14127: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
14128: END IF;
14129: --
14130: raise;
14131: --
14131: --
14132: END BuildBindVarTab3;
14133:
14134:
14135: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14132: END BuildBindVarTab3;
14133:
14134:
14135: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14133:
14134:
14135: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14141: --
14134:
14135: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14141: --
14142: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14135: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14141: --
14142: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14143: x_Progress VARCHAR2(3) := '010';
14136: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
14137: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14141: --
14142: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14143: x_Progress VARCHAR2(3) := '010';
14144: --
14138: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
14139: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
14140: RETURN RLM_CORE_SV.t_dynamic_tab IS
14141: --
14142: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14143: x_Progress VARCHAR2(3) := '010';
14144: --
14145: BEGIN
14146: --
14144: --
14145: BEGIN
14146: --
14147: IF (l_debug <> -1) THEN
14148: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab5');
14149: END IF;
14150: --
14151: FOR i IN 1..p_Tab1.COUNT LOOP
14152: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
14168: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab5(i);
14169: END LOOP;
14170: --
14171: IF (l_debug <> -1) THEN
14172: rlm_core_sv.dpop(k_SDEBUG);
14173: END IF;
14174: --
14175: RETURN x_BindVarTab;
14176: --
14180: --
14181: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab5',x_progress);
14182: --
14183: IF (l_debug <> -1) THEN
14184: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
14185: END IF;
14186: --
14187: raise;
14188: --
14188: --
14189: END BuildBindVarTab5;
14190:
14191:
14192: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14193: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14194: RETURN RLM_CORE_SV.t_dynamic_tab IS
14195: --
14196: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14189: END BuildBindVarTab5;
14190:
14191:
14192: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14193: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14194: RETURN RLM_CORE_SV.t_dynamic_tab IS
14195: --
14196: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14197: x_Progress VARCHAR2(3) := '010';
14190:
14191:
14192: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14193: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14194: RETURN RLM_CORE_SV.t_dynamic_tab IS
14195: --
14196: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14197: x_Progress VARCHAR2(3) := '010';
14198: --
14192: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
14193: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14194: RETURN RLM_CORE_SV.t_dynamic_tab IS
14195: --
14196: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14197: x_Progress VARCHAR2(3) := '010';
14198: --
14199: BEGIN
14200: --
14198: --
14199: BEGIN
14200: --
14201: IF (l_debug <> -1) THEN
14202: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab2');
14203: END IF;
14204: --
14205: FOR i IN 1..p_Tab1.COUNT LOOP
14206: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
14210: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab2(i);
14211: END LOOP;
14212: --
14213: IF (l_debug <> -1) THEN
14214: rlm_core_sv.dpop(k_SDEBUG);
14215: END IF;
14216: --
14217: RETURN x_BindVarTab;
14218: --
14222: --
14223: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab2',x_progress);
14224: --
14225: IF (l_debug <> -1) THEN
14226: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
14227: END IF;
14228: --
14229: raise;
14230: --
14249: --
14250: BEGIN
14251: --
14252: IF (l_debug <> -1) THEN
14253: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14254: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14255: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14256: --
14257: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14250: BEGIN
14251: --
14252: IF (l_debug <> -1) THEN
14253: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14254: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14255: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14256: --
14257: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14258: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14251: --
14252: IF (l_debug <> -1) THEN
14253: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14254: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14255: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14256: --
14257: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14258: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14259: g_SourceTab(i).organization_id);
14254: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14255: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14256: --
14257: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14258: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14259: g_SourceTab(i).organization_id);
14260: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').allocation_percent',
14261: g_SourceTab(i).allocation_percent);
14262: END LOOP;
14256: --
14257: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14258: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14259: g_SourceTab(i).organization_id);
14260: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').allocation_percent',
14261: g_SourceTab(i).allocation_percent);
14262: END LOOP;
14263: --
14264: END IF;
14276: ROUND(g_IntransitQty * g_SourceTab(i).allocation_percent/100);
14277: v_SrcIntransitTab(j).organization_id := g_SourceTab(i).organization_id;
14278: --
14279: IF (l_debug <> -1) THEN
14280: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').intransit_qty',
14281: v_SrcIntransitTab(j).intransit_qty);
14282: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').organization_id',
14283: v_SrcIntransitTab(j).organization_id);
14284: END IF;
14278: --
14279: IF (l_debug <> -1) THEN
14280: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').intransit_qty',
14281: v_SrcIntransitTab(j).intransit_qty);
14282: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').organization_id',
14283: v_SrcIntransitTab(j).organization_id);
14284: END IF;
14285: --
14286: i := g_SourceTab.NEXT(i);
14322: --
14323: v_Progress := '030';
14324: --
14325: IF (l_debug <> -1) THEN
14326: rlm_core_sv.dpop(k_SDEBUG);
14327: END IF;
14328: --
14329: EXCEPTION
14330: --
14332: --
14333: rlm_message_sv.sql_error('RLM_RD_SV.SourceCUMIntransitQty',v_Progress);
14334: --
14335: IF (l_debug <> -1) THEN
14336: rlm_core_sv.dlog(k_DEBUG,'progress',v_Progress);
14337: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14338: END IF;
14339: --
14340: RAISE;
14333: rlm_message_sv.sql_error('RLM_RD_SV.SourceCUMIntransitQty',v_Progress);
14334: --
14335: IF (l_debug <> -1) THEN
14336: rlm_core_sv.dlog(k_DEBUG,'progress',v_Progress);
14337: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14338: END IF;
14339: --
14340: RAISE;
14341: --
14363: --
14364: BEGIN
14365: --
14366: IF (l_debug <> -1) THEN
14367: rlm_core_sv.dpush(k_SDEBUG, 'CalculateCUMIntransit');
14368: rlm_core_sv.dlog(k_DEBUG, 'x_Line_id', x_Line_id); --Bugfix 7007638
14369: END IF;
14370: --
14371: v_CUMQty := 0;
14364: BEGIN
14365: --
14366: IF (l_debug <> -1) THEN
14367: rlm_core_sv.dpush(k_SDEBUG, 'CalculateCUMIntransit');
14368: rlm_core_sv.dlog(k_DEBUG, 'x_Line_id', x_Line_id); --Bugfix 7007638
14369: END IF;
14370: --
14371: v_CUMQty := 0;
14372: v_SupQty := 0;
14445: --
14446: END IF;
14447: --
14448: IF (l_debug <> -1) THEN
14449: rlm_core_sv.dlog(k_DEBUG, 'Supplier CUM Qty', v_SupQty);
14450: rlm_core_sv.dlog(k_DEBUG, 'Customer CUM Qty', v_CUMQty);
14451: END IF;
14452: --
14453: IF NVL(v_SupQty, 0) <> NVL(v_CUMQty, 0) THEN
14446: END IF;
14447: --
14448: IF (l_debug <> -1) THEN
14449: rlm_core_sv.dlog(k_DEBUG, 'Supplier CUM Qty', v_SupQty);
14450: rlm_core_sv.dlog(k_DEBUG, 'Customer CUM Qty', v_CUMQty);
14451: END IF;
14452: --
14453: IF NVL(v_SupQty, 0) <> NVL(v_CUMQty, 0) THEN
14454: v_Intransit := v_SupQty - v_CUMQty;
14457: x_Intransit := v_Intransit;
14458: v_Progress := '030';
14459: --
14460: IF (l_debug <> -1) THEN
14461: rlm_core_sv.dpop(k_SDEBUG);
14462: END IF;
14463: --
14464: EXCEPTION
14465: -- 4307505 [
14476: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
14477: x_OrderLineId => NULL,
14478: x_Token1 => 'SHIP_TO',
14479: x_Value1 =>
14480: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14481: x_Token2 => 'CITEM',
14482: x_Value2 =>
14483: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14484: x_GroupInfo => TRUE);
14479: x_Value1 =>
14480: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14481: x_Token2 => 'CITEM',
14482: x_Value2 =>
14483: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14484: x_GroupInfo => TRUE);
14485: --
14486: IF (l_debug <> -1) THEN
14487: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14483: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14484: x_GroupInfo => TRUE);
14485: --
14486: IF (l_debug <> -1) THEN
14487: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14488: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14489: rlm_core_sv.dpop(k_SDEBUG);
14490: END IF;
14491: -- 4307505 ]
14484: x_GroupInfo => TRUE);
14485: --
14486: IF (l_debug <> -1) THEN
14487: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14488: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14489: rlm_core_sv.dpop(k_SDEBUG);
14490: END IF;
14491: -- 4307505 ]
14492: WHEN e_no_cum_key THEN
14485: --
14486: IF (l_debug <> -1) THEN
14487: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14488: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14489: rlm_core_sv.dpop(k_SDEBUG);
14490: END IF;
14491: -- 4307505 ]
14492: WHEN e_no_cum_key THEN
14493: --
14502: x_OrderLineId => NULL,
14503: x_GroupInfo => TRUE,
14504: x_Token1 => 'GROUP', --Bugfix 7007638
14505: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14506: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14507: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14508: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14509: v_control_value);
14510: --
14503: x_GroupInfo => TRUE,
14504: x_Token1 => 'GROUP', --Bugfix 7007638
14505: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14506: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14507: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14508: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14509: v_control_value);
14510: --
14511: IF (l_debug <> -1) THEN
14504: x_Token1 => 'GROUP', --Bugfix 7007638
14505: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14506: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14507: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14508: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14509: v_control_value);
14510: --
14511: IF (l_debug <> -1) THEN
14512: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14508: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14509: v_control_value);
14510: --
14511: IF (l_debug <> -1) THEN
14512: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14513: rlm_core_sv.dpop(k_SDEBUG);
14514: END IF;
14515: --
14516: WHEN OTHERS THEN
14509: v_control_value);
14510: --
14511: IF (l_debug <> -1) THEN
14512: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14513: rlm_core_sv.dpop(k_SDEBUG);
14514: END IF;
14515: --
14516: WHEN OTHERS THEN
14517: rlm_message_sv.sql_error('rlm_rd_sv.CalculateCUMIntransit',v_progress);
14516: WHEN OTHERS THEN
14517: rlm_message_sv.sql_error('rlm_rd_sv.CalculateCUMIntransit',v_progress);
14518: --
14519: IF (l_debug <> -1) THEN
14520: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14521: END IF;
14522: --
14523: raise;
14524: --
14538: p_OEDemand_rec IN RLM_RD_SV.t_OEDemand_rec) IS
14539: BEGIN
14540: --
14541: IF (l_debug <> -1) THEN
14542: rlm_core_sv.dpush(k_SDEBUG, 'AssignOEAttribValues');
14543: END IF;
14544: --
14545: x_Key_rec.oe_line_id := p_OEDemand_rec.line_id;
14546: x_Key_rec.dem_rec.line_id := p_OEDemand_rec.line_id;
14605: x_Key_rec.dem_rec.attribute14 := p_OEDemand_rec.attribute14;
14606: x_Key_rec.dem_rec.attribute15 := p_OEDemand_rec.attribute15;
14607: --
14608: IF (l_debug <> -1) THEN
14609: rlm_core_sv.dpop(k_SDEBUG);
14610: END IF;
14611: --
14612: EXCEPTION
14613: --
14615: --
14616: rlm_message_sv.sql_error('RLM_RD_SV.AssignOEAttribValues', '010');
14617: --
14618: IF (l_debug <> -1) THEN
14619: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14620: rlm_core_sv.dpop(k_SDEBUG);
14621: END IF;
14622: --
14623: RAISE;
14616: rlm_message_sv.sql_error('RLM_RD_SV.AssignOEAttribValues', '010');
14617: --
14618: IF (l_debug <> -1) THEN
14619: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14620: rlm_core_sv.dpop(k_SDEBUG);
14621: END IF;
14622: --
14623: RAISE;
14624: --
14644: --
14645: BEGIN
14646: --{
14647: IF (l_debug > -1) THEN
14648: rlm_core_sv.dpush(k_SDEBUG, ' FrozenFenceWarning ');
14649: END IF;
14650: --
14651: IF x_Sched_rec.Schedule_type = 'PLANNING_RELEASE' THEN
14652: --
14668: --
14669: END IF;
14670: --
14671: IF (l_debug > -1) THEN
14672: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14673: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14674: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14675: END IF;
14676: --
14669: END IF;
14670: --
14671: IF (l_debug > -1) THEN
14672: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14673: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14674: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14675: END IF;
14676: --
14677: IF NOT g_isFirm AND x_Sched_rec.Schedule_Source <> 'MANUAL' AND v_frozenFrom is NOT NULL THEN
14670: --
14671: IF (l_debug > -1) THEN
14672: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14673: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14674: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14675: END IF;
14676: --
14677: IF NOT g_isFirm AND x_Sched_rec.Schedule_Source <> 'MANUAL' AND v_frozenFrom is NOT NULL THEN
14678: --{
14688: --
14689: i := v_FrozenTab.count;
14690: --
14691: IF (l_debug <> -1) THEN
14692: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14693: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14694: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14695: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14696: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14689: i := v_FrozenTab.count;
14690: --
14691: IF (l_debug <> -1) THEN
14692: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14693: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14694: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14695: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14696: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14697: END IF;
14690: --
14691: IF (l_debug <> -1) THEN
14692: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14693: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14694: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14695: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14696: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14697: END IF;
14698: --
14691: IF (l_debug <> -1) THEN
14692: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14693: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14694: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14695: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14696: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14697: END IF;
14698: --
14699: IF MatchFrozen(x_Group_rec, g_Reconcile_tab.NEXT(v_Count), g_Reconcile_tab(v_Count), v_Index) THEN
14692: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14693: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14694: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14695: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14696: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14697: END IF;
14698: --
14699: IF MatchFrozen(x_Group_rec, g_Reconcile_tab.NEXT(v_Count), g_Reconcile_tab(v_Count), v_Index) THEN
14700: --
14701: x_frozenWarnQty := x_frozenWarnQty + g_Reconcile_tab(v_Index).ordered_quantity;
14702: --
14703: IF (l_debug <> -1) THEN
14704: --
14705: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14706: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14707: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14708: --
14709: END IF;
14702: --
14703: IF (l_debug <> -1) THEN
14704: --
14705: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14706: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14707: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14708: --
14709: END IF;
14710: --
14703: IF (l_debug <> -1) THEN
14704: --
14705: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14706: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14707: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14708: --
14709: END IF;
14710: --
14711: END IF;
14714: v_FrozenTab(i) := g_Reconcile_tab(v_Count);
14715: v_FrozenTab(i).ordered_quantity := x_frozenWarnQty;
14716: --
14717: IF (l_debug <> -1) THEN
14718: rlm_core_sv.dlog(k_DEBUG, 'Ending of the loop Index i', i);
14719: END IF;
14720: --
14721: v_Count := g_Reconcile_tab.next(v_Count);
14722: --
14724: --}
14725: END IF;
14726: --}
14727: IF (l_debug <> -1) THEN
14728: rlm_core_sv.dlog(k_DEBUG, 'v_FrozenTab.COUNT', v_FrozenTab.COUNT);
14729: END IF;
14730: --
14731: IF v_FrozenTab.COUNT <> 0 THEN
14732: --{
14738: --
14739: IF v_frozenTab(v_Count).ordered_quantity < 0 THEN
14740: --
14741: IF (l_debug <> -1) THEN
14742: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14743: v_frozenTab(v_Count).ordered_quantity);
14744: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14745: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14746: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14740: --
14741: IF (l_debug <> -1) THEN
14742: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14743: v_frozenTab(v_Count).ordered_quantity);
14744: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14745: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14746: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14747: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14748: END IF;
14741: IF (l_debug <> -1) THEN
14742: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14743: v_frozenTab(v_Count).ordered_quantity);
14744: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14745: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14746: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14747: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14748: END IF;
14749: --
14742: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14743: v_frozenTab(v_Count).ordered_quantity);
14744: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14745: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14746: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14747: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14748: END IF;
14749: --
14750: rlm_message_sv.app_error(
14743: v_frozenTab(v_Count).ordered_quantity);
14744: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14745: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14746: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14747: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14748: END IF;
14749: --
14750: rlm_message_sv.app_error(
14751: x_ExceptionLevel => rlm_message_sv.k_warn_level,
14756: x_OrderLineId => NULL,
14757: x_Token1 => 'ENDDATE',
14758: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14759: x_Token2 => 'SHIP_FROM',
14760: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14761: x_Token3 => 'SHIP_TO',
14762: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14763: x_Token4 => 'CUSTITEM',
14764: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14758: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14759: x_Token2 => 'SHIP_FROM',
14760: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14761: x_Token3 => 'SHIP_TO',
14762: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14763: x_Token4 => 'CUSTITEM',
14764: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14765: x_Token5 => 'QUANTITY',
14766: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14760: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14761: x_Token3 => 'SHIP_TO',
14762: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14763: x_Token4 => 'CUSTITEM',
14764: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14765: x_Token5 => 'QUANTITY',
14766: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14767: --
14768: ELSE
14768: ELSE
14769: --
14770: IF (l_debug <> -1) THEN
14771: --
14772: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14773: v_frozenTab(v_Count).ordered_quantity);
14774: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14775: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14776: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14770: IF (l_debug <> -1) THEN
14771: --
14772: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14773: v_frozenTab(v_Count).ordered_quantity);
14774: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14775: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14776: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14777: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14778: --
14771: --
14772: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14773: v_frozenTab(v_Count).ordered_quantity);
14774: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14775: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14776: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14777: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14778: --
14779: END IF;
14772: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14773: v_frozenTab(v_Count).ordered_quantity);
14774: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14775: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14776: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14777: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14778: --
14779: END IF;
14780: --
14773: v_frozenTab(v_Count).ordered_quantity);
14774: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14775: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14776: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14777: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14778: --
14779: END IF;
14780: --
14781: rlm_message_sv.app_error(
14787: x_OrderLineId => NULL,
14788: x_Token1 => 'ENDDATE',
14789: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14790: x_Token2 => 'SHIP_FROM',
14791: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14792: x_Token3 => 'SHIP_TO',
14793: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14794: x_Token4 => 'CUSTITEM',
14795: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14789: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14790: x_Token2 => 'SHIP_FROM',
14791: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14792: x_Token3 => 'SHIP_TO',
14793: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14794: x_Token4 => 'CUSTITEM',
14795: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14796: x_Token5 => 'QUANTITY',
14797: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14791: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14792: x_Token3 => 'SHIP_TO',
14793: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14794: x_Token4 => 'CUSTITEM',
14795: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14796: x_Token5 => 'QUANTITY',
14797: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14798: --
14799: END IF;
14802: --
14803: IF v_frozenTab(v_Count).ordered_quantity < 0 THEN
14804: --
14805: IF (l_debug <> -1) THEN
14806: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14807: v_frozenTab(v_Count).ordered_quantity);
14808: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14809: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14810: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14804: --
14805: IF (l_debug <> -1) THEN
14806: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14807: v_frozenTab(v_Count).ordered_quantity);
14808: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14809: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14810: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14811: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14812: END IF;
14805: IF (l_debug <> -1) THEN
14806: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14807: v_frozenTab(v_Count).ordered_quantity);
14808: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14809: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14810: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14811: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14812: END IF;
14813: --
14806: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14807: v_frozenTab(v_Count).ordered_quantity);
14808: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14809: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14810: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14811: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14812: END IF;
14813: --
14814: rlm_message_sv.app_error(
14807: v_frozenTab(v_Count).ordered_quantity);
14808: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14809: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14810: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14811: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14812: END IF;
14813: --
14814: rlm_message_sv.app_error(
14815: x_ExceptionLevel => rlm_message_sv.k_warn_level,
14820: x_OrderLineId => NULL,
14821: x_Token1 => 'ENDDATE',
14822: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14823: x_Token2 => 'SHIP_FROM',
14824: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14825: x_Token3 => 'SHIP_TO',
14826: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14827: x_Token4 => 'CUSTITEM',
14828: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14822: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14823: x_Token2 => 'SHIP_FROM',
14824: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14825: x_Token3 => 'SHIP_TO',
14826: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14827: x_Token4 => 'CUSTITEM',
14828: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14829: x_Token5 => 'QUANTITY',
14830: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14824: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14825: x_Token3 => 'SHIP_TO',
14826: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14827: x_Token4 => 'CUSTITEM',
14828: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14829: x_Token5 => 'QUANTITY',
14830: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14831: x_Token6 => 'MATCH_ATTR',
14832: x_value6 => v_MatchAttrTxt);
14834: ELSE
14835: --
14836: IF (l_debug <> -1) THEN
14837: --
14838: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14839: v_frozenTab(v_Count).ordered_quantity);
14840: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14841: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14842: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14836: IF (l_debug <> -1) THEN
14837: --
14838: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14839: v_frozenTab(v_Count).ordered_quantity);
14840: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14841: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14842: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14843: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14844: --
14837: --
14838: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14839: v_frozenTab(v_Count).ordered_quantity);
14840: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14841: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14842: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14843: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14844: --
14845: END IF;
14838: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14839: v_frozenTab(v_Count).ordered_quantity);
14840: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14841: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14842: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14843: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14844: --
14845: END IF;
14846: --
14839: v_frozenTab(v_Count).ordered_quantity);
14840: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14841: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14842: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14843: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14844: --
14845: END IF;
14846: --
14847: rlm_message_sv.app_error(
14853: x_OrderLineId => NULL,
14854: x_Token1 => 'ENDDATE',
14855: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14856: x_Token2 => 'SHIP_FROM',
14857: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14858: x_Token3 => 'SHIP_TO',
14859: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14860: x_Token4 => 'CUSTITEM',
14861: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14855: x_Value1 => TRUNC(rlm_dp_sv.g_dsp_start_time) + v_frozenDays - 1, --Bugfix 10053830
14856: x_Token2 => 'SHIP_FROM',
14857: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14858: x_Token3 => 'SHIP_TO',
14859: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14860: x_Token4 => 'CUSTITEM',
14861: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14862: x_Token5 => 'QUANTITY',
14863: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14857: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14858: x_Token3 => 'SHIP_TO',
14859: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14860: x_Token4 => 'CUSTITEM',
14861: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14862: x_Token5 => 'QUANTITY',
14863: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14864: x_Token6 => 'MATCH_ATTR',
14865: x_value6 => v_MatchAttrTxt);
14874: --}
14875: END IF;
14876: --}
14877: IF (l_debug <> -1) THEN
14878: rlm_core_sv.dpop(k_SDEBUG);
14879: END IF;
14880: --}
14881: EXCEPTION
14882: WHEN OTHERS THEN
14883: --
14884: rlm_message_sv.sql_error('RLM_RD_SV.FrozenFenceWarning', '010');
14885: --
14886: IF (l_debug <> -1) THEN
14887: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14888: rlm_core_sv.dpop(k_SDEBUG);
14889: END IF;
14890: --
14891: --
14884: rlm_message_sv.sql_error('RLM_RD_SV.FrozenFenceWarning', '010');
14885: --
14886: IF (l_debug <> -1) THEN
14887: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14888: rlm_core_sv.dpop(k_SDEBUG);
14889: END IF;
14890: --
14891: --
14892: RAISE;
14909: v_lookupCode VARCHAR2(30);
14910: v_lookupMeaning VARCHAR2(80);
14911: v_ColumnName VARCHAR2(30);
14912: v_MatchCode VARCHAR2(2);
14913: v_MatchWithinRec rlm_core_sv.t_match_rec;
14914: -- v_MatchKey rlm_cust_shipto_terms.match_within_key%TYPE;
14915: v_first BOOLEAN := TRUE;
14916: --
14917: Cursor C(p_MatchCode in VARCHAR2,
14950: --
14951: BEGIN
14952: --
14953: IF (l_debug > -1) THEN
14954: rlm_core_sv.dpush(k_SDEBUG, 'GetMatchAttributes ');
14955: rlm_core_sv.dlog(k_DEBUG, 'match_within ', x_group_rec.match_within);
14956: END IF;
14957: --
14958: v_MatchCode := SUBSTR(x_Group_rec.match_within,1,1);
14951: BEGIN
14952: --
14953: IF (l_debug > -1) THEN
14954: rlm_core_sv.dpush(k_SDEBUG, 'GetMatchAttributes ');
14955: rlm_core_sv.dlog(k_DEBUG, 'match_within ', x_group_rec.match_within);
14956: END IF;
14957: --
14958: v_MatchCode := SUBSTR(x_Group_rec.match_within,1,1);
14959: i := 1;
14960: --
14961: WHILE v_MatchCode is NOT NULL LOOP
14962: --{
14963: IF (l_debug > -1) THEN
14964: rlm_core_sv.dlog(k_DEBUG, 'v_MatchCode ', v_MatchCode);
14965: END IF;
14966: --
14967: IF v_MatchCode <> 'C' AND v_MatchCode <> 'J' THEN
14968: --{
14995: x_MatAttrCodeValue := x_MatAttrCodeValue || ', ' || v_lookupMeaning || '= ';
14996: --
14997: END IF;
14998: --
14999: rlm_core_sv.populate_match_keys(v_MatchWithinRec, v_MatchCode);
15000: --
15001: IF v_MatchWithinRec.cust_po_number = 'Y' THEN
15002: --
15003: x_MatAttrCodeValue := x_MatAttrCodeValue || x_FrozenTabRec.cust_po_number;
15041: --
15042: x_MatAttrCodeValue := x_MatAttrCodeValue || x_FrozenTabRec.industry_attribute5;
15043: --
15044: IF (l_debug > -1) THEN
15045: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenTabRec.industry_attribute5 ', x_FrozenTabRec.industry_attribute5);
15046: END IF;
15047: --
15048: ELSIF v_MatchwithinRec.industry_attribute6 = 'Y' THEN
15049: --
15136: --
15137: END IF;
15138: --
15139: IF (l_debug > -1) THEN
15140: rlm_core_sv.dlog(k_DEBUG, 'x_MatAttrCodeValue ', x_MatAttrCodeValue);
15141: END IF;
15142: --}
15143: CLOSE C;
15144: --
15151: --}
15152: END LOOP;
15153: --
15154: IF (l_debug <> -1) THEN
15155: rlm_core_sv.dpop(k_SDEBUG);
15156: END IF;
15157: --
15158: EXCEPTION
15159: WHEN OTHERS THEN
15160: --
15161: rlm_message_sv.sql_error('RLM_RD_SV.GetMatchAttributes', '010');
15162: --
15163: IF (l_debug <> -1) THEN
15164: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
15165: rlm_core_sv.dpop(k_SDEBUG);
15166: END IF;
15167: --
15168: RAISE;
15161: rlm_message_sv.sql_error('RLM_RD_SV.GetMatchAttributes', '010');
15162: --
15163: IF (l_debug <> -1) THEN
15164: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
15165: rlm_core_sv.dpop(k_SDEBUG);
15166: END IF;
15167: --
15168: RAISE;
15169: --
15215: --
15216: BEGIN
15217: --
15218: IF (l_debug <> -1) THEN
15219: rlm_core_sv.dpush(k_SDEBUG, 'ProcessReleases');
15220: END IF;
15221: x_Processed := 'N';
15222: --
15223: RLM_TPA_SV.InitializeBlktGrp(x_Sched_rec, v_BlkGroup_ref, x_Group_rec);
15229: --
15230: IF NOT LockLines(v_BlkGroup_rec, x_Sched_rec.header_id) THEN
15231: --
15232: IF (l_debug <> -1) THEN
15233: rlm_core_sv.dlog(k_DEBUG, 'RLM_LOCK_NOT_OBTAINED');
15234: END IF;
15235: --
15236: RAISE e_lines_locked;
15237: --
15241: FETCH c_getMaxRSO INTO g_max_rso_hdr_id, v_rso_start_date;
15242: CLOSE c_getMaxRSO;
15243: --
15244: IF (l_debug <> -1) THEN
15245: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
15246: rlm_core_sv.dlog(k_DEBUG, 'v_rso_start_date',v_rso_start_date);
15247: END IF;
15248: --
15249: RecGroupDemand(x_Sched_rec, v_BlkGroup_rec);
15242: CLOSE c_getMaxRSO;
15243: --
15244: IF (l_debug <> -1) THEN
15245: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
15246: rlm_core_sv.dlog(k_DEBUG, 'v_rso_start_date',v_rso_start_date);
15247: END IF;
15248: --
15249: RecGroupDemand(x_Sched_rec, v_BlkGroup_rec);
15250: x_Processed := 'Y';
15251: --}
15252: END LOOP;
15253: --
15254: IF (l_debug <> -1) THEN
15255: rlm_core_sv.dpop(k_SDEBUG);
15256: END IF;
15257: --
15258: EXCEPTION
15259: --
15259: --
15260: WHEN e_lines_locked THEN
15261: --
15262: IF (l_debug <> -1) THEN
15263: rlm_core_sv.dlog(k_DEBUG, 'e_lines_locked exception');
15264: rlm_core_sv.dpop(k_SDEBUG);
15265: END IF;
15266: --
15267: RAISE;
15260: WHEN e_lines_locked THEN
15261: --
15262: IF (l_debug <> -1) THEN
15263: rlm_core_sv.dlog(k_DEBUG, 'e_lines_locked exception');
15264: rlm_core_sv.dpop(k_SDEBUG);
15265: END IF;
15266: --
15267: RAISE;
15268: --
15268: --
15269: WHEN OTHERS THEN
15270: --
15271: IF (l_debug <> -1) THEN
15272: rlm_core_sv.dlog(k_DEBUG, 'SQLERRM', SUBSTRB(SQLERRM,1,200));
15273: rlm_core_sv.dpop(k_SDEBUG);
15274: END IF;
15275: --
15276: RAISE;
15269: WHEN OTHERS THEN
15270: --
15271: IF (l_debug <> -1) THEN
15272: rlm_core_sv.dlog(k_DEBUG, 'SQLERRM', SUBSTRB(SQLERRM,1,200));
15273: rlm_core_sv.dpop(k_SDEBUG);
15274: END IF;
15275: --
15276: RAISE;
15277: --
15375:
15376: BEGIN
15377: --
15378: IF (l_debug <> -1) THEN
15379: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15380: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15381: x_Sched_rec.Schedule_header_id);
15382: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15383: x_Group_rec.ship_to_address_id);
15376: BEGIN
15377: --
15378: IF (l_debug <> -1) THEN
15379: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15380: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15381: x_Sched_rec.Schedule_header_id);
15382: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15383: x_Group_rec.ship_to_address_id);
15384: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15378: IF (l_debug <> -1) THEN
15379: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15380: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15381: x_Sched_rec.Schedule_header_id);
15382: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15383: x_Group_rec.ship_to_address_id);
15384: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15385: x_Group_rec.inventory_item_id);
15386: END IF;
15380: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15381: x_Sched_rec.Schedule_header_id);
15382: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15383: x_Group_rec.ship_to_address_id);
15384: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15385: x_Group_rec.inventory_item_id);
15386: END IF;
15387: --
15388: g_RecCUM_tab.DELETE;
15407: g_RecCUM_tab(v_Count).cust_record_year := g_RecCUM_rec.cust_record_year;
15408: g_RecCUM_tab(v_Count).line_id := g_RecCUM_rec.line_id;
15409:
15410: IF (l_debug <> -1) THEN
15411: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15408: g_RecCUM_tab(v_Count).line_id := g_RecCUM_rec.line_id;
15409:
15410: IF (l_debug <> -1) THEN
15411: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15416: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15409:
15410: IF (l_debug <> -1) THEN
15411: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15416: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15417: END IF;
15410: IF (l_debug <> -1) THEN
15411: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15416: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15417: END IF;
15418:
15411: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15416: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15417: END IF;
15418:
15419: v_Count := v_Count + 1;
15412: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15413: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15414: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15415: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15416: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15417: END IF;
15418:
15419: v_Count := v_Count + 1;
15420:
15422: --
15423: CLOSE c_CUMRec;
15424:
15425: IF (l_debug <> -1) THEN
15426: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab.COUNT',g_RecCUM_tab.COUNT);
15427: rlm_core_sv.dpop(k_SDEBUG);
15428: END IF;
15429: --
15430: EXCEPTION
15423: CLOSE c_CUMRec;
15424:
15425: IF (l_debug <> -1) THEN
15426: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab.COUNT',g_RecCUM_tab.COUNT);
15427: rlm_core_sv.dpop(k_SDEBUG);
15428: END IF;
15429: --
15430: EXCEPTION
15431:
15434: rlm_message_sv.sql_error('rlm_rd_sv.PopulateReconcileCumRec',
15435: v_Progress);
15436: --
15437: IF (l_debug <> -1) THEN
15438: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
15439: END IF;
15440: --
15441: raise;
15442:
15460:
15461: BEGIN
15462: --
15463: IF (l_debug <> -1) THEN
15464: rlm_core_sv.dpush(k_SDEBUG,'Match_PO_RY_Reconcile');
15465: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
15466: x_Current_rec.schedule_type);
15467: END IF;
15468: --
15461: BEGIN
15462: --
15463: IF (l_debug <> -1) THEN
15464: rlm_core_sv.dpush(k_SDEBUG,'Match_PO_RY_Reconcile');
15465: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
15466: x_Current_rec.schedule_type);
15467: END IF;
15468: --
15469: IF (l_debug <> -1) THEN
15466: x_Current_rec.schedule_type);
15467: END IF;
15468: --
15469: IF (l_debug <> -1) THEN
15470: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15471: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15472: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15473: END IF;
15474:
15467: END IF;
15468: --
15469: IF (l_debug <> -1) THEN
15470: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15471: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15472: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15473: END IF;
15474:
15475: IF g_Reconcile_tab.COUNT <> 0 THEN
15468: --
15469: IF (l_debug <> -1) THEN
15470: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15471: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15472: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15473: END IF;
15474:
15475: IF g_Reconcile_tab.COUNT <> 0 THEN
15476: --{
15480: --{
15481: b_Match := TRUE;
15482: --
15483: IF (l_debug <> -1) THEN
15484: rlm_core_sv.dlog(k_DEBUG, 'g_Reconcile_Tab('||v_Count||').schedule_type',
15485: g_Reconcile_Tab(v_Count).schedule_type);
15486: END IF;
15487:
15488: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
15487:
15488: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
15489: --
15490: IF (l_debug <> -1) THEN
15491: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis ',x_Group_rec.setup_terms_rec.intransit_calc_basis);
15492: END IF;
15493: --
15494: IF x_Group_rec.setup_terms_rec.cum_control_code IN ('CUM_BY_DATE_PO','CUM_BY_PO_ONLY') THEN
15495: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
15498: END IF;
15499: END IF;
15500: --
15501: IF (l_debug <> -1) THEN
15502: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15503: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15504: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15505: END IF;
15506: --
15499: END IF;
15500: --
15501: IF (l_debug <> -1) THEN
15502: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15503: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15504: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15505: END IF;
15506: --
15507: IF b_Match THEN
15500: --
15501: IF (l_debug <> -1) THEN
15502: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15503: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15504: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15505: END IF;
15506: --
15507: IF b_Match THEN
15508: IF x_Group_rec.setup_terms_rec.cum_control_code IN ('CUM_BY_DATE_RECORD_YEAR') THEN
15513: END IF;
15514: END IF;
15515: --
15516: IF (l_debug <> -1) THEN
15517: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15518: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15519: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15520: END IF;
15521: --
15514: END IF;
15515: --
15516: IF (l_debug <> -1) THEN
15517: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15518: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15519: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15520: END IF;
15521: --
15522: IF b_Match THEN
15515: --
15516: IF (l_debug <> -1) THEN
15517: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15518: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15519: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15520: END IF;
15521: --
15522: IF b_Match THEN
15523: --
15532: --}
15533: END IF;
15534: --
15535: IF (l_debug <> -1) THEN
15536: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
15537: rlm_core_sv.dpop(k_SDEBUG);
15538: END IF;
15539: --
15540: RETURN(b_Match);
15533: END IF;
15534: --
15535: IF (l_debug <> -1) THEN
15536: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
15537: rlm_core_sv.dpop(k_SDEBUG);
15538: END IF;
15539: --
15540: RETURN(b_Match);
15541: --
15543: WHEN OTHERS THEN
15544: rlm_message_sv.sql_error('rlm_rd_sv.Match_PO_RY_Reconcile',x_progress);
15545: --
15546: IF (l_debug <> -1) THEN
15547: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
15548: END IF;
15549: --
15550: raise;
15551: