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 1139: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleting old safety stock matching the filter criteria');

1135: END IF;
1136: log_message(l_log_message);
1137:
1138:
1139: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleting old safety stock matching the filter criteria');
1140:
1141: --dbms_output.put_line('At 2');
1142: --dbms_output.put_line('Horizon date ' || p_horizon_start || ' ' || p_horizon_end);
1143: delete_old_safety_stock(

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

1156: );
1157:
1158:
1159: --dbms_output.put_line('At 3');
1160: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Start');
1161:
1162: Open safety_stock_c (
1163: p_plan_id
1164: ,p_org_id

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

1218: IF t_org_id IS NOT NULL AND t_org_id.COUNT > 0 THEN
1219:
1220:
1221: --dbms_output.put_line ('Records fetched by cursor ss := ' || t_org_id.COUNT);
1222: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by safety stock cursor : ' || t_org_id.COUNT);
1223: --dbms_output.put_line('At 5');
1224: get_optional_info(
1225: p_errbuf
1226: ,p_retcode

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

1342: CLOSE projected_availabe_balance_c;
1343:
1344: IF a_org_id IS NOT NULL AND a_org_id.COUNT > 0 THEN
1345: --dbms_output.put_line ('Records fetched by cursor pab := ' || a_org_id.COUNT);
1346: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by pab cursor: ' || a_org_id.COUNT);
1347:
1348: get_total_qty (
1349: p_errbuf
1350: ,p_retcode

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

1457:
1458: EXCEPTION
1459: when others then
1460: --dbms_output.put_line('Error in publish safety stock proc: ' ||sqlerrm);
1461: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish safety stock procedure: ' ||sqlerrm);
1462: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Publish Safety Stock data ');
1463: p_retcode := 1 ; -- Bug 4560452
1464: p_errbuf := sqlerrm ;
1465:

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

1458: EXCEPTION
1459: when others then
1460: --dbms_output.put_line('Error in publish safety stock proc: ' ||sqlerrm);
1461: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish safety stock procedure: ' ||sqlerrm);
1462: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Publish Safety Stock data ');
1463: p_retcode := 1 ; -- Bug 4560452
1464: p_errbuf := sqlerrm ;
1465:
1466: END publish_safety_stocks;

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

1489: --END IF;
1490: --l_pab_total:= l_pab_total + l_onhand + l_supply - (l_demand + l_scrap_demand + l_expired_qty);
1491: -----------------------------------------------------------------------------------------
1492:
1493: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'in get total qty ' || t_item_id.COUNT);
1494: IF t_item_id is not null and t_item_id.COUNT > 0 then
1495: --dbms_output.put_line('get total: ' || t_item_id.COUNT);
1496:
1497: FOR j in 1..t_item_id.COUNT loop

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

1512: ELSIF (t_pab_type(j) = PAB_EXP_LOT) THEN
1513: t_total_qty(j) := nvl(t_total_qty(j),0) + t_total_qty(j-1);
1514: t_temp_qty(j) := nvl(t_temp_qty(j),0) + nvl(t_qty(j),0);
1515: END IF;
1516: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TOTAL QTY: ' || t_total_qty(j));
1517: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TEMP QTY: ' || t_temp_qty(j));
1518: --dbms_output.put_line('ELSE Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1519: --dbms_output.put_line('ELSE Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1520:

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

1513: t_total_qty(j) := nvl(t_total_qty(j),0) + t_total_qty(j-1);
1514: t_temp_qty(j) := nvl(t_temp_qty(j),0) + nvl(t_qty(j),0);
1515: END IF;
1516: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TOTAL QTY: ' || t_total_qty(j));
1517: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'ELSE TEMP QTY: ' || t_temp_qty(j));
1518: --dbms_output.put_line('ELSE Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1519: --dbms_output.put_line('ELSE Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1520:
1521: ELSIF (j = 1 or t_sr_instance_id(j) <> t_sr_instance_id(j-1) or

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

1535: ELSE
1536: t_total_qty(j) := nvl(t_qty(j), 0);
1537: t_temp_qty(j) := 0;
1538: END IF;
1539: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TOTAL QTY: ' || t_total_qty(j));
1540: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TEMP QTY: ' || t_temp_qty(j));
1541: --dbms_output.put_line('IF Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1542: --dbms_output.put_line('IF Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1543:

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

1536: t_total_qty(j) := nvl(t_qty(j), 0);
1537: t_temp_qty(j) := 0;
1538: END IF;
1539: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TOTAL QTY: ' || t_total_qty(j));
1540: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'IF TEMP QTY: ' || t_temp_qty(j));
1541: --dbms_output.put_line('IF Total qty ' || t_total_qty(j) || ' date ' || t_key_date(j));
1542: --dbms_output.put_line('IF Temp qty ' || t_temp_qty(j) || ' date ' || t_key_date(j));
1543:
1544: END IF;

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

1548: p_err := null ;
1549:
1550: EXCEPTION
1551: WHEN OTHERS THEN
1552: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in get total quantity proc: ' ||sqlerrm);
1553: --dbms_output.put_line('Error in get total quantity proc: ' || sqlerrm);
1554: p_ret := 1;
1555: p_err := sqlerrm ;
1556: END get_total_qty;

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

1671: when others then
1672: t_base_item_name(j) := null;
1673: end;
1674:
1675: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'pub id ' || t_pub_id(j) || ' site ' || t_pub_site_id(j));
1676: --dbms_output.put_line(' Get pub id ' || t_pub(j) || ': ' || t_pub_site(j));
1677:
1678: ----------------------------------------------------------------------
1679: -- getting the supplier info

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

1682: t_supp.EXTEND;
1683: t_supp_site.EXTEND;
1684: t_supp_site_id.EXTEND;
1685:
1686: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'sup id ' || p_supp_id || ' site ' || p_supp_site_id);
1687: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'item' || t_item_id(j) || ' org' || t_org_id(j) || 'sr ' || t_sr_instance_id(j));
1688: if (p_supp_id is not null ) THEN
1689: BEGIN
1690: --dbms_output.put_line('BEGIN');

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

1683: t_supp_site.EXTEND;
1684: t_supp_site_id.EXTEND;
1685:
1686: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'sup id ' || p_supp_id || ' site ' || p_supp_site_id);
1687: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'item' || t_item_id(j) || ' org' || t_org_id(j) || 'sr ' || t_sr_instance_id(j));
1688: if (p_supp_id is not null ) THEN
1689: BEGIN
1690: --dbms_output.put_line('BEGIN');
1691: select distinct c.company_id,

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

1720: t_pub_id(j) := null; -- the data should not be populated.
1721: t_bucket_index(j) := null;
1722: p_ret := 1;
1723: p_err := sqlerrm ;
1724: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier info. Please check the ASL settings. Error: '||sqlerrm);
1725: END;
1726:
1727:
1728: IF (p_supp_site_id is not null) then

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

1758: t_pub_id(j) := null; -- the data should not be populated.
1759: t_bucket_index(j) := null;
1760: p_ret := 1;
1761: p_err := sqlerrm ;
1762: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in getting Supplier Site. Please check the ASL settings. Error: '||sqlerrm);
1763: END;
1764: END IF;
1765:
1766: end if;

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

1801: ----------------------------------------------------------------------------
1802: t_pub_id(j) := null; -- the data should not be populated.
1803: t_bucket_index(j) := null;
1804:
1805: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in sup_site : '||sqlerrm);
1806: END; */
1807:
1808: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item ' || t_item_name(j) || ' Supplier ' || t_supp(j) || ' Supplier site ' || t_supp_site(j));
1809: ------------------------------------------------------------------

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

1804:
1805: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in sup_site : '||sqlerrm);
1806: END; */
1807:
1808: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item ' || t_item_name(j) || ' Supplier ' || t_supp(j) || ' Supplier site ' || t_supp_site(j));
1809: ------------------------------------------------------------------
1810: -- getting the master item name
1811: ------------------------------------------------------------------
1812:

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

1828: EXCEPTION
1829: WHEN others then
1830: null;
1831: --dbms_output.put_line('Error in get option info proc: ' || sqlerrm);
1832: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in get option info proc: ' || sqlerrm);
1833: p_ret := 1;
1834: p_err := sqlerrm ;
1835:
1836: END get_optional_info;

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

1986:
1987: l_order_type_desc := get_order_type (SAFETY_STOCK);
1988: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
1989: --dbms_output.Put_line('HERE insert ' || t_qty(j) || ' DATE ' || t_key_date(j));
1990: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || ' date ' || t_key_date(j));
1991: --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));
1992:
1993: -- IF (l_next_work_date = t_key_date(j)) THEN
1994: IF (t_key_date(j) >= p_horizon_start and t_key_date(j) <= p_horizon_end ) THEN

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

2080: t_pub_id(j-1) is not null AND
2081: t_pub_id(j) = t_pub_id(j-1) AND
2082: t_pub_site_id(j) = t_pub_site_id(j-1) AND t_item_id(j) = t_item_id(j-1) AND
2083: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) > 1 ) THEN
2084: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'safety stock: ' || t_qty(j) || 'date ' || t_key_date(j));
2085:
2086: ----------------------------------------------------------------------
2087: --if the current record = the previous record (same plan_id, org_id,
2088: --sr_instance_id, item_id) and current bucket index prev record

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

2088: --sr_instance_id, item_id) and current bucket index prev record
2089: --bucket index <> 1, need to fill up the gap (before the safety stock
2090: --is changed)
2091: -----------------------------------------------------------------------
2092: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2093: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2094:
2095: Open get_bucket_date (p_plan_id,
2096: t_sr_instance_id(j),

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

2089: --bucket index <> 1, need to fill up the gap (before the safety stock
2090: --is changed)
2091: -----------------------------------------------------------------------
2092: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2093: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2094:
2095: Open get_bucket_date (p_plan_id,
2096: t_sr_instance_id(j),
2097: t_org_id(j),

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

2112:
2113: IF (k > 1) THEN
2114:
2115: IF (k = b_bkt_index.COUNT) THEN
2116: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2117: b_bkt_end_date(k) := t_key_date(j);
2118: l_qty := t_qty(j);
2119: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2120: ELSE

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

2115: IF (k = b_bkt_index.COUNT) THEN
2116: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2117: b_bkt_end_date(k) := t_key_date(j);
2118: l_qty := t_qty(j);
2119: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2120: ELSE
2121: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'At 7d , j: ' || j);
2122: l_qty := t_qty(j-1);
2123:

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

2117: b_bkt_end_date(k) := t_key_date(j);
2118: l_qty := t_qty(j);
2119: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2120: ELSE
2121: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'At 7d , j: ' || j);
2122: l_qty := t_qty(j-1);
2123:
2124: END IF;
2125:

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

2470: END IF;
2471: END IF ;
2472:
2473: END LOOP;
2474: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted for safety stock : ' || l_record_inserted);
2475: --dbms_output.put_line( 'Records to be inserted for safety stock : ' || l_record_inserted);
2476: END IF; -- for safety stock
2477:
2478:

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

2501: t_pub_id(j) = t_pub_id(j-1) AND
2502: t_pub_site_id(j) = t_pub_site_id(j-1) AND
2503: t_item_id(j) = t_item_id(j-1))) THEN
2504:
2505: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Compute PAB past due with plan start date ' || l_plan_start_date);
2506: l_exp_qty := nvl(t_temp_qty(j),0);
2507: IF (l_exp_qty < 0) THEN
2508: l_exp_qty:= 0;
2509: END IF;

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

2507: IF (l_exp_qty < 0) THEN
2508: l_exp_qty:= 0;
2509: END IF;
2510: l_total:= t_total_qty(j) - l_exp_qty;
2511: FND_FILE.PUT_LINE(FND_FILE.LOG, 'total ' || l_total || ' item ' || t_item_id(j) || ' Key date ' || t_key_date(j));
2512: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',1);
2513:
2514: IF (trunc(t_key_date(j)) >= trunc(p_horizon_start)) THEN
2515: update msc_sup_dem_entries

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

2525: l_rowcount := sql%ROWCOUNT;
2526:
2527: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
2528: IF l_rowcount = 0 THEN
2529: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2530: --dbms_output.put_line('row count = 0'|| 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2531: insert into msc_sup_dem_entries (
2532: transaction_id,
2533: plan_id,

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

2618: t_item_id(j) = t_item_id(j-1) AND
2619: t_key_date(j) <> t_key_date(j-1) AND
2620: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) > 1 ) THEN
2621:
2622: --FND_FILE.PUT_LINE(FND_FILE.LOG, '2');
2623: l_exp_qty := nvl(t_temp_qty(j),0);
2624: IF (l_exp_qty < 0) THEN
2625: l_exp_qty:= 0;
2626: END IF;

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

2637: --and current bucket index prev record
2638: --bucket index <> 1, need to fill up the gap (before the pab
2639: --is changed)
2640: -----------------------------------------------------------------------
2641: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2642: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2643:
2644: Open get_bucket_date (p_plan_id,
2645: t_sr_instance_id(j),

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

2638: --bucket index <> 1, need to fill up the gap (before the pab
2639: --is changed)
2640: -----------------------------------------------------------------------
2641: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j-1 ' || t_bucket_start(j-1));
2642: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'bucket j ' || t_bucket_start(j));
2643:
2644: Open get_bucket_date (p_plan_id,
2645: t_sr_instance_id(j),
2646: t_org_id(j),

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

2660:
2661: IF (k > 1) THEN
2662:
2663: IF (k = b_bkt_index.COUNT) THEN
2664: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2665: b_bkt_end_date(k) := t_key_date(j);
2666: l_total := t_total_qty(j) - l_exp_qty;
2667: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2668:

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

2663: IF (k = b_bkt_index.COUNT) THEN
2664: ----FND_FILE.PUT_LINE(FND_FILE.LOG, 'k = b_bkt_index.COUNT ' || b_bkt_index.COUNT);
2665: b_bkt_end_date(k) := t_key_date(j);
2666: l_total := t_total_qty(j) - l_exp_qty;
2667: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'end_date ' || b_bkt_end_date(k));
2668:
2669: ELSE
2670: l_exp_qty := nvl(t_temp_qty(j-1),0);
2671: IF (l_exp_qty < 0) THEN

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

2676:
2677: l_order_type_desc := msc_x_util.get_lookup_meaning ('MSC_X_ORDER_TYPE', PROJECTED_AVAILABLE_BALANCE);
2678: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',b_bkt_type(k));
2679: --dbms_output.Put_line('fill gap ' || t_qty(j));
2680: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'pab: ' || t_qty(j) || 'date ' || t_key_date(j));
2681:
2682: /*
2683: l_prev_work_date := msc_calendar.prev_work_day(t_org_id(j),
2684: t_sr_instance_id(j),

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

2787: t_item_id(j) <> t_item_id(j-1) or
2788: t_key_date(j) <> t_key_date(j-1) OR
2789: t_bucket_index(j) - nvl(t_bucket_index(j-1), t_bucket_index(j) -1) = 1))) THEN
2790:
2791: --FND_FILE.PUT_LINE(FND_FILE.LOG, '3');
2792: l_exp_qty := nvl(t_temp_qty(j),0);
2793: IF (l_exp_qty < 0) THEN
2794: l_exp_qty:= 0;
2795: END IF;

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

2885:
2886: ELSIF (t_pub_id(j) is not null) THEN
2887:
2888:
2889: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Here 4 : j: ' || j ||' t_pub_id.COUNT '||t_pub_id.COUNT );
2890:
2891: --dbms_output.put_line('update date ' || t_key_date(j) || ' qty ' || l_total || ' t tol ' || t_total_qty(j) || ' ex ' || l_exp_qty);
2892:
2893: l_rowcount := 0;

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

2915: l_rowcount := sql%ROWCOUNT;
2916:
2917: l_bucket_type_desc := msc_x_util.get_lookup_meaning('MSC_X_BUCKET_TYPE',t_bucket_type(j));
2918: IF l_rowcount = 0 THEN
2919: FND_FILE.PUT_LINE(FND_FILE.LOG, 'row count = 0' || 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2920: --dbms_output.put_line('row count = 0'|| 'Pub ' || t_pub(j) || 'Pub id ' || t_pub_id(j));
2921: insert into msc_sup_dem_entries (
2922: transaction_id,
2923: plan_id,

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

3265:
3266: END LOOP; ---for outermost j block
3267:
3268: --dbms_output.put_line('Records to be inserted/updated for pab based on horizon date: ' || l_record_inserted);
3269: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records to be inserted/updated for pab based on horizon date: ' || l_record_inserted);
3270:
3271: END IF; --------to end PAB calculations
3272: p_ret := 0;
3273: p_err := null ;

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

3273: p_err := null ;
3274: EXCEPTION
3275: when others then
3276: --dbms_output.put_line('Error in insert_sup_dem_entries: ' || sqlerrm);
3277: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in insert_sup_dem_entries. PSS program will not publish data. Error: ' || sqlerrm);
3278: p_ret := 1;
3279: p_err := sqlerrm ;
3280: END insert_into_sup_dem;
3281:

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

3328: --NVL(sd.project_number,'-99') = nvl(p_project_id, NVL(sd.project_number, '-99')) and
3329: --NVL(sd.task_number, '-99') = nvl(p_task_id, NVL(sd.task_number, '-99'));
3330:
3331: l_row := SQL%ROWCOUNT;
3332: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
3333: --dbms_output.put_line('Deleted number records: ' || l_row);
3334: ELSIF ( p_overwrite = 2) THEN --delete by overwritten
3335: delete from msc_sup_dem_entries sd
3336: where sd.publisher_order_type in (SAFETY_STOCK, PROJECTED_AVAILABLE_BALANCE) and

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

3358: --NVL(sd.task_number, '-99') = nvl(p_task_id, NVL(sd.task_number, '-99')) and
3359: key_date between nvl(p_horizon_start, sysdate - 36500) and
3360: nvl(p_horizon_end, sysdate + 36500);
3361: l_row := SQL%ROWCOUNT;
3362: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
3363: --dbms_output.put_line('Deleted number records: ' || l_row);
3364: END IF;
3365: commit;
3366:

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

3370: p_string IN VARCHAR2
3371: ) IS
3372: BEGIN
3373: IF fnd_global.conc_request_id > 0 THEN
3374: FND_FILE.PUT_LINE(FND_FILE.LOG, p_string);
3375: NULL;
3376: ELSE
3377: --dbms_OUTPUT.PUT_LINE( p_string);
3378: null;