eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MSC_PUBLISH_SAFETY_STOCK_PKG dependencies on FND_FILE

Line 1155: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleting old safety stock matching the filter criteria');

1151: END IF;
1152: log_message(l_log_message);
1153:
1154:
1155: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleting old safety stock matching the filter criteria');
1156:
1157: --dbms_output.put_line('At 2');
1158: --dbms_output.put_line('Horizon date ' || p_horizon_start || ' ' || p_horizon_end);
1159: delete_old_safety_stock(

Line 1176: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start');

1172: );
1173:
1174:
1175: --dbms_output.put_line('At 3');
1176: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start');
1177:
1178: Open safety_stock_c (
1179: p_plan_id
1180: ,p_org_id

Line 1238: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by safety stock cursor : ' || t_org_id.COUNT);

1234: IF t_org_id IS NOT NULL AND t_org_id.COUNT > 0 THEN
1235:
1236:
1237: --dbms_output.put_line ('Records fetched by cursor ss := ' || t_org_id.COUNT);
1238: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by safety stock cursor : ' || t_org_id.COUNT);
1239: --dbms_output.put_line('At 5');
1240: get_optional_info(
1241: p_errbuf
1242: ,p_retcode

Line 1362: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by pab cursor: ' || a_org_id.COUNT);

1358: CLOSE projected_availabe_balance_c;
1359:
1360: IF a_org_id IS NOT NULL AND a_org_id.COUNT > 0 THEN
1361: --dbms_output.put_line ('Records fetched by cursor pab := ' || a_org_id.COUNT);
1362: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by pab cursor: ' || a_org_id.COUNT);
1363:
1364: get_total_qty (
1365: p_errbuf
1366: ,p_retcode

Line 1477: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish safety stock procedure: ' ||sqlerrm);

1473:
1474: EXCEPTION
1475: when others then
1476: --dbms_output.put_line('Error in publish safety stock proc: ' ||sqlerrm);
1477: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish safety stock procedure: ' ||sqlerrm);
1478: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Publish Safety Stock data ');
1479: p_retcode := 1 ; -- Bug 4560452
1480: p_errbuf := sqlerrm ;
1481:

Line 1478: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Publish Safety Stock data ');

1474: EXCEPTION
1475: when others then
1476: --dbms_output.put_line('Error in publish safety stock proc: ' ||sqlerrm);
1477: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish safety stock procedure: ' ||sqlerrm);
1478: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Publish Safety Stock data ');
1479: p_retcode := 1 ; -- Bug 4560452
1480: p_errbuf := sqlerrm ;
1481:
1482: END publish_safety_stocks;

Line 1509: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'in get total qty ' || t_item_id.COUNT);

1505: --END IF;
1506: --l_pab_total:= l_pab_total + l_onhand + l_supply - (l_demand + l_scrap_demand + l_expired_qty);
1507: -----------------------------------------------------------------------------------------
1508:
1509: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'in get total qty ' || t_item_id.COUNT);
1510: IF t_item_id is not null and t_item_id.COUNT > 0 then
1511: --dbms_output.put_line('get total: ' || t_item_id.COUNT);
1512:
1513: FOR j in 1..t_item_id.COUNT loop

Line 1532: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TOTAL QTY: ' || t_total_qty(j));

1528: ELSIF (t_pab_type(j) = PAB_EXP_LOT) THEN
1529: t_total_qty(j) := nvl(t_total_qty(j),0) + t_total_qty(j-1);
1530: t_temp_qty(j) := nvl(t_temp_qty(j),0) + nvl(t_qty(j),0);
1531: END IF;
1532: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TOTAL QTY: ' || t_total_qty(j));
1533: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TEMP QTY: ' || t_temp_qty(j));
1534: --dbms_output.put_line('ELSE Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1535: --dbms_output.put_line('ELSE Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1536:

Line 1533: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TEMP QTY: ' || t_temp_qty(j));

1529: t_total_qty(j) := nvl(t_total_qty(j),0) + t_total_qty(j-1);
1530: t_temp_qty(j) := nvl(t_temp_qty(j),0) + nvl(t_qty(j),0);
1531: END IF;
1532: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TOTAL QTY: ' || t_total_qty(j));
1533: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TEMP QTY: ' || t_temp_qty(j));
1534: --dbms_output.put_line('ELSE Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1535: --dbms_output.put_line('ELSE Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1536:
1537: ELSIF (j = 1 or t_sr_instance_id(j) <> t_sr_instance_id(j-1) or

Line 1555: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TOTAL QTY: ' || t_total_qty(j));

1551: ELSE
1552: t_total_qty(j) := nvl(t_qty(j), 0);
1553: t_temp_qty(j) := 0;
1554: END IF;
1555: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TOTAL QTY: ' || t_total_qty(j));
1556: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TEMP QTY: ' || t_temp_qty(j));
1557: --dbms_output.put_line('IF Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1558: --dbms_output.put_line('IF Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1559:

Line 1556: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TEMP QTY: ' || t_temp_qty(j));

1552: t_total_qty(j) := nvl(t_qty(j), 0);
1553: t_temp_qty(j) := 0;
1554: END IF;
1555: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TOTAL QTY: ' || t_total_qty(j));
1556: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TEMP QTY: ' || t_temp_qty(j));
1557: --dbms_output.put_line('IF Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1558: --dbms_output.put_line('IF Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1559:
1560: END IF;

Line 1568: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in get total quantity proc: ' ||sqlerrm);

1564: p_err := null ;
1565:
1566: EXCEPTION
1567: WHEN OTHERS THEN
1568: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in get total quantity proc: ' ||sqlerrm);
1569: --dbms_output.put_line('Error in get total quantity proc: ' || sqlerrm);
1570: p_ret := 1;
1571: p_err := sqlerrm ;
1572: END get_total_qty;

Line 1691: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'pub id ' || t_pub_id(j) || ' site ' || t_pub_site_id(j));

1687: when others then
1688: t_base_item_name(j) := null;
1689: end;
1690:
1691: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'pub id ' || t_pub_id(j) || ' site ' || t_pub_site_id(j));
1692: --dbms_output.put_line(' Get pub id ' || t_pub(j) || ': ' || t_pub_site(j));
1693:
1694: ----------------------------------------------------------------------
1695: -- getting the supplier info

Line 1702: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'sup id ' || p_supp_id || ' site ' || p_supp_site_id);

1698: t_supp.EXTEND;
1699: t_supp_site.EXTEND;
1700: t_supp_site_id.EXTEND;
1701:
1702: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'sup id ' || p_supp_id || ' site ' || p_supp_site_id);
1703: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'item' || t_item_id(j) || ' org' || t_org_id(j) || 'sr ' || t_sr_instance_id(j));
1704: if (p_supp_id is not null ) THEN
1705: BEGIN
1706: --dbms_output.put_line('BEGIN');

Line 1703: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'item' || t_item_id(j) || ' org' || t_org_id(j) || 'sr ' || t_sr_instance_id(j));

1699: t_supp_site.EXTEND;
1700: t_supp_site_id.EXTEND;
1701:
1702: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'sup id ' || p_supp_id || ' site ' || p_supp_site_id);
1703: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'item' || t_item_id(j) || ' org' || t_org_id(j) || 'sr ' || t_sr_instance_id(j));
1704: if (p_supp_id is not null ) THEN
1705: BEGIN
1706: --dbms_output.put_line('BEGIN');
1707: select distinct c.company_id,

Line 1740: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier info. Please check the ASL settings. Error: '||sqlerrm);

1736: t_pub_id(j) := null; -- the data should not be populated.
1737: t_bucket_index(j) := null;
1738: p_ret := 1;
1739: p_err := sqlerrm ;
1740: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier info. Please check the ASL settings. Error: '||sqlerrm);
1741: END;
1742:
1743:
1744: IF (p_supp_site_id is not null) then

Line 1778: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier Site. Please check the ASL settings. Error: '||sqlerrm);

1774: t_pub_id(j) := null; -- the data should not be populated.
1775: t_bucket_index(j) := null;
1776: p_ret := 1;
1777: p_err := sqlerrm ;
1778: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier Site. Please check the ASL settings. Error: '||sqlerrm);
1779: END;
1780: END IF;
1781:
1782: end if;

Line 1821: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in sup_site : '||sqlerrm);

1817: ----------------------------------------------------------------------------
1818: t_pub_id(j) := null; -- the data should not be populated.
1819: t_bucket_index(j) := null;
1820:
1821: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in sup_site : '||sqlerrm);
1822: END; */
1823:
1824: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item ' || t_item_name(j) || ' Supplier ' || t_supp(j) || ' Supplier site ' || t_supp_site(j));
1825: ------------------------------------------------------------------

Line 1824: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item ' || t_item_name(j) || ' Supplier ' || t_supp(j) || ' Supplier site ' || t_supp_site(j));

1820:
1821: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in sup_site : '||sqlerrm);
1822: END; */
1823:
1824: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item ' || t_item_name(j) || ' Supplier ' || t_supp(j) || ' Supplier site ' || t_supp_site(j));
1825: ------------------------------------------------------------------
1826: -- getting the master item name
1827: ------------------------------------------------------------------
1828:

Line 1848: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in get option info proc: ' || sqlerrm);

1844: EXCEPTION
1845: WHEN others then
1846: null;
1847: --dbms_output.put_line('Error in get option info proc: ' || sqlerrm);
1848: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in get option info proc: ' || sqlerrm);
1849: p_ret := 1;
1850: p_err := sqlerrm ;
1851:
1852: END get_optional_info;

Line 2006: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || ' date ' || t_key_date(j));

2002:
2003: l_order_type_desc := get_order_type (SAFETY_STOCK);
2004: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
2005: --dbms_output.Put_line('HERE insert ' || t_qty(j) || ' DATE ' || t_key_date(j));
2006: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || ' date ' || t_key_date(j));
2007: --dbms_output.put_line('Org ' || t_org_id(j) || 'SR ' || t_sr_instance_id(j) || 'Bucket ' ||t_bucket_type(j) || 'Key date ' || t_key_date(j));
2008:
2009: -- IF (l_next_work_date = t_key_date(j)) THEN
2010: IF (t_key_date(j) >= p_horizon_start and t_key_date(j) <= p_horizon_end ) THEN

Line 2100: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || 'date ' || t_key_date(j));

2096: t_pub_id(j-1) is not null AND
2097: t_pub_id(j) = t_pub_id(j-1) AND
2098: t_pub_site_id(j) = t_pub_site_id(j-1) AND t_item_id(j) = t_item_id(j-1) AND
2099: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) > 1 ) THEN
2100: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || 'date ' || t_key_date(j));
2101:
2102: ----------------------------------------------------------------------
2103: --if the current record = the previous record (same plan_id, org_id,
2104: --sr_instance_id, item_id) and current bucket index prev record

Line 2108: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));

2104: --sr_instance_id, item_id) and current bucket index prev record
2105: --bucket index <> 1, need to fill up the gap (before the safety stock
2106: --is changed)
2107: -----------------------------------------------------------------------
2108: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2109: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2110:
2111: Open get_bucket_date (p_plan_id,
2112: t_sr_instance_id(j),

Line 2109: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));

2105: --bucket index <> 1, need to fill up the gap (before the safety stock
2106: --is changed)
2107: -----------------------------------------------------------------------
2108: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2109: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2110:
2111: Open get_bucket_date (p_plan_id,
2112: t_sr_instance_id(j),
2113: t_org_id(j),

Line 2132: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);

2128:
2129: IF (k > 1) THEN
2130:
2131: IF (k = b_bkt_index.COUNT) THEN
2132: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2133: b_bkt_end_date(k) := t_key_date(j);
2134: l_qty := t_qty(j);
2135: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2136: ELSE

Line 2135: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));

2131: IF (k = b_bkt_index.COUNT) THEN
2132: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2133: b_bkt_end_date(k) := t_key_date(j);
2134: l_qty := t_qty(j);
2135: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2136: ELSE
2137: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'At 7d , j: ' || j);
2138: l_qty := t_qty(j-1);
2139:

Line 2137: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'At 7d , j: ' || j);

2133: b_bkt_end_date(k) := t_key_date(j);
2134: l_qty := t_qty(j);
2135: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2136: ELSE
2137: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'At 7d , j: ' || j);
2138: l_qty := t_qty(j-1);
2139:
2140: END IF;
2141:

Line 2490: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted for safety stock : ' || l_record_inserted);

2486: END IF;
2487: END IF ;
2488:
2489: END LOOP;
2490: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted for safety stock : ' || l_record_inserted);
2491: --dbms_output.put_line( 'Records to be inserted for safety stock : ' || l_record_inserted);
2492: END IF; -- for safety stock
2493:
2494:

Line 2521: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Compute PAB past due with plan start date ' || l_plan_start_date);

2517: t_pub_id(j) = t_pub_id(j-1) AND
2518: t_pub_site_id(j) = t_pub_site_id(j-1) AND
2519: t_item_id(j) = t_item_id(j-1))) THEN
2520:
2521: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Compute PAB past due with plan start date ' || l_plan_start_date);
2522: l_exp_qty := nvl(t_temp_qty(j),0);
2523: IF (l_exp_qty < 0) THEN
2524: l_exp_qty:= 0;
2525: END IF;

Line 2527: FND_FILE.PUT_LINE(FND_FILE.LOG, 'total ' || l_total || ' item ' || t_item_id(j) || ' Key date ' || t_key_date(j));

2523: IF (l_exp_qty < 0) THEN
2524: l_exp_qty:= 0;
2525: END IF;
2526: l_total:= t_total_qty(j) - l_exp_qty;
2527: FND_FILE.PUT_LINE(FND_FILE.LOG, 'total ' || l_total || ' item ' || t_item_id(j) || ' Key date ' || t_key_date(j));
2528: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',1);
2529:
2530: IF (trunc(t_key_date(j)) >= trunc(p_horizon_start)) THEN
2531: update msc_sup_dem_entries

Line 2545: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));

2541: l_rowcount := sql%ROWCOUNT;
2542:
2543: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
2544: IF l_rowcount = 0 THEN
2545: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2546: --dbms_output.put_line('row count = 0'|| 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2547: insert into msc_sup_dem_entries (
2548: transaction_id,
2549: plan_id,

Line 2638: --FND_FILE.PUT_LINE(FND_FILE.LOG, '2');

2634: t_item_id(j) = t_item_id(j-1) AND
2635: t_key_date(j) <> t_key_date(j-1) AND
2636: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) > 1 ) THEN
2637:
2638: --FND_FILE.PUT_LINE(FND_FILE.LOG, '2');
2639: l_exp_qty := nvl(t_temp_qty(j),0);
2640: IF (l_exp_qty < 0) THEN
2641: l_exp_qty:= 0;
2642: END IF;

Line 2657: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));

2653: --and current bucket index prev record
2654: --bucket index <> 1, need to fill up the gap (before the pab
2655: --is changed)
2656: -----------------------------------------------------------------------
2657: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2658: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2659:
2660: Open get_bucket_date (p_plan_id,
2661: t_sr_instance_id(j),

Line 2658: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));

2654: --bucket index <> 1, need to fill up the gap (before the pab
2655: --is changed)
2656: -----------------------------------------------------------------------
2657: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2658: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2659:
2660: Open get_bucket_date (p_plan_id,
2661: t_sr_instance_id(j),
2662: t_org_id(j),

Line 2680: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);

2676:
2677: IF (k > 1) THEN
2678:
2679: IF (k = b_bkt_index.COUNT) THEN
2680: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2681: b_bkt_end_date(k) := t_key_date(j);
2682: l_total := t_total_qty(j) - l_exp_qty;
2683: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2684:

Line 2683: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));

2679: IF (k = b_bkt_index.COUNT) THEN
2680: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2681: b_bkt_end_date(k) := t_key_date(j);
2682: l_total := t_total_qty(j) - l_exp_qty;
2683: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2684:
2685: ELSE
2686: l_exp_qty := nvl(t_temp_qty(j-1),0);
2687: IF (l_exp_qty < 0) THEN

Line 2696: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'pab: ' || t_qty(j) || 'date ' || t_key_date(j));

2692:
2693: l_order_type_desc := msc_x_util.get_lookup_meaning ('MSC_X_ORDER_TYPE', PROJECTED_AVAILABLE_BALANCE);
2694: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',b_bkt_type(k));
2695: --dbms_output.Put_line('fill gap ' || t_qty(j));
2696: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'pab: ' || t_qty(j) || 'date ' || t_key_date(j));
2697:
2698: /*
2699: l_prev_work_date := msc_calendar.prev_work_day(t_org_id(j),
2700: t_sr_instance_id(j),

Line 2807: --FND_FILE.PUT_LINE(FND_FILE.LOG, '3');

2803: t_item_id(j) <> t_item_id(j-1) or
2804: t_key_date(j) <> t_key_date(j-1) OR
2805: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) = 1))) THEN
2806:
2807: --FND_FILE.PUT_LINE(FND_FILE.LOG, '3');
2808: l_exp_qty := nvl(t_temp_qty(j),0);
2809: IF (l_exp_qty < 0) THEN
2810: l_exp_qty:= 0;
2811: END IF;

Line 2905: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Here 4 : j: ' || j ||' t_pub_id.COUNT '||t_pub_id.COUNT );

2901:
2902: ELSIF (t_pub_id(j) is not null) THEN
2903:
2904:
2905: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Here 4 : j: ' || j ||' t_pub_id.COUNT '||t_pub_id.COUNT );
2906:
2907: --dbms_output.put_line('update date ' || t_key_date(j) || ' qty ' || l_total || ' t tol ' || t_total_qty(j) || ' ex ' || l_exp_qty);
2908:
2909: l_rowcount := 0;

Line 2935: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));

2931: l_rowcount := sql%ROWCOUNT;
2932:
2933: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
2934: IF l_rowcount = 0 THEN
2935: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2936: --dbms_output.put_line('row count = 0'|| 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2937: insert into msc_sup_dem_entries (
2938: transaction_id,
2939: plan_id,

Line 3285: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted/updated for pab based on horizon date: ' || l_record_inserted);

3281:
3282: END LOOP; ---for outermost j block
3283:
3284: --dbms_output.put_line('Records to be inserted/updated for pab based on horizon date: ' || l_record_inserted);
3285: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted/updated for pab based on horizon date: ' || l_record_inserted);
3286:
3287: END IF; --------to end PAB calculations
3288: p_ret := 0;
3289: p_err := null ;

Line 3293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in insert_sup_dem_entries. PSS program will not publish data. Error: ' || sqlerrm);

3289: p_err := null ;
3290: EXCEPTION
3291: when others then
3292: --dbms_output.put_line('Error in insert_sup_dem_entries: ' || sqlerrm);
3293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in insert_sup_dem_entries. PSS program will not publish data. Error: ' || sqlerrm);
3294: p_ret := 1;
3295: p_err := sqlerrm ;
3296: END insert_into_sup_dem;
3297:

Line 3348: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);

3344: --NVL(sd.project_number,'-99') = nvl(p_project_id, NVL(sd.project_number, '-99')) and
3345: --NVL(sd.task_number, '-99') = nvl(p_task_id, NVL(sd.task_number, '-99'));
3346:
3347: l_row := SQL%ROWCOUNT;
3348: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
3349: --dbms_output.put_line('Deleted number records: ' || l_row);
3350: ELSIF ( p_overwrite = 2) THEN --delete by overwritten
3351: delete from msc_sup_dem_entries sd
3352: where sd.publisher_order_type in (SAFETY_STOCK, PROJECTED_AVAILABLE_BALANCE) and

Line 3378: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);

3374: --NVL(sd.task_number, '-99') = nvl(p_task_id, NVL(sd.task_number, '-99')) and
3375: key_date between nvl(p_horizon_start, sysdate - 36500) and
3376: nvl(p_horizon_end, sysdate + 36500);
3377: l_row := SQL%ROWCOUNT;
3378: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
3379: --dbms_output.put_line('Deleted number records: ' || l_row);
3380: END IF;
3381: commit;
3382:

Line 3390: FND_FILE.PUT_LINE(FND_FILE.LOG, p_string);

3386: p_string IN VARCHAR2
3387: ) IS
3388: BEGIN
3389: IF fnd_global.conc_request_id > 0 THEN
3390: FND_FILE.PUT_LINE(FND_FILE.LOG, p_string);
3391: NULL;
3392: ELSE
3393: --dbms_OUTPUT.PUT_LINE( p_string);
3394: null;