[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(SYSDATE)) AND x_key_rec.dem_rec.authorized_to_ship_flag = 'Y' THEN
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(SYSDATE) - NVL(x_group_rec.cutoff_days,0)) THEN
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(SYSDATE) - NVL(x_group_rec.cutoff_days,0)) THEN
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*/
1169: IsFrozen(TRUNC(SYSDATE),
1170: x_Group_rec, x_key_rec.dem_rec.request_date) THEN
1171: --
1172: IF (l_debug <> -1) THEN
1173: rlm_core_sv.dlog(k_DEBUG,'Line cannot be deleted-- within frozen fence',
1174: x_key_rec.dem_rec.line_id);
1175: rlm_core_sv.dlog(k_DEBUG,'dem_rec.request_date',
1176: x_key_rec.dem_rec.request_date);
1177: END IF;
1171: --
1172: IF (l_debug <> -1) THEN
1173: rlm_core_sv.dlog(k_DEBUG,'Line cannot be deleted-- within frozen fence',
1174: x_key_rec.dem_rec.line_id);
1175: rlm_core_sv.dlog(k_DEBUG,'dem_rec.request_date',
1176: x_key_rec.dem_rec.request_date);
1177: END IF;
1178: --
1179: IF x_Reconcile THEN
1199: x_ScheduleLineId => NULL,
1200: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1201: x_OrderLineId => x_key_rec.dem_rec.line_id,
1202: x_Token1 => 'LINE',
1203: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1204: x_Token2 => 'ORDER',
1205: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1206: x_Token3 => 'QUANTITY',
1207: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1201: x_OrderLineId => x_key_rec.dem_rec.line_id,
1202: x_Token1 => 'LINE',
1203: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1204: x_Token2 => 'ORDER',
1205: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1206: x_Token3 => 'QUANTITY',
1207: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1208: x_Token4 => 'CUSTITEM',
1209: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1205: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1206: x_Token3 => 'QUANTITY',
1207: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1208: x_Token4 => 'CUSTITEM',
1209: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1210: x_Token5 => 'REQ_DATE',
1211: x_value5 => x_key_rec.dem_rec.request_date,
1212: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
1213: x_value6 => v_del_line_qty, --Bugfix 6159269
1218: x_Token8 => 'MATCH_ATTR',
1219: x_value8 => v_MatchAttrTxt );
1220: --
1221: IF (l_debug <> -1) THEN
1222: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE_SEQ',x_key_rec.dem_rec.line_id);
1223: END IF;
1224: --
1225: ELSE
1226: --
1233: x_ScheduleLineId => NULL,
1234: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
1235: x_OrderLineId => x_key_rec.dem_rec.line_id,
1236: x_Token1 => 'LINE',
1237: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1238: x_Token2 => 'ORDER',
1239: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1240: x_Token3 => 'QUANTITY',
1241: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1235: x_OrderLineId => x_key_rec.dem_rec.line_id,
1236: x_Token1 => 'LINE',
1237: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
1238: x_Token2 => 'ORDER',
1239: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1240: x_Token3 => 'QUANTITY',
1241: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1242: x_Token4 => 'CUSTITEM',
1243: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1239: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1240: x_Token3 => 'QUANTITY',
1241: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
1242: x_Token4 => 'CUSTITEM',
1243: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1244: x_Token5 => 'REQ_DATE',
1245: x_value5 => x_key_rec.dem_rec.request_date,
1246: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
1247: x_value6 => v_del_line_qty, --Bugfix 6159269
1248: x_Token7 => 'MATCH_ATTR',
1249: x_value7 => v_MatchAttrTxt);
1250: --
1251: IF (l_debug <> -1) THEN
1252: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE',x_key_rec.dem_rec.line_id);
1253: END IF;
1254: --
1255: END IF;
1256:
1264: StoreReconcile(x_Sched_rec, x_Group_rec, x_Key_rec,
1265: v_Qty_rec.reconcile);
1266: END IF;
1267: --x_DeleteQty := v_Qty_rec.available_to_cancel;
1268: --rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1269: --
1270: ELSE
1271: --
1272: -- Call to check if Shipping allows delete
1272: -- Call to check if Shipping allows delete
1273: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1274: --
1275: IF (l_debug <> -1) THEN
1276: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.dem_rec.line_id',x_key_rec.dem_rec.line_id);
1277: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.oe_line_id',x_key_rec.oe_line_id);
1278: END IF;
1279: --
1280: v_changed_attributes.action_flag := 'D';
1273: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1274: --
1275: IF (l_debug <> -1) THEN
1276: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.dem_rec.line_id',x_key_rec.dem_rec.line_id);
1277: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.oe_line_id',x_key_rec.oe_line_id);
1278: END IF;
1279: --
1280: v_changed_attributes.action_flag := 'D';
1281: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id, x_key_rec.dem_rec.line_id);
1280: v_changed_attributes.action_flag := 'D';
1281: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id, x_key_rec.dem_rec.line_id);
1282: --
1283: IF (l_debug <> -1) THEN
1284: rlm_core_sv.dlog(k_DEBUG,'source_line_id',v_changed_attributes.source_line_id);
1285: END IF;
1286: --
1287: RLM_EXTINTERFACE_SV.CheckShippingConstraints(
1288: x_source_code => v_source_code,
1294: x_header_id => x_Sched_rec.header_id,
1295: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1296: --
1297: IF (l_debug <> -1) THEN
1298: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1299: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1300: END IF;
1301: --
1302: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1295: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1296: --
1297: IF (l_debug <> -1) THEN
1298: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1299: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1300: END IF;
1301: --
1302: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1303: --
1301: --
1302: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1303: --
1304: IF (l_debug <> -1) THEN
1305: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed. Unexpected Error');
1306: END IF;
1307: --
1308: RAISE e_group_error;
1309: --
1309: --
1310: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1311: --
1312: IF (l_debug <> -1) THEN
1313: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed.');
1314: END IF;
1315: --
1316: RAISE e_group_error;
1317: --
1336: -- Call again to see if Shipping allows Cancel
1337: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1338: --
1339: IF (l_debug <> -1) THEN
1340: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.oe_line_id);
1341: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.dem_rec.line_id);
1342: END IF;
1343: --
1344: v_changed_attributes.action_flag := 'C';
1337: -- Use 'D' for delete, 'U' for update, and 'C' for cancel
1338: --
1339: IF (l_debug <> -1) THEN
1340: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.oe_line_id);
1341: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',x_Key_rec.dem_rec.line_id);
1342: END IF;
1343: --
1344: v_changed_attributes.action_flag := 'C';
1345: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id,
1345: v_changed_attributes.source_line_id := nvl(x_Key_rec.oe_line_id,
1346: x_key_rec.dem_rec.line_id);
1347: --
1348: IF (l_debug <> -1) THEN
1349: rlm_core_sv.dlog(k_DEBUG,'source_line_id',v_changed_attributes.source_line_id);
1350: END IF;
1351: --
1352: RLM_EXTINTERFACE_SV.CheckShippingConstraints(
1353: x_source_code => v_source_code,
1359: x_header_id => x_Sched_rec.header_id,
1360: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1361: --
1362: IF (l_debug <> -1) THEN
1363: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1364: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1365: END IF;
1366: --
1367: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1360: x_order_header_id => x_group_rec.setup_terms_rec.header_id);
1361: --
1362: IF (l_debug <> -1) THEN
1363: rlm_core_sv.dlog(k_DEBUG,'v_action_allowed',v_action_allowed);
1364: rlm_core_sv.dlog(k_DEBUG,'v_return_status',v_return_status);
1365: END IF;
1366: --
1367: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1368: --
1366: --
1367: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1368: --
1369: IF (l_debug <> -1) THEN
1370: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed');
1371: END IF;
1372: --
1373: RAISE e_group_error;
1374: --
1374: --
1375: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1376: --
1377: IF (l_debug <> -1) THEN
1378: rlm_core_sv.dpop(k_SDEBUG, 'CheckShippingConstraintsAPI Failed.');
1379: END IF;
1380: --
1381: RAISE e_group_error;
1382: --
1396: x_DeleteQty := 0;
1397: SetOperation(x_Key_rec, k_UPDATE, x_DeleteQty);
1398: --
1399: IF (l_debug <> -1) THEN
1400: rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1401: END IF;
1402: --
1403: END IF;
1404: --
1429: x_OrderLineId => NULL,
1430: x_Token1 => 'QUANTITY',
1431: x_value1 => g_sch_line_qty,
1432: x_Token2 => 'GROUP',
1433: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1434: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1435: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1436: x_Token3 => 'REQ_DATE',
1437: x_value3 => x_key_rec.req_rec.request_date,
1430: x_Token1 => 'QUANTITY',
1431: x_value1 => g_sch_line_qty,
1432: x_Token2 => 'GROUP',
1433: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1434: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1435: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1436: x_Token3 => 'REQ_DATE',
1437: x_value3 => x_key_rec.req_rec.request_date,
1438: x_Token4 => 'START_DATE_TIME',
1431: x_value1 => g_sch_line_qty,
1432: x_Token2 => 'GROUP',
1433: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1434: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1435: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1436: x_Token3 => 'REQ_DATE',
1437: x_value3 => x_key_rec.req_rec.request_date,
1438: x_Token4 => 'START_DATE_TIME',
1439: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1441: x_value5 => nvl(x_Key_rec.req_rec.cust_production_seq_num,'NULL') ||'-'||
1442: nvl(x_Key_rec.req_rec.cust_model_serial_number,'NULL')||'-'||
1443: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1444: x_Token6 => 'ORDER',
1445: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1446: x_Token7 => 'LINE',
1447: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1448: x_Token8 => 'MATCH_ATTR',
1449: x_value8 => v_MatchAttrTxt);
1443: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1444: x_Token6 => 'ORDER',
1445: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1446: x_Token7 => 'LINE',
1447: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1448: x_Token8 => 'MATCH_ATTR',
1449: x_value8 => v_MatchAttrTxt);
1450: --
1451: IF (l_debug <> -1) THEN
1448: x_Token8 => 'MATCH_ATTR',
1449: x_value8 => v_MatchAttrTxt);
1450: --
1451: IF (l_debug <> -1) THEN
1452: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1453: x_key_rec.req_rec.line_id);
1454: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1455: x_Key_rec.req_rec.cust_model_serial_number);
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1450: --
1451: IF (l_debug <> -1) THEN
1452: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1453: x_key_rec.req_rec.line_id);
1454: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1455: x_Key_rec.req_rec.cust_model_serial_number);
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1457: x_Key_rec.req_rec.request_date);
1458: END IF;
1452: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1453: x_key_rec.req_rec.line_id);
1454: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1455: x_Key_rec.req_rec.cust_model_serial_number);
1456: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE_SEQ',
1457: x_Key_rec.req_rec.request_date);
1458: END IF;
1459: --
1460: ELSE
1470: x_OrderLineId => NULL,
1471: x_Token1 => 'QUANTITY',
1472: x_value1 => g_sch_line_qty,
1473: x_Token2 => 'GROUP',
1474: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1475: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1476: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1477: x_Token3 => 'REQ_DATE',
1478: x_value3 => x_key_rec.req_rec.request_date,
1471: x_Token1 => 'QUANTITY',
1472: x_value1 => g_sch_line_qty,
1473: x_Token2 => 'GROUP',
1474: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1475: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1476: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1477: x_Token3 => 'REQ_DATE',
1478: x_value3 => x_key_rec.req_rec.request_date,
1479: x_Token4 => 'START_DATE_TIME',
1472: x_value1 => g_sch_line_qty,
1473: x_Token2 => 'GROUP',
1474: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1475: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1476: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1477: x_Token3 => 'REQ_DATE',
1478: x_value3 => x_key_rec.req_rec.request_date,
1479: x_Token4 => 'START_DATE_TIME',
1480: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1478: x_value3 => x_key_rec.req_rec.request_date,
1479: x_Token4 => 'START_DATE_TIME',
1480: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1481: x_Token5 => 'SCHEDULE_LINE',
1482: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1483: x_Token6 => 'ORDER',
1484: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1485: x_Token7 => 'LINE',
1486: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1480: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1481: x_Token5 => 'SCHEDULE_LINE',
1482: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1483: x_Token6 => 'ORDER',
1484: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1485: x_Token7 => 'LINE',
1486: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1487: x_Token8 => 'MATCH_ATTR',
1488: x_value8 => v_MatchAttrTxt);
1482: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1483: x_Token6 => 'ORDER',
1484: x_value6 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
1485: x_Token7 => 'LINE',
1486: x_value7 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
1487: x_Token8 => 'MATCH_ATTR',
1488: x_value8 => v_MatchAttrTxt);
1489: --
1490: IF (l_debug <> -1) THEN
1487: x_Token8 => 'MATCH_ATTR',
1488: x_value8 => v_MatchAttrTxt);
1489: --
1490: IF (l_debug <> -1) THEN
1491: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1492: x_key_rec.req_rec.line_id);
1493: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1494: x_Key_rec.req_rec.cust_model_serial_number);
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1489: --
1490: IF (l_debug <> -1) THEN
1491: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1492: x_key_rec.req_rec.line_id);
1493: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1494: x_Key_rec.req_rec.cust_model_serial_number);
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1496: x_Key_rec.req_rec.request_date);
1497: END IF;
1491: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1492: x_key_rec.req_rec.line_id);
1493: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1494: x_Key_rec.req_rec.cust_model_serial_number);
1495: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_DELETE',
1496: x_Key_rec.req_rec.request_date);
1497: END IF;
1498: --
1499: END IF; /* Exception */
1501: END IF;/* Check g_sch_line_qty*/
1502: --Bugfix 6131516 End
1503:
1504: IF (l_debug <> -1) THEN
1505: rlm_core_sv.dlog(k_DEBUG,'x_DeleteQty',x_DeleteQty);
1506: END IF;
1507: --
1508: END IF;
1509: --
1511: --
1512: END IF;
1513: --
1514: IF (l_debug <> -1) THEN
1515: rlm_core_sv.dpop(k_SDEBUG);
1516: END IF;
1517: --
1518: EXCEPTION
1519: --
1525: --
1526: rlm_message_sv.sql_error('rlm_rd_sv.DeleteRequirement',x_progress);
1527: --
1528: IF (l_debug <> -1) THEN
1529: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
1530: END IF;
1531: --
1532: raise;
1533:
1553:
1554: BEGIN
1555: --
1556: IF (l_debug <> -1) THEN
1557: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1558: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1559: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1560: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1561: END IF;
1554: BEGIN
1555: --
1556: IF (l_debug <> -1) THEN
1557: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1558: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1559: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1560: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1561: END IF;
1562:
1555: --
1556: IF (l_debug <> -1) THEN
1557: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1558: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1559: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1560: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1561: END IF;
1562:
1563: --logic to roll forward frozen fence goes here
1556: IF (l_debug <> -1) THEN
1557: rlm_core_sv.dpush(k_SDEBUG,'InsertRequirement');
1558: rlm_core_sv.dlog(k_DEBUG,'x_Reconcile',x_Reconcile);
1559: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1560: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1561: END IF;
1562:
1563: --logic to roll forward frozen fence goes here
1564:
1564:
1565: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
1566: --
1567: IF (l_debug <> -1) THEN
1568: rlm_core_sv.dlog(k_DEBUG,' Rollforward set to: ', v_RF_Enabled);
1569: END IF;
1570: --
1571: -- bug 4223359 first reconcile the quantity in the reconcile table before trying to
1572: -- insert the new requirement. If there is additional qty after reconciling then
1580: --
1581: RLM_TPA_SV.ReconcileShipments(x_Group_rec, x_Key_rec, x_Quantity);
1582: --
1583: IF (l_debug <> -1) THEN
1584: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1585: END IF;
1586: --
1587: Reconcile(x_Group_rec, x_Key_rec, x_Quantity);
1588: --
1588: --
1589: END IF;
1590: --
1591: IF (l_debug <> -1) THEN
1592: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1593: END IF;
1594: --
1595: IF x_Quantity = 0 THEN
1596: -- Bug 4297984 Start
1609: x_OrderLineId => NULL,
1610: x_Token1 => 'QUANTITY',
1611: x_value1 => v_Quantity,
1612: x_Token2 => 'GROUP',
1613: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1614: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1615: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1616: x_Token3 => 'REQ_DATE',
1617: x_value3 => x_key_rec.req_rec.request_date,
1610: x_Token1 => 'QUANTITY',
1611: x_value1 => v_Quantity,
1612: x_Token2 => 'GROUP',
1613: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1614: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1615: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1616: x_Token3 => 'REQ_DATE',
1617: x_value3 => x_key_rec.req_rec.request_date,
1618: x_Token4 => 'START_DATE_TIME',
1611: x_value1 => v_Quantity,
1612: x_Token2 => 'GROUP',
1613: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1614: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1615: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1616: x_Token3 => 'REQ_DATE',
1617: x_value3 => x_key_rec.req_rec.request_date,
1618: x_Token4 => 'START_DATE_TIME',
1619: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1624: x_Token6 => 'MATCH_ATTR',
1625: x_value6 => v_MatchAttrTxt);
1626: --
1627: IF (l_debug <> -1) THEN
1628: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1629: x_key_rec.req_rec.line_id);
1630: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1631: x_Key_rec.req_rec.cust_model_serial_number);
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1626: --
1627: IF (l_debug <> -1) THEN
1628: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1629: x_key_rec.req_rec.line_id);
1630: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1631: x_Key_rec.req_rec.cust_model_serial_number);
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1633: x_Key_rec.req_rec.request_date);
1634: END IF;
1628: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1629: x_key_rec.req_rec.line_id);
1630: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1631: x_Key_rec.req_rec.cust_model_serial_number);
1632: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT_SEQ',
1633: x_Key_rec.req_rec.request_date);
1634: END IF;
1635: --
1636: ELSE
1646: x_OrderLineId => NULL,
1647: x_Token1 => 'QUANTITY',
1648: x_value1 => v_Quantity,
1649: x_Token2 => 'GROUP',
1650: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1651: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1652: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1653: x_Token3 => 'REQ_DATE',
1654: x_value3 => x_key_rec.req_rec.request_date,
1647: x_Token1 => 'QUANTITY',
1648: x_value1 => v_Quantity,
1649: x_Token2 => 'GROUP',
1650: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1651: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1652: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1653: x_Token3 => 'REQ_DATE',
1654: x_value3 => x_key_rec.req_rec.request_date,
1655: x_Token4 => 'START_DATE_TIME',
1648: x_value1 => v_Quantity,
1649: x_Token2 => 'GROUP',
1650: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1651: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1652: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1653: x_Token3 => 'REQ_DATE',
1654: x_value3 => x_key_rec.req_rec.request_date,
1655: x_Token4 => 'START_DATE_TIME',
1656: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1654: x_value3 => x_key_rec.req_rec.request_date,
1655: x_Token4 => 'START_DATE_TIME',
1656: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1657: x_Token5 => 'SCHEDULE_LINE',
1658: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1659: x_Token6 => 'MATCH_ATTR',
1660: x_value6 => v_MatchAttrTxt);
1661: --
1662: IF (l_debug <> -1) THEN
1659: x_Token6 => 'MATCH_ATTR',
1660: x_value6 => v_MatchAttrTxt);
1661: --
1662: IF (l_debug <> -1) THEN
1663: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1664: x_key_rec.req_rec.line_id);
1665: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1666: x_Key_rec.req_rec.cust_model_serial_number);
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1661: --
1662: IF (l_debug <> -1) THEN
1663: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1664: x_key_rec.req_rec.line_id);
1665: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1666: x_Key_rec.req_rec.cust_model_serial_number);
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1668: x_Key_rec.req_rec.request_date);
1669: END IF;
1663: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1664: x_key_rec.req_rec.line_id);
1665: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1666: x_Key_rec.req_rec.cust_model_serial_number);
1667: rlm_core_sv.dlog(k_DEBUG,'RLM_RECONCILE_ZERO_INSERT',
1668: x_Key_rec.req_rec.request_date);
1669: END IF;
1670: --
1671: END IF;
1672: -- Bug 4297984 End
1673: ELSE
1674: --
1675: IF (l_debug <> -1) THEN
1676: rlm_core_sv.dlog(k_DEBUG,'schedule_source',x_Sched_rec.schedule_source);
1677: END IF;
1678: --
1679: -- start of bug fix 4223359
1680: --
1683: IF IsFrozen(TRUNC(SYSDATE),x_Group_rec,x_key_rec.req_rec.request_date) OR
1684: IsFrozen(TRUNC(SYSDATE),x_Group_rec,x_key_rec.req_rec.schedule_date) THEN
1685: --
1686: IF (l_debug <> -1) THEN
1687: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1688: x_key_rec.req_rec.line_id);
1689: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1690: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1691: END IF;
1685: --
1686: IF (l_debug <> -1) THEN
1687: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1688: x_key_rec.req_rec.line_id);
1689: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1690: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1691: END IF;
1692: --
1693: -- If not able to insert the new quantity due to frozen fence
1686: IF (l_debug <> -1) THEN
1687: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
1688: x_key_rec.req_rec.line_id);
1689: rlm_core_sv.dlog(k_DEBUG, 'Not inserting line', x_key_rec.req_rec.line_id);
1690: rlm_core_sv.dlog(k_DEBUG, 'Qty not inserting ', x_quantity);
1691: END IF;
1692: --
1693: -- If not able to insert the new quantity due to frozen fence
1694: -- store that quantity with a negative quantity in the g_reconcile_tab
1701: StoreShipments(x_Sched_rec, x_Group_rec, x_Key_rec, -x_quantity);
1702: --
1703: IF (l_debug <> -1) THEN
1704: --
1705: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.schedule_type',
1706: x_Key_rec.req_rec.schedule_type);
1707: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.shipment_flag',
1708: x_Key_rec.req_rec.shipment_flag);
1709: --
1703: IF (l_debug <> -1) THEN
1704: --
1705: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.schedule_type',
1706: x_Key_rec.req_rec.schedule_type);
1707: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.shipment_flag',
1708: x_Key_rec.req_rec.shipment_flag);
1709: --
1710: END IF;
1711: --
1721: IsFrozen(TRUNC(SYSDATE),x_Group_rec,x_key_rec.req_rec.request_date) AND
1722: x_Sched_rec.schedule_source <> 'MANUAL' THEN
1723: --
1724: IF (l_debug <> -1) THEN
1725: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',x_Group_rec.frozen_days);
1726: END IF;
1727: --
1728: x_key_rec.req_rec.request_date := TRUNC(SYSDATE)
1729: + nvl(x_Group_rec.frozen_days,0);
1728: x_key_rec.req_rec.request_date := TRUNC(SYSDATE)
1729: + nvl(x_Group_rec.frozen_days,0);
1730: --
1731: IF (l_debug <> -1) THEN
1732: rlm_core_sv.dlog(k_DEBUG,'request_date',x_key_rec.req_rec.request_date);
1733: END IF;
1734: --
1735: END IF;
1736: --
1738: IsFrozen(TRUNC(SYSDATE),x_Group_rec,x_key_rec.req_rec.schedule_date) AND
1739: x_Sched_rec.schedule_source <> 'MANUAL' THEN
1740: --
1741: IF (l_debug <> -1) THEN
1742: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.frozen_days',x_Group_rec.frozen_days);
1743: END IF;
1744: --pdue
1745: x_key_rec.req_rec.schedule_date := TRUNC(SYSDATE)
1746: + nvl(x_Group_rec.frozen_days,0);
1745: x_key_rec.req_rec.schedule_date := TRUNC(SYSDATE)
1746: + nvl(x_Group_rec.frozen_days,0);
1747: --
1748: IF (l_debug <> -1) THEN
1749: rlm_core_sv.dlog(k_DEBUG,'schedule_date',x_key_rec.req_rec.schedule_date);
1750: END IF;
1751: --
1752: END IF;
1753: --
1762: ELSE
1763: --
1764: IF (l_debug <> -1) THEN
1765: --
1766: rlm_core_sv.dlog(k_DEBUG,'Insertion will not happen as a demand populated by higher precedence ' ||
1767: g_order_rec.rla_schedule_type_code || ' schedule exists on ' ||
1768: g_order_rec.request_date);
1769: --
1770: END IF;
1784: x_OrderLineId => NULL,
1785: x_Token1 => 'QUANTITY',
1786: x_value1 => x_Key_rec.req_rec.primary_quantity,
1787: x_Token2 => 'GROUP',
1788: x_value2 => 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_Token3 => 'REQ_DATE',
1792: x_value3 => x_key_rec.req_rec.request_date,
1785: x_Token1 => 'QUANTITY',
1786: x_value1 => x_Key_rec.req_rec.primary_quantity,
1787: x_Token2 => 'GROUP',
1788: x_value2 => 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_Token3 => 'REQ_DATE',
1792: x_value3 => x_key_rec.req_rec.request_date,
1793: x_Token4 => 'START_DATE_TIME',
1786: x_value1 => x_Key_rec.req_rec.primary_quantity,
1787: x_Token2 => 'GROUP',
1788: x_value2 => 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_Token3 => 'REQ_DATE',
1792: x_value3 => x_key_rec.req_rec.request_date,
1793: x_Token4 => 'START_DATE_TIME',
1794: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1798: x_value6 => g_order_rec.industry_attribute3,
1799: x_Token7 => 'RECENT_REQ_DATE',
1800: x_value7 => g_order_rec.request_date,
1801: x_Token8 => 'ORDER',
1802: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1803: x_Token9 => 'SEQ_INFO',
1804: x_value9 => nvl(x_Key_rec.req_rec.cust_production_seq_num,'NULL') ||'-'||
1805: nvl(x_Key_rec.req_rec.cust_model_serial_number,'NULL')||'-'||
1806: nvl(x_Key_rec.req_rec.customer_job,'NULL'),
1807: x_Token10 => 'MATCH_ATTR',
1808: x_value10 => v_MatchAttrTxt);
1809: --
1810: IF (l_debug <> -1) THEN
1811: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1812: x_key_rec.req_rec.line_id);
1813: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1814: x_Key_rec.req_rec.cust_model_serial_number);
1815: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1809: --
1810: IF (l_debug <> -1) THEN
1811: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1812: x_key_rec.req_rec.line_id);
1813: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1814: x_Key_rec.req_rec.cust_model_serial_number);
1815: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1816: x_Key_rec.req_rec.request_date);
1817: END IF;
1811: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1812: x_key_rec.req_rec.line_id);
1813: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1814: x_Key_rec.req_rec.cust_model_serial_number);
1815: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT_SEQ',
1816: x_Key_rec.req_rec.request_date);
1817: END IF;
1818: --
1819: ELSE
1829: x_OrderLineId => NULL,
1830: x_Token1 => 'QUANTITY',
1831: x_value1 => x_Key_rec.req_rec.primary_quantity,
1832: x_Token2 => 'GROUP',
1833: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1834: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1835: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1836: x_Token3 => 'REQ_DATE',
1837: x_value3 => x_key_rec.req_rec.request_date,
1830: x_Token1 => 'QUANTITY',
1831: x_value1 => x_Key_rec.req_rec.primary_quantity,
1832: x_Token2 => 'GROUP',
1833: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1834: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1835: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1836: x_Token3 => 'REQ_DATE',
1837: x_value3 => x_key_rec.req_rec.request_date,
1838: x_Token4 => 'START_DATE_TIME',
1831: x_value1 => x_Key_rec.req_rec.primary_quantity,
1832: x_Token2 => 'GROUP',
1833: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1834: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1835: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1836: x_Token3 => 'REQ_DATE',
1837: x_value3 => x_key_rec.req_rec.request_date,
1838: x_Token4 => 'START_DATE_TIME',
1839: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1843: x_value6 => g_order_rec.industry_attribute3,
1844: x_Token7 => 'RECENT_REQ_DATE',
1845: x_value7 => g_order_rec.request_date,
1846: x_Token8 => 'ORDER',
1847: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1848: x_Token9 => 'SCHEDULE_LINE',
1849: x_value9 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1850: x_Token10 => 'MATCH_ATTR',
1851: x_value10 => v_MatchAttrTxt);
1845: x_value7 => g_order_rec.request_date,
1846: x_Token8 => 'ORDER',
1847: x_value8 => rlm_core_sv.get_order_number(g_order_rec.header_id),
1848: x_Token9 => 'SCHEDULE_LINE',
1849: x_value9 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1850: x_Token10 => 'MATCH_ATTR',
1851: x_value10 => v_MatchAttrTxt);
1852: --
1853: IF (l_debug <> -1) THEN
1850: x_Token10 => 'MATCH_ATTR',
1851: x_value10 => v_MatchAttrTxt);
1852: --
1853: IF (l_debug <> -1) THEN
1854: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1855: x_key_rec.req_rec.line_id);
1856: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1857: x_Key_rec.req_rec.cust_model_serial_number);
1858: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1852: --
1853: IF (l_debug <> -1) THEN
1854: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1855: x_key_rec.req_rec.line_id);
1856: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1857: x_Key_rec.req_rec.cust_model_serial_number);
1858: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1859: x_Key_rec.req_rec.request_date);
1860: END IF;
1854: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1855: x_key_rec.req_rec.line_id);
1856: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1857: x_Key_rec.req_rec.cust_model_serial_number);
1858: rlm_core_sv.dlog(k_DEBUG,'RLM_LOW_PRECEDENCE_INSERT',
1859: x_Key_rec.req_rec.request_date);
1860: END IF;
1861: --
1862: END IF;
1875: --
1876: END IF;
1877: --
1878: IF (l_debug <> -1) THEN
1879: rlm_core_sv.dpop(k_SDEBUG);
1880: END IF;
1881:
1882: EXCEPTION
1883: WHEN e_FrozenFences THEN
1898: x_OrderLineId => NULL,
1899: x_Token1 => 'QUANTITY',
1900: x_value1 => x_Key_rec.req_rec.primary_quantity,
1901: x_Token2 => 'GROUP',
1902: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1903: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1904: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1905: x_Token3 => 'REQ_DATE',
1906: x_value3 => x_key_rec.req_rec.request_date,
1899: x_Token1 => 'QUANTITY',
1900: x_value1 => x_Key_rec.req_rec.primary_quantity,
1901: x_Token2 => 'GROUP',
1902: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1903: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1904: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1905: x_Token3 => 'REQ_DATE',
1906: x_value3 => x_key_rec.req_rec.request_date,
1907: x_Token4 => 'START_DATE_TIME',
1900: x_value1 => x_Key_rec.req_rec.primary_quantity,
1901: x_Token2 => 'GROUP',
1902: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1903: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1904: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1905: x_Token3 => 'REQ_DATE',
1906: x_value3 => x_key_rec.req_rec.request_date,
1907: x_Token4 => 'START_DATE_TIME',
1908: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1913: x_Token6 => 'MATCH_ATTR',
1914: x_value6 => v_MatchAttrTxt);
1915: --
1916: IF (l_debug <> -1) THEN
1917: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT_SEQ',
1918: x_key_rec.req_rec.line_id);
1919: rlm_core_sv.dpop(k_SDEBUG);
1920: END IF;
1921: --
1915: --
1916: IF (l_debug <> -1) THEN
1917: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT_SEQ',
1918: x_key_rec.req_rec.line_id);
1919: rlm_core_sv.dpop(k_SDEBUG);
1920: END IF;
1921: --
1922: ELSE
1923: --
1932: x_OrderLineId => NULL,
1933: x_Token1 => 'QUANTITY',
1934: x_value1 => x_Key_rec.req_rec.primary_quantity,
1935: x_Token2 => 'GROUP',
1936: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1937: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1938: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1939: x_Token3 => 'REQ_DATE',
1940: x_value3 => x_key_rec.req_rec.request_date,
1933: x_Token1 => 'QUANTITY',
1934: x_value1 => x_Key_rec.req_rec.primary_quantity,
1935: x_Token2 => 'GROUP',
1936: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1937: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1938: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1939: x_Token3 => 'REQ_DATE',
1940: x_value3 => x_key_rec.req_rec.request_date,
1941: x_Token4 => 'START_DATE_TIME',
1934: x_value1 => x_Key_rec.req_rec.primary_quantity,
1935: x_Token2 => 'GROUP',
1936: x_value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
1937: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
1938: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
1939: x_Token3 => 'REQ_DATE',
1940: x_value3 => x_key_rec.req_rec.request_date,
1941: x_Token4 => 'START_DATE_TIME',
1942: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1940: x_value3 => x_key_rec.req_rec.request_date,
1941: x_Token4 => 'START_DATE_TIME',
1942: x_value4 => to_date(x_key_rec.req_rec.industry_attribute2,'YYYY/MM/DD HH24:MI:SS'),
1943: x_Token5 => 'SCHEDULE_LINE',
1944: x_value5 => rlm_core_sv.get_schedule_line_number(x_key_rec.req_rec.schedule_line_id),
1945: x_Token6 => 'MATCH_ATTR',
1946: x_value6 => v_MatchAttrTxt);
1947: --
1948: IF (l_debug <> -1) THEN
1945: x_Token6 => 'MATCH_ATTR',
1946: x_value6 => v_MatchAttrTxt);
1947: --
1948: IF (l_debug <> -1) THEN
1949: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT',
1950: x_key_rec.req_rec.line_id);
1951: rlm_core_sv.dpop(k_SDEBUG);
1952: END IF;
1953: --
1947: --
1948: IF (l_debug <> -1) THEN
1949: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_INSERT',
1950: x_key_rec.req_rec.line_id);
1951: rlm_core_sv.dpop(k_SDEBUG);
1952: END IF;
1953: --
1954: END IF;
1955: END IF; /*IF g_inc_exception */ --Bugfix 6159269
1958: WHEN OTHERS THEN
1959: rlm_message_sv.sql_error('rlm_rd_sv.InsertRequirement',x_progress);
1960: --
1961: IF (l_debug <> -1) THEN
1962: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
1963: END IF;
1964: --
1965: raise;
1966:
1985:
1986: BEGIN
1987: --
1988: IF (l_debug <> -1) THEN
1989: rlm_core_sv.dpush(k_SDEBUG,'UpdateRequirement');
1990: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1991: END IF;
1992: --
1993: -- logic to get roll forward values
1986: BEGIN
1987: --
1988: IF (l_debug <> -1) THEN
1989: rlm_core_sv.dpush(k_SDEBUG,'UpdateRequirement');
1990: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
1991: END IF;
1992: --
1993: -- logic to get roll forward values
1994: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
1993: -- logic to get roll forward values
1994: v_RF_Enabled:=x_Group_rec.roll_forward_frozen_flag;
1995: --
1996: IF (l_debug <> -1) THEN
1997: rlm_core_sv.dlog(k_DEBUG, 'Rollforward set to: ', v_RF_Enabled);
1998: END IF;
1999: --
2000: --pdue
2001: --
2021: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2022: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2023: x_OrderLineId => x_key_rec.dem_rec.line_id,
2024: x_Token1 => 'LINE',
2025: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2026: x_Token2 => 'ORDER',
2027: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2028: x_Token3 => 'QUANTITY',
2029: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2023: x_OrderLineId => x_key_rec.dem_rec.line_id,
2024: x_Token1 => 'LINE',
2025: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2026: x_Token2 => 'ORDER',
2027: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2028: x_Token3 => 'QUANTITY',
2029: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2030: x_Token4 => 'CUSTITEM',
2031: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2027: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2028: x_Token3 => 'QUANTITY',
2029: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2030: x_Token4 => 'CUSTITEM',
2031: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2032: x_Token5 => 'REQ_DATE',
2033: x_value5 => x_key_rec.dem_rec.request_date,
2034: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
2035: x_value6 => g_sch_line_qty, --Bugfix 6159269
2040: x_Token8 => 'MATCH_ATTR',
2041: x_value8 => v_MatchAttrTxt);
2042: --
2043: IF (l_debug <> -1) THEN
2044: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2045: x_key_rec.req_rec.line_id);
2046: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
2047: x_key_rec.req_rec.line_id);
2048: END IF;
2042: --
2043: IF (l_debug <> -1) THEN
2044: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2045: x_key_rec.req_rec.line_id);
2046: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
2047: x_key_rec.req_rec.line_id);
2048: END IF;
2049: --
2050: ELSE
2058: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
2059: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
2060: x_OrderLineId => x_key_rec.dem_rec.line_id,
2061: x_Token1 => 'LINE',
2062: x_value1 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2063: x_Token2 => 'ORDER',
2064: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2065: x_Token3 => 'QUANTITY',
2066: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2060: x_OrderLineId => x_key_rec.dem_rec.line_id,
2061: x_Token1 => 'LINE',
2062: x_value1 =>rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
2063: x_Token2 => 'ORDER',
2064: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2065: x_Token3 => 'QUANTITY',
2066: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2067: x_Token4 => 'CUSTITEM',
2068: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2064: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
2065: x_Token3 => 'QUANTITY',
2066: x_value3 => x_key_rec.dem_rec.ordered_quantity,
2067: x_Token4 => 'CUSTITEM',
2068: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
2069: x_Token5 => 'REQ_DATE',
2070: x_value5 => x_key_rec.dem_rec.request_date,
2071: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
2072: x_value6 => g_sch_line_qty, --Bugfix 6159269
2073: x_Token7 => 'MATCH_ATTR',
2074: x_value7 => v_MatchAttrTxt);
2075: --
2076: IF (l_debug <> -1) THEN
2077: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2078: x_key_rec.req_rec.line_id);
2079: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
2080: x_key_rec.req_rec.line_id);
2081: END IF;
2075: --
2076: IF (l_debug <> -1) THEN
2077: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
2078: x_key_rec.req_rec.line_id);
2079: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
2080: x_key_rec.req_rec.line_id);
2081: END IF;
2082: --
2083: END IF;
2087: --}
2088: ELSE
2089: --{
2090: IF (l_debug <> -1) THEN
2091: rlm_core_sv.dlog(k_DEBUG,'dem_rec.ordered_quantity:',
2092: x_key_rec.dem_rec.ordered_quantity);
2093: rlm_core_sv.dlog(k_DEBUG,'frozen_days:',
2094: x_Group_rec.frozen_days);
2095: END IF;
2089: --{
2090: IF (l_debug <> -1) THEN
2091: rlm_core_sv.dlog(k_DEBUG,'dem_rec.ordered_quantity:',
2092: x_key_rec.dem_rec.ordered_quantity);
2093: rlm_core_sv.dlog(k_DEBUG,'frozen_days:',
2094: x_Group_rec.frozen_days);
2095: END IF;
2096: --
2097: x_key_rec.req_rec.request_date := TRUNC(SYSDATE) +
2136:
2137: END IF;
2138: --
2139: IF (l_debug <> -1) THEN
2140: rlm_core_sv.dpop(k_SDEBUG);
2141: END IF;
2142: --
2143: EXCEPTION
2144: WHEN OTHERS THEN
2144: WHEN OTHERS THEN
2145: rlm_message_sv.sql_error('rlm_rd_sv.UpdateRequirement',x_progress);
2146: --
2147: IF (l_debug <> -1) THEN
2148: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2149: END IF;
2150: --
2151: raise;
2152:
2164: x_progress VARCHAR2(3) := '010';
2165: BEGIN
2166:
2167: IF (l_debug <> -1) THEN
2168: rlm_core_sv.dpush(k_SDEBUG,'GetQtyRec');
2169: rlm_core_sv.dpop(k_SDEBUG);
2170: END IF;
2171:
2172: EXCEPTION
2165: BEGIN
2166:
2167: IF (l_debug <> -1) THEN
2168: rlm_core_sv.dpush(k_SDEBUG,'GetQtyRec');
2169: rlm_core_sv.dpop(k_SDEBUG);
2170: END IF;
2171:
2172: EXCEPTION
2173: WHEN OTHERS THEN
2173: WHEN OTHERS THEN
2174: rlm_message_sv.sql_error('rlm_rd_sv.GetQtyRec',x_progress);
2175: --
2176: IF (l_debug <> -1) THEN
2177: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2178: END IF;
2179: --
2180: raise;
2181:
2193:
2194: BEGIN
2195: --
2196: IF (l_debug <> -1) THEN
2197: rlm_core_sv.dpush(k_SDEBUG,'GetReq');
2198: END IF;
2199: --
2200: IF x_Key_rec.rlm_line_id IS NOT NULL THEN
2201: IF x_Key_rec.rlm_line_id <> NVL(x_Key_rec.req_rec.line_id,k_NNULL) THEN
2203: END IF;
2204: END IF;
2205: --
2206: IF (l_debug <> -1) THEN
2207: rlm_core_sv.dpop(k_SDEBUG);
2208: END IF;
2209: --
2210: EXCEPTION
2211: WHEN OTHERS THEN
2211: WHEN OTHERS THEN
2212: rlm_message_sv.sql_error('rlm_rd_sv.GetReq',x_progress);
2213: --
2214: IF (l_debug <> -1) THEN
2215: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2216: END IF;
2217: --
2218: raise;
2219:
2272:
2273: BEGIN
2274: --
2275: IF (l_debug <> -1) THEN
2276: rlm_core_sv.dpush(k_SDEBUG,'GetDemand');
2277: END IF;
2278: --
2279: IF x_Group_rec.setup_terms_rec.blanket_number IS NOT NULL THEN
2280: --
2406: --
2407: END IF;
2408: --
2409: IF (l_debug <> -1) THEN
2410: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.order_header_id',
2411: x_Key_rec.dem_rec.order_header_id);
2412: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.blanket_number',
2413: x_Key_rec.dem_rec.blanket_number);
2414: END IF;
2408: --
2409: IF (l_debug <> -1) THEN
2410: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.order_header_id',
2411: x_Key_rec.dem_rec.order_header_id);
2412: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.blanket_number',
2413: x_Key_rec.dem_rec.blanket_number);
2414: END IF;
2415: --
2416: IF (l_debug <> -1) THEN
2413: x_Key_rec.dem_rec.blanket_number);
2414: END IF;
2415: --
2416: IF (l_debug <> -1) THEN
2417: rlm_core_sv.dpop(k_SDEBUG);
2418: END IF;
2419: --
2420: EXCEPTION
2421: WHEN OTHERS THEN
2421: WHEN OTHERS THEN
2422: rlm_message_sv.sql_error('rlm_rd_sv.GetDemand',x_progress);
2423: --
2424: IF (l_debug <> -1) THEN
2425: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
2426: END IF;
2427: --
2428: raise;
2429:
2449: v_request_date_str VARCHAR2(30);
2450: BEGIN
2451: --
2452: IF (l_debug <> -1) THEN
2453: rlm_core_sv.dpush(k_SDEBUG,'InitializeDemand');
2454: END IF;
2455: --
2456: g_InitDemandTab.DELETE;
2457: --
3328: v_where_clause := v_where_clause || ' AND authorized_to_ship_flag = :x_DemandType ORDER BY request_date DESC';
3329: g_InitDemandTab(g_InitDemandTab.COUNT+1) := x_DemandType;
3330: --
3331: IF (l_debug <> -1) THEN
3332: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3333: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3334: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3335: END IF;
3336: --
3329: g_InitDemandTab(g_InitDemandTab.COUNT+1) := x_DemandType;
3330: --
3331: IF (l_debug <> -1) THEN
3332: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3333: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3334: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3335: END IF;
3336: --
3337: v_sql := v_select_clause || v_where_clause;
3330: --
3331: IF (l_debug <> -1) THEN
3332: rlm_core_sv.dlog(k_DEBUG,'v_select_clause',v_select_clause);
3333: rlm_core_sv.dlog(k_DEBUG,'v_where_clause',v_where_clause);
3334: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for x_Demand_ref cursor', g_InitDemandTab.COUNT);
3335: END IF;
3336: --
3337: v_sql := v_select_clause || v_where_clause;
3338: --
3335: END IF;
3336: --
3337: v_sql := v_select_clause || v_where_clause;
3338: --
3339: RLM_CORE_SV.OpenDynamicCursor(x_Demand_ref, v_sql, g_InitDemandTab);
3340: --
3341: IF (l_debug <> -1) THEN
3342: rlm_core_sv.dpop(k_SDEBUG);
3343: END IF;
3338: --
3339: RLM_CORE_SV.OpenDynamicCursor(x_Demand_ref, v_sql, g_InitDemandTab);
3340: --
3341: IF (l_debug <> -1) THEN
3342: rlm_core_sv.dpop(k_SDEBUG);
3343: END IF;
3344: --
3345: EXCEPTION
3346: WHEN e_no_init THEN
3343: END IF;
3344: --
3345: EXCEPTION
3346: WHEN e_no_init THEN
3347: rlm_core_sv.dpop(k_SDEBUG,'Demand Type is not ATS or NATS');
3348:
3349: WHEN OTHERS THEN
3350: rlm_message_sv.sql_error('rlm_rd_sv.InitializeDemand',x_progress);
3351: --
3349: WHEN OTHERS THEN
3350: rlm_message_sv.sql_error('rlm_rd_sv.InitializeDemand',x_progress);
3351: --
3352: IF (l_debug <> -1) THEN
3353: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3354: END IF;
3355: --
3356: raise;
3357:
3370:
3371: BEGIN
3372: --
3373: IF (l_debug <> -1) THEN
3374: rlm_core_sv.dpush(k_SDEBUG,'InitializeSoGroup');
3375: END IF;
3376: --
3377: OPEN x_Group_ref FOR
3378: SELECT rih.customer_id,
3392: WHERE rih.header_id = x_Sched_rec.header_id
3393: AND rih.org_id = ril.org_id
3394: AND ril.header_id = rih.header_id
3395: AND ril.industry_attribute15 = x_Group_rec.ship_from_org_id
3396: AND ril.process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
3397: --AND ril.inventory_item_id = x_Group_rec.inventory_item_id
3398: AND ril.customer_item_id = x_Group_rec.customer_item_id
3399: AND ril.ship_to_address_id = x_Group_rec.ship_to_address_id
3400: -- blankets
3414: ORDER BY ril.ship_to_org_id,
3415: ril.customer_item_id;
3416: --
3417: IF (l_debug <> -1) THEN
3418: rlm_core_sv.dpop(k_SDEBUG);
3419: END IF;
3420: --
3421: EXCEPTION
3422: WHEN OTHERS THEN
3422: WHEN OTHERS THEN
3423: rlm_message_sv.sql_error('rlm_rd_sv.InitializeSoGroup',x_progress);
3424: --
3425: IF (l_debug <> -1) THEN
3426: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3427: END IF;
3428: --
3429: raise e_group_error;
3430:
3445:
3446: BEGIN
3447: --
3448: IF (l_debug <> -1) THEN
3449: rlm_core_sv.dpush(k_SDEBUG,'InitializeReq');
3450: rlm_core_sv.dlog(k_DEBUG,'x_ReqType', x_ReqType);
3451: END IF;
3452: --
3453: IF x_ReqType IN (k_NATS, k_ATS) THEN
3446: BEGIN
3447: --
3448: IF (l_debug <> -1) THEN
3449: rlm_core_sv.dpush(k_SDEBUG,'InitializeReq');
3450: rlm_core_sv.dlog(k_DEBUG,'x_ReqType', x_ReqType);
3451: END IF;
3452: --
3453: IF x_ReqType IN (k_NATS, k_ATS) THEN
3454: --
3452: --
3453: IF x_ReqType IN (k_NATS, k_ATS) THEN
3454: --
3455: IF (l_debug <> -1) THEN
3456: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3453: IF x_ReqType IN (k_NATS, k_ATS) THEN
3454: --
3455: IF (l_debug <> -1) THEN
3456: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3461: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3454: --
3455: IF (l_debug <> -1) THEN
3456: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3461: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3462: END IF;
3455: IF (l_debug <> -1) THEN
3456: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3461: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3462: END IF;
3463: --
3456: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3461: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3462: END IF;
3463: --
3464: IF (x_ReqType = k_ATS) THEN
3457: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
3458: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
3459: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
3460: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
3461: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
3462: END IF;
3463: --
3464: IF (x_ReqType = k_ATS) THEN
3465:
3554: AND customer_item_id = x_Group_rec.customer_item_id
3555: AND inventory_item_id = x_Group_rec.inventory_item_id
3556: AND order_header_id = x_Group_rec.order_header_id
3557: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3558: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3559: rlm_core_sv.k_PS_FROZEN_FIRM)
3560: AND (item_detail_type = k_FIRM OR item_detail_type = k_PAST_DUE_FIRM)
3561: ORDER BY request_date;
3562:
3555: AND inventory_item_id = x_Group_rec.inventory_item_id
3556: AND order_header_id = x_Group_rec.order_header_id
3557: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3558: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3559: rlm_core_sv.k_PS_FROZEN_FIRM)
3560: AND (item_detail_type = k_FIRM OR item_detail_type = k_PAST_DUE_FIRM)
3561: ORDER BY request_date;
3562:
3563: ELSE
3653: AND customer_item_id = x_Group_rec.customer_item_id
3654: AND inventory_item_id = x_Group_rec.inventory_item_id
3655: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3656: AND order_header_id = x_Group_rec.order_header_id
3657: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3658: rlm_core_sv.k_PS_FROZEN_FIRM)
3659: AND item_detail_type = k_FORECAST
3660: ORDER BY request_date;
3661:
3654: AND inventory_item_id = x_Group_rec.inventory_item_id
3655: AND NVL(intmed_ship_to_org_id ,K_NNULL) = NVL(x_Group_rec.intmed_ship_to_org_id, K_NNULL) --Bugfix 5911991
3656: AND order_header_id = x_Group_rec.order_header_id
3657: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
3658: rlm_core_sv.k_PS_FROZEN_FIRM)
3659: AND item_detail_type = k_FORECAST
3660: ORDER BY request_date;
3661:
3662: END IF;
3663:
3664: END IF;
3665: --
3666: IF (l_debug <> -1) THEN
3667: rlm_core_sv.dpop(k_SDEBUG);
3668: END IF;
3669: --
3670: EXCEPTION
3671: WHEN OTHERS THEN
3671: WHEN OTHERS THEN
3672: rlm_message_sv.sql_error('rlm_rd_sv.InitializeReq',x_progress);
3673: --
3674: IF (l_debug <> -1) THEN
3675: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3676: END IF;
3677: --
3678: raise e_group_error;
3679:
3695:
3696: BEGIN
3697: --
3698: IF (l_debug <> -1) THEN
3699: rlm_core_sv.dpush(k_SDEBUG,'CancelRequirement');
3700: rlm_core_sv.dlog(k_DEBUG,'x_CancelQty',x_CancelQty);
3701: END IF;
3702: --
3703: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3696: BEGIN
3697: --
3698: IF (l_debug <> -1) THEN
3699: rlm_core_sv.dpush(k_SDEBUG,'CancelRequirement');
3700: rlm_core_sv.dlog(k_DEBUG,'x_CancelQty',x_CancelQty);
3701: END IF;
3702: --
3703: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3704: --
3702: --
3703: SetOperation(x_Key_rec, k_UPDATE, x_Key_rec.dem_rec.ordered_quantity - x_CancelQty);
3704: --
3705: IF (l_debug <> -1) THEN
3706: rlm_core_sv.dpop(k_SDEBUG);
3707: END IF;
3708: --
3709: EXCEPTION
3710: WHEN OTHERS THEN
3710: WHEN OTHERS THEN
3711: rlm_message_sv.sql_error('rlm_rd_sv.CancelRequirement',x_progress);
3712: --
3713: IF (l_debug <> -1) THEN
3714: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
3715: END IF;
3716: --
3717: raise;
3718:
3748: --
3749: v_match_ref t_Cursor_ref;
3750: v_Index NUMBER;
3751: v_intransit_calc_basis VARCHAR2(15);
3752: v_match_across_rule RLM_CORE_SV.t_Match_rec;
3753: v_match_within_rule RLM_CORE_SV.t_Match_rec;
3754: v_header_id NUMBER;
3755: v_Intransit NUMBER := 0;
3756: v_LineID NUMBER;
3749: v_match_ref t_Cursor_ref;
3750: v_Index NUMBER;
3751: v_intransit_calc_basis VARCHAR2(15);
3752: v_match_across_rule RLM_CORE_SV.t_Match_rec;
3753: v_match_within_rule RLM_CORE_SV.t_Match_rec;
3754: v_header_id NUMBER;
3755: v_Intransit NUMBER := 0;
3756: v_LineID NUMBER;
3757: v_min_horizon_date VARCHAR2(30);
3759:
3760: BEGIN
3761: --
3762: IF (l_debug <> -1) THEN
3763: rlm_core_sv.dpush(k_SDEBUG,'SynchronizeShipments');
3764: END IF;
3765: --
3766: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
3767: --
3766: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
3767: --
3768: --
3769: IF (l_debug <> -1) THEN
3770: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3767: --
3768: --
3769: IF (l_debug <> -1) THEN
3770: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3768: --
3769: IF (l_debug <> -1) THEN
3770: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3769: IF (l_debug <> -1) THEN
3770: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3770: rlm_core_sv.dlog(k_DEBUG,'ship_from_org_id', x_Group_rec.ship_from_org_id);
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3771: rlm_core_sv.dlog(k_DEBUG, 'inventory_item_id', x_Group_rec.inventory_item_id);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3779: x_Group_rec.setup_terms_rec.cum_org_level_code);
3772: rlm_core_sv.dlog(k_DEBUG, 'ship_to_org_id', x_Group_rec.ship_to_org_id);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3779: x_Group_rec.setup_terms_rec.cum_org_level_code);
3780: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3773: rlm_core_sv.dlog(k_DEBUG,'customer_item_id', x_Group_rec.customer_item_id);
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3779: x_Group_rec.setup_terms_rec.cum_org_level_code);
3780: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3781: END IF;
3774: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', v_intransit_calc_basis);
3775: rlm_core_sv.dlog(k_DEBUG, 'Order Header Id', x_Group_rec.order_header_id);
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3779: x_Group_rec.setup_terms_rec.cum_org_level_code);
3780: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3781: END IF;
3782: --
3776: rlm_core_sv.dlog(k_DEBUG, 'Blanket Number', x_Group_rec.blanket_number);
3777: rlm_core_sv.dlog(k_DEBUG, 'g_BlktIntransits', g_BlktIntransits);
3778: rlm_core_sv.dlog(k_DEBUG, 'CUM Org Level',
3779: x_Group_rec.setup_terms_rec.cum_org_level_code);
3780: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.isSourced', x_Group_rec.isSourced);
3781: END IF;
3782: --
3783: v_match_across_rule := x_Group_rec.match_across_rec;
3784: v_match_within_rule := x_Group_rec.match_within_rec;
3785: --
3786: IF (v_intransit_calc_basis = k_NONE OR v_intransit_calc_basis is NULL) THEN
3787: --
3788: IF (l_debug <> -1) THEN
3789: rlm_core_sv.dlog(k_DEBUG, 'All shipments assumed to have been received');
3790: rlm_core_sv.dpop(k_SDEBUG, 'Processing rule set to NONE or NULL');
3791: END IF;
3792: --
3793: RETURN;
3786: IF (v_intransit_calc_basis = k_NONE OR v_intransit_calc_basis is NULL) THEN
3787: --
3788: IF (l_debug <> -1) THEN
3789: rlm_core_sv.dlog(k_DEBUG, 'All shipments assumed to have been received');
3790: rlm_core_sv.dpop(k_SDEBUG, 'Processing rule set to NONE or NULL');
3791: END IF;
3792: --
3793: RETURN;
3794: --
3812: AND sl.qty_type_code = rlm_manage_demand_sv.k_CUMULATIVE
3813: AND il.org_id = sl.org_id;
3814: --
3815: IF (l_debug <> -1) THEN
3816: rlm_core_sv.dlog(k_DEBUG,'v_cumDiscrete', v_cumDiscrete);
3817: END IF;
3818: --
3819: IF v_cumDiscrete > 0 THEN
3820: --
3863: CalculateCUMIntransit(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count).line_id, g_IntransitQty);
3864: END IF;
3865: --
3866: IF (l_debug <> -1) THEN
3867: rlm_core_sv.dlog(k_DEBUG, 'Intransit Qty', g_IntransitQty);
3868: END IF;
3869: --
3870: IF g_IntransitQty > 0 THEN
3871: SourceCUMIntransitQty(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count));
3885: --
3886: CalculateCUMIntransit(x_Sched_rec, x_Group_rec, g_RecCUM_tab(v_Count).line_id, v_Intransit);
3887: --
3888: IF (l_debug <> -1) THEN
3889: rlm_core_sv.dlog(k_DEBUG, 'Intransit Qty', v_Intransit);
3890: END IF;
3891: --
3892: IF v_Intransit > 0 THEN
3893: --
3922: --}
3923: END IF; -- cum_org_level_code
3924: --
3925: IF (l_debug <> -1) THEN
3926: rlm_core_sv.dpop(k_SDEBUG);
3927: END IF;
3928: --
3929: IF (x_Group_rec.blanket_number IS NOT NULL AND NOT g_BlktIntransits) THEN
3930: g_BlktIntransits := TRUE;
3942: --
3943: InitializeMatchRec(x_Sched_rec, x_Group_rec, v_match_ref);
3944: --
3945: IF (l_debug <> -1) THEN
3946: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_type', x_Sched_rec.schedule_type);
3947: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.sched_generation_date', x_Sched_rec.sched_generation_date);
3948: END IF;
3949: --
3950: WHILE FetchMatchRec(v_match_ref, v_match_rec) LOOP
3943: InitializeMatchRec(x_Sched_rec, x_Group_rec, v_match_ref);
3944: --
3945: IF (l_debug <> -1) THEN
3946: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.schedule_type', x_Sched_rec.schedule_type);
3947: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.sched_generation_date', x_Sched_rec.sched_generation_date);
3948: END IF;
3949: --
3950: WHILE FetchMatchRec(v_match_ref, v_match_rec) LOOP
3951: --
3974: v_return_status);
3975:
3976: --
3977: IF (l_debug <> -1) THEN
3978: rlm_core_sv.dlog(k_DEBUG, 'v_return_status', v_return_status);
3979: rlm_core_sv.dlog(k_DEBUG, 'v_InTransitQty', v_InTransitQty);
3980: END IF;
3981: --
3982: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3975:
3976: --
3977: IF (l_debug <> -1) THEN
3978: rlm_core_sv.dlog(k_DEBUG, 'v_return_status', v_return_status);
3979: rlm_core_sv.dlog(k_DEBUG, 'v_InTransitQty', v_InTransitQty);
3980: END IF;
3981: --
3982: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3983: --
3981: --
3982: IF v_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3983: --
3984: IF (l_debug <> -1) THEN
3985: rlm_core_sv.dpop(k_SDEBUG, 'GetIntransitQtyAPI Failed');
3986: END IF;
3987: --
3988: RAISE e_group_error;
3989: --
3989: --
3990: ELSIF v_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3991: --
3992: IF (l_debug <> -1) THEN
3993: rlm_core_sv.dpop(k_SDEBUG, 'GetIntransitQtyAPI Failed');
3994: END IF;
3995: --
3996: RAISE e_group_error;
3997: --
4067: --}
4068: END IF; /*Intransit Basis*/
4069: --
4070: IF (l_debug <> -1) THEN
4071: rlm_core_sv.dpop(k_SDEBUG);
4072: END IF;
4073: --
4074: EXCEPTION
4075: --
4075: --
4076: WHEN e_cumDiscrete THEN
4077: --
4078: IF (l_debug <> -1) THEN
4079: rlm_core_sv.dlog(k_DEBUG,'Intransit Calculations not needed as more than one CUM lines exist');
4080: rlm_core_sv.dpop(k_SDEBUG,'e_cumDiscrete');
4081: END IF;
4082: --
4083: WHEN OTHERS THEN
4076: WHEN e_cumDiscrete THEN
4077: --
4078: IF (l_debug <> -1) THEN
4079: rlm_core_sv.dlog(k_DEBUG,'Intransit Calculations not needed as more than one CUM lines exist');
4080: rlm_core_sv.dpop(k_SDEBUG,'e_cumDiscrete');
4081: END IF;
4082: --
4083: WHEN OTHERS THEN
4084: rlm_message_sv.sql_error('rlm_rd_sv.SynchronizeShipments',x_progress);
4083: WHEN OTHERS THEN
4084: rlm_message_sv.sql_error('rlm_rd_sv.SynchronizeShipments',x_progress);
4085: --
4086: IF (l_debug <> -1) THEN
4087: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4088: END IF;
4089: --
4090: raise;
4091:
4106:
4107: BEGIN
4108: --
4109: IF (l_debug <> -1) THEN
4110: rlm_core_sv.dpush(k_SDEBUG,'MatchWithin');
4111: rlm_core_sv.dpop(k_SDEBUG);
4112: END IF;
4113: --
4114: RETURN('Y');
4107: BEGIN
4108: --
4109: IF (l_debug <> -1) THEN
4110: rlm_core_sv.dpush(k_SDEBUG,'MatchWithin');
4111: rlm_core_sv.dpop(k_SDEBUG);
4112: END IF;
4113: --
4114: RETURN('Y');
4115:
4117: WHEN OTHERS THEN
4118: rlm_message_sv.sql_error('rlm_rd_sv.MatchWithin',x_progress);
4119: --
4120: IF (l_debug <> -1) THEN
4121: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4122: END IF;
4123: --
4124: raise;
4125:
4139:
4140: BEGIN
4141: --
4142: IF (l_debug <> -1) THEN
4143: rlm_core_sv.dpush(k_SDEBUG,'MatchAcross');
4144: rlm_core_sv.dpop(k_SDEBUG);
4145: END IF;
4146: --
4147: RETURN('Y');
4140: BEGIN
4141: --
4142: IF (l_debug <> -1) THEN
4143: rlm_core_sv.dpush(k_SDEBUG,'MatchAcross');
4144: rlm_core_sv.dpop(k_SDEBUG);
4145: END IF;
4146: --
4147: RETURN('Y');
4148:
4150: WHEN OTHERS THEN
4151: rlm_message_sv.sql_error('rlm_rd_sv.MatchAcross',x_progress);
4152: --
4153: IF (l_debug <> -1) THEN
4154: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4155: END IF;
4156: --
4157: raise;
4158:
4175:
4176: BEGIN
4177: --
4178: IF (l_debug <> -1) THEN
4179: rlm_core_sv.dpush(k_SDEBUG,'StoreShipments');
4180: END IF;
4181: --
4182: -- start of bug fix 4223359
4183: --
4185: --
4186: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4187: --
4188: IF (l_debug <> -1) THEN
4189: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4190: END IF;
4191: --
4192: g_Reconcile_tab(v_Index).ordered_quantity :=
4193: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4206: --
4207: END IF;
4208: --
4209: IF (l_debug <> -1) THEN
4210: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4211: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4212: END IF;
4213: --
4214: END IF;
4207: END IF;
4208: --
4209: IF (l_debug <> -1) THEN
4210: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4211: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4212: END IF;
4213: --
4214: END IF;
4215: --
4220: g_Reconcile_tab(v_Index).ordered_quantity :=
4221: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4222: --
4223: IF (l_debug <> -1) THEN
4224: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4225: rlm_core_sv.dlog(k_DEBUG,'g_reconcile_tab.ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
4226: END IF;
4227: --
4228: ELSE
4221: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + NVL(x_Quantity,0);
4222: --
4223: IF (l_debug <> -1) THEN
4224: rlm_core_sv.dlog(k_DEBUG,'v_index',v_Index);
4225: rlm_core_sv.dlog(k_DEBUG,'g_reconcile_tab.ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
4226: END IF;
4227: --
4228: ELSE
4229: --
4239: --
4240: END IF;
4241: --
4242: IF (l_debug <> -1) THEN
4243: rlm_core_sv.dlog(k_DEBUG,'New Line x_quantity',x_quantity);
4244: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4245: END IF;
4246: --
4247: END IF;
4240: END IF;
4241: --
4242: IF (l_debug <> -1) THEN
4243: rlm_core_sv.dlog(k_DEBUG,'New Line x_quantity',x_quantity);
4244: rlm_core_sv.dlog(k_DEBUG,'Added to reconcile table x_index',g_Reconcile_tab.LAST);
4245: END IF;
4246: --
4247: END IF;
4248: --
4250: --
4251: -- end of bug fix 4223359
4252: --
4253: IF (l_debug <> -1) THEN
4254: rlm_core_sv.dpop(k_SDEBUG);
4255: END IF;
4256: --
4257: EXCEPTION
4258: WHEN OTHERS THEN
4258: WHEN OTHERS THEN
4259: rlm_message_sv.sql_error('rlm_rd_sv.StoreShipments',x_progress);
4260: --
4261: IF (l_debug <> -1) THEN
4262: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4263: END IF;
4264: --
4265: raise;
4266:
4282:
4283: BEGIN
4284: --
4285: IF (l_debug <> -1) THEN
4286: rlm_core_sv.dpush(k_SDEBUG,'ReconcileShipments');
4287: END IF;
4288: --
4289: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4290: --
4288: --
4289: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4290: --
4291: IF (l_debug <> -1) THEN
4292: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4293: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab(v_Index).ordered_quantity',
4294: g_Reconcile_tab(v_Index).ordered_quantity);
4295: END IF;
4296: --
4289: IF RLM_TPA_SV.MatchShipments(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
4290: --
4291: IF (l_debug <> -1) THEN
4292: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4293: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab(v_Index).ordered_quantity',
4294: g_Reconcile_tab(v_Index).ordered_quantity);
4295: END IF;
4296: --
4297: -- start of bug fix 4223359
4302: g_Reconcile_tab(v_Index).ordered_quantity :=
4303: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0)
4304: - NVL(x_Quantity,0);
4305: IF (l_debug <> -1) THEN
4306: rlm_core_sv.dlog(k_DEBUG,'new g_Reconcile_tab(v_Index).ordered_quantity',
4307: g_Reconcile_tab(v_Index).ordered_quantity);
4308: END IF;
4309: --
4310: x_Quantity := 0;
4314: x_Quantity := NVL(x_Quantity,0)
4315: - nvl(g_Reconcile_tab(v_Index).ordered_quantity,0);
4316: --
4317: IF (l_debug <> -1) THEN
4318: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4319: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4320: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4321: g_Reconcile_tab(v_Index).ordered_quantity);
4322:
4315: - nvl(g_Reconcile_tab(v_Index).ordered_quantity,0);
4316: --
4317: IF (l_debug <> -1) THEN
4318: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4319: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4320: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4321: g_Reconcile_tab(v_Index).ordered_quantity);
4322:
4323: END IF;
4316: --
4317: IF (l_debug <> -1) THEN
4318: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
4319: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
4320: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
4321: g_Reconcile_tab(v_Index).ordered_quantity);
4322:
4323: END IF;
4324: --
4330: --
4331: -- end of bug fix 4223359
4332: --
4333: IF (l_debug <> -1) THEN
4334: rlm_core_sv.dpop(k_SDEBUG);
4335: END IF;
4336: --
4337: EXCEPTION
4338: WHEN OTHERS THEN
4338: WHEN OTHERS THEN
4339: rlm_message_sv.sql_error('rlm_rd_sv.ReconcileShipments',x_progress);
4340: --
4341: IF (l_debug <> -1) THEN
4342: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4343: END IF;
4344: --
4345: raise;
4346:
4365:
4366: BEGIN
4367: --
4368: IF (l_debug <> -1) THEN
4369: rlm_core_sv.dpush(k_SDEBUG,'MatchShipments');
4370: END IF;
4371: --
4372: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4373: --
4371: --
4372: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4373: --
4374: IF (l_debug <> -1) THEN
4375: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4376: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4377: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4378: END IF;
4379: --
4372: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
4373: --
4374: IF (l_debug <> -1) THEN
4375: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4376: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4377: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4378: END IF;
4379: --
4380: -- Bug 2261743
4373: --
4374: IF (l_debug <> -1) THEN
4375: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4376: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
4377: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4378: END IF;
4379: --
4380: -- Bug 2261743
4381: --
4415: --
4416: END IF;
4417: --
4418: IF (l_debug <> -1) THEN
4419: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4420: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4421: rlm_core_sv.dpop(k_SDEBUG);
4422: END IF;
4423: --
4416: END IF;
4417: --
4418: IF (l_debug <> -1) THEN
4419: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4420: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4421: rlm_core_sv.dpop(k_SDEBUG);
4422: END IF;
4423: --
4424: RETURN(b_Match);
4417: --
4418: IF (l_debug <> -1) THEN
4419: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
4420: rlm_core_sv.dlog(k_DEBUG, 'Returning index', x_Index);
4421: rlm_core_sv.dpop(k_SDEBUG);
4422: END IF;
4423: --
4424: RETURN(b_Match);
4425:
4427: WHEN OTHERS THEN
4428: rlm_message_sv.sql_error('rlm_rd_sv.MatchShipments',x_progress);
4429: --
4430: IF (l_debug <> -1) THEN
4431: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
4432: END IF;
4433: --
4434: raise;
4435:
4457:
4458: BEGIN
4459: --
4460: IF (l_debug <> -1) THEN
4461: rlm_core_sv.dpush(k_SDEBUG,'MatchFrozen');
4462: END IF;
4463: --
4464: IF (l_debug <> -1) THEN
4465: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4461: rlm_core_sv.dpush(k_SDEBUG,'MatchFrozen');
4462: END IF;
4463: --
4464: IF (l_debug <> -1) THEN
4465: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4466: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4467: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4468: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4469: END IF;
4462: END IF;
4463: --
4464: IF (l_debug <> -1) THEN
4465: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4466: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4467: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4468: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4469: END IF;
4470: --
4463: --
4464: IF (l_debug <> -1) THEN
4465: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4466: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4467: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4468: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4469: END IF;
4470: --
4471: IF g_Reconcile_tab.COUNT <> 0 THEN
4464: IF (l_debug <> -1) THEN
4465: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
4466: rlm_core_sv.dlog(k_DEBUG,'x_index2', x_Index2);
4467: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
4468: rlm_core_sv.dlog(k_DEBUG,'x_current_rec.schedule_type', x_Current_rec.schedule_type);
4469: END IF;
4470: --
4471: IF g_Reconcile_tab.COUNT <> 0 THEN
4472: --
4476: --{
4477: b_Match := TRUE;
4478: --
4479: IF (l_debug <> -1) THEN
4480: rlm_core_sv.dlog(k_DEBUG,'schedule_type', g_Reconcile_tab(v_Count).schedule_type);
4481: END IF;
4482: --
4483: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
4484: --{
4482: --
4483: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
4484: --{
4485: IF (l_debug <> -1) THEN
4486: rlm_core_sv.dlog(k_DEBUG,'Match Within Schedules only ');
4487: END IF;
4488: --
4489: IF x_Group_rec.match_within_rec.cust_po_number = 'Y' THEN
4490: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
4493: END IF;
4494: END IF;
4495: --
4496: IF (l_debug <> -1) THEN
4497: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4498: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4499: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4500: END IF;
4501: --
4494: END IF;
4495: --
4496: IF (l_debug <> -1) THEN
4497: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4498: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4499: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4500: END IF;
4501: --
4502: IF b_Match THEN
4495: --
4496: IF (l_debug <> -1) THEN
4497: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4498: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4499: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4500: END IF;
4501: --
4502: IF b_Match THEN
4503: IF x_Group_rec.match_within_rec.customer_item_revision = 'Y' THEN
4508: END IF;
4509: END IF;
4510: --
4511: IF (l_debug <> -1) THEN
4512: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4513: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4514: g_Reconcile_tab(v_Count).customer_item_revision);
4515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4516: END IF;
4509: END IF;
4510: --
4511: IF (l_debug <> -1) THEN
4512: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4513: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4514: g_Reconcile_tab(v_Count).customer_item_revision);
4515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4516: END IF;
4517: --
4511: IF (l_debug <> -1) THEN
4512: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
4513: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
4514: g_Reconcile_tab(v_Count).customer_item_revision);
4515: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4516: END IF;
4517: --
4518: IF b_Match THEN
4519: IF x_Group_rec.match_within_rec.customer_dock_code = 'Y' THEN
4524: END IF;
4525: END IF;
4526: --
4527: IF (l_debug <> -1) THEN
4528: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4529: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4531: END IF;
4532: --
4525: END IF;
4526: --
4527: IF (l_debug <> -1) THEN
4528: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4529: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4531: END IF;
4532: --
4533: IF b_Match THEN
4526: --
4527: IF (l_debug <> -1) THEN
4528: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
4529: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
4530: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4531: END IF;
4532: --
4533: IF b_Match THEN
4534: IF x_Group_rec.match_within_rec.customer_job = 'Y' THEN
4539: END IF;
4540: END IF;
4541: --
4542: IF (l_debug <> -1) THEN
4543: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4544: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4546: END IF;
4547: --
4540: END IF;
4541: --
4542: IF (l_debug <> -1) THEN
4543: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4544: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4546: END IF;
4547: --
4548: IF b_Match THEN
4541: --
4542: IF (l_debug <> -1) THEN
4543: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
4544: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
4545: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4546: END IF;
4547: --
4548: IF b_Match THEN
4549: IF x_Group_rec.match_within_rec.cust_production_line = 'Y' THEN
4554: END IF;
4555: END IF;
4556: --
4557: IF (l_debug <> -1) THEN
4558: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4559: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4561: END IF;
4562: --
4555: END IF;
4556: --
4557: IF (l_debug <> -1) THEN
4558: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4559: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4561: END IF;
4562: --
4563: IF b_Match THEN
4556: --
4557: IF (l_debug <> -1) THEN
4558: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
4559: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
4560: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4561: END IF;
4562: --
4563: IF b_Match THEN
4564: IF x_Group_rec.match_within_rec.cust_model_serial_number = 'Y' THEN
4569: END IF;
4570: END IF;
4571: --
4572: IF (l_debug <> -1) THEN
4573: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4574: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4575: g_Reconcile_tab(v_Count).cust_model_serial_number);
4576: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4577: END IF;
4570: END IF;
4571: --
4572: IF (l_debug <> -1) THEN
4573: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4574: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4575: g_Reconcile_tab(v_Count).cust_model_serial_number);
4576: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4577: END IF;
4578: --
4572: IF (l_debug <> -1) THEN
4573: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
4574: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
4575: g_Reconcile_tab(v_Count).cust_model_serial_number);
4576: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4577: END IF;
4578: --
4579: IF b_Match THEN
4580: IF x_Group_rec.match_within_rec.cust_production_seq_num = 'Y' THEN
4585: END IF;
4586: END IF;
4587: --
4588: IF (l_debug <> -1) THEN
4589: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4590: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4591: g_Reconcile_tab(v_Count).cust_production_seq_num);
4592: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4593: END IF;
4586: END IF;
4587: --
4588: IF (l_debug <> -1) THEN
4589: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4590: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4591: g_Reconcile_tab(v_Count).cust_production_seq_num);
4592: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4593: END IF;
4594: --
4588: IF (l_debug <> -1) THEN
4589: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
4590: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
4591: g_Reconcile_tab(v_Count).cust_production_seq_num);
4592: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4593: END IF;
4594: --
4595: IF b_Match THEN
4596: IF x_Group_rec.match_within_rec.industry_attribute1 = 'Y' THEN
4601: END IF;
4602: END IF;
4603: --
4604: IF (l_debug <> -1) THEN
4605: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4602: END IF;
4603: --
4604: IF (l_debug <> -1) THEN
4605: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4610: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4603: --
4604: IF (l_debug <> -1) THEN
4605: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4610: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4611: END IF;
4604: IF (l_debug <> -1) THEN
4605: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4610: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4611: END IF;
4612: --
4605: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4610: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4611: END IF;
4612: --
4613: IF b_Match THEN
4606: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
4607: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4608: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
4609: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
4610: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4611: END IF;
4612: --
4613: IF b_Match THEN
4614: IF x_Group_rec.match_within_rec.industry_attribute4 = 'Y' THEN
4619: END IF;
4620: END IF;
4621: --
4622: IF (l_debug <> -1) THEN
4623: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4624: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4625: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4626: END IF;
4627: --
4620: END IF;
4621: --
4622: IF (l_debug <> -1) THEN
4623: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4624: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4625: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4626: END IF;
4627: --
4628: IF b_Match THEN
4621: --
4622: IF (l_debug <> -1) THEN
4623: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
4624: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
4625: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4626: END IF;
4627: --
4628: IF b_Match THEN
4629: IF x_Group_rec.match_within_rec.industry_attribute5 = 'Y' THEN
4634: END IF;
4635: END IF;
4636: --
4637: IF (l_debug <> -1) THEN
4638: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4639: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4640: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4641: END IF;
4642: --
4635: END IF;
4636: --
4637: IF (l_debug <> -1) THEN
4638: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4639: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4640: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4641: END IF;
4642: --
4643: IF b_Match THEN
4636: --
4637: IF (l_debug <> -1) THEN
4638: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
4639: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
4640: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4641: END IF;
4642: --
4643: IF b_Match THEN
4644: IF x_Group_rec.match_within_rec.industry_attribute6 = 'Y' THEN
4649: END IF;
4650: END IF;
4651: --
4652: IF (l_debug <> -1) THEN
4653: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4654: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4655: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4656: END IF;
4657: --
4650: END IF;
4651: --
4652: IF (l_debug <> -1) THEN
4653: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4654: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4655: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4656: END IF;
4657: --
4658: IF b_Match THEN
4651: --
4652: IF (l_debug <> -1) THEN
4653: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
4654: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
4655: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4656: END IF;
4657: --
4658: IF b_Match THEN
4659: IF x_Group_rec.match_within_rec.industry_attribute10 = 'Y' THEN
4664: END IF;
4665: END IF;
4666: --
4667: IF (l_debug <> -1) THEN
4668: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4669: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4670: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4671: END IF;
4672: --
4665: END IF;
4666: --
4667: IF (l_debug <> -1) THEN
4668: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4669: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4670: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4671: END IF;
4672: --
4673: IF b_Match THEN
4666: --
4667: IF (l_debug <> -1) THEN
4668: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
4669: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
4670: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4671: END IF;
4672: --
4673: IF b_Match THEN
4674: IF x_Group_rec.match_within_rec.industry_attribute11 = 'Y' THEN
4679: END IF;
4680: END IF;
4681: --
4682: IF (l_debug <> -1) THEN
4683: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4684: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4685: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4686: END IF;
4687: --
4680: END IF;
4681: --
4682: IF (l_debug <> -1) THEN
4683: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4684: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4685: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4686: END IF;
4687: --
4688: IF b_Match THEN
4681: --
4682: IF (l_debug <> -1) THEN
4683: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
4684: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
4685: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4686: END IF;
4687: --
4688: IF b_Match THEN
4689: IF x_Group_rec.match_within_rec.industry_attribute12 = 'Y' THEN
4694: END IF;
4695: END IF;
4696: --
4697: IF (l_debug <> -1) THEN
4698: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4699: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4700: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4701: END IF;
4702: --
4695: END IF;
4696: --
4697: IF (l_debug <> -1) THEN
4698: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4699: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4700: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4701: END IF;
4702: --
4703: IF b_Match THEN
4696: --
4697: IF (l_debug <> -1) THEN
4698: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
4699: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
4700: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4701: END IF;
4702: --
4703: IF b_Match THEN
4704: IF x_Group_rec.match_within_rec.industry_attribute13 = 'Y' THEN
4709: END IF;
4710: END IF;
4711: --
4712: IF (l_debug <> -1) THEN
4713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4716: END IF;
4717: --
4710: END IF;
4711: --
4712: IF (l_debug <> -1) THEN
4713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4716: END IF;
4717: --
4718: IF b_Match THEN
4711: --
4712: IF (l_debug <> -1) THEN
4713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
4714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
4715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4716: END IF;
4717: --
4718: IF b_Match THEN
4719: IF x_Group_rec.match_within_rec.industry_attribute14 = 'Y' THEN
4724: END IF;
4725: END IF;
4726: --
4727: IF (l_debug <> -1) THEN
4728: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4729: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4730: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4731: END IF;
4732: --
4725: END IF;
4726: --
4727: IF (l_debug <> -1) THEN
4728: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4729: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4730: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4731: END IF;
4732: --
4733: IF b_Match THEN
4726: --
4727: IF (l_debug <> -1) THEN
4728: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
4729: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
4730: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4731: END IF;
4732: --
4733: IF b_Match THEN
4734: IF x_Group_rec.match_within_rec.industry_attribute15 = 'Y' THEN
4739: END IF;
4740: END IF;
4741: --
4742: IF (l_debug <> -1) THEN
4743: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4744: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4745: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4746: END IF;
4747: --
4740: END IF;
4741: --
4742: IF (l_debug <> -1) THEN
4743: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4744: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4745: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4746: END IF;
4747: --
4748: IF b_Match THEN
4741: --
4742: IF (l_debug <> -1) THEN
4743: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
4744: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
4745: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4746: END IF;
4747: --
4748: IF b_Match THEN
4749: IF x_Group_rec.match_within_rec.attribute1 = 'Y' THEN
4754: END IF;
4755: END IF;
4756: --
4757: IF (l_debug <> -1) THEN
4758: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4759: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4760: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4761: END IF;
4762: --
4755: END IF;
4756: --
4757: IF (l_debug <> -1) THEN
4758: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4759: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4760: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4761: END IF;
4762: --
4763: IF b_Match THEN
4756: --
4757: IF (l_debug <> -1) THEN
4758: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
4759: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
4760: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4761: END IF;
4762: --
4763: IF b_Match THEN
4764: IF x_Group_rec.match_within_rec.attribute2 = 'Y' THEN
4769: END IF;
4770: END IF;
4771: --
4772: IF (l_debug <> -1) THEN
4773: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4777: --
4770: END IF;
4771: --
4772: IF (l_debug <> -1) THEN
4773: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
4775: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4776: END IF;
4777: --
4778: IF b_Match THEN
4771: --
4772: IF (l_debug <> -1) THEN
4773: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
4774: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).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.attribute3 = 'Y' THEN
4784: END IF;
4785: END IF;
4786: --
4787: IF (l_debug <> -1) THEN
4788: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
4789: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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.attribute4 = 'Y' THEN
4799: END IF;
4800: END IF;
4801: --
4802: IF (l_debug <> -1) THEN
4803: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
4804: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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.attribute5 = 'Y' THEN
4814: END IF;
4815: END IF;
4816: --
4817: IF (l_debug <> -1) THEN
4818: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
4819: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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.attribute6 = 'Y' THEN
4829: END IF;
4830: END IF;
4831: --
4832: IF (l_debug <> -1) THEN
4833: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
4834: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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.attribute7 = 'Y' THEN
4844: END IF;
4845: END IF;
4846: --
4847: IF (l_debug <> -1) THEN
4848: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
4849: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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.attribute8 = 'Y' THEN
4859: END IF;
4860: END IF;
4861: --
4862: IF (l_debug <> -1) THEN
4863: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
4864: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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.attribute9 = 'Y' THEN
4874: END IF;
4875: END IF;
4876: --
4877: IF (l_debug <> -1) THEN
4878: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
4879: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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.attribute10 = 'Y' THEN
4889: END IF;
4890: END IF;
4891: --
4892: IF (l_debug <> -1) THEN
4893: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
4894: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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.attribute11 = 'Y' THEN
4904: END IF;
4905: END IF;
4906: --
4907: IF (l_debug <> -1) THEN
4908: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
4909: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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.attribute12 = 'Y' THEN
4919: END IF;
4920: END IF;
4921: --
4922: IF (l_debug <> -1) THEN
4923: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
4924: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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.attribute13 = 'Y' THEN
4934: END IF;
4935: END IF;
4936: --
4937: IF (l_debug <> -1) THEN
4938: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
4939: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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.attribute14 = 'Y' THEN
4949: END IF;
4950: END IF;
4951: --
4952: IF (l_debug <> -1) THEN
4953: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
4954: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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.attribute15 = 'Y' THEN
4964: END IF;
4965: END IF;
4966: --
4967: IF (l_debug <> -1) THEN
4968: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
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, 'attribute15', x_Current_rec.attribute15);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
4970: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4971: END IF;
4972: --
4973: --
4966: --
4967: IF (l_debug <> -1) THEN
4968: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
4969: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
4970: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4971: END IF;
4972: --
4973: --
4974: --}
4976: --
4977: --
4978: --{
4979: IF (l_debug <> -1) THEN
4980: rlm_core_sv.dlog(k_DEBUG,'Match across Schedules only ');
4981: END IF;
4982: --
4983: IF x_Group_rec.match_across_rec.cust_po_number = 'Y' THEN
4984: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
4987: END IF;
4988: END IF;
4989: --
4990: IF (l_debug <> -1) THEN
4991: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4992: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4993: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4994: END IF;
4995: --
4988: END IF;
4989: --
4990: IF (l_debug <> -1) THEN
4991: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4992: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4993: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4994: END IF;
4995: --
4996: IF b_Match THEN
4989: --
4990: IF (l_debug <> -1) THEN
4991: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
4992: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
4993: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
4994: END IF;
4995: --
4996: IF b_Match THEN
4997: IF x_Group_rec.match_across_rec.customer_item_revision = 'Y' THEN
5002: END IF;
5003: END IF;
5004: --
5005: IF (l_debug <> -1) THEN
5006: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5007: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5008: g_Reconcile_tab(v_Count).customer_item_revision);
5009: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5010: END IF;
5003: END IF;
5004: --
5005: IF (l_debug <> -1) THEN
5006: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5007: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5008: g_Reconcile_tab(v_Count).customer_item_revision);
5009: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5010: END IF;
5011: --
5005: IF (l_debug <> -1) THEN
5006: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5007: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5008: g_Reconcile_tab(v_Count).customer_item_revision);
5009: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5010: END IF;
5011: --
5012: IF b_Match THEN
5013: IF x_Group_rec.match_across_rec.customer_dock_code = 'Y' THEN
5018: END IF;
5019: END IF;
5020: --
5021: IF (l_debug <> -1) THEN
5022: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5023: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5024: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5025: END IF;
5026: --
5019: END IF;
5020: --
5021: IF (l_debug <> -1) THEN
5022: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5023: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5024: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5025: END IF;
5026: --
5027: IF b_Match THEN
5020: --
5021: IF (l_debug <> -1) THEN
5022: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5023: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5024: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5025: END IF;
5026: --
5027: IF b_Match THEN
5028: IF x_Group_rec.match_across_rec.customer_job = 'Y' THEN
5033: END IF;
5034: END IF;
5035: --
5036: IF (l_debug <> -1) THEN
5037: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5038: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5039: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5040: END IF;
5041: --
5034: END IF;
5035: --
5036: IF (l_debug <> -1) THEN
5037: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5038: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5039: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5040: END IF;
5041: --
5042: IF b_Match THEN
5035: --
5036: IF (l_debug <> -1) THEN
5037: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5038: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5039: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5040: END IF;
5041: --
5042: IF b_Match THEN
5043: IF x_Group_rec.match_across_rec.cust_production_line = 'Y' THEN
5048: END IF;
5049: END IF;
5050: --
5051: IF (l_debug <> -1) THEN
5052: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5053: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5054: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5055: END IF;
5056: --
5049: END IF;
5050: --
5051: IF (l_debug <> -1) THEN
5052: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5053: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5054: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5055: END IF;
5056: --
5057: IF b_Match THEN
5050: --
5051: IF (l_debug <> -1) THEN
5052: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5053: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5054: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5055: END IF;
5056: --
5057: IF b_Match THEN
5058: IF x_Group_rec.match_across_rec.cust_model_serial_number = 'Y' THEN
5063: END IF;
5064: END IF;
5065: --
5066: IF (l_debug <> -1) THEN
5067: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5068: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5069: g_Reconcile_tab(v_Count).cust_model_serial_number);
5070: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5071: END IF;
5064: END IF;
5065: --
5066: IF (l_debug <> -1) THEN
5067: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5068: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5069: g_Reconcile_tab(v_Count).cust_model_serial_number);
5070: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5071: END IF;
5072: --
5066: IF (l_debug <> -1) THEN
5067: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5068: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5069: g_Reconcile_tab(v_Count).cust_model_serial_number);
5070: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5071: END IF;
5072: --
5073: IF b_Match THEN
5074: IF x_Group_rec.match_across_rec.cust_production_seq_num = 'Y' THEN
5079: END IF;
5080: END IF;
5081: --
5082: IF (l_debug <> -1) THEN
5083: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5084: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5085: g_Reconcile_tab(v_Count).cust_production_seq_num);
5086: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5087: END IF;
5080: END IF;
5081: --
5082: IF (l_debug <> -1) THEN
5083: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5084: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5085: g_Reconcile_tab(v_Count).cust_production_seq_num);
5086: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5087: END IF;
5088: --
5082: IF (l_debug <> -1) THEN
5083: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5084: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5085: g_Reconcile_tab(v_Count).cust_production_seq_num);
5086: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5087: END IF;
5088: --
5089: IF b_Match THEN
5090: IF x_Group_rec.match_across_rec.industry_attribute1 = 'Y' THEN
5095: END IF;
5096: END IF;
5097: --
5098: IF (l_debug <> -1) THEN
5099: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5100: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5101: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5102: END IF;
5103: --
5096: END IF;
5097: --
5098: IF (l_debug <> -1) THEN
5099: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5100: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5101: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5102: END IF;
5103: --
5104: IF b_Match THEN
5097: --
5098: IF (l_debug <> -1) THEN
5099: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5100: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5101: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5102: END IF;
5103: --
5104: IF b_Match THEN
5105: IF x_Group_rec.match_across_rec.industry_attribute2 = 'Y' THEN
5110: END IF;
5111: END IF;
5112: --
5113: IF (l_debug <> -1) THEN
5114: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5115: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5117: END IF;
5118: --
5111: END IF;
5112: --
5113: IF (l_debug <> -1) THEN
5114: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5115: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5117: END IF;
5118: --
5119: IF b_Match THEN
5112: --
5113: IF (l_debug <> -1) THEN
5114: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5115: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5117: END IF;
5118: --
5119: IF b_Match THEN
5120: IF x_Group_rec.match_across_rec.industry_attribute4 = 'Y' THEN
5125: END IF;
5126: END IF;
5127: --
5128: IF (l_debug <> -1) THEN
5129: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5130: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5131: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5132: END IF;
5133: --
5126: END IF;
5127: --
5128: IF (l_debug <> -1) THEN
5129: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5130: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5131: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5132: END IF;
5133: --
5134: IF b_Match THEN
5127: --
5128: IF (l_debug <> -1) THEN
5129: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5130: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5131: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5132: END IF;
5133: --
5134: IF b_Match THEN
5135: IF x_Group_rec.match_across_rec.industry_attribute5 = 'Y' THEN
5140: END IF;
5141: END IF;
5142: --
5143: IF (l_debug <> -1) THEN
5144: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5145: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5146: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5147: END IF;
5148: --
5141: END IF;
5142: --
5143: IF (l_debug <> -1) THEN
5144: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5145: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5146: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5147: END IF;
5148: --
5149: IF b_Match THEN
5142: --
5143: IF (l_debug <> -1) THEN
5144: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5145: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5146: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5147: END IF;
5148: --
5149: IF b_Match THEN
5150: IF x_Group_rec.match_across_rec.industry_attribute6 = 'Y' THEN
5155: END IF;
5156: END IF;
5157: --
5158: IF (l_debug <> -1) THEN
5159: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5160: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5161: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5162: END IF;
5163: --
5156: END IF;
5157: --
5158: IF (l_debug <> -1) THEN
5159: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5160: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5161: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5162: END IF;
5163: --
5164: IF b_Match THEN
5157: --
5158: IF (l_debug <> -1) THEN
5159: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5160: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5161: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5162: END IF;
5163: --
5164: IF b_Match THEN
5165: IF x_Group_rec.match_across_rec.industry_attribute10 = 'Y' THEN
5170: END IF;
5171: END IF;
5172: --
5173: IF (l_debug <> -1) THEN
5174: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5175: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5176: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5177: END IF;
5178: --
5171: END IF;
5172: --
5173: IF (l_debug <> -1) THEN
5174: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5175: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5176: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5177: END IF;
5178: --
5179: IF b_Match THEN
5172: --
5173: IF (l_debug <> -1) THEN
5174: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5175: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5176: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5177: END IF;
5178: --
5179: IF b_Match THEN
5180: IF x_Group_rec.match_across_rec.industry_attribute11 = 'Y' THEN
5185: END IF;
5186: END IF;
5187: --
5188: IF (l_debug <> -1) THEN
5189: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5190: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5191: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5192: END IF;
5193: --
5186: END IF;
5187: --
5188: IF (l_debug <> -1) THEN
5189: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5190: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5191: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5192: END IF;
5193: --
5194: IF b_Match THEN
5187: --
5188: IF (l_debug <> -1) THEN
5189: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5190: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5191: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5192: END IF;
5193: --
5194: IF b_Match THEN
5195: IF x_Group_rec.match_across_rec.industry_attribute12 = 'Y' THEN
5200: END IF;
5201: END IF;
5202: --
5203: IF (l_debug <> -1) THEN
5204: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5205: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5206: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5207: END IF;
5208: --
5201: END IF;
5202: --
5203: IF (l_debug <> -1) THEN
5204: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5205: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5206: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5207: END IF;
5208: --
5209: IF b_Match THEN
5202: --
5203: IF (l_debug <> -1) THEN
5204: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5205: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5206: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5207: END IF;
5208: --
5209: IF b_Match THEN
5210: IF x_Group_rec.match_across_rec.industry_attribute13 = 'Y' THEN
5215: END IF;
5216: END IF;
5217: --
5218: IF (l_debug <> -1) THEN
5219: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5220: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5221: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5222: END IF;
5223: --
5216: END IF;
5217: --
5218: IF (l_debug <> -1) THEN
5219: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5220: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5221: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5222: END IF;
5223: --
5224: IF b_Match THEN
5217: --
5218: IF (l_debug <> -1) THEN
5219: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5220: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5221: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5222: END IF;
5223: --
5224: IF b_Match THEN
5225: IF x_Group_rec.match_across_rec.industry_attribute14 = 'Y' THEN
5230: END IF;
5231: END IF;
5232: --
5233: IF (l_debug <> -1) THEN
5234: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5235: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5236: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5237: END IF;
5238: --
5231: END IF;
5232: --
5233: IF (l_debug <> -1) THEN
5234: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5235: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5236: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5237: END IF;
5238: --
5239: IF b_Match THEN
5232: --
5233: IF (l_debug <> -1) THEN
5234: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5235: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5236: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5237: END IF;
5238: --
5239: IF b_Match THEN
5240: IF x_Group_rec.match_across_rec.industry_attribute15 = 'Y' THEN
5245: END IF;
5246: END IF;
5247: --
5248: IF (l_debug <> -1) THEN
5249: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5250: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5251: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5252: END IF;
5253: --
5246: END IF;
5247: --
5248: IF (l_debug <> -1) THEN
5249: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5250: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5251: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5252: END IF;
5253: --
5254: IF b_Match THEN
5247: --
5248: IF (l_debug <> -1) THEN
5249: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5250: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
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.attribute1 = 'Y' THEN
5260: END IF;
5261: END IF;
5262: --
5263: IF (l_debug <> -1) THEN
5264: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).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, 'attribute1', x_Current_rec.attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).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, 'attribute1', x_Current_rec.attribute1);
5265: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).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.attribute2 = 'Y' THEN
5275: END IF;
5276: END IF;
5277: --
5278: IF (l_debug <> -1) THEN
5279: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).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, 'uattribute2', x_Current_rec.attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).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, 'uattribute2', x_Current_rec.attribute2);
5280: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).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.attribute3 = 'Y' THEN
5290: END IF;
5291: END IF;
5292: --
5293: IF (l_debug <> -1) THEN
5294: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
5295: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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.attribute4 = 'Y' THEN
5305: END IF;
5306: END IF;
5307: --
5308: IF (l_debug <> -1) THEN
5309: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
5310: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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.attribute5 = 'Y' THEN
5320: END IF;
5321: END IF;
5322: --
5323: IF (l_debug <> -1) THEN
5324: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
5325: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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.attribute6 = 'Y' THEN
5335: END IF;
5336: END IF;
5337: --
5338: IF (l_debug <> -1) THEN
5339: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
5340: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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.attribute7 = 'Y' THEN
5350: END IF;
5351: END IF;
5352: --
5353: IF (l_debug <> -1) THEN
5354: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
5355: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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.attribute8 = 'Y' THEN
5365: END IF;
5366: END IF;
5367: --
5368: IF (l_debug <> -1) THEN
5369: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
5370: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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.attribute9 = 'Y' THEN
5380: END IF;
5381: END IF;
5382: --
5383: IF (l_debug <> -1) THEN
5384: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
5385: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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.attribute10 = 'Y' THEN
5395: END IF;
5396: END IF;
5397: --
5398: IF (l_debug <> -1) THEN
5399: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
5400: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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.attribute11 = 'Y' THEN
5410: END IF;
5411: END IF;
5412: --
5413: IF (l_debug <> -1) THEN
5414: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
5415: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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.attribute12 = 'Y' THEN
5425: END IF;
5426: END IF;
5427: --
5428: IF (l_debug <> -1) THEN
5429: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
5430: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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.attribute13 = 'Y' THEN
5440: END IF;
5441: END IF;
5442: --
5443: IF (l_debug <> -1) THEN
5444: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
5445: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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.attribute14 = 'Y' THEN
5455: END IF;
5456: END IF;
5457: --
5458: IF (l_debug <> -1) THEN
5459: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
5460: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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.attribute15 = 'Y' THEN
5470: END IF;
5471: END IF;
5472: --
5473: IF (l_debug <> -1) THEN
5474: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
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, 'attribute15', x_Current_rec.attribute15);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5476: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5477: END IF;
5478: --}
5479: ELSE
5472: --
5473: IF (l_debug <> -1) THEN
5474: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
5475: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
5476: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5477: END IF;
5478: --}
5479: ELSE
5480: --{
5479: ELSE
5480: --{
5481: b_Match := FALSE;
5482: IF (l_debug <> -1) THEN
5483: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5484: END IF;
5485: --}
5486: END IF;
5487: --
5497: --
5498: END IF;
5499: --
5500: IF (l_debug <> -1) THEN
5501: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5502: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5503: rlm_core_sv.dpop(k_SDEBUG);
5504: END IF;
5505: --
5498: END IF;
5499: --
5500: IF (l_debug <> -1) THEN
5501: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5502: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5503: rlm_core_sv.dpop(k_SDEBUG);
5504: END IF;
5505: --
5506: RETURN(b_Match);
5499: --
5500: IF (l_debug <> -1) THEN
5501: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
5502: rlm_core_sv.dlog(k_DEBUG,'x_index', x_index);
5503: rlm_core_sv.dpop(k_SDEBUG);
5504: END IF;
5505: --
5506: RETURN(b_Match);
5507: --
5509: WHEN OTHERS THEN
5510: rlm_message_sv.sql_error('rlm_rd_sv.MatchFrozen',x_progress);
5511: --
5512: IF (l_debug <> -1) THEN
5513: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
5514: END IF;
5515: --
5516: raise;
5517:
5536:
5537: BEGIN
5538: --
5539: IF (l_debug <> -1) THEN
5540: rlm_core_sv.dpush(k_SDEBUG,'MatchReconcile');
5541: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
5542: x_Current_rec.schedule_type);
5543: END IF;
5544: --
5537: BEGIN
5538: --
5539: IF (l_debug <> -1) THEN
5540: rlm_core_sv.dpush(k_SDEBUG,'MatchReconcile');
5541: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
5542: x_Current_rec.schedule_type);
5543: END IF;
5544: --
5545: -- Bug 2261743
5543: END IF;
5544: --
5545: -- Bug 2261743
5546: IF (l_debug <> -1) THEN
5547: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5548: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5549: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5550: END IF;
5551:
5544: --
5545: -- Bug 2261743
5546: IF (l_debug <> -1) THEN
5547: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5548: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5549: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5550: END IF;
5551:
5552: IF g_Reconcile_tab.COUNT <> 0 THEN
5545: -- Bug 2261743
5546: IF (l_debug <> -1) THEN
5547: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
5548: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
5549: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
5550: END IF;
5551:
5552: IF g_Reconcile_tab.COUNT <> 0 THEN
5553: --
5559: --{
5560: b_Match := TRUE;
5561: --
5562: IF (l_debug <> -1) THEN
5563: rlm_core_sv.dlog(k_DEBUG, 'g_Reconcile_Tab('||v_Count||').schedule_type',
5564: g_Reconcile_Tab(v_Count).schedule_type);
5565: END IF;
5566: -- Bug 5608510
5567: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
5566: -- Bug 5608510
5567: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
5568: --
5569: IF (l_debug <> -1) THEN
5570: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis ',x_Group_rec.setup_terms_rec.intransit_calc_basis);
5571: END IF;
5572: --
5573: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
5574: --
5572: --
5573: IF x_Current_rec.schedule_type = g_Reconcile_tab(v_Count).schedule_type THEN
5574: --
5575: IF (l_debug <> -1) THEN
5576: rlm_core_sv.dlog(k_DEBUG,'Match Within Schedules only ');
5577: END IF;
5578: --
5579: IF x_Group_rec.match_within_rec.cust_po_number = 'Y' THEN
5580: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
5583: END IF;
5584: END IF;
5585: --
5586: IF (l_debug <> -1) THEN
5587: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5588: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5589: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5590: END IF;
5591: --
5584: END IF;
5585: --
5586: IF (l_debug <> -1) THEN
5587: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5588: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5589: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5590: END IF;
5591: --
5592: IF b_Match THEN
5585: --
5586: IF (l_debug <> -1) THEN
5587: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
5588: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
5589: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5590: END IF;
5591: --
5592: IF b_Match THEN
5593: IF x_Group_rec.match_within_rec.customer_item_revision = 'Y' THEN
5598: END IF;
5599: END IF;
5600: --
5601: IF (l_debug <> -1) THEN
5602: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5603: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5604: g_Reconcile_tab(v_Count).customer_item_revision);
5605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5606: END IF;
5599: END IF;
5600: --
5601: IF (l_debug <> -1) THEN
5602: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5603: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5604: g_Reconcile_tab(v_Count).customer_item_revision);
5605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5606: END IF;
5607: --
5601: IF (l_debug <> -1) THEN
5602: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
5603: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
5604: g_Reconcile_tab(v_Count).customer_item_revision);
5605: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5606: END IF;
5607: --
5608: IF b_Match THEN
5609: IF x_Group_rec.match_within_rec.customer_dock_code = 'Y' THEN
5614: END IF;
5615: END IF;
5616: --
5617: IF (l_debug <> -1) THEN
5618: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5619: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5621: END IF;
5622: --
5615: END IF;
5616: --
5617: IF (l_debug <> -1) THEN
5618: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5619: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5621: END IF;
5622: --
5623: IF b_Match THEN
5616: --
5617: IF (l_debug <> -1) THEN
5618: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
5619: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
5620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5621: END IF;
5622: --
5623: IF b_Match THEN
5624: IF x_Group_rec.match_within_rec.customer_job = 'Y' THEN
5629: END IF;
5630: END IF;
5631: --
5632: IF (l_debug <> -1) THEN
5633: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5634: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5636: END IF;
5637: --
5630: END IF;
5631: --
5632: IF (l_debug <> -1) THEN
5633: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5634: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5636: END IF;
5637: --
5638: IF b_Match THEN
5631: --
5632: IF (l_debug <> -1) THEN
5633: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
5634: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
5635: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5636: END IF;
5637: --
5638: IF b_Match THEN
5639: IF x_Group_rec.match_within_rec.cust_production_line = 'Y' THEN
5644: END IF;
5645: END IF;
5646: --
5647: IF (l_debug <> -1) THEN
5648: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5649: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5651: END IF;
5652: --
5645: END IF;
5646: --
5647: IF (l_debug <> -1) THEN
5648: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5649: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5651: END IF;
5652: --
5653: IF b_Match THEN
5646: --
5647: IF (l_debug <> -1) THEN
5648: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
5649: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
5650: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5651: END IF;
5652: --
5653: IF b_Match THEN
5654: IF x_Group_rec.match_within_rec.cust_model_serial_number = 'Y' THEN
5659: END IF;
5660: END IF;
5661: --
5662: IF (l_debug <> -1) THEN
5663: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5664: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5665: g_Reconcile_tab(v_Count).cust_model_serial_number);
5666: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5667: END IF;
5660: END IF;
5661: --
5662: IF (l_debug <> -1) THEN
5663: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5664: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5665: g_Reconcile_tab(v_Count).cust_model_serial_number);
5666: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5667: END IF;
5668: --
5662: IF (l_debug <> -1) THEN
5663: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
5664: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
5665: g_Reconcile_tab(v_Count).cust_model_serial_number);
5666: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5667: END IF;
5668: --
5669: IF b_Match THEN
5670: IF x_Group_rec.match_within_rec.cust_production_seq_num = 'Y' THEN
5675: END IF;
5676: END IF;
5677: --
5678: IF (l_debug <> -1) THEN
5679: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5680: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5681: g_Reconcile_tab(v_Count).cust_production_seq_num);
5682: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5683: END IF;
5676: END IF;
5677: --
5678: IF (l_debug <> -1) THEN
5679: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5680: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5681: g_Reconcile_tab(v_Count).cust_production_seq_num);
5682: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5683: END IF;
5684: --
5678: IF (l_debug <> -1) THEN
5679: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
5680: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
5681: g_Reconcile_tab(v_Count).cust_production_seq_num);
5682: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5683: END IF;
5684: --
5685: IF b_Match THEN
5686: IF x_Group_rec.match_within_rec.industry_attribute1 = 'Y' THEN
5691: END IF;
5692: END IF;
5693: --
5694: IF (l_debug <> -1) THEN
5695: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5696: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5697: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5698: END IF;
5699: --
5692: END IF;
5693: --
5694: IF (l_debug <> -1) THEN
5695: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5696: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5697: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5698: END IF;
5699: --
5700: --Bug 5608510
5693: --
5694: IF (l_debug <> -1) THEN
5695: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
5696: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
5697: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5698: END IF;
5699: --
5700: --Bug 5608510
5701: --
5709: END IF;
5710: END IF;
5711: --
5712: IF (l_debug <> -1) THEN
5713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5716: END IF;
5717: --
5710: END IF;
5711: --
5712: IF (l_debug <> -1) THEN
5713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5716: END IF;
5717: --
5718: IF b_Match THEN
5711: --
5712: IF (l_debug <> -1) THEN
5713: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
5714: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
5715: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5716: END IF;
5717: --
5718: IF b_Match THEN
5719: IF x_Group_rec.match_within_rec.request_date = 'Y' THEN
5725: END IF;
5726: --
5727: --
5728: IF (l_debug <> -1) THEN
5729: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5730: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5731: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5732: END IF;
5733: --
5726: --
5727: --
5728: IF (l_debug <> -1) THEN
5729: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5730: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5731: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5732: END IF;
5733: --
5734: END IF; --bugfix 5608510 ends
5727: --
5728: IF (l_debug <> -1) THEN
5729: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
5730: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
5731: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5732: END IF;
5733: --
5734: END IF; --bugfix 5608510 ends
5735: --
5742: END IF;
5743: END IF;
5744: --
5745: IF (l_debug <> -1) THEN
5746: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5747: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5748: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5749: END IF;
5750: --
5743: END IF;
5744: --
5745: IF (l_debug <> -1) THEN
5746: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5747: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5748: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5749: END IF;
5750: --
5751: IF b_Match THEN
5744: --
5745: IF (l_debug <> -1) THEN
5746: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
5747: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
5748: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5749: END IF;
5750: --
5751: IF b_Match THEN
5752: IF x_Group_rec.match_within_rec.industry_attribute5 = 'Y' THEN
5757: END IF;
5758: END IF;
5759: --
5760: IF (l_debug <> -1) THEN
5761: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5762: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5763: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5764: END IF;
5765: --
5758: END IF;
5759: --
5760: IF (l_debug <> -1) THEN
5761: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5762: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5763: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5764: END IF;
5765: --
5766: IF b_Match THEN
5759: --
5760: IF (l_debug <> -1) THEN
5761: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
5762: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
5763: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5764: END IF;
5765: --
5766: IF b_Match THEN
5767: IF x_Group_rec.match_within_rec.industry_attribute6 = 'Y' THEN
5772: END IF;
5773: END IF;
5774: --
5775: IF (l_debug <> -1) THEN
5776: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5777: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5778: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5779: END IF;
5780: --
5773: END IF;
5774: --
5775: IF (l_debug <> -1) THEN
5776: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5777: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5778: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5779: END IF;
5780: --
5781: IF b_Match THEN
5774: --
5775: IF (l_debug <> -1) THEN
5776: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
5777: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
5778: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5779: END IF;
5780: --
5781: IF b_Match THEN
5782: IF x_Group_rec.match_within_rec.industry_attribute10 = 'Y' THEN
5787: END IF;
5788: END IF;
5789: --
5790: IF (l_debug <> -1) THEN
5791: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5792: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5793: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5794: END IF;
5795: --
5788: END IF;
5789: --
5790: IF (l_debug <> -1) THEN
5791: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5792: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5793: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5794: END IF;
5795: --
5796: IF b_Match THEN
5789: --
5790: IF (l_debug <> -1) THEN
5791: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
5792: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
5793: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5794: END IF;
5795: --
5796: IF b_Match THEN
5797: IF x_Group_rec.match_within_rec.industry_attribute11 = 'Y' THEN
5802: END IF;
5803: END IF;
5804: --
5805: IF (l_debug <> -1) THEN
5806: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5807: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5808: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5809: END IF;
5810: --
5803: END IF;
5804: --
5805: IF (l_debug <> -1) THEN
5806: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5807: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5808: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5809: END IF;
5810: --
5811: IF b_Match THEN
5804: --
5805: IF (l_debug <> -1) THEN
5806: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
5807: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
5808: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5809: END IF;
5810: --
5811: IF b_Match THEN
5812: IF x_Group_rec.match_within_rec.industry_attribute12 = 'Y' THEN
5817: END IF;
5818: END IF;
5819: --
5820: IF (l_debug <> -1) THEN
5821: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5822: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5823: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5824: END IF;
5825: --
5818: END IF;
5819: --
5820: IF (l_debug <> -1) THEN
5821: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5822: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5823: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5824: END IF;
5825: --
5826: IF b_Match THEN
5819: --
5820: IF (l_debug <> -1) THEN
5821: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
5822: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
5823: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5824: END IF;
5825: --
5826: IF b_Match THEN
5827: IF x_Group_rec.match_within_rec.industry_attribute13 = 'Y' THEN
5832: END IF;
5833: END IF;
5834: --
5835: IF (l_debug <> -1) THEN
5836: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5837: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5838: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5839: END IF;
5840: --
5833: END IF;
5834: --
5835: IF (l_debug <> -1) THEN
5836: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5837: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5838: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5839: END IF;
5840: --
5841: IF b_Match THEN
5834: --
5835: IF (l_debug <> -1) THEN
5836: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
5837: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
5838: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5839: END IF;
5840: --
5841: IF b_Match THEN
5842: IF x_Group_rec.match_within_rec.industry_attribute14 = 'Y' THEN
5847: END IF;
5848: END IF;
5849: --
5850: IF (l_debug <> -1) THEN
5851: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5852: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5853: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5854: END IF;
5855: --
5848: END IF;
5849: --
5850: IF (l_debug <> -1) THEN
5851: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5852: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5853: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5854: END IF;
5855: --
5856: IF b_Match THEN
5849: --
5850: IF (l_debug <> -1) THEN
5851: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
5852: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
5853: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5854: END IF;
5855: --
5856: IF b_Match THEN
5857: IF x_Group_rec.match_within_rec.industry_attribute15 = 'Y' THEN
5862: END IF;
5863: END IF;
5864: --
5865: IF (l_debug <> -1) THEN
5866: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5867: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5868: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5869: END IF;
5870: --
5863: END IF;
5864: --
5865: IF (l_debug <> -1) THEN
5866: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5867: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5868: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5869: END IF;
5870: --
5871: IF b_Match THEN
5864: --
5865: IF (l_debug <> -1) THEN
5866: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
5867: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
5868: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5869: END IF;
5870: --
5871: IF b_Match THEN
5872: IF x_Group_rec.match_within_rec.attribute1 = 'Y' THEN
5877: END IF;
5878: END IF;
5879: --
5880: IF (l_debug <> -1) THEN
5881: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5882: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5883: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5884: END IF;
5885: --
5878: END IF;
5879: --
5880: IF (l_debug <> -1) THEN
5881: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5882: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5883: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5884: END IF;
5885: --
5886: IF b_Match THEN
5879: --
5880: IF (l_debug <> -1) THEN
5881: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
5882: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
5883: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5884: END IF;
5885: --
5886: IF b_Match THEN
5887: IF x_Group_rec.match_within_rec.attribute2 = 'Y' THEN
5892: END IF;
5893: END IF;
5894: --
5895: IF (l_debug <> -1) THEN
5896: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5897: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5898: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5899: END IF;
5900: --
5893: END IF;
5894: --
5895: IF (l_debug <> -1) THEN
5896: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5897: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5898: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5899: END IF;
5900: --
5901: IF b_Match THEN
5894: --
5895: IF (l_debug <> -1) THEN
5896: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
5897: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
5898: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
5899: END IF;
5900: --
5901: IF b_Match THEN
5902: IF x_Group_rec.match_within_rec.attribute3 = 'Y' THEN
5907: END IF;
5908: END IF;
5909: --
5910: IF (l_debug <> -1) THEN
5911: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
5912: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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.attribute4 = 'Y' THEN
5922: END IF;
5923: END IF;
5924: --
5925: IF (l_debug <> -1) THEN
5926: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
5927: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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.attribute5 = 'Y' THEN
5937: END IF;
5938: END IF;
5939: --
5940: IF (l_debug <> -1) THEN
5941: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
5942: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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.attribute6 = 'Y' THEN
5952: END IF;
5953: END IF;
5954: --
5955: IF (l_debug <> -1) THEN
5956: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
5957: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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.attribute7 = 'Y' THEN
5967: END IF;
5968: END IF;
5969: --
5970: IF (l_debug <> -1) THEN
5971: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
5972: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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.attribute8 = 'Y' THEN
5982: END IF;
5983: END IF;
5984: --
5985: IF (l_debug <> -1) THEN
5986: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
5987: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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.attribute9 = 'Y' THEN
5997: END IF;
5998: END IF;
5999: --
6000: IF (l_debug <> -1) THEN
6001: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
6002: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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.attribute10 = 'Y' THEN
6012: END IF;
6013: END IF;
6014: --
6015: IF (l_debug <> -1) THEN
6016: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
6017: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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.attribute11 = 'Y' THEN
6027: END IF;
6028: END IF;
6029: --
6030: IF (l_debug <> -1) THEN
6031: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
6032: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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.attribute12 = 'Y' THEN
6042: END IF;
6043: END IF;
6044: --
6045: IF (l_debug <> -1) THEN
6046: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
6047: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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.attribute13 = 'Y' THEN
6057: END IF;
6058: END IF;
6059: --
6060: IF (l_debug <> -1) THEN
6061: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
6062: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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.attribute14 = 'Y' THEN
6072: END IF;
6073: END IF;
6074: --
6075: IF (l_debug <> -1) THEN
6076: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
6077: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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.attribute15 = 'Y' THEN
6087: END IF;
6088: END IF;
6089: --
6090: IF (l_debug <> -1) THEN
6091: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
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, 'attribute15', x_Current_rec.attribute15);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6093: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6094: END IF;
6095: --
6096: --
6089: --
6090: IF (l_debug <> -1) THEN
6091: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6092: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6093: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6094: END IF;
6095: --
6096: --
6097: --
6099: --
6100: --
6101: --
6102: IF (l_debug <> -1) THEN
6103: rlm_core_sv.dlog(k_DEBUG,'Match across Schedules only ');
6104: END IF;
6105: --
6106: IF x_Group_rec.match_across_rec.cust_po_number = 'Y' THEN
6107: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
6110: END IF;
6111: END IF;
6112: --
6113: IF (l_debug <> -1) THEN
6114: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6115: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6117: END IF;
6118: --
6111: END IF;
6112: --
6113: IF (l_debug <> -1) THEN
6114: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6115: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6117: END IF;
6118: --
6119: IF b_Match THEN
6112: --
6113: IF (l_debug <> -1) THEN
6114: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
6115: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
6116: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6117: END IF;
6118: --
6119: IF b_Match THEN
6120: IF x_Group_rec.match_across_rec.customer_item_revision = 'Y' THEN
6125: END IF;
6126: END IF;
6127: --
6128: IF (l_debug <> -1) THEN
6129: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6130: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6131: g_Reconcile_tab(v_Count).customer_item_revision);
6132: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6133: END IF;
6126: END IF;
6127: --
6128: IF (l_debug <> -1) THEN
6129: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6130: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6131: g_Reconcile_tab(v_Count).customer_item_revision);
6132: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6133: END IF;
6134: --
6128: IF (l_debug <> -1) THEN
6129: rlm_core_sv.dlog(k_DEBUG, 'customer_item_revision', x_Current_rec.customer_item_revision);
6130: rlm_core_sv.dlog(k_DEBUG, 'rec customer_item_revision',
6131: g_Reconcile_tab(v_Count).customer_item_revision);
6132: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6133: END IF;
6134: --
6135: IF b_Match THEN
6136: IF x_Group_rec.match_across_rec.customer_dock_code = 'Y' THEN
6141: END IF;
6142: END IF;
6143: --
6144: IF (l_debug <> -1) THEN
6145: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6146: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6147: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6148: END IF;
6149: --
6142: END IF;
6143: --
6144: IF (l_debug <> -1) THEN
6145: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6146: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6147: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6148: END IF;
6149: --
6150: IF b_Match THEN
6143: --
6144: IF (l_debug <> -1) THEN
6145: rlm_core_sv.dlog(k_DEBUG, 'customer_dock_code', x_Current_rec.customer_dock_code);
6146: rlm_core_sv.dlog(k_DEBUG, 'rec customer_dock_code', g_Reconcile_tab(v_Count).customer_dock_code);
6147: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6148: END IF;
6149: --
6150: IF b_Match THEN
6151: IF x_Group_rec.match_across_rec.customer_job = 'Y' THEN
6156: END IF;
6157: END IF;
6158: --
6159: IF (l_debug <> -1) THEN
6160: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6161: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6162: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6163: END IF;
6164: --
6157: END IF;
6158: --
6159: IF (l_debug <> -1) THEN
6160: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6161: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6162: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6163: END IF;
6164: --
6165: IF b_Match THEN
6158: --
6159: IF (l_debug <> -1) THEN
6160: rlm_core_sv.dlog(k_DEBUG, 'customer_job', x_Current_rec.customer_job);
6161: rlm_core_sv.dlog(k_DEBUG, 'rec customer_job', g_Reconcile_tab(v_Count).customer_job);
6162: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6163: END IF;
6164: --
6165: IF b_Match THEN
6166: IF x_Group_rec.match_across_rec.cust_production_line = 'Y' THEN
6171: END IF;
6172: END IF;
6173: --
6174: IF (l_debug <> -1) THEN
6175: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6176: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6177: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6178: END IF;
6179: --
6172: END IF;
6173: --
6174: IF (l_debug <> -1) THEN
6175: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6176: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6177: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6178: END IF;
6179: --
6180: IF b_Match THEN
6173: --
6174: IF (l_debug <> -1) THEN
6175: rlm_core_sv.dlog(k_DEBUG, 'cust_production_line', x_Current_rec.cust_production_line);
6176: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_line', g_Reconcile_tab(v_Count).cust_production_line);
6177: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6178: END IF;
6179: --
6180: IF b_Match THEN
6181: IF x_Group_rec.match_across_rec.cust_model_serial_number = 'Y' THEN
6186: END IF;
6187: END IF;
6188: --
6189: IF (l_debug <> -1) THEN
6190: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6191: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6192: g_Reconcile_tab(v_Count).cust_model_serial_number);
6193: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6194: END IF;
6187: END IF;
6188: --
6189: IF (l_debug <> -1) THEN
6190: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6191: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6192: g_Reconcile_tab(v_Count).cust_model_serial_number);
6193: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6194: END IF;
6195: --
6189: IF (l_debug <> -1) THEN
6190: rlm_core_sv.dlog(k_DEBUG, 'cust_model_serial_number', x_Current_rec.cust_model_serial_number);
6191: rlm_core_sv.dlog(k_DEBUG, 'rec cust_model_serial_number',
6192: g_Reconcile_tab(v_Count).cust_model_serial_number);
6193: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6194: END IF;
6195: --
6196: IF b_Match THEN
6197: IF x_Group_rec.match_across_rec.cust_production_seq_num = 'Y' THEN
6202: END IF;
6203: END IF;
6204: --
6205: IF (l_debug <> -1) THEN
6206: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6207: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6208: g_Reconcile_tab(v_Count).cust_production_seq_num);
6209: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6210: END IF;
6203: END IF;
6204: --
6205: IF (l_debug <> -1) THEN
6206: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6207: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6208: g_Reconcile_tab(v_Count).cust_production_seq_num);
6209: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6210: END IF;
6211: --
6205: IF (l_debug <> -1) THEN
6206: rlm_core_sv.dlog(k_DEBUG, 'cust_production_seq_num', x_Current_rec.cust_production_seq_num);
6207: rlm_core_sv.dlog(k_DEBUG, 'rec cust_production_seq_num',
6208: g_Reconcile_tab(v_Count).cust_production_seq_num);
6209: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6210: END IF;
6211: --
6212: IF b_Match THEN
6213: IF x_Group_rec.match_across_rec.industry_attribute1 = 'Y' THEN
6218: END IF;
6219: END IF;
6220: --
6221: IF (l_debug <> -1) THEN
6222: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6223: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6224: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6225: END IF;
6226: --
6219: END IF;
6220: --
6221: IF (l_debug <> -1) THEN
6222: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6223: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6224: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6225: END IF;
6226: --
6227: -- Bugfix 5608510
6220: --
6221: IF (l_debug <> -1) THEN
6222: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
6223: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
6224: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6225: END IF;
6226: --
6227: -- Bugfix 5608510
6228: IF v_intransit_calc_basis = 'PART_SHIP_LINES' THEN
6237: END IF;
6238: --
6239:
6240: IF (l_debug <> -1) THEN
6241: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
6243: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6244: END IF;
6245: --
6238: --
6239:
6240: IF (l_debug <> -1) THEN
6241: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute2', x_Current_rec.industry_attribute2);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
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, 'industry_attribute2', x_Current_rec.industry_attribute2);
6242: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute2', g_Reconcile_tab(v_Count).industry_attribute2);
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_across_rec.request_date = 'Y' THEN
6253: END IF;
6254: --
6255: --
6256: IF (l_debug <> -1) THEN
6257: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6258: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6259: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6260: END IF;
6261: --
6254: --
6255: --
6256: IF (l_debug <> -1) THEN
6257: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6258: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6259: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6260: END IF;
6261: --
6262: END IF ; -- bugfix 5608510
6255: --
6256: IF (l_debug <> -1) THEN
6257: rlm_core_sv.dlog(k_DEBUG, 'request_date', x_Current_rec.request_date);
6258: rlm_core_sv.dlog(k_DEBUG, 'rec request_date', g_Reconcile_tab(v_Count).request_date);
6259: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6260: END IF;
6261: --
6262: END IF ; -- bugfix 5608510
6263: IF b_Match THEN
6269: END IF;
6270: END IF;
6271: --
6272: IF (l_debug <> -1) THEN
6273: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6274: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6275: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6276: END IF;
6277: --
6270: END IF;
6271: --
6272: IF (l_debug <> -1) THEN
6273: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6274: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6275: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6276: END IF;
6277: --
6278: IF b_Match THEN
6271: --
6272: IF (l_debug <> -1) THEN
6273: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute4', x_Current_rec.industry_attribute4);
6274: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute4', g_Reconcile_tab(v_Count).industry_attribute4);
6275: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6276: END IF;
6277: --
6278: IF b_Match THEN
6279: IF x_Group_rec.match_across_rec.industry_attribute5 = 'Y' THEN
6284: END IF;
6285: END IF;
6286: --
6287: IF (l_debug <> -1) THEN
6288: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6289: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6290: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6291: END IF;
6292: --
6285: END IF;
6286: --
6287: IF (l_debug <> -1) THEN
6288: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6289: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6290: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6291: END IF;
6292: --
6293: IF b_Match THEN
6286: --
6287: IF (l_debug <> -1) THEN
6288: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute5', x_Current_rec.industry_attribute5);
6289: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute5', g_Reconcile_tab(v_Count).industry_attribute5);
6290: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6291: END IF;
6292: --
6293: IF b_Match THEN
6294: IF x_Group_rec.match_across_rec.industry_attribute6 = 'Y' THEN
6299: END IF;
6300: END IF;
6301: --
6302: IF (l_debug <> -1) THEN
6303: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6304: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6305: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6306: END IF;
6307: --
6300: END IF;
6301: --
6302: IF (l_debug <> -1) THEN
6303: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6304: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6305: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6306: END IF;
6307: --
6308: IF b_Match THEN
6301: --
6302: IF (l_debug <> -1) THEN
6303: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute6', x_Current_rec.industry_attribute6);
6304: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute6', g_Reconcile_tab(v_Count).industry_attribute6);
6305: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6306: END IF;
6307: --
6308: IF b_Match THEN
6309: IF x_Group_rec.match_across_rec.industry_attribute10 = 'Y' THEN
6314: END IF;
6315: END IF;
6316: --
6317: IF (l_debug <> -1) THEN
6318: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6319: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6320: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6321: END IF;
6322: --
6315: END IF;
6316: --
6317: IF (l_debug <> -1) THEN
6318: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6319: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6320: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6321: END IF;
6322: --
6323: IF b_Match THEN
6316: --
6317: IF (l_debug <> -1) THEN
6318: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute10', x_Current_rec.industry_attribute10);
6319: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute10', g_Reconcile_tab(v_Count).industry_attribute10);
6320: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6321: END IF;
6322: --
6323: IF b_Match THEN
6324: IF x_Group_rec.match_across_rec.industry_attribute11 = 'Y' THEN
6329: END IF;
6330: END IF;
6331: --
6332: IF (l_debug <> -1) THEN
6333: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6334: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6335: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6336: END IF;
6337: --
6330: END IF;
6331: --
6332: IF (l_debug <> -1) THEN
6333: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6334: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6335: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6336: END IF;
6337: --
6338: IF b_Match THEN
6331: --
6332: IF (l_debug <> -1) THEN
6333: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute11', x_Current_rec.industry_attribute11);
6334: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute11', g_Reconcile_tab(v_Count).industry_attribute11);
6335: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6336: END IF;
6337: --
6338: IF b_Match THEN
6339: IF x_Group_rec.match_across_rec.industry_attribute12 = 'Y' THEN
6344: END IF;
6345: END IF;
6346: --
6347: IF (l_debug <> -1) THEN
6348: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6349: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6350: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6351: END IF;
6352: --
6345: END IF;
6346: --
6347: IF (l_debug <> -1) THEN
6348: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6349: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6350: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6351: END IF;
6352: --
6353: IF b_Match THEN
6346: --
6347: IF (l_debug <> -1) THEN
6348: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute12', x_Current_rec.industry_attribute12);
6349: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute12', g_Reconcile_tab(v_Count).industry_attribute12);
6350: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6351: END IF;
6352: --
6353: IF b_Match THEN
6354: IF x_Group_rec.match_across_rec.industry_attribute13 = 'Y' THEN
6359: END IF;
6360: END IF;
6361: --
6362: IF (l_debug <> -1) THEN
6363: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6364: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6365: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6366: END IF;
6367: --
6360: END IF;
6361: --
6362: IF (l_debug <> -1) THEN
6363: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6364: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6365: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6366: END IF;
6367: --
6368: IF b_Match THEN
6361: --
6362: IF (l_debug <> -1) THEN
6363: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute13', x_Current_rec.industry_attribute13);
6364: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute13', g_Reconcile_tab(v_Count).industry_attribute13);
6365: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6366: END IF;
6367: --
6368: IF b_Match THEN
6369: IF x_Group_rec.match_across_rec.industry_attribute14 = 'Y' THEN
6374: END IF;
6375: END IF;
6376: --
6377: IF (l_debug <> -1) THEN
6378: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6379: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6380: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6381: END IF;
6382: --
6375: END IF;
6376: --
6377: IF (l_debug <> -1) THEN
6378: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6379: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6380: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6381: END IF;
6382: --
6383: IF b_Match THEN
6376: --
6377: IF (l_debug <> -1) THEN
6378: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute14', x_Current_rec.industry_attribute14);
6379: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute14', g_Reconcile_tab(v_Count).industry_attribute14);
6380: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6381: END IF;
6382: --
6383: IF b_Match THEN
6384: IF x_Group_rec.match_across_rec.industry_attribute15 = 'Y' THEN
6389: END IF;
6390: END IF;
6391: --
6392: IF (l_debug <> -1) THEN
6393: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6394: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6395: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6396: END IF;
6397: --
6390: END IF;
6391: --
6392: IF (l_debug <> -1) THEN
6393: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6394: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6395: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6396: END IF;
6397: --
6398: IF b_Match THEN
6391: --
6392: IF (l_debug <> -1) THEN
6393: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute15', x_Current_rec.industry_attribute15);
6394: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute15', g_Reconcile_tab(v_Count).industry_attribute15);
6395: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6396: END IF;
6397: --
6398: IF b_Match THEN
6399: IF x_Group_rec.match_across_rec.attribute1 = 'Y' THEN
6404: END IF;
6405: END IF;
6406: --
6407: IF (l_debug <> -1) THEN
6408: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6409: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6410: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6411: END IF;
6412: --
6405: END IF;
6406: --
6407: IF (l_debug <> -1) THEN
6408: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6409: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6410: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6411: END IF;
6412: --
6413: IF b_Match THEN
6406: --
6407: IF (l_debug <> -1) THEN
6408: rlm_core_sv.dlog(k_DEBUG, 'attribute1', x_Current_rec.attribute1);
6409: rlm_core_sv.dlog(k_DEBUG, 'rec attribute1', g_Reconcile_tab(v_Count).attribute1);
6410: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6411: END IF;
6412: --
6413: IF b_Match THEN
6414: IF x_Group_rec.match_across_rec.attribute2 = 'Y' THEN
6419: END IF;
6420: END IF;
6421: --
6422: IF (l_debug <> -1) THEN
6423: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6424: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6425: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6426: END IF;
6427: --
6420: END IF;
6421: --
6422: IF (l_debug <> -1) THEN
6423: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6424: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6425: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6426: END IF;
6427: --
6428: IF b_Match THEN
6421: --
6422: IF (l_debug <> -1) THEN
6423: rlm_core_sv.dlog(k_DEBUG, 'uattribute2', x_Current_rec.attribute2);
6424: rlm_core_sv.dlog(k_DEBUG, 'rec attribute2', g_Reconcile_tab(v_Count).attribute2);
6425: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6426: END IF;
6427: --
6428: IF b_Match THEN
6429: IF x_Group_rec.match_across_rec.attribute3 = 'Y' THEN
6434: END IF;
6435: END IF;
6436: --
6437: IF (l_debug <> -1) THEN
6438: rlm_core_sv.dlog(k_DEBUG, 'attribute3', x_Current_rec.attribute3);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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, 'attribute3', x_Current_rec.attribute3);
6439: rlm_core_sv.dlog(k_DEBUG, 'rec attribute3', g_Reconcile_tab(v_Count).attribute3);
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.attribute4 = 'Y' THEN
6449: END IF;
6450: END IF;
6451: --
6452: IF (l_debug <> -1) THEN
6453: rlm_core_sv.dlog(k_DEBUG, 'attribute4', x_Current_rec.attribute4);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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, 'attribute4', x_Current_rec.attribute4);
6454: rlm_core_sv.dlog(k_DEBUG, 'rec attribute4', g_Reconcile_tab(v_Count).attribute4);
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.attribute5 = 'Y' THEN
6464: END IF;
6465: END IF;
6466: --
6467: IF (l_debug <> -1) THEN
6468: rlm_core_sv.dlog(k_DEBUG, 'attribute5', x_Current_rec.attribute5);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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, 'attribute5', x_Current_rec.attribute5);
6469: rlm_core_sv.dlog(k_DEBUG, 'rec attribute5', g_Reconcile_tab(v_Count).attribute5);
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.attribute6 = 'Y' THEN
6479: END IF;
6480: END IF;
6481: --
6482: IF (l_debug <> -1) THEN
6483: rlm_core_sv.dlog(k_DEBUG, 'attribute6', x_Current_rec.attribute6);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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, 'attribute6', x_Current_rec.attribute6);
6484: rlm_core_sv.dlog(k_DEBUG, 'rec attribute6', g_Reconcile_tab(v_Count).attribute6);
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.attribute7 = 'Y' THEN
6494: END IF;
6495: END IF;
6496: --
6497: IF (l_debug <> -1) THEN
6498: rlm_core_sv.dlog(k_DEBUG, 'attribute7', x_Current_rec.attribute7);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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, 'attribute7', x_Current_rec.attribute7);
6499: rlm_core_sv.dlog(k_DEBUG, 'rec attribute7', g_Reconcile_tab(v_Count).attribute7);
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.attribute8 = 'Y' THEN
6509: END IF;
6510: END IF;
6511: --
6512: IF (l_debug <> -1) THEN
6513: rlm_core_sv.dlog(k_DEBUG, 'attribute8', x_Current_rec.attribute8);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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, 'attribute8', x_Current_rec.attribute8);
6514: rlm_core_sv.dlog(k_DEBUG, 'rec attribute8', g_Reconcile_tab(v_Count).attribute8);
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.attribute9 = 'Y' THEN
6524: END IF;
6525: END IF;
6526: --
6527: IF (l_debug <> -1) THEN
6528: rlm_core_sv.dlog(k_DEBUG, 'attribute9', x_Current_rec.attribute9);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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, 'attribute9', x_Current_rec.attribute9);
6529: rlm_core_sv.dlog(k_DEBUG, 'rec attribute9', g_Reconcile_tab(v_Count).attribute9);
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.attribute10 = 'Y' THEN
6539: END IF;
6540: END IF;
6541: --
6542: IF (l_debug <> -1) THEN
6543: rlm_core_sv.dlog(k_DEBUG, 'attribute10', x_Current_rec.attribute10);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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, 'attribute10', x_Current_rec.attribute10);
6544: rlm_core_sv.dlog(k_DEBUG, 'rec attribute10', g_Reconcile_tab(v_Count).attribute10);
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.attribute11 = 'Y' THEN
6554: END IF;
6555: END IF;
6556: --
6557: IF (l_debug <> -1) THEN
6558: rlm_core_sv.dlog(k_DEBUG, 'attribute11', x_Current_rec.attribute11);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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, 'attribute11', x_Current_rec.attribute11);
6559: rlm_core_sv.dlog(k_DEBUG, 'rec attribute11', g_Reconcile_tab(v_Count).attribute11);
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.attribute12 = 'Y' THEN
6569: END IF;
6570: END IF;
6571: --
6572: IF (l_debug <> -1) THEN
6573: rlm_core_sv.dlog(k_DEBUG, 'attribute12', x_Current_rec.attribute12);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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, 'attribute12', x_Current_rec.attribute12);
6574: rlm_core_sv.dlog(k_DEBUG, 'rec attribute12', g_Reconcile_tab(v_Count).attribute12);
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.attribute13 = 'Y' THEN
6584: END IF;
6585: END IF;
6586: --
6587: IF (l_debug <> -1) THEN
6588: rlm_core_sv.dlog(k_DEBUG, 'attribute13', x_Current_rec.attribute13);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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, 'attribute13', x_Current_rec.attribute13);
6589: rlm_core_sv.dlog(k_DEBUG, 'rec attribute13', g_Reconcile_tab(v_Count).attribute13);
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.attribute14 = 'Y' THEN
6599: END IF;
6600: END IF;
6601: --
6602: IF (l_debug <> -1) THEN
6603: rlm_core_sv.dlog(k_DEBUG, 'attribute14', x_Current_rec.attribute14);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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, 'attribute14', x_Current_rec.attribute14);
6604: rlm_core_sv.dlog(k_DEBUG, 'rec attribute14', g_Reconcile_tab(v_Count).attribute14);
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.attribute15 = 'Y' THEN
6614: END IF;
6615: END IF;
6616: --
6617: IF (l_debug <> -1) THEN
6618: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
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, 'attribute15', x_Current_rec.attribute15);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6621: END IF;
6622: --
6623: END IF;
6616: --
6617: IF (l_debug <> -1) THEN
6618: rlm_core_sv.dlog(k_DEBUG, 'attribute15', x_Current_rec.attribute15);
6619: rlm_core_sv.dlog(k_DEBUG, 'rec attribute15', g_Reconcile_tab(v_Count).attribute15);
6620: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
6621: END IF;
6622: --
6623: END IF;
6624: --
6635: --}
6636: END IF;
6637: --
6638: IF (l_debug <> -1) THEN
6639: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
6640: rlm_core_sv.dpop(k_SDEBUG);
6641: END IF;
6642: --
6643: RETURN(b_Match);
6636: END IF;
6637: --
6638: IF (l_debug <> -1) THEN
6639: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
6640: rlm_core_sv.dpop(k_SDEBUG);
6641: END IF;
6642: --
6643: RETURN(b_Match);
6644: --
6646: WHEN OTHERS THEN
6647: rlm_message_sv.sql_error('rlm_rd_sv.MatchReconcile',x_progress);
6648: --
6649: IF (l_debug <> -1) THEN
6650: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6651: END IF;
6652: --
6653: raise;
6654:
6672: BEGIN
6673: /*Bug 2263253 : Reverted the modifications done under bug 2194938 */
6674: --
6675: IF (l_debug <> -1) THEN
6676: rlm_core_sv.dpush(k_SDEBUG,'StoreReconcile');
6677: rlm_core_sv.dlog(k_DEBUG,'Quantity to be reconciled', x_Quantity);
6678: END IF;
6679: --
6680: IF MatchReconcile(x_Group_rec, x_Key_rec.dem_rec, v_Index) THEN
6673: /*Bug 2263253 : Reverted the modifications done under bug 2194938 */
6674: --
6675: IF (l_debug <> -1) THEN
6676: rlm_core_sv.dpush(k_SDEBUG,'StoreReconcile');
6677: rlm_core_sv.dlog(k_DEBUG,'Quantity to be reconciled', x_Quantity);
6678: END IF;
6679: --
6680: IF MatchReconcile(x_Group_rec, x_Key_rec.dem_rec, v_Index) THEN
6681: --
6682: g_Reconcile_tab(v_Index).ordered_quantity:=
6683: NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) + x_Quantity;
6684: --
6685: IF (l_debug <> -1) THEN
6686: rlm_core_sv.dlog(k_DEBUG,' Match Quantity ', g_Reconcile_tab(v_Index).ordered_quantity);
6687: END IF;
6688: --
6689: ELSE
6690: --
6703: --
6704: END IF;
6705: --
6706: IF (l_debug <> -1) THEN
6707: rlm_core_sv.dlog(k_DEBUG,' New Line Quantity ', g_Reconcile_tab(g_Reconcile_tab.COUNT).ordered_quantity);
6708: END IF;
6709: --
6710: END IF;
6711: --
6709: --
6710: END IF;
6711: --
6712: IF (l_debug <> -1) THEN
6713: rlm_core_sv.dpop(k_SDEBUG);
6714: END IF;
6715:
6716: EXCEPTION
6717: WHEN OTHERS THEN
6717: WHEN OTHERS THEN
6718: rlm_message_sv.sql_error('rlm_rd_sv.StoreReconcile',x_progress);
6719: --
6720: IF (l_debug <> -1) THEN
6721: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6722: END IF;
6723: --
6724: raise;
6725:
6741:
6742: BEGIN
6743: --
6744: IF (l_debug <> -1) THEN
6745: rlm_core_sv.dpush(k_SDEBUG,'Reconcile');
6746: END IF;
6747: --
6748: IF MatchReconcile(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
6749: --
6747: --
6748: IF MatchReconcile(x_Group_rec, x_Key_rec.req_rec, v_Index) THEN
6749: --
6750: IF (l_debug <> -1) THEN
6751: rlm_core_sv.dlog(k_DEBUG,'v_Index',v_Index);
6752: END IF;
6753: --
6754: --start of bug 4223359
6755: --
6756: IF NVL(g_Reconcile_tab(v_Index).ordered_quantity,0) < 0 THEN
6757: --
6758: IF (l_debug <> -1) THEN
6759: --
6760: rlm_core_sv.dlog(k_DEBUG,'ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
6761: rlm_core_sv.dpop(k_SDEBUG);
6762: --
6763: END IF;
6764: --
6757: --
6758: IF (l_debug <> -1) THEN
6759: --
6760: rlm_core_sv.dlog(k_DEBUG,'ordered_quantity',g_Reconcile_tab(v_Index).ordered_quantity);
6761: rlm_core_sv.dpop(k_SDEBUG);
6762: --
6763: END IF;
6764: --
6765: return;
6775: ELSE
6776: --
6777: IF (l_debug <> -1) THEN
6778: --
6779: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6780: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6781: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6782: g_Reconcile_tab(v_Index).ordered_quantity);
6783: --
6776: --
6777: IF (l_debug <> -1) THEN
6778: --
6779: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6780: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6781: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6782: g_Reconcile_tab(v_Index).ordered_quantity);
6783: --
6784: END IF;
6777: IF (l_debug <> -1) THEN
6778: --
6779: rlm_core_sv.dlog(k_DEBUG,'x_quantity',x_quantity);
6780: rlm_core_sv.dlog(k_DEBUG,'Entry getting deleted from Reconcile Table', v_Index);
6781: rlm_core_sv.dlog(k_DEBUG,'deleted g_Reconcile_tab(v_Index).ordered_quantity',
6782: g_Reconcile_tab(v_Index).ordered_quantity);
6783: --
6784: END IF;
6785: --
6791: --
6792: --end of bug 4223359
6793: --
6794: IF (l_debug <> -1) THEN
6795: rlm_core_sv.dlog(k_DEBUG,'x_Quantity',x_Quantity);
6796: END IF;
6797: --
6798: END IF;
6799: --
6797: --
6798: END IF;
6799: --
6800: IF (l_debug <> -1) THEN
6801: rlm_core_sv.dpop(k_SDEBUG);
6802: END IF;
6803: --
6804: EXCEPTION
6805: WHEN OTHERS THEN
6805: WHEN OTHERS THEN
6806: rlm_message_sv.sql_error('rlm_rd_sv.Reconcile',x_progress);
6807: --
6808: IF (l_debug <> -1) THEN
6809: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
6810: END IF;
6811: --
6812: raise;
6813:
6830:
6831: BEGIN
6832: --
6833: IF (l_debug <> -1) THEN
6834: rlm_core_sv.dpush(k_SDEBUG,'AttributeChange');
6835: END IF;
6836: --
6837: /*checks for an attribute change between dem rec
6838: and req rec. */
7029: END IF;
7030:
7031: IF b_Change THEN
7032: IF (l_debug <> -1) THEN
7033: rlm_core_sv.dpop(k_SDEBUG, 'true');
7034: END IF;
7035: ELSE
7036: --
7037: IF (l_debug <> -1) THEN
7034: END IF;
7035: ELSE
7036: --
7037: IF (l_debug <> -1) THEN
7038: rlm_core_sv.dpop(k_SDEBUG, 'false');
7039: END IF;
7040: --
7041: END IF;
7042:
7046: WHEN OTHERS THEN
7047: rlm_message_sv.sql_error('rlm_rd_sv.AttributeChange',x_progress);
7048: --
7049: IF (l_debug <> -1) THEN
7050: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
7051: END IF;
7052: --
7053: raise;
7054:
7094:
7095: BEGIN
7096: --
7097: IF (l_debug <> -1) THEN
7098: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7095: BEGIN
7096: --
7097: IF (l_debug <> -1) THEN
7098: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7096: --
7097: IF (l_debug <> -1) THEN
7098: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7097: IF (l_debug <> -1) THEN
7098: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7105: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7098: rlm_core_sv.dpush(k_SDEBUG,'ProcessPreHorizonATS');
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7105: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7106: END IF;
7099: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id',x_Group_rec.order_header_id);
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7105: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7106: END IF;
7107: --
7100: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id',x_Group_rec.ship_from_org_id);
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7105: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7106: END IF;
7107: --
7108: IF x_Group_rec.disposition_code IN (k_CANCEL_ALL, k_CANCEL_AFTER_N_DAYS) THEN
7101: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',x_Group_rec.ship_to_org_id);
7102: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id',x_Group_rec.customer_item_id);
7103: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',x_Group_rec.inventory_item_id);
7104: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.disposition_code',x_Group_rec.disposition_code);
7105: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.cutoff_days',x_Group_rec.cutoff_days);
7106: END IF;
7107: --
7108: IF x_Group_rec.disposition_code IN (k_CANCEL_ALL, k_CANCEL_AFTER_N_DAYS) THEN
7109: --
7111: --
7112: v_Key_rec.oe_line_id := c_PreHorizonDisp_rec.line_id;
7113: --
7114: IF (l_debug <> -1) THEN
7115: rlm_core_sv.dlog(k_DEBUG,'c_PreHorizonDisp_rec.line_id',
7116: c_PreHorizonDisp_rec.line_id);
7117: END IF;
7118: --
7119: GetDemand(v_Key_rec, x_Group_rec);
7143: x_Token2 => 'SCHEDTYPE',
7144: x_value2 => c_PreHorizonDisp_rec.rla_schedule_type_code );
7145: --
7146: IF (l_debug <> -1) THEN
7147: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
7148: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
7149: END IF;
7150: --
7151: END IF;
7144: x_value2 => c_PreHorizonDisp_rec.rla_schedule_type_code );
7145: --
7146: IF (l_debug <> -1) THEN
7147: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
7148: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
7149: END IF;
7150: --
7151: END IF;
7152: --
7160: --
7161: END IF;
7162: --
7163: IF (l_debug <> -1) THEN
7164: rlm_core_sv.dpop(k_SDEBUG);
7165: END IF;
7166: --
7167: EXCEPTION
7168:
7168:
7169: WHEN e_group_error THEN
7170: --
7171: IF (l_debug <> -1) THEN
7172: rlm_core_sv.dlog(k_DEBUG,'group error');
7173: rlm_core_sv.dpop(k_SDEBUG);
7174: END IF;
7175: --
7176: raise e_group_error;
7169: WHEN e_group_error THEN
7170: --
7171: IF (l_debug <> -1) THEN
7172: rlm_core_sv.dlog(k_DEBUG,'group error');
7173: rlm_core_sv.dpop(k_SDEBUG);
7174: END IF;
7175: --
7176: raise e_group_error;
7177:
7178: WHEN OTHERS THEN
7179: rlm_message_sv.sql_error('rlm_rd_sv.ProcessPreHorizonATS',x_progress);
7180: --
7181: IF (l_debug <> -1) THEN
7182: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
7183: END IF;
7184: --
7185: raise;
7186:
7344: --
7345: BEGIN
7346: --
7347: IF (l_debug <> -1) THEN
7348: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7349: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7345: BEGIN
7346: --
7347: IF (l_debug <> -1) THEN
7348: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7349: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7346: --
7347: IF (l_debug <> -1) THEN
7348: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7349: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7347: IF (l_debug <> -1) THEN
7348: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7349: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7355: x_Group_rec.ship_to_org_id);
7348: rlm_core_sv.dpush(k_SDEBUG,'ProcessOld');
7349: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7355: x_Group_rec.ship_to_org_id);
7356: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7350: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
7351: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7355: x_Group_rec.ship_to_org_id);
7356: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7357: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7358: x_Group_rec.schedule_type_two);
7352: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7355: x_Group_rec.ship_to_org_id);
7356: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7357: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7358: x_Group_rec.schedule_type_two);
7359: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7360: x_Group_rec.schedule_type_three);
7353: x_Group_rec.inventory_item_id);
7354: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id',
7355: x_Group_rec.ship_to_org_id);
7356: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7357: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7358: x_Group_rec.schedule_type_two);
7359: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7360: x_Group_rec.schedule_type_three);
7361: END IF;
7355: x_Group_rec.ship_to_org_id);
7356: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_one', x_Group_rec.schedule_type_one);
7357: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_two',
7358: x_Group_rec.schedule_type_two);
7359: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.schedule_type_three',
7360: x_Group_rec.schedule_type_three);
7361: END IF;
7362: --
7363: /* We need to initialize the consume tab before the oldrec because the
7385: v_NATS_start_date := x_Sched_rec.sched_horizon_start_date;
7386: END IF;
7387:
7388: IF (l_debug <> -1) THEN
7389: rlm_core_sv.dlog(k_DEBUG,'x_ATS_start_date', v_ATS_start_date);
7390: rlm_core_sv.dlog(k_DEBUG,'x_NATS_start_date', v_NATS_start_date);
7391: END IF;
7392:
7393: OPEN c_OldDemand(v_ATS_start_date , v_NATS_start_date);
7386: END IF;
7387:
7388: IF (l_debug <> -1) THEN
7389: rlm_core_sv.dlog(k_DEBUG,'x_ATS_start_date', v_ATS_start_date);
7390: rlm_core_sv.dlog(k_DEBUG,'x_NATS_start_date', v_NATS_start_date);
7391: END IF;
7392:
7393: OPEN c_OldDemand(v_ATS_start_date , v_NATS_start_date);
7394: --End of FP Bug 3933822 changes --jckwok
7406: END IF;
7407:
7408: --
7409: IF (l_debug <> -1) THEN
7410: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7411: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7412: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7413: c_OldDemand_rec.schedule_hierarchy);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7407:
7408: --
7409: IF (l_debug <> -1) THEN
7410: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7411: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7412: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7413: c_OldDemand_rec.schedule_hierarchy);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7415: c_OldDemand_rec.end_date_time);
7408: --
7409: IF (l_debug <> -1) THEN
7410: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7411: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7412: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7413: c_OldDemand_rec.schedule_hierarchy);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7415: c_OldDemand_rec.end_date_time);
7416: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7410: rlm_core_sv.dlog(k_DEBUG, '-------------------------------------------');
7411: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id', c_OldDemand_rec.line_id);
7412: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7413: c_OldDemand_rec.schedule_hierarchy);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7415: c_OldDemand_rec.end_date_time);
7416: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7417: c_OldDemand_rec.schedule_ship_date);
7418: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7412: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_hierarchy',
7413: c_OldDemand_rec.schedule_hierarchy);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7415: c_OldDemand_rec.end_date_time);
7416: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7417: c_OldDemand_rec.schedule_ship_date);
7418: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7419: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7420: c_OldDemand_rec.rla_schedule_type_code);
7414: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7415: c_OldDemand_rec.end_date_time);
7416: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7417: c_OldDemand_rec.schedule_ship_date);
7418: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7419: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7420: c_OldDemand_rec.rla_schedule_type_code);
7421: END IF;
7422:
7415: c_OldDemand_rec.end_date_time);
7416: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7417: c_OldDemand_rec.schedule_ship_date);
7418: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date', c_OldDemand_rec.request_date);
7419: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.rla_schedule_type_code',
7420: c_OldDemand_rec.rla_schedule_type_code);
7421: END IF;
7422:
7423: --
7438: AND customer_item_id = x_Group_rec.customer_item_id
7439: AND inventory_item_id= x_Group_rec.inventory_item_id
7440: AND order_header_id= x_Group_rec.order_header_id
7441: AND item_detail_subtype = c_OldDemand_rec.demand_bucket_type_code
7442: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
7443: rlm_core_sv.k_PS_FROZEN_FIRM)
7444: --bug 2031077
7445: --AND NVL(invoice_to_org_id, k_NNULL) =
7446: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
7439: AND inventory_item_id= x_Group_rec.inventory_item_id
7440: AND order_header_id= x_Group_rec.order_header_id
7441: AND item_detail_subtype = c_OldDemand_rec.demand_bucket_type_code
7442: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
7443: rlm_core_sv.k_PS_FROZEN_FIRM)
7444: --bug 2031077
7445: --AND NVL(invoice_to_org_id, k_NNULL) =
7446: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
7447: -- bug 4502559
7720: --
7721: FETCH c_NewReq_ref INTO v_newref_line_id, v_newref_qty;
7722: --
7723: IF (l_debug <> -1) THEN
7724: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7725: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7726: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7727: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7728: END IF;
7721: FETCH c_NewReq_ref INTO v_newref_line_id, v_newref_qty;
7722: --
7723: IF (l_debug <> -1) THEN
7724: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7725: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7726: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7727: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7728: END IF;
7729: --
7722: --
7723: IF (l_debug <> -1) THEN
7724: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7725: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7726: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7727: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7728: END IF;
7729: --
7730: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7723: IF (l_debug <> -1) THEN
7724: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',v_consume_quantity);
7725: rlm_core_sv.dlog(k_DEBUG,'v_Count',v_Count);
7726: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%ROWCOUNT',c_NewReq_ref%ROWCOUNT);
7727: rlm_core_sv.dlog(k_DEBUG,'c_NewReq_ref%NOTFOUND',c_NewReq_ref%NOTFOUND);
7728: END IF;
7729: --
7730: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7731: --
7729: --
7730: IF c_NewReq_ref%NOTFOUND OR x_Sched_rec.schedule_purpose = k_ADD THEN
7731: --
7732: IF (l_debug <> -1) THEN
7733: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
7734: x_Sched_rec.sched_horizon_end_date);
7735: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7736: c_OldDemand_rec.end_date_time);
7737: END IF;
7731: --
7732: IF (l_debug <> -1) THEN
7733: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date',
7734: x_Sched_rec.sched_horizon_end_date);
7735: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.end_date_time',
7736: c_OldDemand_rec.end_date_time);
7737: END IF;
7738: --
7739: --pdue
7741: IsFrozen(TRUNC(SYSDATE), x_Group_rec, c_OldDemand_rec.request_date)
7742: AND x_Sched_rec.schedule_purpose <> k_ADD THEN
7743: --
7744: IF (l_debug <> -1) THEN
7745: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7746: c_OldDemand_rec.line_id);
7747: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7748: c_OldDemand_rec.request_date);
7749: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7743: --
7744: IF (l_debug <> -1) THEN
7745: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7746: c_OldDemand_rec.line_id);
7747: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7748: c_OldDemand_rec.request_date);
7749: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7750: c_OldDemand_rec.schedule_ship_date);
7751: END IF;
7745: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.line_id',
7746: c_OldDemand_rec.line_id);
7747: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.request_date',
7748: c_OldDemand_rec.request_date);
7749: rlm_core_sv.dlog(k_DEBUG,'c_OldDemand_rec.schedule_ship_date',
7750: c_OldDemand_rec.schedule_ship_date);
7751: END IF;
7752: --
7753: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
7768: x_ScheduleLineId => NULL,
7769: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
7770: x_OrderLineId => c_OldDemand_rec.line_id,
7771: x_Token1 => 'LINE',
7772: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7773: x_Token2 => 'ORDER',
7774: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7775: x_Token3 => 'QUANTITY',
7776: x_value3 => c_OldDemand_rec.ordered_quantity,
7770: x_OrderLineId => c_OldDemand_rec.line_id,
7771: x_Token1 => 'LINE',
7772: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7773: x_Token2 => 'ORDER',
7774: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7775: x_Token3 => 'QUANTITY',
7776: x_value3 => c_OldDemand_rec.ordered_quantity,
7777: x_Token4 => 'CUSTITEM',
7778: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7774: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7775: x_Token3 => 'QUANTITY',
7776: x_value3 => c_OldDemand_rec.ordered_quantity,
7777: x_Token4 => 'CUSTITEM',
7778: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7779: x_Token5 => 'REQ_DATE',
7780: x_value5 => c_OldDemand_rec.request_date,
7781: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
7782: x_value6 => v_del_line_qty, --Bugfix 6159269
7787: x_Token8 => 'MATCH_ATTR',
7788: x_value8 => v_MatchAttrTxt);
7789: --
7790: IF (l_debug <> -1) THEN
7791: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE_SEQ',
7792: c_OldDemand_rec.line_id);
7793: END IF;
7794: --
7795: ELSE
7803: x_ScheduleLineId => NULL,
7804: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
7805: x_OrderLineId => c_OldDemand_rec.line_id,
7806: x_Token1 => 'LINE',
7807: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7808: x_Token2 => 'ORDER',
7809: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7810: x_Token3 => 'QUANTITY',
7811: x_value3 => c_OldDemand_rec.ordered_quantity,
7805: x_OrderLineId => c_OldDemand_rec.line_id,
7806: x_Token1 => 'LINE',
7807: x_value1 => rlm_core_sv.get_order_line_number(c_OldDemand_rec.line_id),
7808: x_Token2 => 'ORDER',
7809: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7810: x_Token3 => 'QUANTITY',
7811: x_value3 => c_OldDemand_rec.ordered_quantity,
7812: x_Token4 => 'CUSTITEM',
7813: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7809: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
7810: x_Token3 => 'QUANTITY',
7811: x_value3 => c_OldDemand_rec.ordered_quantity,
7812: x_Token4 => 'CUSTITEM',
7813: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
7814: x_Token5 => 'REQ_DATE',
7815: x_value5 => c_OldDemand_rec.request_date,
7816: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
7817: x_value6 => v_del_line_qty, --Bugfix 6159269
7818: x_Token7 => 'MATCH_ATTR',
7819: x_value7 => v_MatchAttrTxt);
7820: --
7821: IF (l_debug <> -1) THEN
7822: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_DELETE',
7823: c_OldDemand_rec.line_id);
7824: END IF;
7825: --
7826: END IF;
7831: x_Sched_rec.schedule_purpose <> k_ADD THEN
7832: --bug 1680657
7833: --
7834: IF (l_debug <> -1) THEN
7835: rlm_core_sv.dlog(k_DEBUG,'in no consume delete ');
7836: END IF;
7837: --
7838: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
7839: --
7844: --
7845: ELSE
7846: --
7847: IF (l_debug <> -1) THEN
7848: rlm_core_sv.dlog(k_DEBUG,'In consume -- c_OldDemand_rec.end_date_time',
7849: c_OldDemand_rec.end_date_time);
7850: END IF;
7851: --
7852: /* Consume demand -- We may need to loop through the new demand
7890: +1)
7891: <= c_OldDemand_rec.demand_bucket_type_code
7892: AND request_date BETWEEN c_OldDemand_rec.request_date
7893: AND c_OldDemand_rec.end_date_time
7894: AND process_status = rlm_core_sv.k_PS_AVAILABLE
7895: --bug 2031077
7896: --AND NVL(invoice_to_org_id, k_NNULL) =
7897: -- NVL(c_OldDemand_rec.invoice_to_org_id, k_NNULL)
7898: AND NVL(intmed_ship_to_org_id, k_NNULL) =
8170: --
8171: EXIT WHEN c_consume_ref%NOTFOUND;
8172: --
8173: IF (l_debug <> -1) THEN
8174: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_line_id' , v_line_id);
8175: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_qty', v_qty);
8176: END IF;
8177: --
8178: IF isLineConsumable(v_consume_line_tab,v_line_id, v_index) THEN
8171: EXIT WHEN c_consume_ref%NOTFOUND;
8172: --
8173: IF (l_debug <> -1) THEN
8174: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_line_id' , v_line_id);
8175: rlm_core_sv.dlog(k_DEBUG,'consume_ref.v_qty', v_qty);
8176: END IF;
8177: --
8178: IF isLineConsumable(v_consume_line_tab,v_line_id, v_index) THEN
8179: --
8182: IF c_OldDemand_rec.ordered_quantity >
8183: (v_consume_quantity + v_qty) THEN
8184: --
8185: IF (l_debug <> -1) THEN
8186: rlm_core_sv.dlog(k_DEBUG,'complete consumtion of qty' , v_qty);
8187: END IF;
8188: --
8189: v_consume_line_tab(j).quantity := v_qty;
8190: v_consume_line_tab(j).line_id := v_line_id;
8190: v_consume_line_tab(j).line_id := v_line_id;
8191: v_consume_quantity := v_consume_quantity + v_qty;
8192: --
8193: IF (l_debug <> -1) THEN
8194: rlm_core_sv.dlog(k_DEBUG,'v_consume_quantity',
8195: v_consume_quantity);
8196: END IF;
8197: --
8198: ELSE
8199: --
8200: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8201: --
8202: IF (l_debug <> -1) THEN
8203: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of qty', v_qty);
8204: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of line',v_line_id);
8205: END IF;
8206: --
8207: v_consume_line_tab(j).quantity := v_qty;
8200: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8201: --
8202: IF (l_debug <> -1) THEN
8203: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of qty', v_qty);
8204: rlm_core_sv.dlog(k_DEBUG,'partial consumtion of line',v_line_id);
8205: END IF;
8206: --
8207: v_consume_line_tab(j).quantity := v_qty;
8208: v_consume_line_tab(j).line_id := v_line_id;
8210: --
8211: END IF;
8212: --
8213: IF (l_debug <> -1) THEN
8214: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).line_id',
8215: v_consume_line_tab(j).line_id);
8216: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).quantity',
8217: v_consume_line_tab(j).quantity);
8218: END IF;
8212: --
8213: IF (l_debug <> -1) THEN
8214: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).line_id',
8215: v_consume_line_tab(j).line_id);
8216: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(j).quantity',
8217: v_consume_line_tab(j).quantity);
8218: END IF;
8219: --
8220: ELSE
8223: has been partially consumed in which case we need to consume
8224: the remaining qty */
8225: --
8226: IF (l_debug <> -1) THEN
8227: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8228: v_consume_line_tab(v_Index).line_id);
8229: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8230: v_consume_line_tab(v_Index).quantity);
8231: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8225: --
8226: IF (l_debug <> -1) THEN
8227: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8228: v_consume_line_tab(v_Index).line_id);
8229: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8230: v_consume_line_tab(v_Index).quantity);
8231: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8232: END IF;
8233: --
8227: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).line_id',
8228: v_consume_line_tab(v_Index).line_id);
8229: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Index).quantity',
8230: v_consume_line_tab(v_Index).quantity);
8231: rlm_core_sv.dlog(k_DEBUG,'quantity for current line v_qty',v_qty);
8232: END IF;
8233: --
8234: IF v_consume_line_tab(v_Index).quantity <> v_qty THEN
8235: --
8237: we need to take into account only the difference between the
8238: two quantities */
8239: --
8240: IF (l_debug <> -1) THEN
8241: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line', v_line_id);
8242: END IF;
8243: --
8244: v_qty := v_qty - v_consume_line_tab(v_Index).quantity;
8245: --
8243: --
8244: v_qty := v_qty - v_consume_line_tab(v_Index).quantity;
8245: --
8246: IF (l_debug <> -1) THEN
8247: rlm_core_sv.dlog(k_DEBUG,'v_qty',v_qty);
8248: END IF;
8249: --
8250: IF c_OldDemand_rec.ordered_quantity >
8251: (v_consume_quantity + v_qty) THEN
8250: IF c_OldDemand_rec.ordered_quantity >
8251: (v_consume_quantity + v_qty) THEN
8252: --
8253: IF (l_debug <> -1) THEN
8254: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8255: completely', v_line_id);
8256: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8257: completely qty ', v_qty);
8258: END IF;
8252: --
8253: IF (l_debug <> -1) THEN
8254: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8255: completely', v_line_id);
8256: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8257: completely qty ', v_qty);
8258: END IF;
8259: --
8260: v_consume_line_tab(v_index).quantity :=
8265: --
8266: v_qty := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8267: --
8268: IF (l_debug <> -1) THEN
8269: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8270: again partially',v_line_id);
8271: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8272: again partially qty ', v_qty);
8273: END IF;
8267: --
8268: IF (l_debug <> -1) THEN
8269: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8270: again partially',v_line_id);
8271: rlm_core_sv.dlog(k_DEBUG,'Consuming partially consumed line
8272: again partially qty ', v_qty);
8273: END IF;
8274: --
8275: v_consume_line_tab(v_index).quantity :=
8284: --
8285: END LOOP;
8286: --
8287: IF (l_debug <> -1) THEN
8288: rlm_core_sv.dlog(k_DEBUG,'Total quantity to be consumed ',
8289: v_consume_quantity);
8290: END IF;
8291: --
8292: IF c_consume_ref%ROWCOUNT = 0 THEN
8294: -- If the rowcount is = 0 means that there are no lines to be consumed
8295: -- so the old line needs to be deleted
8296: --
8297: IF (l_debug <> -1) THEN
8298: rlm_core_sv.dlog(k_DEBUG,'in rowcount = 0');
8299: rlm_core_sv.dlog(k_DEBUG,'No lines came into the
8300: schedule to be consumed so keep line as it is');
8301: END IF;
8302: --
8295: -- so the old line needs to be deleted
8296: --
8297: IF (l_debug <> -1) THEN
8298: rlm_core_sv.dlog(k_DEBUG,'in rowcount = 0');
8299: rlm_core_sv.dlog(k_DEBUG,'No lines came into the
8300: schedule to be consumed so keep line as it is');
8301: END IF;
8302: --
8303: ELSIF v_consume_quantity > 0 THEN
8304: --
8305: v_Key_rec.oe_line_id := c_OldDemand_rec.line_id;
8306: --
8307: IF (l_debug <> -1) THEN
8308: rlm_core_sv.dlog(k_DEBUG,'oe_line_id',v_Key_rec.oe_line_id);
8309: END IF;
8310: --
8311: AssignOEAttribValues(v_Key_rec, c_OldDemand_rec);
8312: --
8314: --
8315: v_quantity := c_OldDemand_rec.ordered_quantity - v_consume_quantity;
8316: --
8317: IF (l_debug <> -1) THEN
8318: rlm_core_sv.dlog(k_DEBUG,'v_quantity',v_quantity);
8319: END IF;
8320: --
8321: IF v_quantity = 0 THEN
8322: --
8332: IsFrozen(TRUNC(SYSDATE), x_Group_rec, v_Key_rec.req_rec.request_date))
8333: AND NOT ProcessConstraint(v_Key_rec,v_Qty_rec,k_UPDATE,v_Quantity) THEN
8334: --
8335: IF (l_debug <> -1) THEN
8336: rlm_core_sv.dlog(k_DEBUG,'v_quantity',v_quantity);
8337: END IF;
8338: --
8339: --global_atp
8340: UpdateRequirement(x_Sched_rec, x_Group_rec, v_Key_rec,
8367: v_consume_line_tab(v_Count).line_id := v_Newref_line_id;
8368: v_consume_line_tab(v_Count).quantity := c_OldDemand_rec.ordered_quantity;
8369: --
8370: IF (l_debug <> -1) THEN
8371: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8372: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8373: v_consume_line_tab(v_Count).line_id);
8374: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8375: v_consume_line_tab(v_Count).quantity);
8368: v_consume_line_tab(v_Count).quantity := c_OldDemand_rec.ordered_quantity;
8369: --
8370: IF (l_debug <> -1) THEN
8371: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8372: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8373: v_consume_line_tab(v_Count).line_id);
8374: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8375: v_consume_line_tab(v_Count).quantity);
8376: END IF;
8370: IF (l_debug <> -1) THEN
8371: rlm_core_sv.dlog(k_DEBUG,'new line addede to the consume tab');
8372: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).line_id',
8373: v_consume_line_tab(v_Count).line_id);
8374: rlm_core_sv.dlog(k_DEBUG,'v_consume_line_tab(v_Count).quantity',
8375: v_consume_line_tab(v_Count).quantity);
8376: END IF;
8377: --
8378: END IF;
8387: FROM oe_order_lines
8388: WHERE line_id = c_OldDemand_rec.line_id;
8389: --
8390: IF (l_debug <> -1) THEN
8391: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8392: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8393: c_OldDemand_rec.rla_schedule_type_code);
8394: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8395: x_Sched_rec.schedule_type);
8388: WHERE line_id = c_OldDemand_rec.line_id;
8389: --
8390: IF (l_debug <> -1) THEN
8391: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8392: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8393: c_OldDemand_rec.rla_schedule_type_code);
8394: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8395: x_Sched_rec.schedule_type);
8396: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8390: IF (l_debug <> -1) THEN
8391: rlm_core_sv.dlog(k_DEBUG,'line_id', c_OldDemand_rec.line_id);
8392: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8393: c_OldDemand_rec.rla_schedule_type_code);
8394: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8395: x_Sched_rec.schedule_type);
8396: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8397: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8398: END IF;
8392: rlm_core_sv.dlog(k_DEBUG,'rla_schedule_type_code',
8393: c_OldDemand_rec.rla_schedule_type_code);
8394: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8395: x_Sched_rec.schedule_type);
8396: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8397: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8398: END IF;
8399: --
8400: rlm_message_sv.app_error(
8393: c_OldDemand_rec.rla_schedule_type_code);
8394: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8395: x_Sched_rec.schedule_type);
8396: rlm_core_sv.dlog(k_DEBUG,'line_number', v_line_num);
8397: rlm_core_sv.dlog(k_DEBUG,'RLM_WRONG_SCHEDTYPE');
8398: END IF;
8399: --
8400: rlm_message_sv.app_error(
8401: x_ExceptionLevel => rlm_message_sv.k_warn_level,
8418: END LOOP;
8419: CLOSE c_OldDemand; --bug 4570658
8420: --
8421: IF (l_debug <> -1) THEN
8422: rlm_core_sv.dpop(k_SDEBUG);
8423: END IF;
8424: --
8425: EXCEPTION
8426:
8426:
8427: WHEN e_group_error THEN
8428: --
8429: IF (l_debug <> -1) THEN
8430: rlm_core_sv.dlog(k_DEBUG,'group error');
8431: rlm_core_sv.dpop(k_SDEBUG);
8432: END IF;
8433: --
8434: raise e_group_error;
8427: WHEN e_group_error THEN
8428: --
8429: IF (l_debug <> -1) THEN
8430: rlm_core_sv.dlog(k_DEBUG,'group error');
8431: rlm_core_sv.dpop(k_SDEBUG);
8432: END IF;
8433: --
8434: raise e_group_error;
8435:
8436: WHEN OTHERS THEN
8437: rlm_message_sv.sql_error('rlm_rd_sv.ProcessOld',x_progress);
8438: --
8439: IF (l_debug <> -1) THEN
8440: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8441: END IF;
8442: --
8443: raise;
8444:
8461:
8462: BEGIN
8463: --
8464: IF (l_debug <> -1) THEN
8465: rlm_core_sv.dpush(k_SDEBUG,'FetchReq');
8466: END IF;
8467: --
8468: FETCH x_Req_Ref INTO
8469: x_oe_line_id,
8554: x_Key_rec.req_rec.blanket_number;
8555:
8556: --
8557: IF (l_debug <> -1) THEN
8558: rlm_core_sv.dlog(k_DEBUG, 'after fetch');
8559: END IF;
8560: --
8561: IF x_Req_ref%NOTFOUND THEN
8562: --
8560: --
8561: IF x_Req_ref%NOTFOUND THEN
8562: --
8563: IF (l_debug <> -1) THEN
8564: rlm_core_sv.dpop(k_SDEBUG, 'false');
8565: END IF;
8566: --
8567: RETURN(FALSE);
8568: --
8568: --
8569: ELSE
8570: --
8571: IF (l_debug <> -1) THEN
8572: rlm_core_sv.dpop(k_SDEBUG, 'true');
8573: END IF;
8574: --
8575: RETURN(TRUE);
8576: --
8580: WHEN OTHERS THEN
8581: rlm_message_sv.sql_error('rlm_rd_sv.FetchReq',x_progress);
8582: --
8583: IF (l_debug <> -1) THEN
8584: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8585: END IF;
8586: --
8587: raise;
8588:
8602:
8603: BEGIN
8604: --
8605: IF (l_debug <> -1) THEN
8606: rlm_core_sv.dpush(k_SDEBUG,'FetchDemand');
8607: END IF;
8608: --
8609: FETCH x_Demand_ref INTO
8610: x_Key_rec.dem_rec.line_id,
8688: --
8689: IF x_Demand_ref%NOTFOUND THEN
8690: --
8691: IF (l_debug <> -1) THEN
8692: rlm_core_sv.dpop(k_SDEBUG, 'false');
8693: END IF;
8694: --
8695: RETURN(FALSE);
8696: --
8696: --
8697: ELSE
8698: --
8699: IF (l_debug <> -1) THEN
8700: rlm_core_sv.dpop(k_SDEBUG, 'true');
8701: END IF;
8702: --
8703: RETURN(TRUE);
8704: --
8708: WHEN OTHERS THEN
8709: rlm_message_sv.sql_error('rlm_rd_sv.FetchDemand',x_progress);
8710: --
8711: IF (l_debug <> -1) THEN
8712: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8713: END IF;
8714: --
8715: raise;
8716:
8731: x_progress VARCHAR2(3) := '010';
8732: BEGIN
8733: --
8734: IF (l_debug <> -1) THEN
8735: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8732: BEGIN
8733: --
8734: IF (l_debug <> -1) THEN
8735: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8740: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8733: --
8734: IF (l_debug <> -1) THEN
8735: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8740: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8741: END IF;
8734: IF (l_debug <> -1) THEN
8735: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8740: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8741: END IF;
8742: --
8735: rlm_core_sv.dpush(k_SDEBUG,'SchedulePrecedence');
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8740: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8741: END IF;
8742: --
8743: -- If the given schedule line is less in hierarchy than the oe line
8736: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleType', x_ScheduleType);
8737: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_one', x_group_rec.schedule_type_one);
8738: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_two', x_group_rec.schedule_type_two);
8739: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.schedule_type_three', x_group_rec.schedule_type_three);
8740: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.schedule_type', x_sched_rec.schedule_type);
8741: END IF;
8742: --
8743: -- If the given schedule line is less in hierarchy than the oe line
8744: -- schedule line then return false else return true
8752: INTO v_cannot_replace
8753: FROM dual;
8754: --
8755: IF (l_debug <> -1) THEN
8756: rlm_core_sv.dlog(k_DEBUG,'v_cannot_replace', v_cannot_replace);
8757: END IF;
8758: --
8759: IF v_cannot_replace <= 0 THEN
8760: --
8758: --
8759: IF v_cannot_replace <= 0 THEN
8760: --
8761: IF (l_debug <> -1) THEN
8762: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
8763: END IF;
8764: --
8765: RETURN TRUE;
8766: --
8766: --
8767: ELSE
8768: --
8769: IF (l_debug <> -1) THEN
8770: rlm_core_sv.dpop(k_SDEBUG, 'false');
8771: END IF;
8772: --
8773: RETURN FALSE;
8774: --
8778: WHEN OTHERS THEN
8779: rlm_message_sv.sql_error('rlm_rd_sv.SchedulePrecedence',x_progress);
8780: --
8781: IF (l_debug <> -1) THEN
8782: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8783: END IF;
8784: --
8785: raise;
8786:
8798: x_progress VARCHAR2(3) := '010';
8799: BEGIN
8800: --
8801: IF (l_debug <> -1) THEN
8802: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8799: BEGIN
8800: --
8801: IF (l_debug <> -1) THEN
8802: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8800: --
8801: IF (l_debug <> -1) THEN
8802: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8801: IF (l_debug <> -1) THEN
8802: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8802: rlm_core_sv.dpush(k_SDEBUG,'CountMatchedDemand');
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8810: x_Key_rec.req_rec.item_detail_subtype);
8803: rlm_core_sv.dlog(k_DEBUG, 'Matched Demand Counter', x_DemandCount);
8804: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', x_rlm_line_id);
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8810: x_Key_rec.req_rec.item_detail_subtype);
8811: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8805: rlm_core_sv.dlog(k_DEBUG, 'OM Line Id', x_oe_line_id);
8806: rlm_core_sv.dlog(k_DEBUG, 'x_SumOrderedQtyTmp', x_SumOrderedQtyTmp);
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8810: x_Key_rec.req_rec.item_detail_subtype);
8811: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8812: x_Key_rec.req_rec.invoice_to_org_id);
8813: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8807: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_type',
8808: x_Sched_rec.schedule_type);
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8810: x_Key_rec.req_rec.item_detail_subtype);
8811: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8812: x_Key_rec.req_rec.invoice_to_org_id);
8813: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8814: x_Key_rec.req_rec.ship_to_org_id);
8815: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8809: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.item_detail_subtype',
8810: x_Key_rec.req_rec.item_detail_subtype);
8811: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8812: x_Key_rec.req_rec.invoice_to_org_id);
8813: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8814: x_Key_rec.req_rec.ship_to_org_id);
8815: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8816: x_key_rec.req_rec.intmed_ship_to_org_id);
8817: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8811: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.invoice_to_org_id',
8812: x_Key_rec.req_rec.invoice_to_org_id);
8813: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8814: x_Key_rec.req_rec.ship_to_org_id);
8815: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8816: x_key_rec.req_rec.intmed_ship_to_org_id);
8817: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8818: x_key_rec.req_rec.cust_production_line);
8819: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8813: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.ship_to_org_id',
8814: x_Key_rec.req_rec.ship_to_org_id);
8815: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8816: x_key_rec.req_rec.intmed_ship_to_org_id);
8817: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8818: x_key_rec.req_rec.cust_production_line);
8819: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8820: x_key_rec.req_rec.cust_production_seq_num);
8821: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8815: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.intmed_ship_to_org_id',
8816: x_key_rec.req_rec.intmed_ship_to_org_id);
8817: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8818: x_key_rec.req_rec.cust_production_line);
8819: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8820: x_key_rec.req_rec.cust_production_seq_num);
8821: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8822: x_key_rec.req_rec.primary_quantity);
8823: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8817: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8818: x_key_rec.req_rec.cust_production_line);
8819: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8820: x_key_rec.req_rec.cust_production_seq_num);
8821: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8822: x_key_rec.req_rec.primary_quantity);
8823: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8824: x_key_rec.req_rec.cust_production_line);
8825: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8819: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_seq_num',
8820: x_key_rec.req_rec.cust_production_seq_num);
8821: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8822: x_key_rec.req_rec.primary_quantity);
8823: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8824: x_key_rec.req_rec.cust_production_line);
8825: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8826: x_key_rec.req_rec.primary_quantity);
8827: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8821: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8822: x_key_rec.req_rec.primary_quantity);
8823: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8824: x_key_rec.req_rec.cust_production_line);
8825: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8826: x_key_rec.req_rec.primary_quantity);
8827: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8828: x_key_rec.req_rec.customer_item_revision);
8829: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8823: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_production_line',
8824: x_key_rec.req_rec.cust_production_line);
8825: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8826: x_key_rec.req_rec.primary_quantity);
8827: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8828: x_key_rec.req_rec.customer_item_revision);
8829: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8830: x_key_rec.req_rec.customer_job);
8831: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8825: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8826: x_key_rec.req_rec.primary_quantity);
8827: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8828: x_key_rec.req_rec.customer_item_revision);
8829: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8830: x_key_rec.req_rec.customer_job);
8831: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8832: x_key_rec.req_rec.cust_po_number);
8833: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
8827: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_item_revision',
8828: x_key_rec.req_rec.customer_item_revision);
8829: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8830: x_key_rec.req_rec.customer_job);
8831: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8832: x_key_rec.req_rec.cust_po_number);
8833: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
8834: x_key_rec.req_rec.customer_dock_code);
8835: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
8829: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_job',
8830: x_key_rec.req_rec.customer_job);
8831: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8832: x_key_rec.req_rec.cust_po_number);
8833: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
8834: x_key_rec.req_rec.customer_dock_code);
8835: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
8836: x_key_rec.req_rec.cust_model_serial_number);
8837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
8831: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_po_number',
8832: x_key_rec.req_rec.cust_po_number);
8833: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
8834: x_key_rec.req_rec.customer_dock_code);
8835: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
8836: x_key_rec.req_rec.cust_model_serial_number);
8837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
8838: x_key_rec.req_rec.request_date);
8839: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
8833: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.customer_dock_code',
8834: x_key_rec.req_rec.customer_dock_code);
8835: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
8836: x_key_rec.req_rec.cust_model_serial_number);
8837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
8838: x_key_rec.req_rec.request_date);
8839: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
8840: x_key_rec.req_rec.schedule_date);
8841: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
8835: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.cust_model_serial_number',
8836: x_key_rec.req_rec.cust_model_serial_number);
8837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
8838: x_key_rec.req_rec.request_date);
8839: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
8840: x_key_rec.req_rec.schedule_date);
8841: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
8842: x_Sched_rec.schedule_purpose);
8843: END IF;
8837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.request_date',
8838: x_key_rec.req_rec.request_date);
8839: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.schedule_date',
8840: x_key_rec.req_rec.schedule_date);
8841: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.schedule_purpose',
8842: x_Sched_rec.schedule_purpose);
8843: END IF;
8844: --
8845: x_SumOrderedQty := x_SumOrderedQty + x_SumOrderedQtyTmp;
8846: --
8847: x_DemandCount := x_DemandCount + 1;
8848: --
8849: IF (l_debug <> -1) THEN
8850: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
8851: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
8852: rlm_core_sv.dpop(k_SDEBUG);
8853: END IF;
8854: --
8847: x_DemandCount := x_DemandCount + 1;
8848: --
8849: IF (l_debug <> -1) THEN
8850: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
8851: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
8852: rlm_core_sv.dpop(k_SDEBUG);
8853: END IF;
8854: --
8855: EXCEPTION
8848: --
8849: IF (l_debug <> -1) THEN
8850: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
8851: rlm_core_sv.dlog(k_DEBUG,'x_DemandCount',x_DemandCount);
8852: rlm_core_sv.dpop(k_SDEBUG);
8853: END IF;
8854: --
8855: EXCEPTION
8856:
8856:
8857: WHEN e_group_error THEN
8858: --
8859: IF (l_debug <> -1) THEN
8860: rlm_core_sv.dlog(k_DEBUG,'group error');
8861: rlm_core_sv.dpop(k_SDEBUG);
8862: END IF;
8863: --
8864: raise e_group_error;
8857: WHEN e_group_error THEN
8858: --
8859: IF (l_debug <> -1) THEN
8860: rlm_core_sv.dlog(k_DEBUG,'group error');
8861: rlm_core_sv.dpop(k_SDEBUG);
8862: END IF;
8863: --
8864: raise e_group_error;
8865:
8866: WHEN OTHERS THEN
8867: rlm_message_sv.sql_error('rlm_rd_sv.CountMatchedDemand',x_progress);
8868: --
8869: IF (l_debug <> -1) THEN
8870: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8871: END IF;
8872: --
8873: raise;
8874:
8886: x_progress VARCHAR2(3) := '010';
8887: BEGIN
8888: --
8889: IF (l_debug <> -1) THEN
8890: rlm_core_sv.dpush(k_SDEBUG, 'ReconcileAction');
8891: END IF;
8892: --
8893: IF (x_DemandCount > 0) AND (NOT AlreadyUpdated(x_line_id_tab)) THEN
8894: --
8894: --
8895: IF x_Sched_rec.schedule_purpose IN (k_DELETE, k_CANCEL) THEN
8896: --
8897: IF (l_debug <> -1) THEN
8898: rlm_core_sv.dlog(k_DEBUG,'Deleting requirement due to purpose code of '
8899: ,x_Sched_rec.schedule_purpose);
8900: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8901: x_key_rec.req_rec.primary_quantity);
8902: END IF;
8896: --
8897: IF (l_debug <> -1) THEN
8898: rlm_core_sv.dlog(k_DEBUG,'Deleting requirement due to purpose code of '
8899: ,x_Sched_rec.schedule_purpose);
8900: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8901: x_key_rec.req_rec.primary_quantity);
8902: END IF;
8903: --
8904: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty -
8904: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty -
8905: x_key_rec.req_rec.primary_quantity;
8906: --
8907: IF (l_debug <> -1) THEN
8908: rlm_core_sv.dlog(k_DEBUG,'new x_key_rec.req_rec.primary_quantity',
8909: x_key_rec.req_rec.primary_quantity);
8910: END IF;
8911: --
8912: ELSIF x_Sched_rec.schedule_purpose = k_ADD THEN
8911: --
8912: ELSIF x_Sched_rec.schedule_purpose = k_ADD THEN
8913: --
8914: IF (l_debug <> -1) THEN
8915: rlm_core_sv.dlog(k_DEBUG,'Adding requirement due to purpose code of ',
8916: x_Sched_rec.schedule_purpose);
8917: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8918: x_key_rec.req_rec.primary_quantity);
8919: END IF;
8913: --
8914: IF (l_debug <> -1) THEN
8915: rlm_core_sv.dlog(k_DEBUG,'Adding requirement due to purpose code of ',
8916: x_Sched_rec.schedule_purpose);
8917: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
8918: x_key_rec.req_rec.primary_quantity);
8919: END IF;
8920: --
8921: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty +
8921: x_key_rec.req_rec.primary_quantity := x_SumOrderedQty +
8922: x_key_rec.req_rec.primary_quantity;
8923: --
8924: IF (l_debug <> -1) THEN
8925: rlm_core_sv.dlog(k_DEBUG,'new x_key_rec.req_rec.primary_quantity',
8926: x_key_rec.req_rec.primary_quantity);
8927: END IF;
8928: --
8929: END IF;
8935: -- only insert the new requirement
8936: ELSIF x_Sched_rec.schedule_purpose NOT IN (k_DELETE,k_CANCEL) THEN
8937: --
8938: IF (l_debug <> -1) THEN
8939: rlm_core_sv.dlog(k_DEBUG,'insert x_key_rec.req_rec.primary_quantity',
8940: x_key_rec.req_rec.primary_quantity);
8941: END IF;
8942: --
8943: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
8946: --
8947: END IF;
8948: --
8949: IF (l_debug <> -1) THEN
8950: rlm_core_sv.dpop(k_SDEBUG);
8951: END IF;
8952: --
8953: EXCEPTION
8954:
8954:
8955: WHEN e_group_error THEN
8956: --
8957: IF (l_debug <> -1) THEN
8958: rlm_core_sv.dlog(k_DEBUG,'group error');
8959: rlm_core_sv.dpop(k_SDEBUG);
8960: END IF;
8961: --
8962: raise e_group_error;
8955: WHEN e_group_error THEN
8956: --
8957: IF (l_debug <> -1) THEN
8958: rlm_core_sv.dlog(k_DEBUG,'group error');
8959: rlm_core_sv.dpop(k_SDEBUG);
8960: END IF;
8961: --
8962: raise e_group_error;
8963:
8964: WHEN OTHERS THEN
8965: rlm_message_sv.sql_error('rlm_rd_sv.ReconcileAction',x_progress);
8966: --
8967: IF (l_debug <> -1) THEN
8968: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
8969: END IF;
8970: --
8971: raise;
8972:
9020: --
9021: BEGIN
9022: --
9023: IF (l_debug <> -1) THEN
9024: rlm_core_sv.dpush(k_SDEBUG, 'BuildMatchQuery');
9025: rlm_core_sv.dlog(k_DEBUG, 'Disposition Code', x_Group_rec.disposition_code);
9026: END IF;
9027:
9028: v_select_clause :=
9021: BEGIN
9022: --
9023: IF (l_debug <> -1) THEN
9024: rlm_core_sv.dpush(k_SDEBUG, 'BuildMatchQuery');
9025: rlm_core_sv.dlog(k_DEBUG, 'Disposition Code', x_Group_rec.disposition_code);
9026: END IF;
9027:
9028: v_select_clause :=
9029:
9107: ' AND o.inventory_item_id = r.inventory_item_id ' ||
9108: ' AND o.inventory_item_id = :inventory_item_id '||
9109: ' AND r.inventory_item_id = :inventory_item_id ' ||
9110: ' AND o.demand_bucket_type_code = r.item_detail_subtype ' ||
9111: ' AND r.process_status IN ('||rlm_core_sv.k_PS_AVAILABLE||','||rlm_core_sv.k_PS_FROZEN_FIRM||')';
9112: --
9113: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Group_rec.order_header_id;
9114: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Group_rec.order_header_id;
9115: g_WhereTab1(g_WhereTab1.COUNT+1) := x_Sched_rec.header_id;
9820: ' AND r1.industry_attribute15 = :industry_attribute15' ||
9821: ' AND r1.ship_to_org_id = :ship_to_org_id' ||
9822: ' AND r1.customer_item_id = :customer_item_id' ||
9823: ' AND r1.inventory_item_id = :inventory_item_id' ||
9824: ' AND r1.process_status IN ('||rlm_core_sv.k_PS_AVAILABLE||','||rlm_core_sv.k_PS_FROZEN_FIRM||')';
9825: --
9826: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Group_rec.order_header_id;
9827: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Sched_rec.header_id;
9828: g_NewDemandTab(g_NewDemandTab.COUNT+1) := x_Group_rec.ship_from_org_id;
9872: --
9873: ELSIF x_Group_rec.disposition_code = k_CANCEL_AFTER_N_DAYS THEN
9874: --
9875: v_Date := SYSDATE - nvl(x_Group_rec.cutoff_days, 0);
9876: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.cutoff_days', x_Group_rec.cutoff_days);
9877: rlm_core_sv.dlog(k_DEBUG, 'v_Date', v_Date);
9878: --
9879: 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'') ';
9880: --
9873: ELSIF x_Group_rec.disposition_code = k_CANCEL_AFTER_N_DAYS THEN
9874: --
9875: v_Date := SYSDATE - nvl(x_Group_rec.cutoff_days, 0);
9876: rlm_core_sv.dlog(k_DEBUG, 'x_Group_rec.cutoff_days', x_Group_rec.cutoff_days);
9877: rlm_core_sv.dlog(k_DEBUG, 'v_Date', v_Date);
9878: --
9879: 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'') ';
9880: --
9881: g_WhereTab1(g_WhereTab1.COUNT+1):= TO_CHAR(TRUNC(v_Date),'RRRR/MM/DD HH24:MI:SS');
9980: v_where_clause2 ||
9981: ' GROUP BY r.line_id ORDER BY line_id';
9982:
9983: IF (l_debug <> -1) THEN
9984: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9981: ' GROUP BY r.line_id ORDER BY line_id';
9982:
9983: IF (l_debug <> -1) THEN
9984: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9982:
9983: IF (l_debug <> -1) THEN
9984: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9983: IF (l_debug <> -1) THEN
9984: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9984: rlm_core_sv.dlog(k_DEBUG, 'v_select_clause', v_select_clause);
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9985: rlm_core_sv.dlog(k_DEBUG, 'v_ATSWhere', v_ATSWhere);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9986: rlm_core_sv.dlog(k_DEBUG, 'v_NATSWhere', v_NATSWhere);
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9987: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1', substr(v_where_clause1, 1, 800));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9988: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 800, 1600));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9989: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause1 Contd.', substr(v_where_clause1, 1600, 2400));
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9990: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2', substr(v_where_clause2, 1, 800));
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9991: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 800, 1600));
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
9992: rlm_core_sv.dlog(k_DEBUG, 'v_where_clause2 Contd.', substr(v_where_clause2, 1600, 2400));
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10000: rlm_core_sv.dpop(k_SDEBUG);
9993: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause1', w_select_clause1);
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10000: rlm_core_sv.dpop(k_SDEBUG);
10001: END IF;
9994: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2', substr(w_select_clause2, 1, 800));
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10000: rlm_core_sv.dpop(k_SDEBUG);
10001: END IF;
10002: --
9995: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 800, 1600));
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10000: rlm_core_sv.dpop(k_SDEBUG);
10001: END IF;
10002: --
10003:
9996: rlm_core_sv.dlog(k_DEBUG, 'w_select_clause2 Contd.', substr(w_select_clause2, 1600, 2400));
9997: rlm_core_sv.dlog(k_DEBUG, 'w_where_clause1', w_where_clause1);
9998: rlm_core_sv.dlog(k_DEBUG, 'x_Sum_Sql', x_Sum_Sql);
9999: rlm_core_sv.dlog(k_DEBUG, 'v_order_clause', v_order_clause);
10000: rlm_core_sv.dpop(k_SDEBUG);
10001: END IF;
10002: --
10003:
10004: EXCEPTION
10005:
10006: WHEN OTHERS THEN
10007: rlm_message_sv.sql_error('rlm_rd_sv.BuildMatchQuery',x_progress);
10008: IF (l_debug <> -1) THEN
10009: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10010: END IF;
10011: RAISE;
10012:
10013: END;
10056: --
10057: BEGIN
10058: --
10059: IF (l_debug <> -1) THEN
10060: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10057: BEGIN
10058: --
10059: IF (l_debug <> -1) THEN
10060: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10058: --
10059: IF (l_debug <> -1) THEN
10060: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10066: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10059: IF (l_debug <> -1) THEN
10060: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10066: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10067: END IF;
10060: rlm_core_sv.dpush(k_SDEBUG,'ProcessATS');
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10066: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10067: END IF;
10068:
10061: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10066: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10067: END IF;
10068:
10069: IF(UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis) IN ('SHIPPED_LINES', 'PART_SHIP_LINES' )) THEN
10062: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10063: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10064: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10065: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10066: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10067: END IF;
10068:
10069: IF(UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis) IN ('SHIPPED_LINES', 'PART_SHIP_LINES' )) THEN
10070: --
10085: AND sl.qty_type_code = rlm_manage_demand_sv.k_ACTUAL
10086: AND il.org_id = sl.org_id;
10087: --
10088: IF (l_debug <> -1) THEN
10089: rlm_core_sv.dlog(k_DEBUG,'number of lines with qty_type_code ACTUAL: ',v_ActualCount);
10090: END IF;
10091: --
10092: IF (v_ActualCount > 0 ) THEN
10093: --
10100: AND Ship_from_org_id=x_group_rec.ship_from_org_id
10101: AND Ship_to_address_id=x_group_rec.ship_to_address_id;
10102:
10103: IF (l_debug <> -1) THEN
10104: rlm_core_sv.dlog(k_DEBUG, 'v_min_request_date', v_min_horizon_date);
10105: END IF;
10106: --
10107: IF TO_DATE(v_min_horizon_date,'RRRR/MM/DD HH24:MI:SS') > x_Sched_rec.sched_horizon_start_date THEN
10108: --
10110: --
10111: END IF;
10112: --
10113: IF (l_debug <> -1) THEN
10114: rlm_core_sv.dlog(k_DEBUG, 'v_min_horizon_date', v_min_horizon_date);
10115: END IF;
10116: END IF;
10117: END IF;
10118: --
10135: --
10136: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10137: --
10138: IF (l_debug <> -1) THEN
10139: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10140: END IF;
10141: --
10142: RLM_CORE_SV.OpenDynamicCursor(c_NATS, v_NatsDemand, g_BindVarTab);
10143: --
10138: IF (l_debug <> -1) THEN
10139: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10140: END IF;
10141: --
10142: RLM_CORE_SV.OpenDynamicCursor(c_NATS, v_NatsDemand, g_BindVarTab);
10143: --
10144: WHILE FetchReq(c_NATS,
10145: v_Key_rec,
10146: v_line_id_tmp,
10152: EXIT WHEN c_NATS%NOTFOUND;
10153: --
10154: IF (l_debug <> -1) THEN
10155: --
10156: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10153: --
10154: IF (l_debug <> -1) THEN
10155: --
10156: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10154: IF (l_debug <> -1) THEN
10155: --
10156: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10155: --
10156: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10156: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10157: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10158: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10159: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10160: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10161: 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);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10162: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10170: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10163: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10170: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10171: --
10164: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10170: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10171: --
10172: END IF;
10165: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10170: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10171: --
10172: END IF;
10173:
10166: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10167: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10168: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10169: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10170: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10171: --
10172: END IF;
10173:
10174: IF x_Sched_rec.schedule_purpose NOT IN (k_DELETE, k_CANCEL, k_ADD) THEN
10175: --
10176: v_Key_rec.oe_line_id := v_line_id_tmp;
10177: --
10178: IF (l_debug <> -1) THEN
10179: rlm_core_sv.dlog(k_DEBUG, 'OM NATS Line Id', v_line_id_tmp);
10180: END IF;
10181: --
10182: GetDemand(v_Key_rec, x_Group_rec);
10183: --
10198: --
10199: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10200: --
10201: IF (l_debug <> -1) THEN
10202: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10203: END IF;
10204: --
10205: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10206: --
10201: IF (l_debug <> -1) THEN
10202: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10203: END IF;
10204: --
10205: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10206: --
10207: FETCH c_Sum INTO v_LowestLineId,
10208: v_SumOrderedQtyTmp,
10209: v_DemandCount,
10214: v_LineMatch(0).match_count := v_DemandCount;
10215: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10216: --
10217: IF (l_debug <> -1) THEN
10218: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10219: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10220: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10221: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10222: END IF;
10215: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10216: --
10217: IF (l_debug <> -1) THEN
10218: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10219: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10220: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10221: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10222: END IF;
10223: --
10216: --
10217: IF (l_debug <> -1) THEN
10218: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10219: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10220: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10221: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10222: END IF;
10223: --
10224: LOOP
10217: IF (l_debug <> -1) THEN
10218: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10219: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10220: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10221: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10222: END IF;
10223: --
10224: LOOP
10225: FETCH c_Sum INTO v_LineId,
10230: v_LineMatch(v_LineId-v_LowestLineId).sum_qty := v_SumOrderedQtyTmp;
10231: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10232: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10235: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10236: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10237: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10238: END IF;
10231: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10232: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10235: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10236: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10237: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10238: END IF;
10239: END LOOP;
10232: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10235: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10236: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10237: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10238: END IF;
10239: END LOOP;
10240: --
10233: IF (l_debug <> -1) THEN
10234: rlm_core_sv.dlog(k_DEBUG,'For RLM Line Id', v_LineId);
10235: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10236: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10237: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10238: END IF;
10239: END LOOP;
10240: --
10241: END IF;
10241: END IF;
10242: CLOSE c_Sum;
10243: --
10244: IF (l_debug <> -1) THEN
10245: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10246: END IF;
10247: --
10248: IF v_LineMatch.COUNT > 0 THEN
10249: --
10251: --
10252: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10253: --
10254: IF (l_debug <> -1) THEN
10255: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10256: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10257: END IF;
10258: --
10259: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10252: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10253: --
10254: IF (l_debug <> -1) THEN
10255: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10256: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10257: END IF;
10258: --
10259: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10260: --
10255: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10256: rlm_core_sv.dlog(k_DEBUG,'Opening for v_AtsDemand');
10257: END IF;
10258: --
10259: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_ATSDemand, g_BindVarTab);
10260: --
10261: ELSE
10262: --
10263: -- (4) Find all ATS demand that did not match with lines in OM
10264: --
10265: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10266: --
10267: IF (l_debug <> -1) THEN
10268: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10269: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10270: END IF;
10271: --
10272: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10265: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10266: --
10267: IF (l_debug <> -1) THEN
10268: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10269: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10270: END IF;
10271: --
10272: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10273: --
10268: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10269: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10270: END IF;
10271: --
10272: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10273: --
10274: END IF;
10275: --
10276: WHILE FetchReq(c_Matched,
10283: EXIT WHEN c_Matched%NOTFOUND;
10284: --
10285: IF (l_debug <> -1) THEN
10286: --
10287: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10284: --
10285: IF (l_debug <> -1) THEN
10286: --
10287: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10285: IF (l_debug <> -1) THEN
10286: --
10287: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10286: --
10287: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10287: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10288: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10289: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10290: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10291: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10292: 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);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10293: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10301: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10294: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10301: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10302: --
10295: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10301: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10302: --
10303: END IF;
10296: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10301: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10302: --
10303: END IF;
10304: --
10297: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10298: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10299: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10300: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10301: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10302: --
10303: END IF;
10304: --
10305: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6131516
10304: --
10305: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6131516
10306: -- start of bug fix 4223359
10307: --
10308: IF (v_key_rec.req_rec.process_status <> rlm_core_sv.k_PS_FROZEN_FIRM) THEN
10309: --
10310: FrozenFenceWarning(x_sched_rec, x_group_rec);
10311: --
10312: END IF;
10344: --
10345: v_NewCount := v_NewCount +1;
10346: --
10347: IF (l_debug <> -1) THEN
10348: rlm_core_sv.dlog(k_DEBUG,'v_NewCount', v_NewCount);
10349: END IF;
10350: --
10351: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
10352: v_Key_rec, k_RECONCILE,
10356: -- When there is a MATCH
10357: ELSE
10358:
10359: IF (l_debug <> -1) THEN
10360: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', v_Key_rec.req_rec.line_id);
10361: END IF;
10362: --
10363: IF v_line_id_tmp = v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).lowest_oelineid THEN
10364: --
10394: FROM oe_order_lines ol
10395: WHERE ol.line_id = v_line_id_tmp);
10396: --
10397: IF (l_debug <> -1) THEN
10398: rlm_core_sv.dlog(k_DEBUG,' Total Order Quantity', v_total_ordered_qty);
10399: rlm_core_sv.dlog(k_DEBUG,' Partial Shipped Quantity' , v_total_partial_shipped_qty);
10400: END IF;
10401: --
10402: EXCEPTION
10395: WHERE ol.line_id = v_line_id_tmp);
10396: --
10397: IF (l_debug <> -1) THEN
10398: rlm_core_sv.dlog(k_DEBUG,' Total Order Quantity', v_total_ordered_qty);
10399: rlm_core_sv.dlog(k_DEBUG,' Partial Shipped Quantity' , v_total_partial_shipped_qty);
10400: END IF;
10401: --
10402: EXCEPTION
10403: WHEN OTHERS THEN
10402: EXCEPTION
10403: WHEN OTHERS THEN
10404: --
10405: IF (l_debug <> -1) THEN
10406: rlm_core_sv.dlog(k_DEBUG,'When Other Exception PART_SHIP_LINES',substr(sqlerrm,1,200));
10407: END IF;
10408: --
10409: END;
10410:
10418: v_check_partial_flag := 'Y';
10419: END IF;
10420: --
10421: IF (l_debug <> -1) THEN
10422: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10423: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10424: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10425: END IF;
10426: --
10419: END IF;
10420: --
10421: IF (l_debug <> -1) THEN
10422: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10423: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10424: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10425: END IF;
10426: --
10427: ELSE
10420: --
10421: IF (l_debug <> -1) THEN
10422: rlm_core_sv.dlog(k_DEBUG,'Intransit Qty ',v_InTransitQty);
10423: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity ',v_Key_rec.req_rec.primary_quantity );
10424: rlm_core_sv.dlog(k_DEBUG,'v_check_partial_flag ',v_check_partial_flag );
10425: END IF;
10426: --
10427: ELSE
10428: --
10460: CLOSE c_Matched;
10461: --
10462: g_sch_line_qty :=0; --Bugfix 6159269
10463: IF (l_debug <> -1) THEN
10464: rlm_core_sv.dpop(k_SDEBUG);
10465: END IF;
10466: --
10467: EXCEPTION
10468:
10468:
10469: WHEN e_group_error THEN
10470: --
10471: IF (l_debug <> -1) THEN
10472: rlm_core_sv.dlog(k_DEBUG,'group error');
10473: rlm_core_sv.dpop(k_SDEBUG);
10474: END IF;
10475: --
10476: raise e_group_error;
10469: WHEN e_group_error THEN
10470: --
10471: IF (l_debug <> -1) THEN
10472: rlm_core_sv.dlog(k_DEBUG,'group error');
10473: rlm_core_sv.dpop(k_SDEBUG);
10474: END IF;
10475: --
10476: raise e_group_error;
10477:
10478: WHEN OTHERS THEN
10479: rlm_message_sv.sql_error('rlm_rd_sv.ProcessATS',x_progress);
10480: --
10481: IF (l_debug <> -1) THEN
10482: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10483: END IF;
10484: --
10485: raise;
10486:
10523: --
10524: BEGIN
10525: --
10526: IF (l_debug <> -1) THEN
10527: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10524: BEGIN
10525: --
10526: IF (l_debug <> -1) THEN
10527: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10525: --
10526: IF (l_debug <> -1) THEN
10527: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10533: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10526: IF (l_debug <> -1) THEN
10527: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10533: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10534: END IF;
10527: rlm_core_sv.dpush(k_SDEBUG,'ProcessNATS');
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10533: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10534: END IF;
10535: --
10528: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.header_id', x_Sched_rec.header_id);
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10533: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10534: END IF;
10535: --
10536: -- Delete all the bind variable tables
10529: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id', x_Group_rec.ship_from_org_id);
10530: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
10531: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
10532: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
10533: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.industry_attribute15', x_Group_rec.industry_attribute15);
10534: END IF;
10535: --
10536: -- Delete all the bind variable tables
10537: --
10552: --
10553: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10554: --
10555: IF (l_debug <> -1) THEN
10556: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10557: END IF;
10558: --
10559: RLM_CORE_SV.OpenDynamicCursor(c_ATS, v_ATSDemand, g_BindVarTab);
10560: --
10555: IF (l_debug <> -1) THEN
10556: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_ATSDemand cursor', g_BindVarTab.COUNT);
10557: END IF;
10558: --
10559: RLM_CORE_SV.OpenDynamicCursor(c_ATS, v_ATSDemand, g_BindVarTab);
10560: --
10561: WHILE FetchReq(c_ATS,
10562: v_Key_rec,
10563: v_line_id_tmp,
10568: EXIT WHEN c_ATS%NOTFOUND;
10569: --
10570: IF (l_debug <> -1) THEN
10571: --
10572: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10569: --
10570: IF (l_debug <> -1) THEN
10571: --
10572: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10570: IF (l_debug <> -1) THEN
10571: --
10572: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10571: --
10572: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10572: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10573: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10574: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10575: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10576: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10577: 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);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10578: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10586: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10579: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10586: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10587: --
10580: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10586: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10587: --
10588: END IF;
10581: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10586: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10587: --
10588: END IF;
10589:
10582: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10583: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10584: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10585: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10586: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10587: --
10588: END IF;
10589:
10590: IF x_Sched_rec.schedule_purpose NOT IN (k_DELETE, k_CANCEL, k_ADD) THEN
10591: --
10592: v_Key_rec.oe_line_id := v_line_id_tmp;
10593: --
10594: IF (l_debug <> -1) THEN
10595: rlm_core_sv.dlog(k_DEBUG, 'OM NATS Line Id', v_line_id_tmp);
10596: END IF;
10597: --
10598: GetDemand(v_Key_rec, x_Group_rec);
10599: --
10615: --
10616: g_BindVarTab := BuildBindVarTab2(g_WhereTab1, g_WhereTab2);
10617: --
10618: IF (l_debug <> -1) THEN
10619: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10620: END IF;
10621: --
10622: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10623: --
10618: IF (l_debug <> -1) THEN
10619: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_SumDemand cursor', g_BindVarTab.COUNT);
10620: END IF;
10621: --
10622: RLM_CORE_SV.OpenDynamicCursor(c_Sum, v_SumDemand, g_BindVarTab);
10623: --
10624: FETCH c_Sum INTO v_LowestLineId,
10625: v_SumOrderedQtyTmp,
10626: v_DemandCount,
10632: v_LineMatch(0).match_count := v_DemandCount;
10633: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10634: --
10635: IF (l_debug <> -1) THEN
10636: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10637: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10638: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10639: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10640: END IF;
10633: v_LineMatch(0).lowest_oelineid := v_LowestOeLineId;
10634: --
10635: IF (l_debug <> -1) THEN
10636: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10637: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10638: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10639: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10640: END IF;
10641: --
10634: --
10635: IF (l_debug <> -1) THEN
10636: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10637: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10638: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10639: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10640: END IF;
10641: --
10642: LOOP
10635: IF (l_debug <> -1) THEN
10636: rlm_core_sv.dlog(k_DEBUG,'v_LowestLineId', v_LowestLineId);
10637: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10638: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10639: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10640: END IF;
10641: --
10642: LOOP
10643: FETCH c_Sum INTO v_LineId,
10649: v_LineMatch(v_LineId-v_LowestLineId).match_count := v_DemandCount;
10650: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10651: --
10652: IF (l_debug <> -1) THEN
10653: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10654: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10655: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10656: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10657: END IF;
10650: v_LineMatch(v_LineId-v_LowestLineId).lowest_oelineid := v_LowestOeLineId;
10651: --
10652: IF (l_debug <> -1) THEN
10653: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10654: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10655: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10656: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10657: END IF;
10658: --
10651: --
10652: IF (l_debug <> -1) THEN
10653: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10654: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10655: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10656: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10657: END IF;
10658: --
10659: END LOOP;
10652: IF (l_debug <> -1) THEN
10653: rlm_core_sv.dlog(k_DEBUG,'RLM Line Id', v_LineId);
10654: rlm_core_sv.dlog(k_DEBUG,'Total matching order qty', v_SumOrderedQtyTmp);
10655: rlm_core_sv.dlog(k_DEBUG,'Number of matching lines', v_DemandCount);
10656: rlm_core_sv.dlog(k_DEBUG,'Min matching oe line id', v_LowestOeLineId);
10657: END IF;
10658: --
10659: END LOOP;
10660: --
10667: --
10668: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10669: --
10670: IF (l_debug <> -1) THEN
10671: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10672: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10673: END IF;
10674: --
10675: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10668: g_BindVarTab := BuildBindVarTab5(g_WhereTab1, g_WhereTab2, g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10669: --
10670: IF (l_debug <> -1) THEN
10671: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10672: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10673: END IF;
10674: --
10675: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10676: --
10671: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NATS cursor', g_BindVarTab.COUNT);
10672: rlm_core_sv.dlog(k_DEBUG, 'Opening for v_NATSDemand');
10673: END IF;
10674: --
10675: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NatsDemand, g_BindVarTab);
10676: --
10677: ELSE
10678: --
10679: -- (4) Find all NATS demand that did not match in OM
10680: --
10681: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10682: --
10683: IF (l_debug <> -1) THEN
10684: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10685: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10686: END IF;
10687: --
10688: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10681: g_BindVarTab := BuildBindVarTab3(g_NewDemandTab, g_WhereTab1, g_WhereTab2);
10682: --
10683: IF (l_debug <> -1) THEN
10684: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10685: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10686: END IF;
10687: --
10688: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10689: --
10684: rlm_core_sv.dlog(k_DEBUG, 'No. of bind variables for v_NewDemand cursor', g_BindVarTab.COUNT);
10685: rlm_core_sv.dlog(k_DEBUG,'Opening for v_NewDemand');
10686: END IF;
10687: --
10688: RLM_CORE_SV.OpenDynamicCursor(c_Matched, v_NewDemand, g_BindVarTab);
10689: --
10690: END IF;
10691: --
10692: WHILE FetchReq(c_Matched,
10699: EXIT WHEN c_Matched%NOTFOUND;
10700: --
10701: IF (l_debug <> -1) THEN
10702: --
10703: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10700: --
10701: IF (l_debug <> -1) THEN
10702: --
10703: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10701: IF (l_debug <> -1) THEN
10702: --
10703: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10702: --
10703: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10703: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_start_date', x_sched_rec.sched_horizon_start_date);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10704: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.sched_horizon_end_date', x_sched_rec.sched_horizon_end_date);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10705: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.request_date', v_Key_rec.req_rec.request_date);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10706: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.primary_quantity', v_Key_rec.req_rec.primary_quantity);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10707: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_type', v_Key_rec.req_rec.item_detail_type);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10708: 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);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10709: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_production_line', v_Key_rec.req_rec.cust_production_line);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10717: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10710: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_dock_code', v_Key_rec.req_rec.customer_dock_code);
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10717: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10718: --
10711: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_po_number', v_Key_rec.req_rec.cust_po_number);
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10717: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10718: --
10719: END IF;
10712: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_item_revision', v_Key_rec.req_rec.customer_item_revision);
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10717: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10718: --
10719: END IF;
10720: --
10713: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.customer_job', v_Key_rec.req_rec.customer_job);
10714: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.cust_model_serial_number', v_Key_rec.req_rec.cust_model_serial_number);
10715: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.item_detail_subtype', v_Key_rec.req_rec.item_detail_subtype);
10716: rlm_core_sv.dlog(k_DEBUG,'v_Key_rec.req_rec.blanket_number', v_Key_rec.req_rec.blanket_number);
10717: rlm_core_sv.dlog(k_DEBUG,'v_line_id_tmp', v_line_id_tmp);
10718: --
10719: END IF;
10720: --
10721: g_sch_line_qty := v_Key_rec.req_rec.primary_quantity; --Bugfix 6159269
10726: --
10727: v_NewCount := v_NewCount +1;
10728: --
10729: IF (l_debug <> -1) THEN
10730: rlm_core_sv.dlog(k_DEBUG,'v_NewCount', v_NewCount);
10731: END IF;
10732: --
10733: RLM_TPA_SV.InsertRequirement(x_Sched_rec, x_Group_rec,
10734: v_Key_rec, k_RECONCILE,
10738: -- When there is a MATCH
10739: ELSE
10740: --
10741: IF (l_debug <> -1) THEN
10742: rlm_core_sv.dlog(k_DEBUG, 'RLM Line Id', v_Key_rec.req_rec.line_id);
10743: END IF;
10744: --
10745: IF v_line_id_tmp = v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).lowest_oelineid THEN
10746: v_DemandCount := v_LineMatch(v_Key_rec.req_rec.line_id-v_LowestLineId).match_count;
10766: --
10767: g_sch_line_qty :=0; --Bugfix 6159269
10768: --
10769: IF (l_debug <> -1) THEN
10770: rlm_core_sv.dpop(k_SDEBUG);
10771: END IF;
10772: --
10773: EXCEPTION
10774:
10774:
10775: WHEN e_group_error THEN
10776: --
10777: IF (l_debug <> -1) THEN
10778: rlm_core_sv.dlog(k_DEBUG,'group error');
10779: rlm_core_sv.dpop(k_SDEBUG);
10780: END IF;
10781: --
10782: raise e_group_error;
10775: WHEN e_group_error THEN
10776: --
10777: IF (l_debug <> -1) THEN
10778: rlm_core_sv.dlog(k_DEBUG,'group error');
10779: rlm_core_sv.dpop(k_SDEBUG);
10780: END IF;
10781: --
10782: raise e_group_error;
10783:
10784: WHEN OTHERS THEN
10785: rlm_message_sv.sql_error('rlm_rd_sv.ProcessNATS',x_progress);
10786: --
10787: IF (l_debug <> -1) THEN
10788: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10789: END IF;
10790: --
10791: raise;
10792:
10813:
10814: BEGIN
10815: --
10816: IF (l_debug <> -1) THEN
10817: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10818: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10819: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10820: END IF;
10821: --
10814: BEGIN
10815: --
10816: IF (l_debug <> -1) THEN
10817: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10818: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10819: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10820: END IF;
10821: --
10822: RLM_TPA_SV.ReconcileShipments(x_Group_rec,
10815: --
10816: IF (l_debug <> -1) THEN
10817: rlm_core_sv.dpush(k_SDEBUG,'UpdateDemand');
10818: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty', x_SumOrderedQty);
10819: rlm_core_sv.dlog(k_DEBUG,'x_DemandType', x_DemandType);
10820: END IF;
10821: --
10822: RLM_TPA_SV.ReconcileShipments(x_Group_rec,
10823: x_Key_rec,
10833: v_Demand_ref,
10834: x_DemandType);
10835: --
10836: IF (l_debug <> -1) THEN
10837: rlm_core_sv.dlog(k_DEBUG,'x_key_rec.req_rec.primary_quantity',
10838: x_key_rec.req_rec.primary_quantity);
10839: END IF;
10840: --
10841: CheckTolerance(x_Sched_rec,
10878: END IF;
10879: CLOSE v_Demand_ref;
10880: --
10881: IF (l_debug <> -1) THEN
10882: rlm_core_sv.dpop(k_SDEBUG);
10883: END IF;
10884: --
10885: EXCEPTION
10886: WHEN OTHERS THEN
10886: WHEN OTHERS THEN
10887: rlm_message_sv.sql_error('rlm_rd_sv.UpdateDemand',x_progress);
10888: --
10889: IF (l_debug <> -1) THEN
10890: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10891: END IF;
10892: --
10893: raise;
10894:
10911:
10912: BEGIN
10913: --
10914: IF (l_debug <> -1) THEN
10915: rlm_core_sv.dpush(k_SDEBUG,'DeleteDemand');
10916: END IF;
10917: --
10918: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
10919: --
10929: --
10930: g_del_reconcile := 'N'; --Bugfix 6131516
10931: --
10932: IF (l_debug <> -1) THEN
10933: rlm_core_sv.dpop(k_SDEBUG);
10934: END IF;
10935: --
10936: EXCEPTION
10937:
10937:
10938: WHEN e_group_error THEN
10939: --
10940: IF (l_debug <> -1) THEN
10941: rlm_core_sv.dlog(k_DEBUG,'group error');
10942: rlm_core_sv.dpop(k_SDEBUG);
10943: END IF;
10944: --
10945: raise e_group_error;
10938: WHEN e_group_error THEN
10939: --
10940: IF (l_debug <> -1) THEN
10941: rlm_core_sv.dlog(k_DEBUG,'group error');
10942: rlm_core_sv.dpop(k_SDEBUG);
10943: END IF;
10944: --
10945: raise e_group_error;
10946:
10947: WHEN OTHERS THEN
10948: rlm_message_sv.sql_error('rlm_rd_sv.DeleteDemand',x_progress);
10949: --
10950: IF (l_debug <> -1) THEN
10951: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
10952: END IF;
10953: --
10954: raise;
10955:
10977: --
10978: BEGIN
10979: --
10980: IF (l_debug <> -1) THEN
10981: rlm_core_sv.dpush(k_SDEBUG,'IncreaseDemand');
10982: END IF;
10983: --
10984: v_QtyDelta := x_Key_rec.req_rec.primary_quantity - x_SumOrderedQty;
10985: --
10983: --
10984: v_QtyDelta := x_Key_rec.req_rec.primary_quantity - x_SumOrderedQty;
10985: --
10986: IF (l_debug <> -1) THEN
10987: rlm_core_sv.dlog(k_DEBUG,'v_QtyDelta',v_QtyDelta);
10988: END IF;
10989: --
10990: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
10991: --
10991: --
10992: IF SchedulePrecedence(x_Group_rec, x_sched_rec,x_Key_rec.dem_rec.schedule_type) THEN
10993: --
10994: IF (l_debug <> -1) THEN
10995: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
10996: x_Key_rec.dem_rec.ordered_quantity);
10997: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
10998: x_Key_rec.dem_rec.line_id);
10999: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
10993: --
10994: IF (l_debug <> -1) THEN
10995: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
10996: x_Key_rec.dem_rec.ordered_quantity);
10997: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
10998: x_Key_rec.dem_rec.line_id);
10999: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
11000: END IF;
11001: --
10995: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',
10996: x_Key_rec.dem_rec.ordered_quantity);
10997: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.line_id',
10998: x_Key_rec.dem_rec.line_id);
10999: rlm_core_sv.dlog(k_DEBUG,'New Schedule of higher Precedence -- TRUE');
11000: END IF;
11001: --
11002: IsSchedulePrecedence := TRUE;
11003: --
11031: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11032: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11033: x_OrderLineId => x_key_rec.dem_rec.line_id,
11034: x_Token1 => 'LINE',
11035: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11036: x_Token2 => 'ORDER',
11037: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11038: x_Token3 => 'QUANTITY',
11039: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11033: x_OrderLineId => x_key_rec.dem_rec.line_id,
11034: x_Token1 => 'LINE',
11035: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11036: x_Token2 => 'ORDER',
11037: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11038: x_Token3 => 'QUANTITY',
11039: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11040: x_Token4 => 'CUSTITEM',
11041: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11037: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11038: x_Token3 => 'QUANTITY',
11039: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11040: x_Token4 => 'CUSTITEM',
11041: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11042: x_Token5 => 'REQ_DATE',
11043: x_value5 => x_key_rec.dem_rec.request_date,
11044: x_Token6 => 'SCH_LINE_QTY',
11045: x_value6 => g_sch_line_qty,
11050: x_Token8 => 'MATCH_ATTR',
11051: x_value8 => v_MatchAttrTxt);
11052: --
11053: IF (l_debug <> -1) THEN
11054: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11055: x_key_rec.req_rec.line_id);
11056: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11057: x_key_rec.req_rec.line_id);
11058: END IF;
11052: --
11053: IF (l_debug <> -1) THEN
11054: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11055: x_key_rec.req_rec.line_id);
11056: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11057: x_key_rec.req_rec.line_id);
11058: END IF;
11059: --
11060: ELSE
11068: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11069: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11070: x_OrderLineId => x_key_rec.dem_rec.line_id,
11071: x_Token1 => 'LINE',
11072: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11073: x_Token2 => 'ORDER',
11074: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11075: x_Token3 => 'QUANTITY',
11076: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11070: x_OrderLineId => x_key_rec.dem_rec.line_id,
11071: x_Token1 => 'LINE',
11072: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11073: x_Token2 => 'ORDER',
11074: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11075: x_Token3 => 'QUANTITY',
11076: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11077: x_Token4 => 'CUSTITEM',
11078: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11074: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11075: x_Token3 => 'QUANTITY',
11076: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11077: x_Token4 => 'CUSTITEM',
11078: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11079: x_Token5 => 'REQ_DATE',
11080: x_value5 => x_key_rec.dem_rec.request_date,
11081: x_Token6 => 'SCH_LINE_QTY',
11082: x_value6 => g_sch_line_qty,
11083: x_Token7 => 'MATCH_ATTR',
11084: x_value7 => v_MatchAttrTxt);
11085: --
11086: IF (l_debug <> -1) THEN
11087: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11088: x_key_rec.req_rec.line_id);
11089: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11090: x_key_rec.req_rec.line_id);
11091: END IF;
11085: --
11086: IF (l_debug <> -1) THEN
11087: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11088: x_key_rec.req_rec.line_id);
11089: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11090: x_key_rec.req_rec.line_id);
11091: END IF;
11092: --
11093: END IF; /* Exception */
11111: --
11112: IsSchedulePrecedence := FALSE;
11113: --
11114: IF (l_debug <> -1) THEN
11115: rlm_core_sv.dlog(k_DEBUG,'New Schedule of Lower Precedence -- FALSE');
11116: END IF;
11117: --
11118: END IF;
11119: --
11127: END IF;
11128: g_inc_exception := 'N'; --Bugfix 6159269
11129: --
11130: IF (l_debug <> -1) THEN
11131: rlm_core_sv.dpop(k_SDEBUG);
11132: END IF;
11133: --
11134: EXCEPTION
11135: WHEN OTHERS THEN
11135: WHEN OTHERS THEN
11136: rlm_message_sv.sql_error('rlm_rd_sv.IncreaseDemand',x_progress);
11137: --
11138: IF (l_debug <> -1) THEN
11139: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11140: END IF;
11141: --
11142: raise;
11143:
11164: v_MatchAttrTxt VARCHAR2(2000); --Bugfix 6159269
11165: BEGIN
11166: --
11167: IF (l_debug <> -1) THEN
11168: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11169: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11170: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11171: x_Key_rec.req_rec.primary_quantity);
11172: END IF;
11165: BEGIN
11166: --
11167: IF (l_debug <> -1) THEN
11168: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11169: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11170: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11171: x_Key_rec.req_rec.primary_quantity);
11172: END IF;
11173: --
11166: --
11167: IF (l_debug <> -1) THEN
11168: rlm_core_sv.dpush(k_SDEBUG,'DecreaseDemand');
11169: rlm_core_sv.dlog(k_DEBUG,'x_SumOrderedQty',x_SumOrderedQty);
11170: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.req_rec.primary_quantity',
11171: x_Key_rec.req_rec.primary_quantity);
11172: END IF;
11173: --
11174: v_QtyDelta := x_SumOrderedQty - x_Key_rec.req_rec.primary_quantity;
11173: --
11174: v_QtyDelta := x_SumOrderedQty - x_Key_rec.req_rec.primary_quantity;
11175: --
11176: IF (l_debug <> -1) THEN
11177: rlm_core_sv.dlog(k_DEBUG,'v_QtyDelta',v_QtyDelta);
11178: END IF;
11179: --
11180: WHILE FetchDemand(x_Demand_ref, x_Key_rec) AND v_QtyDelta >0 LOOP
11181: --
11179: --
11180: WHILE FetchDemand(x_Demand_ref, x_Key_rec) AND v_QtyDelta >0 LOOP
11181: --
11182: IF (l_debug <> -1) THEN
11183: rlm_core_sv.dlog(k_DEBUG,'x_Key_rec.dem_rec.ordered_quantity',x_Key_rec.dem_rec.ordered_quantity);
11184: END IF;
11185: --
11186: IF SchedulePrecedence(x_Group_rec, x_sched_rec,x_Key_rec.dem_rec.schedule_type) THEN
11187: --
11232: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11233: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11234: x_OrderLineId => x_key_rec.dem_rec.line_id,
11235: x_Token1 => 'LINE',
11236: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11237: x_Token2 => 'ORDER',
11238: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11239: x_Token3 => 'QUANTITY',
11240: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11234: x_OrderLineId => x_key_rec.dem_rec.line_id,
11235: x_Token1 => 'LINE',
11236: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11237: x_Token2 => 'ORDER',
11238: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11239: x_Token3 => 'QUANTITY',
11240: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11241: x_Token4 => 'CUSTITEM',
11242: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11238: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11239: x_Token3 => 'QUANTITY',
11240: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11241: x_Token4 => 'CUSTITEM',
11242: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11243: x_Token5 => 'REQ_DATE',
11244: x_value5 => x_key_rec.dem_rec.request_date,
11245: x_Token6 => 'SCH_LINE_QTY',
11246: x_value6 => g_sch_line_qty,
11251: x_Token8 => 'MATCH_ATTR',
11252: x_value8 => v_MatchAttrTxt);
11253: --
11254: IF (l_debug <> -1) THEN
11255: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11256: x_key_rec.req_rec.line_id);
11257: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11258: x_key_rec.req_rec.line_id);
11259: END IF;
11253: --
11254: IF (l_debug <> -1) THEN
11255: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11256: x_key_rec.req_rec.line_id);
11257: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11258: x_key_rec.req_rec.line_id);
11259: END IF;
11260: --
11261: ELSE
11269: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11270: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11271: x_OrderLineId => x_key_rec.dem_rec.line_id,
11272: x_Token1 => 'LINE',
11273: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11274: x_Token2 => 'ORDER',
11275: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11276: x_Token3 => 'QUANTITY',
11277: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11271: x_OrderLineId => x_key_rec.dem_rec.line_id,
11272: x_Token1 => 'LINE',
11273: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11274: x_Token2 => 'ORDER',
11275: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11276: x_Token3 => 'QUANTITY',
11277: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11278: x_Token4 => 'CUSTITEM',
11279: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11275: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11276: x_Token3 => 'QUANTITY',
11277: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11278: x_Token4 => 'CUSTITEM',
11279: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11280: x_Token5 => 'REQ_DATE',
11281: x_value5 => x_key_rec.dem_rec.request_date,
11282: x_Token6 => 'SCH_LINE_QTY',
11283: x_value6 => g_sch_line_qty,
11284: x_Token7 => 'MATCH_ATTR',
11285: x_value7 => v_MatchAttrTxt);
11286: --
11287: IF (l_debug <> -1) THEN
11288: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11289: x_key_rec.req_rec.line_id);
11290: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11291: x_key_rec.req_rec.line_id);
11292: END IF;
11286: --
11287: IF (l_debug <> -1) THEN
11288: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11289: x_key_rec.req_rec.line_id);
11290: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11291: x_key_rec.req_rec.line_id);
11292: END IF;
11293: --
11294: END IF; /* Exception */
11319: v_QtyDelta);
11320: END IF;
11321: --
11322: IF (l_debug <> -1) THEN
11323: rlm_core_sv.dpop(k_SDEBUG);
11324: END IF;
11325: --
11326: EXCEPTION
11327:
11327:
11328: WHEN e_group_error THEN
11329: --
11330: IF (l_debug <> -1) THEN
11331: rlm_core_sv.dlog(k_DEBUG,'group error');
11332: rlm_core_sv.dpop(k_SDEBUG);
11333: END IF;
11334: --
11335: raise e_group_error;
11328: WHEN e_group_error THEN
11329: --
11330: IF (l_debug <> -1) THEN
11331: rlm_core_sv.dlog(k_DEBUG,'group error');
11332: rlm_core_sv.dpop(k_SDEBUG);
11333: END IF;
11334: --
11335: raise e_group_error;
11336:
11337: WHEN OTHERS THEN
11338: rlm_message_sv.sql_error('rlm_rd_sv.DecreaseDemand',x_progress);
11339: --
11340: IF (l_debug <> -1) THEN
11341: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11342: END IF;
11343: --
11344: raise;
11345:
11363: v_MatchAttrTxt VARCHAR2(2000); -- Bug 4297984
11364: BEGIN
11365: --
11366: IF (l_debug <> -1) THEN
11367: rlm_core_sv.dpush(k_SDEBUG,'OtherDemand');
11368: END IF;
11369: --
11370: WHILE FetchDemand(x_Demand_ref, x_Key_rec) LOOP
11371: --
11378: g_Accounted_Tab(v_Index) := x_Key_rec.dem_rec;
11379: g_Accounted_Tab(v_Index).line_id := x_Key_rec.dem_rec.line_id;
11380: --
11381: IF (l_debug <> -1) THEN
11382: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.ordered_quantity',
11383: x_Key_rec.dem_rec.ordered_quantity);
11384: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.primary_quantity',
11385: x_Key_rec.req_rec.primary_quantity);
11386: END IF;
11380: --
11381: IF (l_debug <> -1) THEN
11382: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.dem_rec.ordered_quantity',
11383: x_Key_rec.dem_rec.ordered_quantity);
11384: rlm_core_sv.dlog(k_DEBUG, 'x_Key_rec.req_rec.primary_quantity',
11385: x_Key_rec.req_rec.primary_quantity);
11386: END IF;
11387:
11388: --bug2308608
11425: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
11426: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11427: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11428: x_Token1 => 'LINE',
11429: x_value1 =>rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11430: x_Token2 => 'ORDER',
11431: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11432: x_Token3 => 'QUANTITY',
11433: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11427: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11428: x_Token1 => 'LINE',
11429: x_value1 =>rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11430: x_Token2 => 'ORDER',
11431: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11432: x_Token3 => 'QUANTITY',
11433: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11434: x_Token4 => 'CUSTITEM',
11435: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11431: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11432: x_Token3 => 'QUANTITY',
11433: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11434: x_Token4 => 'CUSTITEM',
11435: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11436: x_Token5 => 'REQ_DATE',
11437: x_value5 => x_key_rec.dem_rec.request_date,
11438: x_Token6 => 'SEQ_INFO',
11439: x_value6 => nvl(x_key_rec.dem_rec.cust_production_seq_num,'NULL') ||'-'||
11442: x_Token7 => 'MATCH_ATTR',
11443: x_value7 => v_MatchAttrTxt);
11444: --
11445: IF (l_debug <> -1) THEN
11446: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11447: x_key_rec.req_rec.line_id);
11448: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE_SEQ',
11449: x_key_rec.req_rec.line_id);
11450: END IF;
11444: --
11445: IF (l_debug <> -1) THEN
11446: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11447: x_key_rec.req_rec.line_id);
11448: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE_SEQ',
11449: x_key_rec.req_rec.line_id);
11450: END IF;
11451: --
11452: ELSE
11460: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
11461: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11462: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11463: x_Token1 => 'LINE',
11464: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11465: x_Token2 => 'ORDER',
11466: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11467: x_Token3 => 'QUANTITY',
11468: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11462: x_OrderLineId => x_Key_rec.dem_rec.line_id,
11463: x_Token1 => 'LINE',
11464: x_value1 => rlm_core_sv.get_order_line_number(x_Key_rec.dem_rec.line_id),
11465: x_Token2 => 'ORDER',
11466: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11467: x_Token3 => 'QUANTITY',
11468: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11469: x_Token4 => 'CUSTITEM',
11470: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11466: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11467: x_Token3 => 'QUANTITY',
11468: x_value3 => x_Key_rec.dem_rec.ordered_quantity,
11469: x_Token4 => 'CUSTITEM',
11470: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11471: x_Token5 => 'REQ_DATE',
11472: x_value5 => x_key_rec.dem_rec.request_date,
11473: x_Token6 => 'MATCH_ATTR',
11474: x_value6 => v_MatchAttrTxt);
11473: x_Token6 => 'MATCH_ATTR',
11474: x_value6 => v_MatchAttrTxt);
11475: --
11476: IF (l_debug <> -1) THEN
11477: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11478: x_key_rec.req_rec.line_id);
11479: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE',
11480: x_key_rec.req_rec.line_id);
11481: END IF;
11475: --
11476: IF (l_debug <> -1) THEN
11477: rlm_core_sv.dlog(k_DEBUG,'Process Constraints on line',
11478: x_key_rec.req_rec.line_id);
11479: rlm_core_sv.dlog(k_DEBUG,'RLM_UNABLE_ATTR_UPDATE',
11480: x_key_rec.req_rec.line_id);
11481: END IF;
11482: --
11483: END IF;
11499: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11500: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11501: x_OrderLineId => x_key_rec.dem_rec.line_id,
11502: x_Token1 => 'LINE',
11503: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11504: x_Token2 => 'ORDER',
11505: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11506: x_Token3 => 'QUANTITY',
11507: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11501: x_OrderLineId => x_key_rec.dem_rec.line_id,
11502: x_Token1 => 'LINE',
11503: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11504: x_Token2 => 'ORDER',
11505: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11506: x_Token3 => 'QUANTITY',
11507: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11508: x_Token4 => 'CUSTITEM',
11509: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11505: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11506: x_Token3 => 'QUANTITY',
11507: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11508: x_Token4 => 'CUSTITEM',
11509: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11510: x_Token5 => 'REQ_DATE',
11511: x_value5 => x_key_rec.dem_rec.request_date,
11512: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
11513: x_value6 => g_sch_line_qty, --Bugfix 6159269
11518: x_Token8 => 'MATCH_ATTR',
11519: x_value8 => v_MatchAttrTxt);
11520: --
11521: IF (l_debug <> -1) THEN
11522: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11523: x_key_rec.req_rec.line_id);
11524: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11525: x_key_rec.req_rec.line_id);
11526: END IF;
11520: --
11521: IF (l_debug <> -1) THEN
11522: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11523: x_key_rec.req_rec.line_id);
11524: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE_SEQ',
11525: x_key_rec.req_rec.line_id);
11526: END IF;
11527: --
11528: ELSE
11536: x_ScheduleLineId => x_key_rec.req_rec.schedule_line_id,
11537: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
11538: x_OrderLineId => x_key_rec.dem_rec.line_id,
11539: x_Token1 => 'LINE',
11540: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11541: x_Token2 => 'ORDER',
11542: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11543: x_Token3 => 'QUANTITY',
11544: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11538: x_OrderLineId => x_key_rec.dem_rec.line_id,
11539: x_Token1 => 'LINE',
11540: x_value1 => rlm_core_sv.get_order_line_number(x_key_rec.dem_rec.line_id),
11541: x_Token2 => 'ORDER',
11542: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11543: x_Token3 => 'QUANTITY',
11544: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11545: x_Token4 => 'CUSTITEM',
11546: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11542: x_value2 => rlm_core_sv.get_order_number(x_group_rec.setup_terms_rec.header_id),
11543: x_Token3 => 'QUANTITY',
11544: x_value3 => x_key_rec.dem_rec.ordered_quantity,
11545: x_Token4 => 'CUSTITEM',
11546: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
11547: x_Token5 => 'REQ_DATE',
11548: x_value5 => x_key_rec.dem_rec.request_date,
11549: x_Token6 => 'SCH_LINE_QTY', --Bugfix 6159269
11550: x_value6 => g_sch_line_qty, --Bugfix 6159269
11551: x_Token7 => 'MATCH_ATTR',
11552: x_value7 => v_MatchAttrTxt);
11553: --
11554: IF (l_debug <> -1) THEN
11555: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11556: x_key_rec.req_rec.line_id);
11557: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11558: x_key_rec.req_rec.line_id);
11559: END IF;
11553: --
11554: IF (l_debug <> -1) THEN
11555: rlm_core_sv.dlog(k_DEBUG,'The line is within frozen fence',
11556: x_key_rec.req_rec.line_id);
11557: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_UPDATE',
11558: x_key_rec.req_rec.line_id);
11559: END IF;
11560: --
11561: END IF;
11567: --
11568: END LOOP;
11569: --
11570: IF (l_debug <> -1) THEN
11571: rlm_core_sv.dpop(k_SDEBUG);
11572: END IF;
11573: --
11574: EXCEPTION
11575: WHEN OTHERS THEN
11575: WHEN OTHERS THEN
11576: rlm_message_sv.sql_error('rlm_rd_sv.OtherDemand',x_progress);
11577: --
11578: IF (l_debug <> -1) THEN
11579: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11580: END IF;
11581: --
11582: raise;
11583:
11601:
11602: BEGIN
11603: --
11604: IF (l_debug <> -1) THEN
11605: rlm_core_sv.dpush(k_SDEBUG,'SetOperation');
11606: rlm_core_sv.dlog(k_DEBUG, 'x_Quantity',
11607: x_Quantity);
11608: END IF;
11609: --
11602: BEGIN
11603: --
11604: IF (l_debug <> -1) THEN
11605: rlm_core_sv.dpush(k_SDEBUG,'SetOperation');
11606: rlm_core_sv.dlog(k_DEBUG, 'x_Quantity',
11607: x_Quantity);
11608: END IF;
11609: --
11610: IF x_Operation = k_DELETE THEN
11617: g_Op_tab_Unschedule(v_Index).operation := OE_GLOBALS.G_OPR_DELETE;
11618: g_Op_tab_Unschedule(v_Index).ordered_quantity := x_Quantity;
11619: --
11620: IF (l_debug <> -1) THEN
11621: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11622: g_Op_tab_Unschedule(v_Index).line_id);
11623: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11624: g_Op_tab_Unschedule(v_Index).operation);
11625: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11619: --
11620: IF (l_debug <> -1) THEN
11621: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11622: g_Op_tab_Unschedule(v_Index).line_id);
11623: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11624: g_Op_tab_Unschedule(v_Index).operation);
11625: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11626: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11627: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11621: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11622: g_Op_tab_Unschedule(v_Index).line_id);
11623: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11624: g_Op_tab_Unschedule(v_Index).operation);
11625: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11626: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11627: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11628: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11629: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11623: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11624: g_Op_tab_Unschedule(v_Index).operation);
11625: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11626: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11627: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11628: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11629: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11630: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11631: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11625: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11626: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11627: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11628: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11629: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11630: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11631: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11632: g_Op_tab_Unschedule(v_Index).schedule_date);
11633: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11627: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11628: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11629: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11630: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11631: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11632: g_Op_tab_Unschedule(v_Index).schedule_date);
11633: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11634: g_Op_tab_Unschedule(v_Index).request_date);
11635: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11629: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11630: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11631: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11632: g_Op_tab_Unschedule(v_Index).schedule_date);
11633: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11634: g_Op_tab_Unschedule(v_Index).request_date);
11635: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11636: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11637: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11631: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11632: g_Op_tab_Unschedule(v_Index).schedule_date);
11633: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11634: g_Op_tab_Unschedule(v_Index).request_date);
11635: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11636: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11637: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11638: g_Op_tab_Unschedule(v_Index).UOM_code);
11639: END IF;
11633: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11634: g_Op_tab_Unschedule(v_Index).request_date);
11635: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11636: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11637: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11638: g_Op_tab_Unschedule(v_Index).UOM_code);
11639: END IF;
11640: --
11641: END IF;
11660: g_Op_tab_Unschedule(v_Index).line_id := x_Key_rec.dem_rec.line_id;
11661: g_Op_tab_Unschedule(v_Index).ordered_quantity := x_Quantity;
11662: --
11663: IF (l_debug <> -1) THEN
11664: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11665: g_Op_tab_Unschedule(v_Index).line_id);
11666: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11667: g_Op_tab_Unschedule(v_Index).operation);
11668: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11662: --
11663: IF (l_debug <> -1) THEN
11664: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11665: g_Op_tab_Unschedule(v_Index).line_id);
11666: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11667: g_Op_tab_Unschedule(v_Index).operation);
11668: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11669: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11670: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11664: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).line_id',
11665: g_Op_tab_Unschedule(v_Index).line_id);
11666: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11667: g_Op_tab_Unschedule(v_Index).operation);
11668: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11669: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11670: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11671: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11672: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11666: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).operation',
11667: g_Op_tab_Unschedule(v_Index).operation);
11668: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11669: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11670: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11671: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11672: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11673: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11674: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11668: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ship_to_org_id',
11669: g_Op_tab_Unschedule(v_Index).ship_to_org_id);
11670: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11671: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11672: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11673: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11674: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11675: g_Op_tab_Unschedule(v_Index).schedule_date);
11676: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11670: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).invoice_to_org_id',
11671: g_Op_tab_Unschedule(v_Index).invoice_to_org_id);
11672: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11673: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11674: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11675: g_Op_tab_Unschedule(v_Index).schedule_date);
11676: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11677: g_Op_tab_Unschedule(v_Index).request_date);
11678: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11672: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).inventory_item_id',
11673: g_Op_tab_Unschedule(v_Index).inventory_item_id);
11674: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11675: g_Op_tab_Unschedule(v_Index).schedule_date);
11676: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11677: g_Op_tab_Unschedule(v_Index).request_date);
11678: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11679: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11680: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11674: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).schedule_date',
11675: g_Op_tab_Unschedule(v_Index).schedule_date);
11676: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11677: g_Op_tab_Unschedule(v_Index).request_date);
11678: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11679: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11680: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11681: g_Op_tab_Unschedule(v_Index).UOM_code);
11682: END IF;
11676: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).request_date',
11677: g_Op_tab_Unschedule(v_Index).request_date);
11678: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).ordered_quantity',
11679: g_Op_tab_Unschedule(v_Index).ordered_quantity);
11680: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule(v_Index).UOM_code',
11681: g_Op_tab_Unschedule(v_Index).UOM_code);
11682: END IF;
11683: --
11684: ELSE
11689: g_Op_tab(v_Index).line_id := x_Key_rec.dem_rec.line_id;
11690: g_Op_tab(v_Index).ordered_quantity := x_Quantity;
11691: --
11692: IF (l_debug <> -1) THEN
11693: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11694: g_Op_tab(v_Index).line_id);
11695: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11696: g_Op_tab(v_Index).operation);
11697: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11691: --
11692: IF (l_debug <> -1) THEN
11693: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11694: g_Op_tab(v_Index).line_id);
11695: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11696: g_Op_tab(v_Index).operation);
11697: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11698: g_Op_tab(v_Index).ship_to_org_id);
11699: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11693: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).line_id',
11694: g_Op_tab(v_Index).line_id);
11695: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11696: g_Op_tab(v_Index).operation);
11697: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11698: g_Op_tab(v_Index).ship_to_org_id);
11699: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11700: g_Op_tab(v_Index).invoice_to_org_id);
11701: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11695: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).operation',
11696: g_Op_tab(v_Index).operation);
11697: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11698: g_Op_tab(v_Index).ship_to_org_id);
11699: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11700: g_Op_tab(v_Index).invoice_to_org_id);
11701: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11702: g_Op_tab(v_Index).inventory_item_id);
11703: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11697: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ship_to_org_id',
11698: g_Op_tab(v_Index).ship_to_org_id);
11699: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11700: g_Op_tab(v_Index).invoice_to_org_id);
11701: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11702: g_Op_tab(v_Index).inventory_item_id);
11703: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11704: g_Op_tab(v_Index).schedule_date);
11705: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11699: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).invoice_to_org_id',
11700: g_Op_tab(v_Index).invoice_to_org_id);
11701: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11702: g_Op_tab(v_Index).inventory_item_id);
11703: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11704: g_Op_tab(v_Index).schedule_date);
11705: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11706: g_Op_tab(v_Index).request_date);
11707: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11701: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).inventory_item_id',
11702: g_Op_tab(v_Index).inventory_item_id);
11703: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11704: g_Op_tab(v_Index).schedule_date);
11705: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11706: g_Op_tab(v_Index).request_date);
11707: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11708: g_Op_tab(v_Index).ordered_quantity);
11709: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11703: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).schedule_date',
11704: g_Op_tab(v_Index).schedule_date);
11705: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11706: g_Op_tab(v_Index).request_date);
11707: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11708: g_Op_tab(v_Index).ordered_quantity);
11709: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11710: g_Op_tab(v_Index).UOM_code);
11711: END IF;
11705: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).request_date',
11706: g_Op_tab(v_Index).request_date);
11707: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).ordered_quantity',
11708: g_Op_tab(v_Index).ordered_quantity);
11709: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab(v_Index).UOM_code',
11710: g_Op_tab(v_Index).UOM_code);
11711: END IF;
11712: --
11713: END IF;
11716: --
11717: END IF;
11718: --
11719: IF (l_debug <> -1) THEN
11720: rlm_core_sv.dpop(k_SDEBUG);
11721: END IF;
11722: --
11723: EXCEPTION
11724: WHEN OTHERS THEN
11724: WHEN OTHERS THEN
11725: rlm_message_sv.sql_error('rlm_rd_sv.SetOperation',x_progress);
11726: --
11727: IF (l_debug <> -1) THEN
11728: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11729: END IF;
11730: --
11731: raise;
11732:
11746: x_progress VARCHAR2(3) := '010';
11747: BEGIN
11748: --
11749: IF (l_debug <> -1) THEN
11750: rlm_core_sv.dpush(k_SDEBUG, 'IsLineConsumable');
11751: END IF;
11752: --
11753: FOR i IN 1..x_consume_tab.COUNT LOOP
11754: --
11756: --
11757: x_Index := i;
11758: --
11759: IF (l_debug <> -1) THEN
11760: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11761: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11762: rlm_core_sv.dpop(k_SDEBUG);
11763: END IF;
11764: --
11757: x_Index := i;
11758: --
11759: IF (l_debug <> -1) THEN
11760: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11761: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11762: rlm_core_sv.dpop(k_SDEBUG);
11763: END IF;
11764: --
11765: RETURN FALSE;
11758: --
11759: IF (l_debug <> -1) THEN
11760: rlm_core_sv.dlog(k_DEBUG, 'index', i);
11761: rlm_core_sv.dlog(k_DEBUG, 'returning False');
11762: rlm_core_sv.dpop(k_SDEBUG);
11763: END IF;
11764: --
11765: RETURN FALSE;
11766: --
11768: --
11769: END LOOP;
11770: --
11771: IF (l_debug <> -1) THEN
11772: rlm_core_sv.dlog(k_DEBUG, 'returning true');
11773: rlm_core_sv.dpop(k_SDEBUG);
11774: END IF;
11775: --
11776: RETURN TRUE;
11769: END LOOP;
11770: --
11771: IF (l_debug <> -1) THEN
11772: rlm_core_sv.dlog(k_DEBUG, 'returning true');
11773: rlm_core_sv.dpop(k_SDEBUG);
11774: END IF;
11775: --
11776: RETURN TRUE;
11777: --
11779: WHEN OTHERS THEN
11780: rlm_message_sv.sql_error('rlm_rd_sv.IsLineConsumable',x_progress);
11781: --
11782: IF (l_debug <> -1) THEN
11783: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11784: END IF;
11785: --
11786: raise;
11787:
11803:
11804: BEGIN
11805: --
11806: IF (l_debug <> -1) THEN
11807: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
11808: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
11809: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11804: BEGIN
11805: --
11806: IF (l_debug <> -1) THEN
11807: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
11808: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
11809: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11805: --
11806: IF (l_debug <> -1) THEN
11807: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
11808: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
11809: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11813: x_Group_rec.order_header_id);
11806: IF (l_debug <> -1) THEN
11807: rlm_core_sv.dpush(k_SDEBUG,'UpdateGroupStatus');
11808: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
11809: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11813: x_Group_rec.order_header_id);
11814: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
11808: rlm_core_sv.dlog(k_DEBUG,'UpdateGroupStatus to ', x_status);
11809: rlm_core_sv.dlog(k_DEBUG,'x_header_id ', x_header_id);
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11813: x_Group_rec.order_header_id);
11814: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
11815: x_Group_rec.ship_to_org_id);
11816: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
11810: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_from_org_id ',
11811: x_Group_rec.ship_from_org_id);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11813: x_Group_rec.order_header_id);
11814: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
11815: x_Group_rec.ship_to_org_id);
11816: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
11817: x_Group_rec.customer_item_id);
11818: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
11812: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id ',
11813: x_Group_rec.order_header_id);
11814: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
11815: x_Group_rec.ship_to_org_id);
11816: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
11817: x_Group_rec.customer_item_id);
11818: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
11819: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
11820: END IF;
11814: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id ',
11815: x_Group_rec.ship_to_org_id);
11816: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
11817: x_Group_rec.customer_item_id);
11818: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
11819: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
11820: END IF;
11821: --
11822: IF x_UpdateLevel <> 'GROUP' THEN
11815: x_Group_rec.ship_to_org_id);
11816: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id ',
11817: x_Group_rec.customer_item_id);
11818: rlm_core_sv.dlog(k_DEBUG,'x_ScheduleHeaderId ', x_ScheduleHeaderId);
11819: rlm_core_sv.dlog(k_DEBUG,'x_UpdateLevel to ', x_UpdateLevel);
11820: END IF;
11821: --
11822: IF x_UpdateLevel <> 'GROUP' THEN
11823: --
11823: --
11824: UPDATE rlm_interface_lines
11825: SET process_status = x_Status
11826: WHERE header_id = x_header_id
11827: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11828: rlm_core_sv.k_PS_FROZEN_FIRM)
11829: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11830: --
11831: UPDATE rlm_schedule_lines
11824: UPDATE rlm_interface_lines
11825: SET process_status = x_Status
11826: WHERE header_id = x_header_id
11827: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11828: rlm_core_sv.k_PS_FROZEN_FIRM)
11829: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11830: --
11831: UPDATE rlm_schedule_lines
11832: SET process_status = x_Status
11830: --
11831: UPDATE rlm_schedule_lines
11832: SET process_status = x_Status
11833: WHERE header_id = x_ScheduleHeaderid
11834: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11835: rlm_core_sv.k_PS_FROZEN_FIRM)
11836: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11837: --
11838: ELSE
11831: UPDATE rlm_schedule_lines
11832: SET process_status = x_Status
11833: WHERE header_id = x_ScheduleHeaderid
11834: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11835: rlm_core_sv.k_PS_FROZEN_FIRM)
11836: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11837: --
11838: ELSE
11839: --
11837: --
11838: ELSE
11839: --
11840: IF (l_debug <> -1) THEN
11841: rlm_core_sv.dlog(k_DEBUG,'Update Group');
11842: END IF;
11843: --
11844: UPDATE rlm_interface_lines
11845: SET process_status = x_Status
11850: AND inventory_item_id = x_Group_rec.inventory_item_id
11851: AND order_header_id = x_Group_rec.order_header_id
11852: /*AND nvl(cust_production_seq_num,k_VNULL) =
11853: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)
11854: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11855: rlm_core_sv.k_PS_FROZEN_FIRM) */
11856: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11857: --
11858: IF (l_debug <> -1) THEN
11851: AND order_header_id = x_Group_rec.order_header_id
11852: /*AND nvl(cust_production_seq_num,k_VNULL) =
11853: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)
11854: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11855: rlm_core_sv.k_PS_FROZEN_FIRM) */
11856: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11857: --
11858: IF (l_debug <> -1) THEN
11859: rlm_core_sv.dlog(k_DEBUG,'No of interface Lines Updated ', SQL%ROWCOUNT);
11855: rlm_core_sv.k_PS_FROZEN_FIRM) */
11856: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11857: --
11858: IF (l_debug <> -1) THEN
11859: rlm_core_sv.dlog(k_DEBUG,'No of interface Lines Updated ', SQL%ROWCOUNT);
11860: END IF;
11861: --
11862: UPDATE rlm_schedule_lines
11863: SET process_status = x_Status
11868: AND inventory_item_id = x_Group_rec.inventory_item_id
11869: --AND order_header_id = x_Group_rec.order_header_id
11870: /*AND nvl(cust_production_seq_num, k_VNULL) =
11871: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
11872: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11873: rlm_core_sv.k_PS_FROZEN_FIRM, rlm_core_sv.k_PS_ERROR)
11874: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11875: --
11876: END IF;
11869: --AND order_header_id = x_Group_rec.order_header_id
11870: /*AND nvl(cust_production_seq_num, k_VNULL) =
11871: nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
11872: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
11873: rlm_core_sv.k_PS_FROZEN_FIRM, rlm_core_sv.k_PS_ERROR)
11874: AND item_detail_type IN (k_PAST_DUE_FIRM, k_FIRM, k_FORECAST, k_RECT);
11875: --
11876: END IF;
11877: --
11875: --
11876: END IF;
11877: --
11878: IF (l_debug <> -1) THEN
11879: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
11880: rlm_core_sv.dpop(k_SDEBUG);
11881: END IF;
11882: --
11883: EXCEPTION
11876: END IF;
11877: --
11878: IF (l_debug <> -1) THEN
11879: rlm_core_sv.dlog(k_DEBUG,'No of Schedule Lines Updated ', SQL%ROWCOUNT);
11880: rlm_core_sv.dpop(k_SDEBUG);
11881: END IF;
11882: --
11883: EXCEPTION
11884: --
11886: --
11887: rlm_message_sv.sql_error('rlm_rd_sv.UpdateGroupStatus',x_progress);
11888: --
11889: IF (l_debug <> -1) THEN
11890: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
11891: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
11892: END IF;
11893: --
11894: RAISE ;
11887: rlm_message_sv.sql_error('rlm_rd_sv.UpdateGroupStatus',x_progress);
11888: --
11889: IF (l_debug <> -1) THEN
11890: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
11891: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
11892: END IF;
11893: --
11894: RAISE ;
11895: --
11910:
11911: BEGIN
11912: --
11913: IF (l_debug <> -1) THEN
11914: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11911: BEGIN
11912: --
11913: IF (l_debug <> -1) THEN
11914: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11919: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
11912: --
11913: IF (l_debug <> -1) THEN
11914: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11919: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
11920: END IF;
11913: IF (l_debug <> -1) THEN
11914: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11919: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
11920: END IF;
11921: --
11914: rlm_core_sv.dpush(k_SDEBUG,'IsFrozen');
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11919: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
11920: END IF;
11921: --
11922: /*
11915: rlm_core_sv.dlog(k_DEBUG,'x_ShipToId',x_group_rec.ship_to_org_id);
11916: rlm_core_sv.dlog(k_DEBUG,'x_ShipfromOrgId',x_group_rec.ship_from_org_id);
11917: rlm_core_sv.dlog(k_DEBUG,'x_horizon_start_date',x_horizon_start_date);
11918: rlm_core_sv.dlog(k_DEBUG,'x_ShipDate',x_ShipDate);
11919: rlm_core_sv.dlog(k_DEBUG,'frozen_days',x_Group_rec.frozen_days);
11920: END IF;
11921: --
11922: /*
11923: --global_atp
11923: --global_atp
11924: IF g_ATP = k_ATP THEN
11925: --
11926: IF (l_debug <> -1) THEN
11927: rlm_core_sv.dpop(k_SDEBUG,'FALSE');
11928: END IF;
11929: --
11930: RETURN FALSE;
11931: --
11938: (to_date(to_char(x_horizon_start_date,'DD-MM-YYYY'),'DD-MM-YYYY') +
11939: x_Group_rec.frozen_days )) AND x_Group_rec.frozen_days <> 0 THEN
11940: --
11941: IF (l_debug <> -1) THEN
11942: rlm_core_sv.dpop(k_SDEBUG,'TRUE');
11943: END IF;
11944: --
11945: RETURN(TRUE);
11946: --
11946: --
11947: ELSE
11948: --
11949: IF (l_debug <> -1) THEN
11950: rlm_core_sv.dpop(k_SDEBUG,'FALSE');
11951: END IF;
11952: --
11953: RETURN(FALSE);
11954: --
11960: --
11961: rlm_message_sv.sql_error('rlm_rd_sv.IsFrozen', x_progress);
11962: --
11963: IF (l_debug <> -1) THEN
11964: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
11965: END IF;
11966: --
11967: RAISE;
11968: --
11981: CURSOR c IS
11982: SELECT *
11983: FROM rlm_interface_headers
11984: WHERE header_id = x_header_id
11985: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,rlm_core_sv.k_PS_PARTIAL_PROCESSED)
11986: FOR UPDATE NOWAIT;
11987:
11988: BEGIN
11989: --
11987:
11988: BEGIN
11989: --
11990: IF (l_debug <> -1) THEN
11991: rlm_core_sv.dpush(k_SDEBUG,'LockHeaders');
11992: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_HEADERS');
11993: END IF;
11994: --
11995: OPEN c;
11988: BEGIN
11989: --
11990: IF (l_debug <> -1) THEN
11991: rlm_core_sv.dpush(k_SDEBUG,'LockHeaders');
11992: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_HEADERS');
11993: END IF;
11994: --
11995: OPEN c;
11996: --
11996: --
11997: CLOSE c;
11998: --
11999: IF (l_debug <> -1) THEN
12000: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12001: rlm_core_sv.dpop(k_SDEBUG);
12002: END IF;
12003: --
12004: RETURN TRUE;
11997: CLOSE c;
11998: --
11999: IF (l_debug <> -1) THEN
12000: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12001: rlm_core_sv.dpop(k_SDEBUG);
12002: END IF;
12003: --
12004: RETURN TRUE;
12005: --
12006: EXCEPTION
12007: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12008: --
12009: IF (l_debug <> -1) THEN
12010: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12011: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12012: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12013: END IF;
12014: --
12007: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12008: --
12009: IF (l_debug <> -1) THEN
12010: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12011: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12012: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12013: END IF;
12014: --
12015: RETURN FALSE;
12008: --
12009: IF (l_debug <> -1) THEN
12010: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12011: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12012: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12013: END IF;
12014: --
12015: RETURN FALSE;
12016: --
12017: WHEN OTHERS THEN
12018: rlm_message_sv.sql_error('rlm_rd_sv.LockHeaders',x_progress);
12019: --
12020: IF (l_debug <> -1) THEN
12021: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12022: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12023: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12024: END IF;
12025: --
12018: rlm_message_sv.sql_error('rlm_rd_sv.LockHeaders',x_progress);
12019: --
12020: IF (l_debug <> -1) THEN
12021: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12022: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12023: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12024: END IF;
12025: --
12026: RETURN FALSE;
12019: --
12020: IF (l_debug <> -1) THEN
12021: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12022: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12023: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12024: END IF;
12025: --
12026: RETURN FALSE;
12027:
12040:
12041: BEGIN
12042: --
12043: IF (l_debug <> -1) THEN
12044: rlm_core_sv.dpush(k_SDEBUG,'UpdateHeaderStatus');
12045: rlm_core_sv.dlog(k_DEBUG,'UpdateHeaderStatus to ', x_status);
12046: END IF;
12047: --
12048: UPDATE rlm_interface_headers
12041: BEGIN
12042: --
12043: IF (l_debug <> -1) THEN
12044: rlm_core_sv.dpush(k_SDEBUG,'UpdateHeaderStatus');
12045: rlm_core_sv.dlog(k_DEBUG,'UpdateHeaderStatus to ', x_status);
12046: END IF;
12047: --
12048: UPDATE rlm_interface_headers
12049: SET process_status = x_Status
12054: WHERE header_id = x_ScheduleHeaderId;
12055:
12056: --
12057: IF (l_debug <> -1) THEN
12058: rlm_core_sv.dpop(k_SDEBUG);
12059: END IF;
12060: --
12061: EXCEPTION
12062: --
12064: --
12065: rlm_message_sv.sql_error('rlm_rd_sv.UpdateHeaderStatus',x_progress);
12066: --
12067: IF (l_debug <> -1) THEN
12068: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12069: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12070: END IF;
12071: --
12072: RAISE ;
12065: rlm_message_sv.sql_error('rlm_rd_sv.UpdateHeaderStatus',x_progress);
12066: --
12067: IF (l_debug <> -1) THEN
12068: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12069: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12070: END IF;
12071: --
12072: RAISE ;
12073: --
12094: AND inventory_item_id = x_Group_rec.inventory_item_id
12095: --AND nvl(schedule_item_num,k_NNULL) = nvl(x_Group_rec.schedule_item_num, k_NNULL)
12096: AND order_header_id = x_Group_rec.order_header_id
12097: /*AND nvl(cust_production_seq_num,k_VNULL) = nvl(x_Group_rec.cust_production_seq_num, k_VNULL)*/
12098: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
12099: FOR UPDATE NOWAIT;
12100:
12101: BEGIN
12102: --
12100:
12101: BEGIN
12102: --
12103: IF (l_debug <> -1) THEN
12104: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
12105: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
12106: END IF;
12107: --
12108: OPEN c;
12101: BEGIN
12102: --
12103: IF (l_debug <> -1) THEN
12104: rlm_core_sv.dpush(k_SDEBUG,'LockLines');
12105: rlm_core_sv.dlog(k_DEBUG,'Locking RLM_INTERFACE_LINES');
12106: END IF;
12107: --
12108: OPEN c;
12109: --
12109: --
12110: CLOSE c;
12111: --
12112: IF (l_debug <> -1) THEN
12113: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12114: rlm_core_sv.dpop(k_SDEBUG);
12115: END IF;
12116: --
12117: RETURN TRUE;
12110: CLOSE c;
12111: --
12112: IF (l_debug <> -1) THEN
12113: rlm_core_sv.dlog(k_DEBUG,'Returning True ');
12114: rlm_core_sv.dpop(k_SDEBUG);
12115: END IF;
12116: --
12117: RETURN TRUE;
12118: --
12119: EXCEPTION
12120: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12121: --
12122: IF (l_debug <> -1) THEN
12123: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12124: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12125: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12126: END IF;
12127: --
12120: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
12121: --
12122: IF (l_debug <> -1) THEN
12123: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12124: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12125: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12126: END IF;
12127: --
12128: RETURN FALSE;
12121: --
12122: IF (l_debug <> -1) THEN
12123: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE');
12124: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12125: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12126: END IF;
12127: --
12128: RETURN FALSE;
12129: --
12130: WHEN OTHERS THEN
12131: rlm_message_sv.sql_error('rlm_rd_sv.LockLines',x_progress);
12132: --
12133: IF (l_debug <> -1) THEN
12134: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12135: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12136: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12137: END IF;
12138: --
12131: rlm_message_sv.sql_error('rlm_rd_sv.LockLines',x_progress);
12132: --
12133: IF (l_debug <> -1) THEN
12134: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12135: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12136: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12137: END IF;
12138: --
12139: RETURN FALSE;
12132: --
12133: IF (l_debug <> -1) THEN
12134: rlm_core_sv.dlog(k_DEBUG,'REturning FALSE OTHERS ');
12135: rlm_core_sv.dlog(k_DEBUG,'progress',x_Progress);
12136: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHER - sql error');
12137: END IF;
12138: --
12139: RETURN FALSE;
12140: --
12161: x_DemandToleranceNeg NUMBER;
12162: BEGIN
12163: --
12164: IF (l_debug <> -1) THEN
12165: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12166: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12162: BEGIN
12163: --
12164: IF (l_debug <> -1) THEN
12165: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12166: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12170: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12163: --
12164: IF (l_debug <> -1) THEN
12165: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12166: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12170: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12171: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12164: IF (l_debug <> -1) THEN
12165: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12166: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12170: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12171: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12172: x_group_rec.setup_terms_rec.demand_tolerance_below);
12165: rlm_core_sv.dpush(k_SDEBUG,'checktolerance');
12166: rlm_core_sv.dlog(k_DEBUG,'CustomerItemId',x_Group_rec.Customer_Item_Id);
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12170: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12171: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12172: x_group_rec.setup_terms_rec.demand_tolerance_below);
12173: END IF;
12167: rlm_core_sv.dlog(k_DEBUG,'x_OldQty',x_OldQty);
12168: rlm_core_sv.dlog(k_DEBUG,'x_NewQty',x_NewQty);
12169: rlm_core_sv.dlog(k_DEBUG,'x_DemandTolerancePos',
12170: x_Group_rec.setup_terms_rec.demand_tolerance_above);
12171: rlm_core_sv.dlog(k_DEBUG,'x_DemandToleranceNeg',
12172: x_group_rec.setup_terms_rec.demand_tolerance_below);
12173: END IF;
12174: --
12175: -- Verify that the quantity change falls within the defined tolerance limits
12183: v_PctDelta := ((x_NewQty - x_OldQty)/x_OldQty)*100;
12184: v_PctDelta := round(v_PctDelta,2);
12185: --
12186: IF (l_debug <> -1) THEN
12187: rlm_core_sv.dlog(k_DEBUG,'v_PctDelta',v_PctDelta);
12188: END IF;
12189: --
12190: IF (x_DemandTolerancePos < v_PctDelta) OR
12191: (x_DemandToleranceNeg < ABS(v_PctDelta)) THEN
12199: x_ScheduleLineId => x_Key_rec.req_rec.schedule_line_id,
12200: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
12201: x_OrderLineId => x_Key_rec.dem_rec.line_id,
12202: x_token1=>'CUSITEM',
12203: x_value1=>rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
12204: x_token2=>'PCT_DELTA1',
12205: x_value2=>v_PctDelta,
12206: x_token3=>'PCT_DELTA_POSITIVE',
12207: x_value3=>x_DemandTolerancePos,
12208: x_token4=>'PCT_DELTA_NEGATIVE',
12209: x_value4=>x_DemandToleranceNeg);
12210: --
12211: IF (l_debug <> -1) THEN
12212: rlm_core_sv.dlog(k_DEBUG,'WARNING:RLM_TOLERANCE_CHECK_FAILED');
12213: rlm_core_sv.dlog(k_DEBUG,'tolerance check failed');
12214: END IF;
12215: --
12216: END IF;
12209: x_value4=>x_DemandToleranceNeg);
12210: --
12211: IF (l_debug <> -1) THEN
12212: rlm_core_sv.dlog(k_DEBUG,'WARNING:RLM_TOLERANCE_CHECK_FAILED');
12213: rlm_core_sv.dlog(k_DEBUG,'tolerance check failed');
12214: END IF;
12215: --
12216: END IF;
12217: --
12217: --
12218: END IF;
12219: --
12220: IF (l_debug <> -1) THEN
12221: rlm_core_sv.dpop(k_SDEBUG);
12222: END IF;
12223: --
12224: EXCEPTION
12225: --
12227: --
12228: rlm_message_sv.sql_error('rlm_rd_sv.CheckTolerance', v_Progress);
12229: --
12230: IF (l_debug <> -1) THEN
12231: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: OTHERS - sql error');
12232: END IF;
12233: --
12234: raise;
12235: --
12248: BEGIN
12249: --
12250: IF (l_debug <> -1) THEN
12251: --{
12252: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12249: --
12250: IF (l_debug <> -1) THEN
12251: --{
12252: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12250: IF (l_debug <> -1) THEN
12251: --{
12252: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12258: --
12251: --{
12252: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12258: --
12259: IF g_Op_tab.COUNT <> 0 THEN
12252: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyUpdated');
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12258: --
12259: IF g_Op_tab.COUNT <> 0 THEN
12260: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12253: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab.COUNT', x_line_id_tab.COUNT);
12254: rlm_core_sv.dlog(k_DEBUG, 'x_line_id_tab(0)', x_line_id_tab(0));
12255: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
12256: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab_Unschedule.COUNT', g_Op_tab_Unschedule.COUNT);
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12258: --
12259: IF g_Op_tab.COUNT <> 0 THEN
12260: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12261: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab('||i||').line_id',
12257: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab.COUNT', g_Accounted_Tab.COUNT);
12258: --
12259: IF g_Op_tab.COUNT <> 0 THEN
12260: FOR i IN g_Op_Tab.FIRST..g_Op_Tab.LAST LOOP
12261: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab('||i||').line_id',
12262: g_Op_Tab(i).line_id);
12263: END LOOP;
12264: END IF;
12265: --
12264: END IF;
12265: --
12266: IF g_Op_Tab_Unschedule.COUNT <> 0 THEN
12267: FOR i IN g_Op_Tab_Unschedule.FIRST..g_Op_Tab_unschedule.LAST LOOP
12268: rlm_core_sv.dlog(k_DEBUG, 'g_Op_Tab_Unschedule('||i||').line_id',
12269: g_Op_Tab_Unschedule(i).line_id);
12270: END LOOP;
12271: END IF;
12272: --
12271: END IF;
12272: --
12273: IF g_Accounted_Tab.COUNT <> 0 THEN
12274: FOR i IN g_Accounted_Tab.FIRST..g_Accounted_Tab.LAST LOOP
12275: rlm_core_sv.dlog(k_DEBUG, 'g_Accounted_Tab('||i||').line_id',
12276: g_Accounted_Tab(i).line_id);
12277: END LOOP;
12278: END IF;
12279: --}
12281: --
12282: IF (x_line_id_tab.COUNT = 0) THEN
12283: --
12284: IF (l_debug <> -1) THEN
12285: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12286: END IF;
12287: --
12288: RETURN FALSE;
12289: --
12297: --
12298: IF x_line_id_tab(i) = g_Op_tab(j).line_id THEN
12299: --
12300: IF (l_debug <> -1) THEN
12301: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12302: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12303: END IF;
12304: --
12305: RETURN TRUE;
12298: IF x_line_id_tab(i) = g_Op_tab(j).line_id THEN
12299: --
12300: IF (l_debug <> -1) THEN
12301: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12302: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12303: END IF;
12304: --
12305: RETURN TRUE;
12306: --
12321: --
12322: IF x_line_id_tab(i) = g_Accounted_tab(j).line_id THEN
12323: --
12324: IF (l_debug <> -1) THEN
12325: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12326: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12327: END IF;
12328: --
12329: RETURN TRUE;
12322: IF x_line_id_tab(i) = g_Accounted_tab(j).line_id THEN
12323: --
12324: IF (l_debug <> -1) THEN
12325: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(i));
12326: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12327: END IF;
12328: --
12329: RETURN TRUE;
12330: --
12347: --
12348: IF x_line_id_tab(k) = g_Op_tab_Unschedule(l).line_id THEN
12349: --
12350: IF (l_debug <> -1) THEN
12351: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(k));
12352: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12353: END IF;
12354: --
12355: RETURN TRUE;
12348: IF x_line_id_tab(k) = g_Op_tab_Unschedule(l).line_id THEN
12349: --
12350: IF (l_debug <> -1) THEN
12351: rlm_core_sv.dlog(k_DEBUG, 'This line id has already been updated', x_line_id_tab(k));
12352: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
12353: END IF;
12354: --
12355: RETURN TRUE;
12356: --
12360: --
12361: END LOOP;
12362: --
12363: IF (l_debug <> -1) THEN
12364: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12365: END IF;
12366: --
12367: RETURN FALSE;
12368: --
12368: --
12369: ELSE
12370: --
12371: IF (l_debug <> -1) THEN
12372: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
12373: END IF;
12374: --
12375: RETURN FALSE;
12376: --
12380: --
12381: WHEN OTHERS THEN
12382: --
12383: IF (l_debug <> -1) THEN
12384: rlm_core_sv.dlog(k_DEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12385: rlm_core_sv.dpop(k_SDEBUG, 'When Others - FALSE');
12386: END IF;
12387: --
12388: RETURN FALSE;
12381: WHEN OTHERS THEN
12382: --
12383: IF (l_debug <> -1) THEN
12384: rlm_core_sv.dlog(k_DEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12385: rlm_core_sv.dpop(k_SDEBUG, 'When Others - FALSE');
12386: END IF;
12387: --
12388: RETURN FALSE;
12389: --
12414: BEGIN
12415: --
12416: --
12417: IF (l_debug <> -1) THEN
12418: rlm_core_sv.dpush(k_SDEBUG,'GetTPContext');
12419: END IF;
12420: --
12421: IF(x_sched_rec.header_id is not null) then
12422: --
12420: --
12421: IF(x_sched_rec.header_id is not null) then
12422: --
12423: IF (l_debug <> -1) THEN
12424: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12425: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12426: x_sched_rec.ece_tp_translator_code);
12427: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12428: x_sched_rec.ece_tp_location_code_ext);
12421: IF(x_sched_rec.header_id is not null) then
12422: --
12423: IF (l_debug <> -1) THEN
12424: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12425: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12426: x_sched_rec.ece_tp_translator_code);
12427: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12428: x_sched_rec.ece_tp_location_code_ext);
12429: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12423: IF (l_debug <> -1) THEN
12424: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_sched_rec.customer_id);
12425: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12426: x_sched_rec.ece_tp_translator_code);
12427: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12428: x_sched_rec.ece_tp_location_code_ext);
12429: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12430: x_group_rec.ship_to_address_id);
12431: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12425: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_translator_code',
12426: x_sched_rec.ece_tp_translator_code);
12427: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12428: x_sched_rec.ece_tp_location_code_ext);
12429: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12430: x_group_rec.ship_to_address_id);
12431: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12432: x_group_rec.bill_to_address_id);
12433: END IF;
12427: rlm_core_sv.dlog(k_DEBUG,'x_sched_rec.ece_tp_location_code_ext',
12428: x_sched_rec.ece_tp_location_code_ext);
12429: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.ship_to_address_id',
12430: x_group_rec.ship_to_address_id);
12431: rlm_core_sv.dlog(k_DEBUG,'x_group_rec.bill_to_address_id',
12432: x_group_rec.bill_to_address_id);
12433: END IF;
12434: --
12435: IF x_sched_rec.ECE_TP_LOCATION_CODE_EXT is NOT NULL THEN
12480: --
12481: END IF;
12482: --
12483: IF (l_debug <> -1) THEN
12484: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12485: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12486: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12487: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12488: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12481: END IF;
12482: --
12483: IF (l_debug <> -1) THEN
12484: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12485: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12486: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12487: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12488: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12489: END IF;
12482: --
12483: IF (l_debug <> -1) THEN
12484: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12485: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12486: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12487: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12488: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12489: END IF;
12490: --
12483: IF (l_debug <> -1) THEN
12484: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12485: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12486: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12487: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12488: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12489: END IF;
12490: --
12491: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12484: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12485: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12486: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12487: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12488: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12489: END IF;
12490: --
12491: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12492: --
12490: --
12491: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12492: --
12493: IF (l_debug <> -1) THEN
12494: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12495: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12496: x_key_rec.req_rec.ship_to_address_id);
12497: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12498: x_key_rec.req_rec.bill_to_address_id);
12491: ELSIF(x_key_rec.req_rec.header_id is not NULL) THEN
12492: --
12493: IF (l_debug <> -1) THEN
12494: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12495: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12496: x_key_rec.req_rec.ship_to_address_id);
12497: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12498: x_key_rec.req_rec.bill_to_address_id);
12499: END IF;
12493: IF (l_debug <> -1) THEN
12494: rlm_core_sv.dlog(k_DEBUG,'customer_id', x_key_rec.req_rec.customer_id);
12495: rlm_core_sv.dlog(k_DEBUG,'ship_to_address_id',
12496: x_key_rec.req_rec.ship_to_address_id);
12497: rlm_core_sv.dlog(k_DEBUG,'bill_to_address_id',
12498: x_key_rec.req_rec.bill_to_address_id);
12499: END IF;
12500: --
12501: SELECT ECE_TP_LOCATION_CODE_EXT, ECE_TP_TRANSLATOR_CODE
12547: --
12548: END IF;
12549: --
12550: IF (l_debug <> -1) THEN
12551: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12552: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12553: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12554: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12555: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12548: END IF;
12549: --
12550: IF (l_debug <> -1) THEN
12551: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12552: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12553: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12554: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12555: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12556: END IF;
12549: --
12550: IF (l_debug <> -1) THEN
12551: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12552: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12553: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12554: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12555: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12556: END IF;
12557: --
12550: IF (l_debug <> -1) THEN
12551: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12552: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12553: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12554: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12555: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12556: END IF;
12557: --
12558: ELSE
12551: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12552: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12553: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12554: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12555: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12556: END IF;
12557: --
12558: ELSE
12559: --
12586: --
12587: END IF;
12588: --
12589: IF (l_debug <> -1) THEN
12590: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12591: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12592: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12593: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12594: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12587: END IF;
12588: --
12589: IF (l_debug <> -1) THEN
12590: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12591: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12592: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12593: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12594: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12595: END IF;
12588: --
12589: IF (l_debug <> -1) THEN
12590: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12591: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12592: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12593: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12594: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12595: END IF;
12596: --
12589: IF (l_debug <> -1) THEN
12590: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12591: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12592: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12593: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12594: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12595: END IF;
12596: --
12597: END IF;
12590: rlm_core_sv.dlog(k_DEBUG, 'customer_number', x_customer_number);
12591: rlm_core_sv.dlog(k_DEBUG,'x_ship_to_ece_locn_code', x_ship_to_ece_locn_code);
12592: rlm_core_sv.dlog(k_DEBUG, 'x_bill_to_ece_locn_code', x_bill_to_ece_locn_code);
12593: rlm_core_sv.dlog(k_DEBUG, 'x_inter_ship_to_ece_locn_code', x_inter_ship_to_ece_locn_code);
12594: rlm_core_sv.dlog(k_DEBUG, 'x_tp_group_code',x_tp_group_code);
12595: END IF;
12596: --
12597: END IF;
12598: --
12596: --
12597: END IF;
12598: --
12599: IF (l_debug <> -1) THEN
12600: rlm_core_sv.dpop(k_SDEBUG);
12601: END IF;
12602: --
12603: EXCEPTION
12604: --
12606: --
12607: x_customer_number := NULL;
12608: --
12609: IF (l_debug <> -1) THEN
12610: rlm_core_sv.dlog(k_DEBUG, 'No data found for' , x_sched_rec.customer_id);
12611: rlm_core_sv.dpop(k_SDEBUG);
12612: END IF;
12613: --
12614: WHEN OTHERS THEN
12607: x_customer_number := NULL;
12608: --
12609: IF (l_debug <> -1) THEN
12610: rlm_core_sv.dlog(k_DEBUG, 'No data found for' , x_sched_rec.customer_id);
12611: rlm_core_sv.dpop(k_SDEBUG);
12612: END IF;
12613: --
12614: WHEN OTHERS THEN
12615: rlm_message_sv.sql_error('rlm_rd_sv.GetTPContext',v_Progress);
12614: WHEN OTHERS THEN
12615: rlm_message_sv.sql_error('rlm_rd_sv.GetTPContext',v_Progress);
12616: --
12617: IF (l_debug <> -1) THEN
12618: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
12619: END IF;
12620: --
12621: raise;
12622: --
12632: --
12633: BEGIN
12634: --
12635: IF (l_debug <> -1) THEN
12636: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12633: BEGIN
12634: --
12635: IF (l_debug <> -1) THEN
12636: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12634: --
12635: IF (l_debug <> -1) THEN
12636: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12642: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12635: IF (l_debug <> -1) THEN
12636: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12642: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12643: END IF;
12636: rlm_core_sv.dpush(k_SDEBUG, 'InitializeMatchRec');
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12642: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12643: END IF;
12644: --
12637: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_org_id', x_Group_rec.ship_to_org_id);
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12642: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12643: END IF;
12644: --
12645: OPEN x_match_ref FOR
12638: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.customer_item_id', x_Group_rec.customer_item_id);
12639: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id', x_Group_rec.inventory_item_id);
12640: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.order_header_id', x_Group_rec.order_header_id);
12641: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_start_date', x_Sched_rec.sched_horizon_start_date);
12642: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.sched_horizon_end_date', x_Sched_rec.sched_horizon_end_date);
12643: END IF;
12644: --
12645: OPEN x_match_ref FOR
12646: SELECT
12692: AND order_header_id = x_Group_rec.order_header_id
12693: AND item_detail_type IN (k_FIRM, k_FORECAST, k_PAST_DUE_FIRM);
12694: --
12695: IF (l_debug <> -1) THEN
12696: rlm_core_sv.dpop(k_SDEBUG, 'InitializeMatchRec');
12697: END IF;
12698: --
12699: EXCEPTION
12700: WHEN OTHERS THEN
12700: WHEN OTHERS THEN
12701: rlm_message_sv.sql_error('RLM_RD_SV.InitializeMatchRec', x_progress);
12702: --
12703: IF (l_debug <> -1) THEN
12704: rlm_core_sv.dpop(k_SDEBUG, 'EXCEPTION: ' || SUBSTR(SQLERRM,1,200));
12705: END IF;
12706: --
12707: RAISE e_group_error;
12708:
12717:
12718: BEGIN
12719: --
12720: IF (l_debug <> -1) THEN
12721: rlm_core_sv.dpush('FetchMatchRec');
12722: END IF;
12723: --
12724: FETCH x_match_ref INTO
12725: x_opt_match_rec.cust_production_line,
12764: --
12765: IF x_match_ref%NOTFOUND THEN
12766: --
12767: IF (l_debug <> -1) THEN
12768: rlm_core_sv.dpop(k_SDEBUG, 'false');
12769: END IF;
12770: --
12771: RETURN (FALSE);
12772: --
12772: --
12773: ELSE
12774: --
12775: IF (l_debug <> -1) THEN
12776: rlm_core_sv.dpop(k_SDEBUG, 'true');
12777: END IF;
12778: --
12779: RETURN (TRUE);
12780: --
12784: WHEN OTHERS THEN
12785: rlm_message_sv.sql_error('RLM_RD_SV.FetchMatchRec', x_progress);
12786: --
12787: IF (l_debug <> -1) THEN
12788: rlm_core_sv.dpop(k_SDEBUG, 'EXCEPTION: ' || SUBSTR(SQLERRM,1,200));
12789: END IF;
12790: --
12791: RAISE e_group_error;
12792: --
12797:
12798: BEGIN
12799: --
12800: IF (l_debug <> -1) THEN
12801: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12798: BEGIN
12799: --
12800: IF (l_debug <> -1) THEN
12801: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12799: --
12800: IF (l_debug <> -1) THEN
12801: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12800: IF (l_debug <> -1) THEN
12801: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12801: rlm_core_sv.dpush(k_SDEBUG, 'PrintMatchRec');
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12802: rlm_core_sv.dlog(k_DEBUG, 'Production Line', x_opt_match_rec.cust_production_line);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12803: rlm_core_sv.dlog(k_DEBUG, 'Customer dock code', x_opt_match_rec.customer_dock_code);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12804: rlm_core_sv.dlog(k_DEBUG, 'Cust PO Number', x_opt_match_rec.cust_po_number);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12805: rlm_core_sv.dlog(k_DEBUG, 'Customer item revision', x_opt_match_rec.customer_item_revision);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12806: rlm_core_sv.dlog(k_DEBUG, 'Customer job', x_opt_match_rec.customer_job);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12807: rlm_core_sv.dlog(k_DEBUG, 'Model serial number', x_opt_match_rec.cust_model_serial_number);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12808: rlm_core_sv.dlog(k_DEBUG, 'Prod seq num', x_opt_match_rec.cust_production_seq_num);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12809: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute1', x_opt_match_rec.industry_attribute1);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12810: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute2', x_opt_match_rec.industry_attribute1);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12811: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute4', x_opt_match_rec.industry_attribute4);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12812: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute5', x_opt_match_rec.industry_attribute5);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12813: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute6', x_opt_match_rec.industry_attribute6);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12814: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute9', x_opt_match_rec.industry_attribute9);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12815: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute10', x_opt_match_rec.industry_attribute10);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12816: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute11', x_opt_match_rec.industry_attribute11);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12817: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute12', x_opt_match_rec.industry_attribute12);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12818: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute13', x_opt_match_rec.industry_attribute13);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12819: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute14', x_opt_match_rec.industry_attribute14);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12820: rlm_core_sv.dlog(k_DEBUG, 'Industry attribute15', x_opt_match_rec.industry_attribute15);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12821: rlm_core_sv.dlog(k_DEBUG, 'Attribute1', x_opt_match_rec.attribute1);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12822: rlm_core_sv.dlog(k_DEBUG, 'Attribute2', x_opt_match_rec.attribute2);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12823: rlm_core_sv.dlog(k_DEBUG, 'Attribute3', x_opt_match_rec.attribute3);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12824: rlm_core_sv.dlog(k_DEBUG, 'Attribute4', x_opt_match_rec.attribute4);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12825: rlm_core_sv.dlog(k_DEBUG, 'Attribute5', x_opt_match_rec.attribute5);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12826: rlm_core_sv.dlog(k_DEBUG, 'Attribute6', x_opt_match_rec.attribute6);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12827: rlm_core_sv.dlog(k_DEBUG, 'Attribute7', x_opt_match_rec.attribute7);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12828: rlm_core_sv.dlog(k_DEBUG, 'Attribute8', x_opt_match_rec.attribute8);
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12836: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
12829: rlm_core_sv.dlog(k_DEBUG, 'Attribute9', x_opt_match_rec.attribute9);
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12836: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
12837: END IF;
12830: rlm_core_sv.dlog(k_DEBUG, 'Attribute10', x_opt_match_rec.attribute10);
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12836: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
12837: END IF;
12838: --
12831: rlm_core_sv.dlog(k_DEBUG, 'Attribute11', x_opt_match_rec.attribute11);
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12836: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
12837: END IF;
12838: --
12839: END PrintMatchRec;
12832: rlm_core_sv.dlog(k_DEBUG, 'Attribute12', x_opt_match_rec.attribute12);
12833: rlm_core_sv.dlog(k_DEBUG, 'Attribute13', x_opt_match_rec.attribute13);
12834: rlm_core_sv.dlog(k_DEBUG, 'Attribute14', x_opt_match_rec.attribute14);
12835: rlm_core_sv.dlog(k_DEBUG, 'Attribute15', x_opt_match_rec.attribute15);
12836: rlm_core_sv.dpop(k_SDEBUG, 'PrintMatchRec');
12837: END IF;
12838: --
12839: END PrintMatchRec;
12840:
12850: --
12851: BEGIN
12852: --
12853: IF (l_debug <> -1) THEN
12854: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyMatched');
12855: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit tab', g_IntransitTab.COUNT);
12856: END IF;
12857: --
12858: b_Match := FALSE;
12851: BEGIN
12852: --
12853: IF (l_debug <> -1) THEN
12854: rlm_core_sv.dpush(k_SDEBUG, 'AlreadyMatched');
12855: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit tab', g_IntransitTab.COUNT);
12856: END IF;
12857: --
12858: b_Match := FALSE;
12859: --
12859: --
12860: IF g_IntransitTab.COUNT = 0 THEN
12861: --
12862: IF (l_debug <> -1) THEN
12863: rlm_core_sv.dpop(k_SDEBUG, 'false');
12864: END IF;
12865: --
12866: RETURN (FALSE);
12867: --
12874: IF (x_Group_rec.match_within_rec.cust_production_line = 'Y') THEN
12875: IF NVL(g_IntransitTab(i).cust_production_line, k_VNULL) <> NVL(x_match_rec.cust_production_line, k_VNULL) THEN
12876: --
12877: IF (l_debug <> -1) THEN
12878: rlm_core_sv.dlog(k_DEBUG, 'prod line didnt match');
12879: END IF;
12880: --
12881: RAISE e_NoMatch;
12882: END IF;
12885: IF (x_Group_rec.match_within_rec.customer_dock_code = 'Y') THEN
12886: IF NVL(g_IntransitTab(i).customer_dock_code, k_VNULL) <> NVL(x_match_rec.customer_dock_code, k_VNULL) THEN
12887: --
12888: IF (l_debug <> -1) THEN
12889: rlm_core_sv.dlog(k_DEBUG, 'dock code didnt match');
12890: END IF;
12891: --
12892: RAISE e_NoMatch;
12893: --
12897: IF (x_Group_rec.match_within_rec.cust_po_number = 'Y') THEN
12898: IF NVL(g_IntransitTab(i).cust_po_number, k_VNULL) <> NVL(x_match_rec.cust_po_number, k_VNULL) THEN
12899: --
12900: IF (l_debug <> -1) THEN
12901: rlm_core_sv.dlog(k_DEBUG, 'po num didnt match');
12902: END IF;
12903: --
12904: RAISE e_NoMatch;
12905: END IF;
12908: IF (x_Group_rec.match_within_rec.customer_item_revision = 'Y') THEN
12909: IF NVL(g_IntransitTab(i).customer_item_revision, k_VNULL) <> NVL(x_match_rec.customer_item_revision, k_VNULL) THEN
12910: --
12911: IF (l_debug <> -1) THEN
12912: rlm_core_sv.dlog(k_DEBUG, 'cust item rev didnt match');
12913: END IF;
12914: --
12915: RAISE e_NoMatch;
12916: END IF;
12919: IF (x_Group_rec.match_within_rec.customer_job = 'Y') THEN
12920: IF NVL(g_IntransitTab(i).customer_job, k_VNULL) <> NVL(x_match_rec.customer_job, k_VNULL) THEN
12921: --
12922: IF (l_debug <> -1) THEN
12923: rlm_core_sv.dlog(k_DEBUG, 'customer job didnt match');
12924: END IF;
12925: --
12926: RAISE e_NoMatch;
12927: END IF;
12930: IF (x_Group_rec.match_within_rec.cust_model_serial_number = 'Y') THEN
12931: IF NVL(g_IntransitTab(i).cust_model_serial_number, k_VNULL) <> NVL(x_match_rec.cust_model_serial_number, k_VNULL) THEN
12932: --
12933: IF (l_debug <> -1) THEN
12934: rlm_core_sv.dlog(k_DEBUG, 'model serial no. didnt match');
12935: END IF;
12936: --
12937: RAISE e_NoMatch;
12938: END IF;
12941: IF (x_Group_rec.match_within_rec.cust_production_seq_num = 'Y') THEN
12942: IF NVL(g_IntransitTab(i).cust_production_seq_num, k_VNULL) <> NVL(x_match_rec.cust_production_seq_num, k_VNULL) THEN
12943: --
12944: IF (l_debug <> -1) THEN
12945: rlm_core_sv.dlog(k_DEBUG, 'PSQ num didnt match');
12946: END IF;
12947: --
12948: RAISE e_NoMatch;
12949: END IF;
12952: IF (x_Group_rec.match_within_rec.industry_attribute1 = 'Y') THEN
12953: IF NVL(g_IntransitTab(i).industry_attribute1, k_VNULL) <> NVL(x_match_rec.industry_attribute1, k_VNULL) THEN
12954: --
12955: IF (l_debug <> -1) THEN
12956: rlm_core_sv.dlog(k_DEBUG, 'IA1 num didnt match');
12957: END IF;
12958: --
12959: RAISE e_NoMatch;
12960: END IF;
12963: IF (x_Group_rec.match_within_rec.industry_attribute4 = 'Y') THEN
12964: IF NVL(g_IntransitTab(i).industry_attribute4, k_VNULL) <> NVL(x_match_rec.industry_attribute4, k_VNULL) THEN
12965: --
12966: IF (l_debug <> -1) THEN
12967: rlm_core_sv.dlog(k_DEBUG, 'IA4 num didnt match');
12968: END IF;
12969: --
12970: RAISE e_NoMatch;
12971: END IF;
12974: IF (x_Group_rec.match_within_rec.industry_attribute5 = 'Y') THEN
12975: IF NVL(g_IntransitTab(i).industry_attribute5, k_VNULL) <> NVL(x_match_rec.industry_attribute5, k_VNULL) THEN
12976: --
12977: IF (l_debug <> -1) THEN
12978: rlm_core_sv.dlog(k_DEBUG, 'IA5 num didnt match');
12979: END IF;
12980: --
12981: RAISE e_NoMatch;
12982: END IF;
12985: IF (x_Group_rec.match_within_rec.industry_attribute6 = 'Y') THEN
12986: IF NVL(g_IntransitTab(i).industry_attribute6, k_VNULL) <> NVL(x_match_rec.industry_attribute6, k_VNULL) THEN
12987: --
12988: IF (l_debug <> -1) THEN
12989: rlm_core_sv.dlog(k_DEBUG, 'IA6 num didnt match');
12990: END IF;
12991: --
12992: RAISE e_NoMatch;
12993: END IF;
12996: IF (x_Group_rec.match_within_rec.industry_attribute9 = 'Y') THEN
12997: IF NVL(g_IntransitTab(i).industry_attribute9, k_VNULL) <> NVL(x_match_rec.industry_attribute9, k_VNULL) THEN
12998: --
12999: IF (l_debug <> -1) THEN
13000: rlm_core_sv.dlog(k_DEBUG, 'IA9 num didnt match');
13001: END IF;
13002: --
13003: RAISE e_NoMatch;
13004: END IF;
13007: IF (x_Group_rec.match_within_rec.industry_attribute10 = 'Y') THEN
13008: IF NVL(g_IntransitTab(i).industry_attribute10, k_VNULL) <> NVL(x_match_rec.industry_attribute10, k_VNULL) THEN
13009: --
13010: IF (l_debug <> -1) THEN
13011: rlm_core_sv.dlog(k_DEBUG, 'IA10 num didnt match');
13012: END IF;
13013: --
13014: RAISE e_NoMatch;
13015: END IF;
13018: IF (x_Group_rec.match_within_rec.industry_attribute11 = 'Y') THEN
13019: IF NVL(g_IntransitTab(i).industry_attribute11, k_VNULL) <> NVL(x_match_rec.industry_attribute11, k_VNULL) THEN
13020: --
13021: IF (l_debug <> -1) THEN
13022: rlm_core_sv.dlog(k_DEBUG, 'IA11 num didnt match');
13023: END IF;
13024: --
13025: RAISE e_NoMatch;
13026: END IF;
13029: IF (x_Group_rec.match_within_rec.industry_attribute12 = 'Y') THEN
13030: IF NVL(g_IntransitTab(i).industry_attribute12, k_VNULL) <> NVL(x_match_rec.industry_attribute12, k_VNULL) THEN
13031: --
13032: IF (l_debug <> -1) THEN
13033: rlm_core_sv.dlog(k_DEBUG, 'IA12 num didnt match');
13034: END IF;
13035: --
13036: RAISE e_NoMatch;
13037: END IF;
13040: IF (x_Group_rec.match_within_rec.industry_attribute13 = 'Y') THEN
13041: IF NVL(g_IntransitTab(i).industry_attribute13, k_VNULL) <> NVL(x_match_rec.industry_attribute13, k_VNULL) THEN
13042: --
13043: IF (l_debug <> -1) THEN
13044: rlm_core_sv.dlog(k_DEBUG, 'IA13 num didnt match');
13045: END IF;
13046: --
13047: RAISE e_NoMatch;
13048: END IF;
13051: IF (x_Group_rec.match_within_rec.industry_attribute14 = 'Y') THEN
13052: IF NVL(g_IntransitTab(i).industry_attribute14, k_VNULL) <> NVL(x_match_rec.industry_attribute14, k_VNULL) THEN
13053: --
13054: IF (l_debug <> -1) THEN
13055: rlm_core_sv.dlog(k_DEBUG, 'IA14 num didnt match');
13056: END IF;
13057: --
13058: RAISE e_NoMatch;
13059: END IF;
13062: IF (x_Group_rec.match_within_rec.attribute1 = 'Y') THEN
13063: IF NVL(g_IntransitTab(i).attribute1, k_VNULL) <> NVL(x_match_rec.attribute1, k_VNULL) THEN
13064: --
13065: IF (l_debug <> -1) THEN
13066: rlm_core_sv.dlog(k_DEBUG, 'A1 num didnt match');
13067: END IF;
13068: --
13069: RAISE e_NoMatch;
13070: END IF;
13073: IF (x_Group_rec.match_within_rec.attribute2 = 'Y') THEN
13074: IF NVL(g_IntransitTab(i).attribute2, k_VNULL) <> NVL(x_match_rec.attribute2, k_VNULL) THEN
13075: --
13076: IF (l_debug <> -1) THEN
13077: rlm_core_sv.dlog(k_DEBUG, 'A2 num didnt match');
13078: END IF;
13079: --
13080: RAISE e_NoMatch;
13081: END IF;
13084: IF (x_Group_rec.match_within_rec.attribute3 = 'Y') THEN
13085: IF NVL(g_IntransitTab(i).attribute3, k_VNULL) <> NVL(x_match_rec.attribute3, k_VNULL) THEN
13086: --
13087: IF (l_debug <> -1) THEN
13088: rlm_core_sv.dlog(k_DEBUG, 'A3 num didnt match');
13089: END IF;
13090: --
13091: RAISE e_NoMatch;
13092: END IF;
13095: IF (x_Group_rec.match_within_rec.attribute4 = 'Y') THEN
13096: IF NVL(g_IntransitTab(i).attribute4, k_VNULL) <> NVL(x_match_rec.attribute4, k_VNULL) THEN
13097: --
13098: IF (l_debug <> -1) THEN
13099: rlm_core_sv.dlog(k_DEBUG, 'A4 num didnt match');
13100: END IF;
13101: --
13102: RAISE e_NoMatch;
13103: END IF;
13106: IF (x_Group_rec.match_within_rec.attribute5 = 'Y') THEN
13107: IF NVL(g_IntransitTab(i).attribute5, k_VNULL) <> NVL(x_match_rec.attribute5, k_VNULL) THEN
13108: --
13109: IF (l_debug <> -1) THEN
13110: rlm_core_sv.dlog(k_DEBUG, 'A5 num didnt match');
13111: END IF;
13112: --
13113: RAISE e_NoMatch;
13114: END IF;
13117: IF (x_Group_rec.match_within_rec.attribute6 = 'Y') THEN
13118: IF NVL(g_IntransitTab(i).attribute6, k_VNULL) <> NVL(x_match_rec.attribute6, k_VNULL) THEN
13119: --
13120: IF (l_debug <> -1) THEN
13121: rlm_core_sv.dlog(k_DEBUG, 'A6 num didnt match');
13122: END IF;
13123: --
13124: RAISE e_NoMatch;
13125: END IF;
13128: IF (x_Group_rec.match_within_rec.attribute7 = 'Y') THEN
13129: IF NVL(g_IntransitTab(i).attribute7, k_VNULL) <> NVL(x_match_rec.attribute7, k_VNULL) THEN
13130: --
13131: IF (l_debug <> -1) THEN
13132: rlm_core_sv.dlog(k_DEBUG, 'A7 num didnt match');
13133: END IF;
13134: --
13135: RAISE e_NoMatch;
13136: END IF;
13139: IF (x_Group_rec.match_within_rec.attribute8 = 'Y') THEN
13140: IF NVL(g_IntransitTab(i).attribute8, k_VNULL) <> NVL(x_match_rec.attribute8, k_VNULL) THEN
13141: --
13142: IF (l_debug <> -1) THEN
13143: rlm_core_sv.dlog(k_DEBUG, 'A8 num didnt match');
13144: END IF;
13145: --
13146: RAISE e_NoMatch;
13147: END IF;
13150: IF (x_Group_rec.match_within_rec.attribute9 = 'Y') THEN
13151: IF NVL(g_IntransitTab(i).attribute9, k_VNULL) <> NVL(x_match_rec.attribute9, k_VNULL) THEN
13152: --
13153: IF (l_debug <> -1) THEN
13154: rlm_core_sv.dlog(k_DEBUG, 'A9 num didnt match');
13155: END IF;
13156: --
13157: RAISE e_NoMatch;
13158: END IF;
13161: IF (x_Group_rec.match_within_rec.attribute10 = 'Y') THEN
13162: IF NVL(g_IntransitTab(i).attribute10, k_VNULL) <> NVL(x_match_rec.attribute10, k_VNULL) THEN
13163: --
13164: IF (l_debug <> -1) THEN
13165: rlm_core_sv.dlog(k_DEBUG, 'A10 num didnt match');
13166: END IF;
13167: --
13168: RAISE e_NoMatch;
13169: END IF;
13172: IF (x_Group_rec.match_within_rec.attribute11 = 'Y') THEN
13173: IF NVL(g_IntransitTab(i).attribute11, k_VNULL) <> NVL(x_match_rec.attribute11, k_VNULL) THEN
13174: --
13175: IF (l_debug <> -1) THEN
13176: rlm_core_sv.dlog(k_DEBUG, 'A11 num didnt match');
13177: END IF;
13178: --
13179: RAISE e_NoMatch;
13180: END IF;
13183: IF (x_Group_rec.match_within_rec.attribute12 = 'Y') THEN
13184: IF NVL(g_IntransitTab(i).attribute12, k_VNULL) <> NVL(x_match_rec.attribute12, k_VNULL) THEN
13185: --
13186: IF (l_debug <> -1) THEN
13187: rlm_core_sv.dlog(k_DEBUG, 'A12 num didnt match');
13188: END IF;
13189: --
13190: RAISE e_NoMatch;
13191: END IF;
13194: IF (x_Group_rec.match_within_rec.attribute13 = 'Y') THEN
13195: IF NVL(g_IntransitTab(i).attribute13, k_VNULL) <> NVL(x_match_rec.attribute13, k_VNULL) THEN
13196: --
13197: IF (l_debug <> -1) THEN
13198: rlm_core_sv.dlog(k_DEBUG, 'A13 num didnt match');
13199: END IF;
13200: --
13201: RAISE e_NoMatch;
13202: END IF;
13205: IF (x_Group_rec.match_within_rec.attribute14 = 'Y') THEN
13206: IF NVL(g_IntransitTab(i).attribute14, k_VNULL) <> NVL(x_match_rec.attribute14, k_VNULL) THEN
13207: --
13208: IF (l_debug <> -1) THEN
13209: rlm_core_sv.dlog(k_DEBUG, 'A14 num didnt match');
13210: END IF;
13211: --
13212: RAISE e_NoMatch;
13213: END IF;
13216: IF (x_Group_rec.match_within_rec.attribute15 = 'Y') THEN
13217: IF NVL(g_IntransitTab(i).attribute15, k_VNULL) <> NVL(x_match_rec.attribute15, k_VNULL) THEN
13218: --
13219: IF (l_debug <> -1) THEN
13220: rlm_core_sv.dlog(k_DEBUG, 'A15 num didnt match');
13221: END IF;
13222: --
13223: RAISE e_NoMatch;
13224: END IF;
13226: --
13227: b_Match := TRUE;
13228: --
13229: IF (l_debug <> -1) THEN
13230: rlm_core_sv.dlog(k_DEBUG, 'Matched with index', i);
13231: END IF;
13232: --
13233: x_Index := i;
13234: EXIT;
13240: --
13241: END LOOP;
13242: --
13243: IF (l_debug <> -1) THEN
13244: rlm_core_sv.dpop(k_SDEBUG, 'AlreadyMatched');
13245: END IF;
13246: --
13247: RETURN (b_Match);
13248: --
13264: --
13265: BEGIN
13266: --
13267: IF (l_debug <> -1) THEN
13268: rlm_core_sv.dpush(k_SDEBUG, 'MRPOnly');
13269: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
13270: END IF;
13271: --
13272: IF x_Sched_rec.Schedule_Source <> 'MANUAL' THEN
13265: BEGIN
13266: --
13267: IF (l_debug <> -1) THEN
13268: rlm_core_sv.dpush(k_SDEBUG, 'MRPOnly');
13269: rlm_core_sv.dlog(k_DEBUG, 'g_Op_tab.COUNT', g_Op_tab.COUNT);
13270: END IF;
13271: --
13272: IF x_Sched_rec.Schedule_Source <> 'MANUAL' THEN
13273:
13273:
13274: IF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_PLANNING THEN
13275: --
13276: IF (l_debug <> -1) THEN
13277: rlm_core_sv.dlog(k_DEBUG, 'pln_mrp_forecast_day_from',
13278: x_group_rec.setup_terms_rec.pln_mrp_forecast_day_from);
13279: END IF;
13280: --
13281: IF x_Group_rec.setup_terms_rec.pln_mrp_forecast_day_from = 1 THEN
13280: --
13281: IF x_Group_rec.setup_terms_rec.pln_mrp_forecast_day_from = 1 THEN
13282: --
13283: IF (l_debug <> -1) THEN
13284: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13285: END IF;
13286: --
13287: RETURN TRUE;
13288: --
13288: --
13289: ELSE
13290: --
13291: IF (l_debug <> -1) THEN
13292: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13293: END IF;
13294: --
13295: RETURN FALSE;
13296: --
13298: --
13299: ELSIF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_SHIPPING THEN
13300: --
13301: IF (l_debug <> -1) THEN
13302: rlm_core_sv.dlog(k_DEBUG, 'shp_mrp_forecast_day_from',
13303: x_group_rec.setup_terms_rec.shp_mrp_forecast_day_from);
13304: END IF;
13305: --
13306: IF x_Group_rec.setup_terms_rec.shp_mrp_forecast_day_from = 1 THEN
13305: --
13306: IF x_Group_rec.setup_terms_rec.shp_mrp_forecast_day_from = 1 THEN
13307: --
13308: IF (l_debug <> -1) THEN
13309: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13310: END IF;
13311: --
13312: RETURN TRUE;
13313: --
13313: --
13314: ELSE
13315: --
13316: IF (l_debug <> -1) THEN
13317: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13318: END IF;
13319: --
13320: RETURN FALSE;
13321: --
13323: --
13324: ELSIF x_Sched_rec.Schedule_type = RLM_MANAGE_DEMAND_SV.k_SEQUENCED THEN
13325: --
13326: IF (l_debug <> -1) THEN
13327: rlm_core_sv.dlog(k_DEBUG, 'seq_mrp_forecast_day_from',
13328: x_group_rec.setup_terms_rec.seq_mrp_forecast_day_from);
13329: END IF;
13330: --
13331: IF x_Group_rec.setup_terms_rec.seq_mrp_forecast_day_from = 1 THEN
13330: --
13331: IF x_Group_rec.setup_terms_rec.seq_mrp_forecast_day_from = 1 THEN
13332: --
13333: IF (l_debug <> -1) THEN
13334: rlm_core_sv.dpop(k_SDEBUG, 'TRUE');
13335: END IF;
13336: --
13337: RETURN TRUE;
13338: --
13338: --
13339: ELSE
13340: --
13341: IF (l_debug <> -1) THEN
13342: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13343: END IF;
13344: --
13345: RETURN FALSE;
13346: --
13348: --
13349: ELSE
13350: --
13351: IF (l_debug <> -1) THEN
13352: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13353: END IF;
13354: --
13355: RETURN FALSE;
13356: --
13358: --
13359: ELSE
13360: --
13361: IF (l_debug <> -1) THEN
13362: rlm_core_sv.dpop(k_SDEBUG, 'FALSE');
13363: END IF;
13364: --
13365: RETURN FALSE;
13366: --
13372: --
13373: rlm_message_sv.sql_error('RLM_RD_SV.MRPOnly', v_Progress);
13374: --
13375: IF (l_debug <> -1) THEN
13376: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '|| SUBSTR(SQLERRM,1,200));
13377: END IF;
13378: --
13379: raise;
13380: --
13387:
13388: BEGIN
13389: --
13390: IF (l_debug <> -1) THEN
13391: rlm_core_sv.dpush(k_SDEBUG, 'InsertIntransitMatchRec');
13392: END IF;
13393: --
13394: v_Index := g_IntransitTab.COUNT;
13395: --
13393: --
13394: v_Index := g_IntransitTab.COUNT;
13395: --
13396: IF (l_debug <> -1) THEN
13397: rlm_core_sv.dlog(k_DEBUG, '# of rows in intransit table', v_Index);
13398: END IF;
13399: --
13400: g_IntransitTab(v_Index+1).cust_production_line := x_match_rec.cust_production_line;
13401: g_IntransitTab(v_Index+1).customer_dock_code := x_match_rec.customer_dock_code;
13438: g_IntransitTab(v_Index+1).attribute15 := x_match_rec.attribute15;
13439: g_IntransitTab(v_Index+1).intransit_qty := x_Quantity;
13440: --
13441: IF (l_debug <> -1) THEN
13442: rlm_core_sv.dpop(k_SDEBUG, 'InsertIntransitMatchRec');
13443: END IF;
13444: --
13445: END InsertIntransitMatchRec;
13446:
13541:
13542: BEGIN
13543: --
13544: IF (l_debug <> -1) THEN
13545: rlm_core_sv.dpush(k_SDEBUG, 'InitializeIntransitParam');
13546: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_intransit_calc_basis);
13547: END IF;
13548: --
13549: IF (x_Group_rec.setup_terms_rec.time_uom_code = 'HR') THEN
13542: BEGIN
13543: --
13544: IF (l_debug <> -1) THEN
13545: rlm_core_sv.dpush(k_SDEBUG, 'InitializeIntransitParam');
13546: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis', x_intransit_calc_basis);
13547: END IF;
13548: --
13549: IF (x_Group_rec.setup_terms_rec.time_uom_code = 'HR') THEN
13550: v_intransit_time := nvl(x_Group_rec.setup_terms_rec.intransit_time,0)/24;
13559: --
13560: IF (c_LastReceipt%NOTFOUND) THEN
13561: --
13562: IF (l_debug <> -1) THEN
13563: rlm_core_sv.dlog(k_DEBUG, 'No receipt line, so shipment date = sched_gen_Date - intransit');
13564: END IF;
13565: --
13566: v_shipment_date := x_Sched_rec.sched_generation_date - v_intransit_time;
13567: x_shipper_rec.shipper_Id1 := NULL;
13572: --
13573: ELSIF (v_deliveryID is NOT NULL) THEN
13574: --
13575: IF (l_debug <> -1) THEN
13576: rlm_core_sv.dlog('Delivery ID present on schedule');
13577: END IF;
13578: --
13579: FOR v_RctSID IN c_RctShipperIds LOOP
13580: --
13584: --
13585: v_count := v_count + 1;
13586: --
13587: IF (l_debug <> -1) THEN
13588: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13589: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13590: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13591: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13592: END IF;
13585: v_count := v_count + 1;
13586: --
13587: IF (l_debug <> -1) THEN
13588: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13589: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13590: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13591: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13592: END IF;
13593: --
13586: --
13587: IF (l_debug <> -1) THEN
13588: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13589: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13590: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13591: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13592: END IF;
13593: --
13594: IF v_count = 1 THEN
13587: IF (l_debug <> -1) THEN
13588: rlm_core_sv.dlog(k_DEBUG,'line_id', v_RctSID.line_id);
13589: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_RctSID.start_date_time);
13590: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13591: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_RctSID.shipper_Id);
13592: END IF;
13593: --
13594: IF v_count = 1 THEN
13595: --
13617: --
13618: ELSIF (v_shipment_date IS NOT NULL) THEN
13619: --
13620: IF (l_debug <> -1) THEN
13621: rlm_core_sv.dlog(k_DEBUG, 'No delivery ID present on schedule');
13622: END IF;
13623: --
13624: v_shipment_date := v_shipment_date - v_intransit_time;
13625: x_shipper_rec.shipper_Id1 := NULL;
13630: --
13631: END IF;
13632: --
13633: IF (l_debug <> -1) THEN
13634: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13635: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13636: END IF;
13637: --
13638: x_Shipment_date := v_shipment_date;
13631: END IF;
13632: --
13633: IF (l_debug <> -1) THEN
13634: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13635: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13636: END IF;
13637: --
13638: x_Shipment_date := v_shipment_date;
13639: CLOSE c_LastReceipt;
13645: --
13646: IF (c_LastShipment%NOTFOUND) THEN
13647: --
13648: IF (l_debug <> -1) THEN
13649: rlm_core_sv.dlog(k_DEBUG, 'No shipment line, so shipment date = sched_gen_Date');
13650: END IF;
13651: --
13652: v_shipment_date := x_Sched_rec.sched_generation_date;
13653: x_shipper_rec.shipper_Id1 := NULL;
13658: --
13659: ELSIF (v_deliveryID is NOT NULL) THEN
13660: --
13661: IF (l_debug <> -1) THEN
13662: rlm_core_sv.dlog('Delivery ID present on schedule');
13663: END IF;
13664: --
13665: FOR v_ShpSID IN c_ShpShipperIds LOOP
13666: --
13670: --
13671: v_count := v_count + 1;
13672: --
13673: IF (l_debug <> -1) THEN
13674: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13675: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13676: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13677: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13678: END IF;
13671: v_count := v_count + 1;
13672: --
13673: IF (l_debug <> -1) THEN
13674: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13675: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13676: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13677: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13678: END IF;
13679: --
13672: --
13673: IF (l_debug <> -1) THEN
13674: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13675: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13676: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13677: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13678: END IF;
13679: --
13680: IF v_count = 1 THEN
13673: IF (l_debug <> -1) THEN
13674: rlm_core_sv.dlog(k_DEBUG,'line_id', v_ShpSID.line_id);
13675: rlm_core_sv.dlog(k_DEBUG,'start_date_time', v_ShpSID.start_date_time);
13676: rlm_core_sv.dlog(k_DEBUG,'v_count', v_count);
13677: rlm_core_sv.dlog(k_DEBUG,'Shipper_id', v_ShpSID.shipper_Id);
13678: END IF;
13679: --
13680: IF v_count = 1 THEN
13681: --
13703: --
13704: ELSIF (v_shipment_date IS NOT NULL) THEN
13705: --
13706: IF (l_debug <> -1) THEN
13707: rlm_core_sv.dlog(k_DEBUG, 'No delivery ID present on schedule');
13708: END IF;
13709: --
13710: x_shipper_rec.shipper_Id1 := NULL;
13711: x_Shipper_rec.shipper_Id2 := NULL;
13715: --
13716: END IF;
13717: --
13718: IF (l_debug <> -1) THEN
13719: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13720: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13721: END IF;
13722: --
13723: x_Shipment_date := v_shipment_date;
13716: END IF;
13717: --
13718: IF (l_debug <> -1) THEN
13719: rlm_core_sv.dlog(k_DEBUG, 'v_item_detail_subtype', v_item_detail_subtype);
13720: rlm_core_sv.dlog(k_DEBUG, 'calculated shipment_date', v_shipment_date);
13721: END IF;
13722: --
13723: x_Shipment_date := v_shipment_date;
13724: CLOSE c_LastShipment;
13725: --
13726: END IF; /* if intransit_calc_basis */
13727: --
13728: IF (l_debug <> -1) THEN
13729: rlm_core_sv.dpop(k_SDEBUG, 'InitializeIntransitParam');
13730: END IF;
13731: --
13732: END InitializeIntransitParam;
13733:
13749: --
13750: BEGIN
13751: --
13752: IF (l_debug <> -1) THEN
13753: rlm_core_sv.dpush(k_SDEBUG,'InitializeBlktGroup');
13754: END IF;
13755: --
13756: OPEN x_Group_ref FOR
13757: SELECT rih.customer_id,
13772: WHERE rih.header_id = x_Sched_rec.header_id
13773: AND rih.org_id = ril.org_id
13774: AND ril.header_id = rih.header_id
13775: AND ril.ship_from_org_id = x_Group_rec.ship_from_org_id
13776: AND ril.process_status IN (rlm_core_sv.k_PS_AVAILABLE, rlm_core_sv.k_PS_FROZEN_FIRM)
13777: AND ril.customer_item_id = x_Group_rec.customer_item_id
13778: AND ril.ship_to_address_id = x_Group_rec.ship_to_address_id
13779: AND ril.blanket_number = rso.blanket_number
13780: AND rih.customer_id = rso.customer_id
13798: ril.customer_item_id,
13799: rso.effective_start_date;
13800: --
13801: IF (l_debug <> -1) THEN
13802: rlm_core_sv.dpop(k_SDEBUG);
13803: END IF;
13804: --
13805: EXCEPTION
13806: --
13807: WHEN OTHERS THEN
13808: rlm_message_sv.sql_error('rlm_rd_sv.InitializeBlktGrp',x_progress);
13809: --
13810: IF (l_debug <> -1) THEN
13811: rlm_core_sv.dlog(k_DEBUG, 'When others of InitializeBlktGrp');
13812: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
13813: END IF;
13814: --
13815: raise e_group_error;
13808: rlm_message_sv.sql_error('rlm_rd_sv.InitializeBlktGrp',x_progress);
13809: --
13810: IF (l_debug <> -1) THEN
13811: rlm_core_sv.dlog(k_DEBUG, 'When others of InitializeBlktGrp');
13812: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
13813: END IF;
13814: --
13815: raise e_group_error;
13816: --
13832: --
13833: BEGIN
13834: --
13835: IF (l_debug <> -1) THEN
13836: rlm_core_sv.dpush(k_SDEBUG,'FetchBlktGroup');
13837: END IF;
13838: --
13839: FETCH x_Group_ref INTO
13840: x_Group_rec.customer_id,
13850: x_Group_rec.intrmd_ship_to_id, --Bugfix 5911991
13851: x_Group_rec.intmed_ship_to_org_id ; --Bugfix 5911991
13852: --
13853: IF (l_debug <> -1) THEN
13854: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
13855: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
13856: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
13857: END IF;
13858: --
13851: x_Group_rec.intmed_ship_to_org_id ; --Bugfix 5911991
13852: --
13853: IF (l_debug <> -1) THEN
13854: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
13855: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
13856: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
13857: END IF;
13858: --
13859: IF x_Group_ref%NOTFOUND THEN
13852: --
13853: IF (l_debug <> -1) THEN
13854: rlm_core_sv.dlog(k_DEBUG,'Blanket Number', x_Group_rec.blanket_number);
13855: rlm_core_sv.dlog(k_DEBUG,'Order header ID', x_Group_rec.order_header_id);
13856: rlm_core_sv.dlog(k_DEBUG,'v_effective_start_date',v_effective_start_date);
13857: END IF;
13858: --
13859: IF x_Group_ref%NOTFOUND THEN
13860: --
13858: --
13859: IF x_Group_ref%NOTFOUND THEN
13860: --
13861: IF (l_debug <> -1) THEN
13862: rlm_core_sv.dpop(k_SDEBUG, 'false');
13863: END IF;
13864: --
13865: RETURN(FALSE);
13866: ELSE
13865: RETURN(FALSE);
13866: ELSE
13867: --
13868: IF (l_debug <> -1) THEN
13869: rlm_core_sv.dpop(k_SDEBUG, 'true');
13870: END IF;
13871: --
13872: RETURN(TRUE);
13873: END IF;
13877: WHEN OTHERS THEN
13878: rlm_message_sv.sql_error('rlm_rd_sv.FetchBlktGrp',x_progress);
13879: --
13880: IF (l_debug <> -1) THEN
13881: rlm_core_sv.dlog(k_DEBUG, 'When others of FetchBlktGrp');
13882: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
13883: END IF;
13884: --
13885: raise;
13878: rlm_message_sv.sql_error('rlm_rd_sv.FetchBlktGrp',x_progress);
13879: --
13880: IF (l_debug <> -1) THEN
13881: rlm_core_sv.dlog(k_DEBUG, 'When others of FetchBlktGrp');
13882: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
13883: END IF;
13884: --
13885: raise;
13886: --
13888:
13889:
13890: /* *
13891: * SQL Bind Project: These functions just build a combined table *
13892: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
13893: */
13894: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13890: /* *
13891: * SQL Bind Project: These functions just build a combined table *
13892: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
13893: */
13894: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13897: RETURN RLM_CORE_SV.t_dynamic_tab IS
13898: --
13891: * SQL Bind Project: These functions just build a combined table *
13892: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
13893: */
13894: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13897: RETURN RLM_CORE_SV.t_dynamic_tab IS
13898: --
13899: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13892: * of bind variable values to be passed to RLM_CORE_SV.OpenDynamicCursor *
13893: */
13894: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13897: RETURN RLM_CORE_SV.t_dynamic_tab IS
13898: --
13899: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13900: x_Progress VARCHAR2(3) := '010';
13893: */
13894: FUNCTION BuildBindVarTab3(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13897: RETURN RLM_CORE_SV.t_dynamic_tab IS
13898: --
13899: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13900: x_Progress VARCHAR2(3) := '010';
13901: --
13895: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13896: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab)
13897: RETURN RLM_CORE_SV.t_dynamic_tab IS
13898: --
13899: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13900: x_Progress VARCHAR2(3) := '010';
13901: --
13902: BEGIN
13903: --
13901: --
13902: BEGIN
13903: --
13904: IF (l_debug <> -1) THEN
13905: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab3');
13906: END IF;
13907: --
13908: FOR i IN 1..p_Tab1.COUNT LOOP
13909: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
13917: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab3(i);
13918: END LOOP;
13919: --
13920: IF (l_debug <> -1) THEN
13921: rlm_core_sv.dpop(k_SDEBUG);
13922: END IF;
13923: --
13924: RETURN x_BindVarTab;
13925: --
13929: --
13930: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab3',x_progress);
13931: --
13932: IF (l_debug <> -1) THEN
13933: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
13934: END IF;
13935: --
13936: raise;
13937: --
13937: --
13938: END BuildBindVarTab3;
13939:
13940:
13941: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13938: END BuildBindVarTab3;
13939:
13940:
13941: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13939:
13940:
13941: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13947: --
13940:
13941: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13947: --
13948: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13941: FUNCTION BuildBindVarTab5(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13947: --
13948: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13949: x_Progress VARCHAR2(3) := '010';
13942: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab,
13943: p_Tab3 IN RLM_CORE_SV.t_dynamic_tab,
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13947: --
13948: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13949: x_Progress VARCHAR2(3) := '010';
13950: --
13944: p_Tab4 IN RLM_CORE_SV.t_dynamic_tab,
13945: p_Tab5 IN RLM_CORE_SV.t_dynamic_tab)
13946: RETURN RLM_CORE_SV.t_dynamic_tab IS
13947: --
13948: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13949: x_Progress VARCHAR2(3) := '010';
13950: --
13951: BEGIN
13952: --
13950: --
13951: BEGIN
13952: --
13953: IF (l_debug <> -1) THEN
13954: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab5');
13955: END IF;
13956: --
13957: FOR i IN 1..p_Tab1.COUNT LOOP
13958: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
13974: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab5(i);
13975: END LOOP;
13976: --
13977: IF (l_debug <> -1) THEN
13978: rlm_core_sv.dpop(k_SDEBUG);
13979: END IF;
13980: --
13981: RETURN x_BindVarTab;
13982: --
13986: --
13987: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab5',x_progress);
13988: --
13989: IF (l_debug <> -1) THEN
13990: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
13991: END IF;
13992: --
13993: raise;
13994: --
13994: --
13995: END BuildBindVarTab5;
13996:
13997:
13998: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13999: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14000: RETURN RLM_CORE_SV.t_dynamic_tab IS
14001: --
14002: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
13995: END BuildBindVarTab5;
13996:
13997:
13998: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13999: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14000: RETURN RLM_CORE_SV.t_dynamic_tab IS
14001: --
14002: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14003: x_Progress VARCHAR2(3) := '010';
13996:
13997:
13998: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13999: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14000: RETURN RLM_CORE_SV.t_dynamic_tab IS
14001: --
14002: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14003: x_Progress VARCHAR2(3) := '010';
14004: --
13998: FUNCTION BuildBindVarTab2(p_Tab1 IN RLM_CORE_SV.t_dynamic_tab,
13999: p_Tab2 IN RLM_CORE_SV.t_dynamic_tab)
14000: RETURN RLM_CORE_SV.t_dynamic_tab IS
14001: --
14002: x_BindVarTab RLM_CORE_SV.t_dynamic_tab;
14003: x_Progress VARCHAR2(3) := '010';
14004: --
14005: BEGIN
14006: --
14004: --
14005: BEGIN
14006: --
14007: IF (l_debug <> -1) THEN
14008: rlm_core_sv.dpush(k_SDEBUG, 'BuildBindVarTab2');
14009: END IF;
14010: --
14011: FOR i IN 1..p_Tab1.COUNT LOOP
14012: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab1(i);
14016: x_BindVarTab(x_BindVarTab.COUNT+1) := p_Tab2(i);
14017: END LOOP;
14018: --
14019: IF (l_debug <> -1) THEN
14020: rlm_core_sv.dpop(k_SDEBUG);
14021: END IF;
14022: --
14023: RETURN x_BindVarTab;
14024: --
14028: --
14029: rlm_message_sv.sql_error('rlm_rd_sv.BuildBindVarTab2',x_progress);
14030: --
14031: IF (l_debug <> -1) THEN
14032: rlm_core_sv.dpop(k_SDEBUG, 'Exception ' || substr(SQLERRM, 1, 200));
14033: END IF;
14034: --
14035: raise;
14036: --
14055: --
14056: BEGIN
14057: --
14058: IF (l_debug <> -1) THEN
14059: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14060: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14061: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14062: --
14063: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14056: BEGIN
14057: --
14058: IF (l_debug <> -1) THEN
14059: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14060: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14061: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14062: --
14063: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14064: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14057: --
14058: IF (l_debug <> -1) THEN
14059: rlm_core_sv.dpush(k_SDEBUG, 'SourceCUMIntransitQty');
14060: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14061: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14062: --
14063: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14064: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14065: g_SourceTab(i).organization_id);
14060: rlm_core_sv.dlog(k_DEBUG, 'IntransitQty to be sourced', g_IntransitQty);
14061: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab.COUNT', g_SourceTab.COUNT);
14062: --
14063: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14064: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14065: g_SourceTab(i).organization_id);
14066: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').allocation_percent',
14067: g_SourceTab(i).allocation_percent);
14068: END LOOP;
14062: --
14063: FOR i IN g_SourceTab.FIRST..g_SourceTab.LAST LOOP
14064: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').organization_id',
14065: g_SourceTab(i).organization_id);
14066: rlm_core_sv.dlog(k_DEBUG, 'g_SourceTab('||i||').allocation_percent',
14067: g_SourceTab(i).allocation_percent);
14068: END LOOP;
14069: --
14070: END IF;
14082: ROUND(g_IntransitQty * g_SourceTab(i).allocation_percent/100);
14083: v_SrcIntransitTab(j).organization_id := g_SourceTab(i).organization_id;
14084: --
14085: IF (l_debug <> -1) THEN
14086: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').intransit_qty',
14087: v_SrcIntransitTab(j).intransit_qty);
14088: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').organization_id',
14089: v_SrcIntransitTab(j).organization_id);
14090: END IF;
14084: --
14085: IF (l_debug <> -1) THEN
14086: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').intransit_qty',
14087: v_SrcIntransitTab(j).intransit_qty);
14088: rlm_core_sv.dlog(k_DEBUG, 'v_SrcIntransitTab('||j||').organization_id',
14089: v_SrcIntransitTab(j).organization_id);
14090: END IF;
14091: --
14092: i := g_SourceTab.NEXT(i);
14128: --
14129: v_Progress := '030';
14130: --
14131: IF (l_debug <> -1) THEN
14132: rlm_core_sv.dpop(k_SDEBUG);
14133: END IF;
14134: --
14135: EXCEPTION
14136: --
14138: --
14139: rlm_message_sv.sql_error('RLM_RD_SV.SourceCUMIntransitQty',v_Progress);
14140: --
14141: IF (l_debug <> -1) THEN
14142: rlm_core_sv.dlog(k_DEBUG,'progress',v_Progress);
14143: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14144: END IF;
14145: --
14146: RAISE;
14139: rlm_message_sv.sql_error('RLM_RD_SV.SourceCUMIntransitQty',v_Progress);
14140: --
14141: IF (l_debug <> -1) THEN
14142: rlm_core_sv.dlog(k_DEBUG,'progress',v_Progress);
14143: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14144: END IF;
14145: --
14146: RAISE;
14147: --
14169: --
14170: BEGIN
14171: --
14172: IF (l_debug <> -1) THEN
14173: rlm_core_sv.dpush(k_SDEBUG, 'CalculateCUMIntransit');
14174: rlm_core_sv.dlog(k_DEBUG, 'x_Line_id', x_Line_id); --Bugfix 7007638
14175: END IF;
14176: --
14177: v_CUMQty := 0;
14170: BEGIN
14171: --
14172: IF (l_debug <> -1) THEN
14173: rlm_core_sv.dpush(k_SDEBUG, 'CalculateCUMIntransit');
14174: rlm_core_sv.dlog(k_DEBUG, 'x_Line_id', x_Line_id); --Bugfix 7007638
14175: END IF;
14176: --
14177: v_CUMQty := 0;
14178: v_SupQty := 0;
14251: --
14252: END IF;
14253: --
14254: IF (l_debug <> -1) THEN
14255: rlm_core_sv.dlog(k_DEBUG, 'Supplier CUM Qty', v_SupQty);
14256: rlm_core_sv.dlog(k_DEBUG, 'Customer CUM Qty', v_CUMQty);
14257: END IF;
14258: --
14259: IF NVL(v_SupQty, 0) <> NVL(v_CUMQty, 0) THEN
14252: END IF;
14253: --
14254: IF (l_debug <> -1) THEN
14255: rlm_core_sv.dlog(k_DEBUG, 'Supplier CUM Qty', v_SupQty);
14256: rlm_core_sv.dlog(k_DEBUG, 'Customer CUM Qty', v_CUMQty);
14257: END IF;
14258: --
14259: IF NVL(v_SupQty, 0) <> NVL(v_CUMQty, 0) THEN
14260: v_Intransit := v_SupQty - v_CUMQty;
14263: x_Intransit := v_Intransit;
14264: v_Progress := '030';
14265: --
14266: IF (l_debug <> -1) THEN
14267: rlm_core_sv.dpop(k_SDEBUG);
14268: END IF;
14269: --
14270: EXCEPTION
14271: -- 4307505 [
14282: x_OrderHeaderId => x_group_rec.setup_terms_rec.header_id,
14283: x_OrderLineId => NULL,
14284: x_Token1 => 'SHIP_TO',
14285: x_Value1 =>
14286: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14287: x_Token2 => 'CITEM',
14288: x_Value2 =>
14289: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14290: x_GroupInfo => TRUE);
14285: x_Value1 =>
14286: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14287: x_Token2 => 'CITEM',
14288: x_Value2 =>
14289: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14290: x_GroupInfo => TRUE);
14291: --
14292: IF (l_debug <> -1) THEN
14293: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14289: rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14290: x_GroupInfo => TRUE);
14291: --
14292: IF (l_debug <> -1) THEN
14293: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14294: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14295: rlm_core_sv.dpop(k_SDEBUG);
14296: END IF;
14297: -- 4307505 ]
14290: x_GroupInfo => TRUE);
14291: --
14292: IF (l_debug <> -1) THEN
14293: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14294: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14295: rlm_core_sv.dpop(k_SDEBUG);
14296: END IF;
14297: -- 4307505 ]
14298: WHEN e_no_cum_key THEN
14291: --
14292: IF (l_debug <> -1) THEN
14293: rlm_core_sv.dlog(k_DEBUG,'- warning: RLM_CUM_STUP_NO_RECORD');
14294: rlm_core_sv.dlog(k_DEBUG,'- Intransit Qty = 0 considered to be 0 in this case');
14295: rlm_core_sv.dpop(k_SDEBUG);
14296: END IF;
14297: -- 4307505 ]
14298: WHEN e_no_cum_key THEN
14299: --
14308: x_OrderLineId => NULL,
14309: x_GroupInfo => TRUE,
14310: x_Token1 => 'GROUP', --Bugfix 7007638
14311: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14312: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14313: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14314: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14315: v_control_value);
14316: --
14309: x_GroupInfo => TRUE,
14310: x_Token1 => 'GROUP', --Bugfix 7007638
14311: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14312: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14313: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14314: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14315: v_control_value);
14316: --
14317: IF (l_debug <> -1) THEN
14310: x_Token1 => 'GROUP', --Bugfix 7007638
14311: x_value1 => '-'||v_control_text||' '|| --Bugfix 7007638
14312: rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id)||'-'||
14313: rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id)||'-'||
14314: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14315: v_control_value);
14316: --
14317: IF (l_debug <> -1) THEN
14318: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14314: rlm_core_sv.get_item_number(x_group_rec.customer_item_id)||'-'||
14315: v_control_value);
14316: --
14317: IF (l_debug <> -1) THEN
14318: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14319: rlm_core_sv.dpop(k_SDEBUG);
14320: END IF;
14321: --
14322: WHEN OTHERS THEN
14315: v_control_value);
14316: --
14317: IF (l_debug <> -1) THEN
14318: rlm_core_sv.dlog(k_DEBUG, 'No CUM Key Found - intransit qty no calc');
14319: rlm_core_sv.dpop(k_SDEBUG);
14320: END IF;
14321: --
14322: WHEN OTHERS THEN
14323: rlm_message_sv.sql_error('rlm_rd_sv.CalculateCUMIntransit',v_progress);
14322: WHEN OTHERS THEN
14323: rlm_message_sv.sql_error('rlm_rd_sv.CalculateCUMIntransit',v_progress);
14324: --
14325: IF (l_debug <> -1) THEN
14326: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
14327: END IF;
14328: --
14329: raise;
14330: --
14344: p_OEDemand_rec IN RLM_RD_SV.t_OEDemand_rec) IS
14345: BEGIN
14346: --
14347: IF (l_debug <> -1) THEN
14348: rlm_core_sv.dpush(k_SDEBUG, 'AssignOEAttribValues');
14349: END IF;
14350: --
14351: x_Key_rec.oe_line_id := p_OEDemand_rec.line_id;
14352: x_Key_rec.dem_rec.line_id := p_OEDemand_rec.line_id;
14411: x_Key_rec.dem_rec.attribute14 := p_OEDemand_rec.attribute14;
14412: x_Key_rec.dem_rec.attribute15 := p_OEDemand_rec.attribute15;
14413: --
14414: IF (l_debug <> -1) THEN
14415: rlm_core_sv.dpop(k_SDEBUG);
14416: END IF;
14417: --
14418: EXCEPTION
14419: --
14421: --
14422: rlm_message_sv.sql_error('RLM_RD_SV.AssignOEAttribValues', '010');
14423: --
14424: IF (l_debug <> -1) THEN
14425: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14426: rlm_core_sv.dpop(k_SDEBUG);
14427: END IF;
14428: --
14429: RAISE;
14422: rlm_message_sv.sql_error('RLM_RD_SV.AssignOEAttribValues', '010');
14423: --
14424: IF (l_debug <> -1) THEN
14425: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14426: rlm_core_sv.dpop(k_SDEBUG);
14427: END IF;
14428: --
14429: RAISE;
14430: --
14450: --
14451: BEGIN
14452: --{
14453: IF (l_debug > -1) THEN
14454: rlm_core_sv.dpush(k_SDEBUG, ' FrozenFenceWarning ');
14455: END IF;
14456: --
14457: IF x_Sched_rec.Schedule_type = 'PLANNING_RELEASE' THEN
14458: --
14474: --
14475: END IF;
14476: --
14477: IF (l_debug > -1) THEN
14478: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14479: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14480: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14481: END IF;
14482: --
14475: END IF;
14476: --
14477: IF (l_debug > -1) THEN
14478: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14479: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14480: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14481: END IF;
14482: --
14483: IF NOT g_isFirm AND x_Sched_rec.Schedule_Source <> 'MANUAL' AND v_frozenFrom is NOT NULL THEN
14476: --
14477: IF (l_debug > -1) THEN
14478: rlm_core_sv.dlog(k_DEBUG, 'g_isFirm', g_isFirm);
14479: rlm_core_sv.dlog(k_DEBUG, 'v_frozenDays', v_frozenDays);
14480: rlm_core_sv.dlog(k_DEBUG, 'x_Sched_rec.Schedule_Source', x_Sched_rec.Schedule_Source);
14481: END IF;
14482: --
14483: IF NOT g_isFirm AND x_Sched_rec.Schedule_Source <> 'MANUAL' AND v_frozenFrom is NOT NULL THEN
14484: --{
14494: --
14495: i := v_FrozenTab.count;
14496: --
14497: IF (l_debug <> -1) THEN
14498: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14499: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14500: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14501: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14502: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14495: i := v_FrozenTab.count;
14496: --
14497: IF (l_debug <> -1) THEN
14498: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14499: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14500: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14501: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14502: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14503: END IF;
14496: --
14497: IF (l_debug <> -1) THEN
14498: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14499: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14500: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14501: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14502: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14503: END IF;
14504: --
14497: IF (l_debug <> -1) THEN
14498: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14499: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14500: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14501: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14502: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14503: END IF;
14504: --
14505: IF MatchFrozen(x_Group_rec, g_Reconcile_tab.NEXT(v_Count), g_Reconcile_tab(v_Count), v_Index) THEN
14498: rlm_core_sv.dlog(k_DEBUG, 'Begining of the loop Index i', i);
14499: rlm_core_sv.dlog(k_DEBUG, 'v_Count', v_Count);
14500: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14501: rlm_core_sv.dlog(k_DEBUG, 'request_date', g_Reconcile_tab(v_Count).request_date);
14502: rlm_core_sv.dlog(k_DEBUG, 'Customer request Date', g_Reconcile_tab(v_Count).industry_attribute2);
14503: END IF;
14504: --
14505: IF MatchFrozen(x_Group_rec, g_Reconcile_tab.NEXT(v_Count), g_Reconcile_tab(v_Count), v_Index) THEN
14506: --
14507: x_frozenWarnQty := x_frozenWarnQty + g_Reconcile_tab(v_Index).ordered_quantity;
14508: --
14509: IF (l_debug <> -1) THEN
14510: --
14511: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14512: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14513: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14514: --
14515: END IF;
14508: --
14509: IF (l_debug <> -1) THEN
14510: --
14511: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14512: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14513: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14514: --
14515: END IF;
14516: --
14509: IF (l_debug <> -1) THEN
14510: --
14511: rlm_core_sv.dlog(k_DEBUG, 'v_Index', v_Index);
14512: rlm_core_sv.dlog(k_DEBUG, 'ordered_quantity', g_Reconcile_tab(v_Index).ordered_quantity);
14513: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenWarnQty', x_FrozenWarnQty);
14514: --
14515: END IF;
14516: --
14517: END IF;
14520: v_FrozenTab(i) := g_Reconcile_tab(v_Count);
14521: v_FrozenTab(i).ordered_quantity := x_frozenWarnQty;
14522: --
14523: IF (l_debug <> -1) THEN
14524: rlm_core_sv.dlog(k_DEBUG, 'Ending of the loop Index i', i);
14525: END IF;
14526: --
14527: v_Count := g_Reconcile_tab.next(v_Count);
14528: --
14530: --}
14531: END IF;
14532: --}
14533: IF (l_debug <> -1) THEN
14534: rlm_core_sv.dlog(k_DEBUG, 'v_FrozenTab.COUNT', v_FrozenTab.COUNT);
14535: END IF;
14536: --
14537: IF v_FrozenTab.COUNT <> 0 THEN
14538: --{
14544: --
14545: IF v_frozenTab(v_Count).ordered_quantity < 0 THEN
14546: --
14547: IF (l_debug <> -1) THEN
14548: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14549: v_frozenTab(v_Count).ordered_quantity);
14550: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14551: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14552: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14546: --
14547: IF (l_debug <> -1) THEN
14548: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14549: v_frozenTab(v_Count).ordered_quantity);
14550: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14551: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14552: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14553: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14554: END IF;
14547: IF (l_debug <> -1) THEN
14548: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14549: v_frozenTab(v_Count).ordered_quantity);
14550: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14551: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14552: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14553: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14554: END IF;
14555: --
14548: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_UNDER:',
14549: v_frozenTab(v_Count).ordered_quantity);
14550: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14551: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14552: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14553: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14554: END IF;
14555: --
14556: rlm_message_sv.app_error(
14549: v_frozenTab(v_Count).ordered_quantity);
14550: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14551: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14552: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14553: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14554: END IF;
14555: --
14556: rlm_message_sv.app_error(
14557: x_ExceptionLevel => rlm_message_sv.k_warn_level,
14562: x_OrderLineId => NULL,
14563: x_Token1 => 'ENDDATE',
14564: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14565: x_Token2 => 'SHIP_FROM',
14566: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14567: x_Token3 => 'SHIP_TO',
14568: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14569: x_Token4 => 'CUSTITEM',
14570: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14564: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14565: x_Token2 => 'SHIP_FROM',
14566: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14567: x_Token3 => 'SHIP_TO',
14568: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14569: x_Token4 => 'CUSTITEM',
14570: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14571: x_Token5 => 'QUANTITY',
14572: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14566: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14567: x_Token3 => 'SHIP_TO',
14568: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14569: x_Token4 => 'CUSTITEM',
14570: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14571: x_Token5 => 'QUANTITY',
14572: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14573: --
14574: ELSE
14574: ELSE
14575: --
14576: IF (l_debug <> -1) THEN
14577: --
14578: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14579: v_frozenTab(v_Count).ordered_quantity);
14580: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14581: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14582: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14576: IF (l_debug <> -1) THEN
14577: --
14578: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14579: v_frozenTab(v_Count).ordered_quantity);
14580: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14581: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14582: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14583: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14584: --
14577: --
14578: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14579: v_frozenTab(v_Count).ordered_quantity);
14580: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14581: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14582: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14583: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14584: --
14585: END IF;
14578: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_WARN_OVER:',
14579: v_frozenTab(v_Count).ordered_quantity);
14580: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14581: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14582: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14583: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14584: --
14585: END IF;
14586: --
14579: v_frozenTab(v_Count).ordered_quantity);
14580: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14581: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14582: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14583: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14584: --
14585: END IF;
14586: --
14587: rlm_message_sv.app_error(
14593: x_OrderLineId => NULL,
14594: x_Token1 => 'ENDDATE',
14595: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14596: x_Token2 => 'SHIP_FROM',
14597: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14598: x_Token3 => 'SHIP_TO',
14599: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14600: x_Token4 => 'CUSTITEM',
14601: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14595: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14596: x_Token2 => 'SHIP_FROM',
14597: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14598: x_Token3 => 'SHIP_TO',
14599: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14600: x_Token4 => 'CUSTITEM',
14601: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14602: x_Token5 => 'QUANTITY',
14603: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14597: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14598: x_Token3 => 'SHIP_TO',
14599: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14600: x_Token4 => 'CUSTITEM',
14601: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14602: x_Token5 => 'QUANTITY',
14603: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity));
14604: --
14605: END IF;
14608: --
14609: IF v_frozenTab(v_Count).ordered_quantity < 0 THEN
14610: --
14611: IF (l_debug <> -1) THEN
14612: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14613: v_frozenTab(v_Count).ordered_quantity);
14614: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14615: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14616: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14610: --
14611: IF (l_debug <> -1) THEN
14612: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14613: v_frozenTab(v_Count).ordered_quantity);
14614: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14615: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14616: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14617: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14618: END IF;
14611: IF (l_debug <> -1) THEN
14612: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14613: v_frozenTab(v_Count).ordered_quantity);
14614: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14615: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14616: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14617: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14618: END IF;
14619: --
14612: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_UNDER:',
14613: v_frozenTab(v_Count).ordered_quantity);
14614: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14615: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14616: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14617: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14618: END IF;
14619: --
14620: rlm_message_sv.app_error(
14613: v_frozenTab(v_Count).ordered_quantity);
14614: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14615: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14616: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14617: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14618: END IF;
14619: --
14620: rlm_message_sv.app_error(
14621: x_ExceptionLevel => rlm_message_sv.k_warn_level,
14626: x_OrderLineId => NULL,
14627: x_Token1 => 'ENDDATE',
14628: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14629: x_Token2 => 'SHIP_FROM',
14630: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14631: x_Token3 => 'SHIP_TO',
14632: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14633: x_Token4 => 'CUSTITEM',
14634: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14628: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14629: x_Token2 => 'SHIP_FROM',
14630: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14631: x_Token3 => 'SHIP_TO',
14632: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14633: x_Token4 => 'CUSTITEM',
14634: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14635: x_Token5 => 'QUANTITY',
14636: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14630: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14631: x_Token3 => 'SHIP_TO',
14632: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14633: x_Token4 => 'CUSTITEM',
14634: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14635: x_Token5 => 'QUANTITY',
14636: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14637: x_Token6 => 'MATCH_ATTR',
14638: x_value6 => v_MatchAttrTxt);
14640: ELSE
14641: --
14642: IF (l_debug <> -1) THEN
14643: --
14644: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14645: v_frozenTab(v_Count).ordered_quantity);
14646: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14647: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14648: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14642: IF (l_debug <> -1) THEN
14643: --
14644: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14645: v_frozenTab(v_Count).ordered_quantity);
14646: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14647: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14648: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14649: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14650: --
14643: --
14644: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14645: v_frozenTab(v_Count).ordered_quantity);
14646: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14647: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14648: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14649: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14650: --
14651: END IF;
14644: rlm_core_sv.dlog(k_DEBUG,'RLM_FROZEN_OVERALL_QTY_OVER:',
14645: v_frozenTab(v_Count).ordered_quantity);
14646: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14647: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14648: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14649: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14650: --
14651: END IF;
14652: --
14645: v_frozenTab(v_Count).ordered_quantity);
14646: rlm_core_sv.dlog(k_DEBUG,'Ship from', x_group_rec.ship_from_org_id);
14647: rlm_core_sv.dlog(k_DEBUG,'Ship to', x_group_rec.ship_to_address_id );
14648: rlm_core_sv.dlog(k_DEBUG,'Customer Item Id', x_group_rec.customer_item_id);
14649: rlm_core_sv.dlog(k_DEBUG,'Matching Attributes', v_MatchAttrTxt);
14650: --
14651: END IF;
14652: --
14653: rlm_message_sv.app_error(
14659: x_OrderLineId => NULL,
14660: x_Token1 => 'ENDDATE',
14661: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14662: x_Token2 => 'SHIP_FROM',
14663: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14664: x_Token3 => 'SHIP_TO',
14665: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14666: x_Token4 => 'CUSTITEM',
14667: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14661: x_Value1 => TRUNC(SYSDATE) + v_frozenDays - 1,
14662: x_Token2 => 'SHIP_FROM',
14663: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14664: x_Token3 => 'SHIP_TO',
14665: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14666: x_Token4 => 'CUSTITEM',
14667: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14668: x_Token5 => 'QUANTITY',
14669: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14663: x_Value2 => rlm_core_sv.get_ship_from(x_group_rec.ship_from_org_id),
14664: x_Token3 => 'SHIP_TO',
14665: x_Value3 => rlm_core_sv.get_ship_to(x_group_rec.ship_to_address_id),
14666: x_Token4 => 'CUSTITEM',
14667: x_value4 => rlm_core_sv.get_item_number(x_group_rec.customer_item_id),
14668: x_Token5 => 'QUANTITY',
14669: x_value5 => abs(v_frozenTab(v_Count).ordered_quantity),
14670: x_Token6 => 'MATCH_ATTR',
14671: x_value6 => v_MatchAttrTxt);
14680: --}
14681: END IF;
14682: --}
14683: IF (l_debug <> -1) THEN
14684: rlm_core_sv.dpop(k_SDEBUG);
14685: END IF;
14686: --}
14687: EXCEPTION
14688: WHEN OTHERS THEN
14689: --
14690: rlm_message_sv.sql_error('RLM_RD_SV.FrozenFenceWarning', '010');
14691: --
14692: IF (l_debug <> -1) THEN
14693: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14694: rlm_core_sv.dpop(k_SDEBUG);
14695: END IF;
14696: --
14697: --
14690: rlm_message_sv.sql_error('RLM_RD_SV.FrozenFenceWarning', '010');
14691: --
14692: IF (l_debug <> -1) THEN
14693: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14694: rlm_core_sv.dpop(k_SDEBUG);
14695: END IF;
14696: --
14697: --
14698: RAISE;
14715: v_lookupCode VARCHAR2(30);
14716: v_lookupMeaning VARCHAR2(80);
14717: v_ColumnName VARCHAR2(30);
14718: v_MatchCode VARCHAR2(2);
14719: v_MatchWithinRec rlm_core_sv.t_match_rec;
14720: -- v_MatchKey rlm_cust_shipto_terms.match_within_key%TYPE;
14721: v_first BOOLEAN := TRUE;
14722: --
14723: Cursor C(p_MatchCode in VARCHAR2,
14756: --
14757: BEGIN
14758: --
14759: IF (l_debug > -1) THEN
14760: rlm_core_sv.dpush(k_SDEBUG, 'GetMatchAttributes ');
14761: rlm_core_sv.dlog(k_DEBUG, 'match_within ', x_group_rec.match_within);
14762: END IF;
14763: --
14764: v_MatchCode := SUBSTR(x_Group_rec.match_within,1,1);
14757: BEGIN
14758: --
14759: IF (l_debug > -1) THEN
14760: rlm_core_sv.dpush(k_SDEBUG, 'GetMatchAttributes ');
14761: rlm_core_sv.dlog(k_DEBUG, 'match_within ', x_group_rec.match_within);
14762: END IF;
14763: --
14764: v_MatchCode := SUBSTR(x_Group_rec.match_within,1,1);
14765: i := 1;
14766: --
14767: WHILE v_MatchCode is NOT NULL LOOP
14768: --{
14769: IF (l_debug > -1) THEN
14770: rlm_core_sv.dlog(k_DEBUG, 'v_MatchCode ', v_MatchCode);
14771: END IF;
14772: --
14773: IF v_MatchCode <> 'C' AND v_MatchCode <> 'J' THEN
14774: --{
14801: x_MatAttrCodeValue := x_MatAttrCodeValue || ', ' || v_lookupMeaning || '= ';
14802: --
14803: END IF;
14804: --
14805: rlm_core_sv.populate_match_keys(v_MatchWithinRec, v_MatchCode);
14806: --
14807: IF v_MatchWithinRec.cust_po_number = 'Y' THEN
14808: --
14809: x_MatAttrCodeValue := x_MatAttrCodeValue || x_FrozenTabRec.cust_po_number;
14847: --
14848: x_MatAttrCodeValue := x_MatAttrCodeValue || x_FrozenTabRec.industry_attribute5;
14849: --
14850: IF (l_debug > -1) THEN
14851: rlm_core_sv.dlog(k_DEBUG, 'x_FrozenTabRec.industry_attribute5 ', x_FrozenTabRec.industry_attribute5);
14852: END IF;
14853: --
14854: ELSIF v_MatchwithinRec.industry_attribute6 = 'Y' THEN
14855: --
14942: --
14943: END IF;
14944: --
14945: IF (l_debug > -1) THEN
14946: rlm_core_sv.dlog(k_DEBUG, 'x_MatAttrCodeValue ', x_MatAttrCodeValue);
14947: END IF;
14948: --}
14949: CLOSE C;
14950: --
14957: --}
14958: END LOOP;
14959: --
14960: IF (l_debug <> -1) THEN
14961: rlm_core_sv.dpop(k_SDEBUG);
14962: END IF;
14963: --
14964: EXCEPTION
14965: WHEN OTHERS THEN
14966: --
14967: rlm_message_sv.sql_error('RLM_RD_SV.GetMatchAttributes', '010');
14968: --
14969: IF (l_debug <> -1) THEN
14970: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14971: rlm_core_sv.dpop(k_SDEBUG);
14972: END IF;
14973: --
14974: RAISE;
14967: rlm_message_sv.sql_error('RLM_RD_SV.GetMatchAttributes', '010');
14968: --
14969: IF (l_debug <> -1) THEN
14970: rlm_core_sv.dlog(k_DEBUG, 'Unexpected error', SUBSTRB(SQLERRM, 1, 200));
14971: rlm_core_sv.dpop(k_SDEBUG);
14972: END IF;
14973: --
14974: RAISE;
14975: --
15021: --
15022: BEGIN
15023: --
15024: IF (l_debug <> -1) THEN
15025: rlm_core_sv.dpush(k_SDEBUG, 'ProcessReleases');
15026: END IF;
15027: x_Processed := 'N';
15028: --
15029: RLM_TPA_SV.InitializeBlktGrp(x_Sched_rec, v_BlkGroup_ref, x_Group_rec);
15035: --
15036: IF NOT LockLines(v_BlkGroup_rec, x_Sched_rec.header_id) THEN
15037: --
15038: IF (l_debug <> -1) THEN
15039: rlm_core_sv.dlog(k_DEBUG, 'RLM_LOCK_NOT_OBTAINED');
15040: END IF;
15041: --
15042: RAISE e_lines_locked;
15043: --
15047: FETCH c_getMaxRSO INTO g_max_rso_hdr_id, v_rso_start_date;
15048: CLOSE c_getMaxRSO;
15049: --
15050: IF (l_debug <> -1) THEN
15051: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
15052: rlm_core_sv.dlog(k_DEBUG, 'v_rso_start_date',v_rso_start_date);
15053: END IF;
15054: --
15055: RecGroupDemand(x_Sched_rec, v_BlkGroup_rec);
15048: CLOSE c_getMaxRSO;
15049: --
15050: IF (l_debug <> -1) THEN
15051: rlm_core_sv.dlog(k_DEBUG, 'g_max_rso_hdr_id',g_max_rso_hdr_id);
15052: rlm_core_sv.dlog(k_DEBUG, 'v_rso_start_date',v_rso_start_date);
15053: END IF;
15054: --
15055: RecGroupDemand(x_Sched_rec, v_BlkGroup_rec);
15056: x_Processed := 'Y';
15057: --}
15058: END LOOP;
15059: --
15060: IF (l_debug <> -1) THEN
15061: rlm_core_sv.dpop(k_SDEBUG);
15062: END IF;
15063: --
15064: EXCEPTION
15065: --
15065: --
15066: WHEN e_lines_locked THEN
15067: --
15068: IF (l_debug <> -1) THEN
15069: rlm_core_sv.dlog(k_DEBUG, 'e_lines_locked exception');
15070: rlm_core_sv.dpop(k_SDEBUG);
15071: END IF;
15072: --
15073: RAISE;
15066: WHEN e_lines_locked THEN
15067: --
15068: IF (l_debug <> -1) THEN
15069: rlm_core_sv.dlog(k_DEBUG, 'e_lines_locked exception');
15070: rlm_core_sv.dpop(k_SDEBUG);
15071: END IF;
15072: --
15073: RAISE;
15074: --
15074: --
15075: WHEN OTHERS THEN
15076: --
15077: IF (l_debug <> -1) THEN
15078: rlm_core_sv.dlog(k_DEBUG, 'SQLERRM', SUBSTRB(SQLERRM,1,200));
15079: rlm_core_sv.dpop(k_SDEBUG);
15080: END IF;
15081: --
15082: RAISE;
15075: WHEN OTHERS THEN
15076: --
15077: IF (l_debug <> -1) THEN
15078: rlm_core_sv.dlog(k_DEBUG, 'SQLERRM', SUBSTRB(SQLERRM,1,200));
15079: rlm_core_sv.dpop(k_SDEBUG);
15080: END IF;
15081: --
15082: RAISE;
15083: --
15181:
15182: BEGIN
15183: --
15184: IF (l_debug <> -1) THEN
15185: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15186: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15187: x_Sched_rec.Schedule_header_id);
15188: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15189: x_Group_rec.ship_to_address_id);
15182: BEGIN
15183: --
15184: IF (l_debug <> -1) THEN
15185: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15186: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15187: x_Sched_rec.Schedule_header_id);
15188: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15189: x_Group_rec.ship_to_address_id);
15190: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15184: IF (l_debug <> -1) THEN
15185: rlm_core_sv.dpush(k_SDEBUG,'PopulateReconcileCumRec');
15186: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15187: x_Sched_rec.Schedule_header_id);
15188: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15189: x_Group_rec.ship_to_address_id);
15190: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15191: x_Group_rec.inventory_item_id);
15192: END IF;
15186: rlm_core_sv.dlog(k_DEBUG,'x_Sched_rec.Schedule_header_id',
15187: x_Sched_rec.Schedule_header_id);
15188: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.ship_to_address_id',
15189: x_Group_rec.ship_to_address_id);
15190: rlm_core_sv.dlog(k_DEBUG,'x_Group_rec.inventory_item_id',
15191: x_Group_rec.inventory_item_id);
15192: END IF;
15193: --
15194: g_RecCUM_tab.DELETE;
15213: g_RecCUM_tab(v_Count).cust_record_year := g_RecCUM_rec.cust_record_year;
15214: g_RecCUM_tab(v_Count).line_id := g_RecCUM_rec.line_id;
15215:
15216: IF (l_debug <> -1) THEN
15217: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15214: g_RecCUM_tab(v_Count).line_id := g_RecCUM_rec.line_id;
15215:
15216: IF (l_debug <> -1) THEN
15217: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15222: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15215:
15216: IF (l_debug <> -1) THEN
15217: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15222: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15223: END IF;
15216: IF (l_debug <> -1) THEN
15217: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15222: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15223: END IF;
15224:
15217: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').purchase_order_number', g_RecCUM_tab(v_Count).purchase_order_number);
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15222: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15223: END IF;
15224:
15225: v_Count := v_Count + 1;
15218: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').primary_quantity', g_RecCUM_tab(v_Count).primary_quantity);
15219: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').item_detail_quantity', g_RecCUM_tab(v_Count).item_detail_quantity);
15220: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').start_date_time', g_RecCUM_tab(v_Count).start_date_time);
15221: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').cust_record_year', g_RecCUM_tab(v_Count).cust_record_year);
15222: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab('||v_Count||').line_id', g_RecCUM_tab(v_Count).line_id);
15223: END IF;
15224:
15225: v_Count := v_Count + 1;
15226:
15228: --
15229: CLOSE c_CUMRec;
15230:
15231: IF (l_debug <> -1) THEN
15232: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab.COUNT',g_RecCUM_tab.COUNT);
15233: rlm_core_sv.dpop(k_SDEBUG);
15234: END IF;
15235: --
15236: EXCEPTION
15229: CLOSE c_CUMRec;
15230:
15231: IF (l_debug <> -1) THEN
15232: rlm_core_sv.dlog(k_DEBUG,'g_RecCUM_tab.COUNT',g_RecCUM_tab.COUNT);
15233: rlm_core_sv.dpop(k_SDEBUG);
15234: END IF;
15235: --
15236: EXCEPTION
15237:
15240: rlm_message_sv.sql_error('rlm_rd_sv.PopulateReconcileCumRec',
15241: v_Progress);
15242: --
15243: IF (l_debug <> -1) THEN
15244: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
15245: END IF;
15246: --
15247: raise;
15248:
15266:
15267: BEGIN
15268: --
15269: IF (l_debug <> -1) THEN
15270: rlm_core_sv.dpush(k_SDEBUG,'Match_PO_RY_Reconcile');
15271: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
15272: x_Current_rec.schedule_type);
15273: END IF;
15274: --
15267: BEGIN
15268: --
15269: IF (l_debug <> -1) THEN
15270: rlm_core_sv.dpush(k_SDEBUG,'Match_PO_RY_Reconcile');
15271: rlm_core_sv.dlog(k_DEBUG, 'x_Current_rec.schedule_type',
15272: x_Current_rec.schedule_type);
15273: END IF;
15274: --
15275: IF (l_debug <> -1) THEN
15272: x_Current_rec.schedule_type);
15273: END IF;
15274: --
15275: IF (l_debug <> -1) THEN
15276: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15277: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15278: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15279: END IF;
15280:
15273: END IF;
15274: --
15275: IF (l_debug <> -1) THEN
15276: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15277: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15278: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15279: END IF;
15280:
15281: IF g_Reconcile_tab.COUNT <> 0 THEN
15274: --
15275: IF (l_debug <> -1) THEN
15276: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.COUNT', g_Reconcile_tab.COUNT);
15277: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.FIRST', g_Reconcile_tab.FIRST);
15278: rlm_core_sv.dlog(k_DEBUG,'g_Reconcile_tab.LAST', g_Reconcile_tab.LAST);
15279: END IF;
15280:
15281: IF g_Reconcile_tab.COUNT <> 0 THEN
15282: --{
15286: --{
15287: b_Match := TRUE;
15288: --
15289: IF (l_debug <> -1) THEN
15290: rlm_core_sv.dlog(k_DEBUG, 'g_Reconcile_Tab('||v_Count||').schedule_type',
15291: g_Reconcile_Tab(v_Count).schedule_type);
15292: END IF;
15293:
15294: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
15293:
15294: v_intransit_calc_basis := UPPER(x_Group_rec.setup_terms_rec.intransit_calc_basis);
15295: --
15296: IF (l_debug <> -1) THEN
15297: rlm_core_sv.dlog(k_DEBUG, 'Intransit calc basis ',x_Group_rec.setup_terms_rec.intransit_calc_basis);
15298: END IF;
15299: --
15300: IF x_Group_rec.setup_terms_rec.cum_control_code IN ('CUM_BY_DATE_PO','CUM_BY_PO_ONLY') THEN
15301: IF NVL(x_Current_rec.cust_po_number, k_VNULL) <>
15304: END IF;
15305: END IF;
15306: --
15307: IF (l_debug <> -1) THEN
15308: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15309: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15310: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15311: END IF;
15312: --
15305: END IF;
15306: --
15307: IF (l_debug <> -1) THEN
15308: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15309: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15310: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15311: END IF;
15312: --
15313: IF b_Match THEN
15306: --
15307: IF (l_debug <> -1) THEN
15308: rlm_core_sv.dlog(k_DEBUG, 'cust_po_number', x_Current_rec.cust_po_number);
15309: rlm_core_sv.dlog(k_DEBUG, 'rec cust_po_number', g_Reconcile_tab(v_Count).cust_po_number);
15310: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15311: END IF;
15312: --
15313: IF b_Match THEN
15314: IF x_Group_rec.setup_terms_rec.cum_control_code IN ('CUM_BY_DATE_RECORD_YEAR') THEN
15319: END IF;
15320: END IF;
15321: --
15322: IF (l_debug <> -1) THEN
15323: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15324: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15325: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15326: END IF;
15327: --
15320: END IF;
15321: --
15322: IF (l_debug <> -1) THEN
15323: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15324: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15325: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15326: END IF;
15327: --
15328: IF b_Match THEN
15321: --
15322: IF (l_debug <> -1) THEN
15323: rlm_core_sv.dlog(k_DEBUG, 'industry_attribute1', x_Current_rec.industry_attribute1);
15324: rlm_core_sv.dlog(k_DEBUG, 'rec industry_attribute1', g_Reconcile_tab(v_Count).industry_attribute1);
15325: rlm_core_sv.dlog(k_DEBUG, 'b_Match', b_Match);
15326: END IF;
15327: --
15328: IF b_Match THEN
15329: --
15338: --}
15339: END IF;
15340: --
15341: IF (l_debug <> -1) THEN
15342: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
15343: rlm_core_sv.dpop(k_SDEBUG);
15344: END IF;
15345: --
15346: RETURN(b_Match);
15339: END IF;
15340: --
15341: IF (l_debug <> -1) THEN
15342: rlm_core_sv.dlog(k_DEBUG,'b_match', b_Match);
15343: rlm_core_sv.dpop(k_SDEBUG);
15344: END IF;
15345: --
15346: RETURN(b_Match);
15347: --
15349: WHEN OTHERS THEN
15350: rlm_message_sv.sql_error('rlm_rd_sv.Match_PO_RY_Reconcile',x_progress);
15351: --
15352: IF (l_debug <> -1) THEN
15353: rlm_core_sv.dpop(k_SDEBUG,'EXCEPTION: '||SUBSTR(SQLERRM,1,200));
15354: END IF;
15355: --
15356: raise;
15357: