DBA Data[Home] [Help]

APPS.MSC_SCE_PUBLISH_PKG dependencies on FND_FILE

Line 772: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item: ' || l_item_list);

768: l_item_list := ltrim(rtrim(substr(l_list_of_item,1,length (l_list_of_item)),' '),' ') ;
769: l_list_of_item := null;
770: END IF;
771:
772: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item: ' || l_item_list);
773:
774: IF (l_item_list is not null) THEN
775: begin
776: select inventory_item_id

Line 782: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item not found: ' || l_item_list);

778: from msc_items
779: where item_name = l_item_list;
780: exception
781: when no_data_found then
782: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Item not found: ' || l_item_list);
783: l_item_id := null;
784: when others then
785: l_item_id := null;
786: end;

Line 1092: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by cursor := ' || t_org_id.COUNT);

1088:
1089:
1090: IF t_org_id IS NOT NULL AND t_org_id.COUNT > 0 THEN
1091: log_message ('Records fetched by cursor := ' || t_org_id.COUNT);
1092: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Records fetched by cursor := ' || t_org_id.COUNT);
1093: log_message('At 5');
1094:
1095: get_optional_info(
1096: t_item_id

Line 1259: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Defective Planned Order fetched by cursor := ' || t_org_id.COUNT);

1255:
1256:
1257: IF t_org_id IS NOT NULL AND t_org_id.COUNT > 0 THEN
1258: log_message ('Defective Planned Order fetched by cursor := ' || t_org_id.COUNT);
1259: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Defective Planned Order fetched by cursor := ' || t_org_id.COUNT);
1260: log_message('At 8');
1261:
1262: t_pub := companyNameList();
1263: t_pub_id := numberList();

Line 1431: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish plan order proc: ' ||sqlerrm);

1427: END IF;
1428:
1429: EXCEPTION
1430: when others then
1431: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in publish plan order proc: ' ||sqlerrm);
1432: END publish_plan_orders;
1433:
1434:
1435: PROCEDURE get_optional_info(

Line 1572: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 2nd query: ' || sqlerrm);

1568: EXCEPTION
1569: WHEN OTHERS THEN
1570: t_supp_id(j) := null;
1571: t_supp(j) := null;
1572: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 2nd query: ' || sqlerrm);
1573: END;
1574: else
1575: t_supp_id(j) := t_supp_id(j-1);
1576: t_supp(j) := t_supp(j-1);

Line 1595: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 3rd query: ' || sqlerrm);

1591: EXCEPTION
1592: WHEN OTHERS THEN
1593: t_supp_site_id(j) := null;
1594: t_supp_site(j) := null;
1595: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 3rd query: ' || sqlerrm);
1596: END;
1597: else
1598: t_supp_site_id(j) := t_supp_site_id(j-1);
1599: t_supp_site(j) := t_supp_site(j-1);

Line 1672: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 4th query: ' || sqlerrm);

1668: when OTHERS then
1669: t_supp_item_name(j) := null;
1670: t_supp_item_desc(j) := null;
1671: t_tp_uom(j) := t_uom_code(j);
1672: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in 4th query: ' || sqlerrm);
1673: end;
1674: end;
1675:
1676: IF (t_supp_item_desc(j) is null and t_supp_item_name(j) is not null ) THEN

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

1744: end if;
1745:
1746: EXCEPTION
1747: WHEN others then
1748: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Error in get option info proc: ' || sqlerrm);
1749: END get_optional_info;
1750:
1751:
1752: PROCEDURE insert_into_sup_dem (

Line 1816: FND_FILE.PUT_LINE(FND_FILE.LOG,'Records fetched := ' || t_pub_id.COUNT);

1812:
1813: log_message('In insert_into_sup_dem');
1814: if t_pub_id is not null and t_pub_id.COUNT > 0 then
1815: log_message('Records fetched := ' || t_pub_id.COUNT);
1816: FND_FILE.PUT_LINE(FND_FILE.LOG,'Records fetched := ' || t_pub_id.COUNT);
1817: if t_pub_id is not null and t_pub_id.COUNT > 0 THEN
1818: l_log_message := get_message('MSC','MSC_X_PUB_NUM_RECORDS',p_language_code) || ': ' || t_pub_id.COUNT || '.' || fnd_global.local_chr(10);
1819: log_message(l_log_message);
1820: log_message('Records to be inserted : ' || t_pub_id.COUNT);

Line 3017: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'PLO' || t_planned_order_qty(j) || ' tp '

3013: IF (t_order_type(j) = PLANNED_ORDER) THEN
3014: -------------------------------------------------------
3015: -- PLANNED_ORDER
3016: ------------------------------------------------------
3017: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'PLO' || t_planned_order_qty(j) || ' tp '
3018: -- || t_tp_planned_order_qty(j) || 'date ' || t_key_date(j));
3019: log_message('PLO' || t_planned_order_qty(j) || ' tp ' || t_tp_planned_order_qty(j) || 'date ' || t_key_date(j));
3020: l_order_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_ORDER_TYPE',CP_PLANNED_ORDER);
3021: l_bucket_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_BUCKET_TYPE',t_bucket_type(j));

Line 3166: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'released qty ' || t_released_qty(j) || ' tp '

3162: IF (t_released_qty(j) < 0 ) THEN
3163: l_released_qty := 0;
3164: l_tp_released_qty := 0;
3165: END IF;
3166: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'released qty ' || t_released_qty(j) || ' tp '
3167: -- || t_tp_released_qty(j) || 'date ' || t_key_date(j));
3168: log_message( 'released qty ' || t_released_qty(j) || ' tp ' || t_tp_released_qty(j) || 'date ' || t_key_date(j));
3169: insert into msc_sup_dem_entries (
3170: transaction_id,

Line 3301: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j)

3297: ------------------------------------------------------
3298: l_order_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_ORDER_TYPE',CP_PURCHASE_ORDER_FROM_PLAN);
3299: l_bucket_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_BUCKET_TYPE',t_bucket_type(j));
3300:
3301: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j)
3302: --|| 'date ' || t_key_date(j));
3303: log_message( 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j) || 'date ' || t_key_date(j));
3304: insert into msc_sup_dem_entries (
3305: transaction_id,

Line 3715: FND_FILE.PUT_LINE(FND_FILE.LOG, 'qty ' || t_qty(j) || ' tp ' || t_tp_qty(j)|| 'date ' || t_key_date(j) || ' Item ' || t_item_id(j) || ' base ' || t_base_item_id(j));

3711: else
3712: ---------------------------------------------------*/
3713: ELSE
3714:
3715: FND_FILE.PUT_LINE(FND_FILE.LOG, 'qty ' || t_qty(j) || ' tp ' || t_tp_qty(j)|| 'date ' || t_key_date(j) || ' Item ' || t_item_id(j) || ' base ' || t_base_item_id(j));
3716: l_order_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_ORDER_TYPE',ORDER_FORECAST);
3717: l_bucket_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_BUCKET_TYPE',t_bucket_type(j));
3718:
3719: IF (t_base_item_id(j) is null) THEN

Line 3878: FND_FILE.PUT_LINE(FND_FILE.LOG, 'insert failed on else statement with base item ' || sqlerrm);

3874: p_version,
3875: p_designator);
3876: exception
3877: when others then
3878: FND_FILE.PUT_LINE(FND_FILE.LOG, 'insert failed on else statement with base item ' || sqlerrm);
3879: end;
3880: END IF;
3881: -- Check in if-else ladder for type of order and insert accordingly
3882: -- Ladder 1 -> Planned Order - insert CP Planned Order, Released Planned Order

Line 3890: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'PLO' || t_planned_order_qty(j) || ' tp '

3886:
3887: -------------------------------------------------------
3888: -- PLANNED_ORDER
3889: ------------------------------------------------------
3890: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'PLO' || t_planned_order_qty(j) || ' tp '
3891: -- || t_tp_planned_order_qty(j) || 'date ' || t_key_date(j));
3892: log_message('PLO' || t_planned_order_qty(j) || ' tp ' || t_tp_planned_order_qty(j) || 'date ' || t_key_date(j));
3893: l_order_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_ORDER_TYPE',CP_PLANNED_ORDER);
3894: l_bucket_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_BUCKET_TYPE',t_bucket_type(j));

Line 4039: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'released qty ' || t_released_qty(j) || ' tp '

4035: IF (t_released_qty(j) < 0 ) THEN
4036: l_released_qty := 0;
4037: l_tp_released_qty := 0;
4038: END IF;
4039: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'released qty ' || t_released_qty(j) || ' tp '
4040: -- || t_tp_released_qty(j) || 'date ' || t_key_date(j));
4041: log_message( 'released qty ' || t_released_qty(j) || ' tp ' || t_tp_released_qty(j) || 'date ' || t_key_date(j));
4042: insert into msc_sup_dem_entries (
4043: transaction_id,

Line 4173: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j)

4169: -- PURCHASE_ORDER_FROM_PLAN
4170: ------------------------------------------------------
4171: l_order_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_ORDER_TYPE',CP_PURCHASE_ORDER_FROM_PLAN);
4172: l_bucket_type_desc := MSC_X_UTIL.GET_LOOKUP_MEANING('MSC_X_BUCKET_TYPE',t_bucket_type(j));
4173: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j)
4174: --|| 'date ' || t_key_date(j));
4175: log_message( 'Po ' || t_qty(j) || ' tp ' || t_tp_qty(j) || 'date ' || t_key_date(j));
4176: insert into msc_sup_dem_entries (
4177: transaction_id,

Line 4643: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in insert_sup_dem_entries: ' || sqlerrm);

4639: end if;
4640: end if;
4641: EXCEPTION
4642: when others then
4643: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error in insert_sup_dem_entries: ' || sqlerrm);
4644: log_message('Error ' || sqlerrm);
4645: --dbms_output.put_line('error ' || sqlerrm);
4646: END insert_into_sup_dem;
4647:

Line 4717: FND_FILE.PUT_LINE(FND_FILE.LOG,'Order Type : ' ||t_order_type(j) || '/qty : ' || t_qty(j)

4713:
4714: IF t_pub_id is not null and t_pub_id.COUNT > 0 THEN
4715: FOR j in 1..t_pub_id.COUNT LOOP
4716:
4717: FND_FILE.PUT_LINE(FND_FILE.LOG,'Order Type : ' ||t_order_type(j) || '/qty : ' || t_qty(j)
4718: || '/date : ' || t_key_date(j) || '/Item : ' || t_item_id(j)
4719: || '/base :' || t_base_item_id(j));
4720:
4721: IF (t_order_type(j) IN (PLANNED_TRANSFER_DEF, ISO_DEF, INTRANSIT_SHIPMENT_DEF, INTRANSIT_RECEIPT_DEF) ) THEN -- RETURNS FORECAST

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

5141: and NVL(sd.base_item_id, sd.inventory_item_id) =nvl(i.base_item_id,i.inventory_item_id) and
5142: rownum=1 ) ;
5143:
5144: l_row := SQL%ROWCOUNT;
5145: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
5146:
5147: ELSIF ( p_overwrite = 2) THEN --delete by overwritten
5148: delete from msc_sup_dem_entries sd
5149: where sd.publisher_order_type IN (ORDER_FORECAST, CP_PLANNED_ORDER,

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

5189: key_date between nvl(p_horizon_start, sysdate - 36500) and
5190: nvl(p_horizon_end, sysdate + 36500);
5191:
5192: l_row := SQL%ROWCOUNT;
5193: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Deleted number records: ' || l_row);
5194: END IF;
5195: commit;
5196:
5197: END delete_old_forecast;

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

5200: p_string IN VARCHAR2
5201: ) IS
5202: BEGIN
5203: IF ( g_msc_cp_debug= '1' OR g_msc_cp_debug = '2') THEN
5204: FND_FILE.PUT_LINE(FND_FILE.LOG, p_string);
5205: END IF;
5206:
5207: EXCEPTION
5208: WHEN OTHERS THEn