75:
76: BEGIN
77:
78: IF g_log_enabled = 'Y' AND
79: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
80: THEN
81: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
82: , G_PKG_NAME
83: , '>> ' || G_PKG_NAME || '.' || l_program || ': Start'
77:
78: IF g_log_enabled = 'Y' AND
79: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
80: THEN
81: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
82: , G_PKG_NAME
83: , '>> ' || G_PKG_NAME || '.' || l_program || ': Start'
84: );
85: END IF;
84: );
85: END IF;
86:
87: IF g_log_enabled = 'Y' AND
88: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
89: THEN
90: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
91: , G_PKG_NAME
92: , '>> ' || l_program || ': p_oem_organization = '
86:
87: IF g_log_enabled = 'Y' AND
88: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
89: THEN
90: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
91: , G_PKG_NAME
92: , '>> ' || l_program || ': p_oem_organization = '
93: || p_oem_organization
94: || ', p_tp_organization = ' || p_tp_organization
117: l_start_date := p_need_by_date - l_intransit_time
118: - ROUND(NVL(l_fixed_time,0) + (p_quantity*NVL(l_var_time,0)));
119:
120: IF g_log_enabled = 'Y' AND
121: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
122: THEN
123: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
124: , G_PKG_NAME
125: , '>> '||l_program||': l_start_date (before considering off days) = '
119:
120: IF g_log_enabled = 'Y' AND
121: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
122: THEN
123: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
124: , G_PKG_NAME
125: , '>> '||l_program||': l_start_date (before considering off days) = '
126: || TO_CHAR(l_start_date, 'YYYY-MON-DD HH24:MI:SS')
127: );
139: AND bcd.calendar_date BETWEEN TRUNC(l_start_date) AND TRUNC(p_need_by_date)
140: AND seq_num IS NULL;
141:
142: IF g_log_enabled = 'Y' AND
143: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
144: THEN
145: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
146: , G_PKG_NAME
147: , '>> '||l_program||': l_off_days = '|| l_off_days
141:
142: IF g_log_enabled = 'Y' AND
143: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
144: THEN
145: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
146: , G_PKG_NAME
147: , '>> '||l_program||': l_off_days = '|| l_off_days
148: );
149: END IF;
151: l_start_date := p_need_by_date - l_off_days - l_intransit_time
152: - ROUND(NVL(l_fixed_time,0) + (p_quantity*NVL(l_var_time,0)));
153:
154: IF g_log_enabled = 'Y' AND
155: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
156: THEN
157: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
158: , G_PKG_NAME
159: , '>> '||l_program||': l_start_date = '
153:
154: IF g_log_enabled = 'Y' AND
155: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
156: THEN
157: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
158: , G_PKG_NAME
159: , '>> '||l_program||': l_start_date = '
160: || TO_CHAR(l_start_date, 'YYYY-MON-DD HH24:MI:SS')
161: );
171: AND mp.organization_id = p_tp_organization
172: AND TRUNC(bcd.calendar_date) = TRUNC(l_start_date);
173:
174: IF g_log_enabled = 'Y' AND
175: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
176: THEN
177: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
178: , G_PKG_NAME
179: , '>> '||l_program||': From bom_calendar_dates: l_seq_num = '|| NVL(TO_CHAR(l_seq_num), 'NULL')
173:
174: IF g_log_enabled = 'Y' AND
175: (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
176: THEN
177: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
178: , G_PKG_NAME
179: , '>> '||l_program||': From bom_calendar_dates: l_seq_num = '|| NVL(TO_CHAR(l_seq_num), 'NULL')
180: || ', l_prior_date = ' || l_prior_date
181: );
197:
198: x_start_date := l_start_date;
199:
200: IF g_log_enabled = 'Y' THEN
201: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
202: THEN
203: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
204: , G_PKG_NAME
205: , '>> '||l_program||'Planned Date is '||x_start_date
199:
200: IF g_log_enabled = 'Y' THEN
201: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
202: THEN
203: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
204: , G_PKG_NAME
205: , '>> '||l_program||'Planned Date is '||x_start_date
206: );
207: END IF;
267: x_end_date := sysdate;
268: END IF;
269:
270: IF g_log_enabled = 'Y' THEN
271: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
272: THEN
273: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
274: , G_PKG_NAME
275: , '>> '||l_program||'Planned end Date is '||x_end_date
269:
270: IF g_log_enabled = 'Y' THEN
271: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
272: THEN
273: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
274: , G_PKG_NAME
275: , '>> '||l_program||'Planned end Date is '||x_end_date
276: );
277: END IF;
329: FROM jmf_shikyu_components
330: WHERE subcontract_po_shipment_id = p_subcontract_po_shipment_id;
331: BEGIN
332:
333: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
334: THEN
335: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
336: , G_PKG_NAME
337: , 'JMFVSKWB: Into process_wip_job package'
331: BEGIN
332:
333: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
334: THEN
335: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
336: , G_PKG_NAME
337: , 'JMFVSKWB: Into process_wip_job package'
338: );
339: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
335: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
336: , G_PKG_NAME
337: , 'JMFVSKWB: Into process_wip_job package'
338: );
339: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
340: , G_PKG_NAME
341: , 'JMFVSKWB: p_subcontract_po_shipment_id => ' ||
342: p_subcontract_po_shipment_id
343: );
340: , G_PKG_NAME
341: , 'JMFVSKWB: p_subcontract_po_shipment_id => ' ||
342: p_subcontract_po_shipment_id
343: );
344: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
345: , G_PKG_NAME
346: , 'JMFVSKWB: p_action => ' ||
347: p_action
348: );
345: , G_PKG_NAME
346: , 'JMFVSKWB: p_action => ' ||
347: p_action
348: );
349: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
350: , G_PKG_NAME
351: , 'JMFVSKWB: p_need_by_date => '||
352: p_need_by_date
353: );
350: , G_PKG_NAME
351: , 'JMFVSKWB: p_need_by_date => '||
352: p_need_by_date
353: );
354: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
355: , G_PKG_NAME
356: , 'JMFVSKWB: p_quantity => '||
357: p_quantity
358: );
407: WHERE wip_entity_id = l_subcontract_orders_rec.wip_entity_id;
408: END IF;
409:
410: IF g_log_enabled = 'Y' THEN
411: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
412: THEN
413: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
414: , G_PKG_NAME
415: , 'Start date passed to WIP is '||l_start_date
409:
410: IF g_log_enabled = 'Y' THEN
411: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
412: THEN
413: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
414: , G_PKG_NAME
415: , 'Start date passed to WIP is '||l_start_date
416: );
417: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
413: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
414: , G_PKG_NAME
415: , 'Start date passed to WIP is '||l_start_date
416: );
417: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
418: , G_PKG_NAME
419: , 'End date passed to WIP is '||l_end_date
420: );
421: END IF;