DBA Data[Home] [Help]

APPS.QP_PRICE_BOOK_PVT dependencies on FND_FILE

Line 569: fnd_file.put_line(fnd_file.Log, 'Pricing Engine Request ID: '

565: -- bug 7034445
566: -- This statement is moved into the loop (to process the price book
567: -- lines in batches.
568: qp_price_request_context.set_request_id;
569: fnd_file.put_line(fnd_file.Log, 'Pricing Engine Request ID: '
570: || qp_price_request_context.get_request_id);
571:
572: --Delete the plsql table of records for each loop repetition
573: l_line_type_code_tbl.delete;

Line 636: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2_cur rowcount = '||l_count);

632: l_line_index_tbl(i) := l_count + i;
633: END LOOP;
634:
635: l_count := l_count + insert_lines2_cur%ROWCOUNT;--highest index of the previous loop
636: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2_cur rowcount = '||l_count);
637:
638: QP_PREQ_GRP.INSERT_LINES2(
639: p_LINE_INDEX => l_line_index_tbl,
640: p_LINE_TYPE_CODE => l_line_type_code_tbl,

Line 674: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return status '||l_return_status);

670: p_USAGE_PRICING_TYPE => l_usage_pricing_type_tbl,
671: x_status_code => l_return_status,
672: x_status_text => l_return_status_text);
673:
674: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return status '||l_return_status);
675: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return text'||l_return_status_text);
676:
677: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
678: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...'); --bug 7034445

Line 675: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return text'||l_return_status_text);

671: x_status_code => l_return_status,
672: x_status_text => l_return_status_text);
673:
674: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return status '||l_return_status);
675: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return text'||l_return_status_text);
676:
677: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
678: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...'); --bug 7034445
679: RAISE SQL_EXCEPTION;

Line 678: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...'); --bug 7034445

674: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return status '||l_return_status);
675: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return text'||l_return_status_text);
676:
677: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
678: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...'); --bug 7034445
679: RAISE SQL_EXCEPTION;
680: END IF;
681:
682: /*per spgopal summary line not needed and also no need to call

Line 689: fnd_file.put_line(fnd_file.Log, ' p_pb_input_lines_tbl.count: ' || p_pb_input_lines_tbl.Count);

685: END IF; --if l_line_type_code_tbl.count > 0
686:
687: IF p_pb_input_lines_tbl.COUNT > 0 THEN
688:
689: fnd_file.put_line(fnd_file.Log, ' p_pb_input_lines_tbl.count: ' || p_pb_input_lines_tbl.Count);
690: --Build sql stmts and execute them dynamically to assign values to ORDER
691: --level global structure columns
692: FOR j IN p_pb_input_lines_tbl.FIRST..p_pb_input_lines_tbl.COUNT
693: LOOP

Line 1127: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return status '||l_return_status);

1123: p_PRIMARY_UOM_FLAG_TBL => l_attrs_primary_uom_flag_tbl,
1124: x_status_code => l_return_status,
1125: x_status_text => l_return_status_text);
1126:
1127: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return status '||l_return_status);
1128: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return text'||l_return_status_text);
1129:
1130: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1131: RAISE SQL_EXCEPTION;

Line 1128: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return text'||l_return_status_text);

1124: x_status_code => l_return_status,
1125: x_status_text => l_return_status_text);
1126:
1127: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return status '||l_return_status);
1128: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return text'||l_return_status_text);
1129:
1130: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1131: RAISE SQL_EXCEPTION;
1132: END IF;

Line 1169: fnd_file.put_line(FND_FILE.LOG, 'Pricing Events - '||l_pricing_events);

1165: p_level => 'REQ', --For Request Type level
1166: p_level_name => p_pb_input_header_rec.pricing_perspective_code,
1167: p_parameter_code => 'QP_PRICE_BOOK_PRICING_EVENTS');
1168:
1169: fnd_file.put_line(FND_FILE.LOG, 'Pricing Events - '||l_pricing_events);
1170: --Set the l_control_rec field values
1171: l_control_rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
1172: l_control_rec.simulation_flag := 'Y';
1173: l_control_rec.pricing_event := l_pricing_events; --from pricing parameter

Line 1183: --fnd_file.put_line(fnd_file.Log, 'l_request_type_code: '|| l_request_type_code);

1179: l_control_rec.function_currency:= null;
1180: l_control_rec.org_id := p_pb_input_header_rec.org_id;
1181: l_control_rec.full_pricing_call := 'Y';
1182:
1183: --fnd_file.put_line(fnd_file.Log, 'l_request_type_code: '|| l_request_type_code);
1184: fnd_file.put_line(fnd_file.Log, 'Before Pricing Engine call');
1185:
1186: --Call the Pricing Engine
1187: QP_PREQ_PUB.Price_Request(l_control_rec,

Line 1184: fnd_file.put_line(fnd_file.Log, 'Before Pricing Engine call');

1180: l_control_rec.org_id := p_pb_input_header_rec.org_id;
1181: l_control_rec.full_pricing_call := 'Y';
1182:
1183: --fnd_file.put_line(fnd_file.Log, 'l_request_type_code: '|| l_request_type_code);
1184: fnd_file.put_line(fnd_file.Log, 'Before Pricing Engine call');
1185:
1186: --Call the Pricing Engine
1187: QP_PREQ_PUB.Price_Request(l_control_rec,
1188: l_return_status,

Line 1191: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');

1187: QP_PREQ_PUB.Price_Request(l_control_rec,
1188: l_return_status,
1189: l_return_status_text);
1190:
1191: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1192: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status '||l_return_status);
1193: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text'||l_return_status_text);
1194:
1195: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 1192: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status '||l_return_status);

1188: l_return_status,
1189: l_return_status_text);
1190:
1191: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1192: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status '||l_return_status);
1193: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text'||l_return_status_text);
1194:
1195: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1196: RAISE SQL_EXCEPTION;

Line 1193: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text'||l_return_status_text);

1189: l_return_status_text);
1190:
1191: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1192: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status '||l_return_status);
1193: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text'||l_return_status_text);
1194:
1195: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1196: RAISE SQL_EXCEPTION;
1197: END IF;

Line 1339: fnd_file.put_line(FND_FILE.LOG, 'No of line details '||to_char(l_line_id_tbl.count));

1335: l_price_break_type_code_tbl, l_line_index_tbl,
1336: l_line_detail_index_tbl, l_line_id_tbl
1337: LIMIT rows;
1338:
1339: fnd_file.put_line(FND_FILE.LOG, 'No of line details '||to_char(l_line_id_tbl.count));
1340:
1341: --Insert records into the price book line details table from the line
1342: --details temp table
1343: FORALL j IN l_line_id_tbl.FIRST..l_line_id_tbl.LAST

Line 1414: fnd_file.put_line(FND_FILE.LOG, 'No of pricing attributes '||to_char(sql%rowcount));

1410: -- the tmp table depending on the number of qualifier attributes
1411: -- attached to a pricelist. However split the select stmt since
1412: -- sequence.next cannot be selected in conjunction with DISTINCT.
1413:
1414: fnd_file.put_line(FND_FILE.LOG, 'No of pricing attributes '||to_char(sql%rowcount));
1415:
1416: --Insert records into the price book break lines table from the line attrs
1417: --temp table for PBH Price List and Modifier Lines
1418: FORALL k IN l_line_index2_tbl.FIRST..l_line_index2_tbl.LAST

Line 1443: fnd_file.put_line(FND_FILE.LOG, 'No of price breaks '||to_char(sql%rowcount));

1439: AND r.relationship_type_code = QP_PREQ_GRP.G_PBH_LINE -- just in case db goes to table before first condition
1440: AND b.line_detail_index = r.related_line_detail_index
1441: AND a.line_detail_index = b.line_detail_index;
1442:
1443: fnd_file.put_line(FND_FILE.LOG, 'No of price breaks '||to_char(sql%rowcount));
1444:
1445: EXIT WHEN line_dets_cur%NOTFOUND;
1446:
1447: END LOOP; --loop over line_dets_cur

Line 1687: fnd_file.put_line(fnd_file.Log, 'Switching on PL/SQL Profiler...');

1683: BEGIN
1684:
1685: -- Introduced for the purpose of PL/SQL profiling (snimmaga) (bug 7034445)
1686: /*
1687: fnd_file.put_line(fnd_file.Log, 'Switching on PL/SQL Profiler...');
1688: err := DBMS_PROFILER.START_PROFILER (to_char(sysdate,'dd-Mon-YYYY hh:mi:ss'));
1689: */
1690:
1691: fnd_file.put_line(FND_FILE.LOG, 'In Conc Program');

Line 1691: fnd_file.put_line(FND_FILE.LOG, 'In Conc Program');

1687: fnd_file.put_line(fnd_file.Log, 'Switching on PL/SQL Profiler...');
1688: err := DBMS_PROFILER.START_PROFILER (to_char(sysdate,'dd-Mon-YYYY hh:mi:ss'));
1689: */
1690:
1691: fnd_file.put_line(FND_FILE.LOG, 'In Conc Program');
1692:
1693: BEGIN
1694: SELECT *
1695: INTO l_pb_input_header_rec

Line 1711: fnd_file.put_line(FND_FILE.LOG, errbuf);

1707: l_price_book_messages_tbl.delete;
1708: commit;
1709: retcode := 2;
1710: errbuf := substr(l_message_text,1,240);
1711: fnd_file.put_line(FND_FILE.LOG, errbuf);
1712: RETURN;
1713: END;
1714:
1715: l_user_id := fnd_global.user_id;

Line 1724: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');

1720: IF MO_GLOBAL.get_access_mode is null THEN
1721: MO_GLOBAL.Init('QP');
1722: END IF;
1723:
1724: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1725: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1726: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1727: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1728:

Line 1725: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);

1721: MO_GLOBAL.Init('QP');
1722: END IF;
1723:
1724: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1725: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1726: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1727: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1728:
1729: -- bug 7034445

Line 1726: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);

1722: END IF;
1723:
1724: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1725: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1726: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1727: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1728:
1729: -- bug 7034445
1730: -- SNIMMAGA.

Line 1727: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);

1723:
1724: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1725: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1726: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1727: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1728:
1729: -- bug 7034445
1730: -- SNIMMAGA.
1731: --

Line 1742: fnd_file.put_line(fnd_file.Log, 'Processing Batch Size: ' ||

1738: END IF;
1739:
1740: rows := QP_PRICE_BOOK_PVT.G_pb_Processor_Batchsize;
1741:
1742: fnd_file.put_line(fnd_file.Log, 'Processing Batch Size: ' ||
1743: qp_price_book_pvt.G_pb_Processor_Batchsize);
1744:
1745: IF p_spawned_request = 'N' THEN --Parent request
1746:

Line 1747: fnd_file.put_line(FND_FILE.LOG, 'In Parent Concurrent Request');

1743: qp_price_book_pvt.G_pb_Processor_Batchsize);
1744:
1745: IF p_spawned_request = 'N' THEN --Parent request
1746:
1747: fnd_file.put_line(FND_FILE.LOG, 'In Parent Concurrent Request');
1748:
1749: IF l_pb_input_header_rec.publish_existing_pb_flag = 'Y' THEN
1750: --Publish existing price book
1751: BEGIN

Line 1779: fnd_file.put_line(FND_FILE.LOG, errbuf);

1775: commit;--inserted message with pb_input_header_id
1776: --since price_book_header_id not yet usable.
1777: retcode := 2;
1778: errbuf := substr(l_message_text,1,240);
1779: fnd_file.put_line(FND_FILE.LOG, errbuf);
1780: RETURN;
1781: END;
1782: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1783: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN

Line 1782: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);

1778: errbuf := substr(l_message_text,1,240);
1779: fnd_file.put_line(FND_FILE.LOG, errbuf);
1780: RETURN;
1781: END;
1782: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1783: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
1784: --Generate new price book or existing price book to publish not found
1785:
1786: fnd_file.put_line(FND_FILE.LOG, 'Publish_existing_pb_flag = N');

Line 1786: fnd_file.put_line(FND_FILE.LOG, 'Publish_existing_pb_flag = N');

1782: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1783: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
1784: --Generate new price book or existing price book to publish not found
1785:
1786: fnd_file.put_line(FND_FILE.LOG, 'Publish_existing_pb_flag = N');
1787:
1788: BEGIN
1789: SELECT price_book_header_id, request_id
1790: INTO l_overwrite_pb_header_id, l_old_request_id

Line 1829: fnd_file.put_line(FND_FILE.LOG, errbuf);

1825: commit; --inserted message with pb_input_header_id
1826: --since price_book_header_id not yet usable.
1827: retcode := 2;
1828: errbuf := l_message_text;
1829: fnd_file.put_line(FND_FILE.LOG, errbuf);
1830: RETURN;
1831:
1832: ELSE --Old Request is Null or Completed
1833: DELETE FROM qp_price_book_headers_b

Line 1913: fnd_file.put_line(FND_FILE.LOG, errbuf);

1909: commit; --inserted message with pb_input_header_id
1910: --since price_book_header_id not yet usable.
1911: retcode := 2;
1912: errbuf := l_message_text;
1913: fnd_file.put_line(FND_FILE.LOG, errbuf);
1914: RETURN;
1915:
1916: ELSE --Old Delta Request is Null or Complete
1917: DELETE FROM qp_price_book_headers_b

Line 1965: fnd_file.put_line(FND_FILE.LOG, 'Before inserting price book header');

1961: END IF; --If Old request is not Null or Completed
1962:
1963: END IF; --If l_overwrite_pb_header_id is not null
1964:
1965: fnd_file.put_line(FND_FILE.LOG, 'Before inserting price book header');
1966:
1967: --Create Price Book Header
1968: BEGIN
1969: QP_PRICE_BOOK_UTIL.Insert_Price_Book_Header(

Line 1973: fnd_file.put_line(FND_FILE.LOG, 'After inserting price book header'||

1969: QP_PRICE_BOOK_UTIL.Insert_Price_Book_Header(
1970: p_pb_input_header_rec => l_pb_input_header_rec,
1971: x_price_book_header_id => l_publish_price_book_header_id);
1972:
1973: fnd_file.put_line(FND_FILE.LOG, 'After inserting price book header'||
1974: to_char(l_publish_price_book_header_id));
1975: EXCEPTION
1976: WHEN FND_API.G_EXC_ERROR THEN
1977: FND_MESSAGE.SET_NAME('QP', 'QP_PB_EXISTS_IN_ANOTHER_ORG');

Line 1993: fnd_file.put_line(FND_FILE.LOG, errbuf);

1989: commit; --inserted message with pb_input_header_id
1990: --since price_book_header_id not yet usable.
1991: retcode := 2;
1992: errbuf := l_message_text;
1993: fnd_file.put_line(FND_FILE.LOG, errbuf);
1994: RETURN;
1995:
1996: WHEN OTHERS THEN
1997: l_price_book_messages_tbl(i).message_code :=

Line 2010: fnd_file.put_line(FND_FILE.LOG, errbuf);

2006: commit; --inserted message with pb_input_header_id
2007: --since price_book_header_id not yet usable.
2008: retcode := 2;
2009: errbuf := l_message_text;
2010: fnd_file.put_line(FND_FILE.LOG, errbuf);
2011: RETURN;
2012: END;
2013:
2014: --dbms_output.put_line('Conc Program price book header id = '||l_publish_price_book_header_id);

Line 2042: fnd_file.put_line(FND_FILE.LOG, errbuf);

2038: commit; --inserted message with pb_input_header_id
2039: --since price_book_header_id not yet usable.
2040: retcode := 2;
2041: errbuf := l_message_text;
2042: fnd_file.put_line(FND_FILE.LOG, errbuf);
2043: RETURN;
2044:
2045: WHEN OTHERS THEN
2046: l_price_book_messages_tbl(i).message_code :=

Line 2059: fnd_file.put_line(FND_FILE.LOG, errbuf);

2055: commit; --inserted message with pb_input_header_id
2056: --since price_book_header_id not yet usable.
2057: retcode := 2;
2058: errbuf := l_message_text;
2059: fnd_file.put_line(FND_FILE.LOG, errbuf);
2060: RETURN;
2061: END;
2062:
2063: ELSE

Line 2082: fnd_file.put_line(FND_FILE.LOG, errbuf);

2078: commit; --inserted message with pb_input_header_id
2079: --since price_book_header_id not yet usable.
2080: retcode := 2;
2081: errbuf := substr(l_message_text,1,240);
2082: fnd_file.put_line(FND_FILE.LOG, errbuf);
2083: RETURN;
2084: END IF; --overwrite_price_book_header_id is null
2085:
2086: END IF;--If overwrite flag = 'Y'

Line 2093: fnd_file.put_line(FND_FILE.LOG, 'Item Validation Org = ' ||

2089: --that will be updated by child process with information obtained from
2090: --pricing engine
2091: l_item_validation_org_id := QP_UTIL.Get_Item_Validation_Org;
2092:
2093: fnd_file.put_line(FND_FILE.LOG, 'Item Validation Org = ' ||
2094: to_char(l_item_validation_org_id));
2095: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2096: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2097:

Line 2098: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST '); --bug 7034445

2094: to_char(l_item_validation_org_id));
2095: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2096: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2097:
2098: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST '); --bug 7034445
2099: fnd_file.put_line(fnd_file.Log, 'pl_agr_bsa_id = '||l_pb_input_header_rec.pl_agr_bsa_id);
2100:
2101: --For items in price list
2102: OPEN pl_items_cur(l_pb_input_header_rec.pl_agr_bsa_id);

Line 2099: fnd_file.put_line(fnd_file.Log, 'pl_agr_bsa_id = '||l_pb_input_header_rec.pl_agr_bsa_id);

2095: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2096: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2097:
2098: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST '); --bug 7034445
2099: fnd_file.put_line(fnd_file.Log, 'pl_agr_bsa_id = '||l_pb_input_header_rec.pl_agr_bsa_id);
2100:
2101: --For items in price list
2102: OPEN pl_items_cur(l_pb_input_header_rec.pl_agr_bsa_id);
2103: LOOP

Line 2166: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM'); --bug 7034445

2162: ELSIF l_pb_input_header_rec.limit_products_by = 'ITEM' THEN
2163:
2164: --get item and uom combinations for item and insert prelim price book lines
2165:
2166: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM'); --bug 7034445
2167:
2168: OPEN item_uom_cur(l_pb_input_header_rec.product_attr_value,
2169: l_item_validation_org_id,
2170: l_pb_input_header_rec.effective_date);

Line 2211: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM_CATEGORY'); -- bug 7034445

2207: CLOSE item_uom_cur;
2208:
2209:
2210: ELSIF l_pb_input_header_rec.limit_products_by = 'ITEM_CATEGORY' THEN
2211: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM_CATEGORY'); -- bug 7034445
2212: --For items in category
2213: OPEN cat_items_cur(l_pb_input_header_rec.product_attr_value,
2214: l_item_validation_org_id);
2215: LOOP

Line 2277: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ALL_ITEMS'); --bug 7034445

2273: ELSIF l_pb_input_header_rec.limit_products_by = 'ALL_ITEMS' THEN
2274:
2275: --get all item-uom combinations and create price book lines
2276:
2277: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ALL_ITEMS'); --bug 7034445
2278:
2279: OPEN items_cur(l_item_validation_org_id,
2280: l_pb_input_header_rec.pricing_perspective_code);
2281: LOOP

Line 2342: fnd_file.put_line(FND_FILE.LOG, 'Preparing to submit child request');

2338: END IF; --If limit_products_by is price_list, item or item_category
2339:
2340: END IF; --Publish existing price book
2341:
2342: fnd_file.put_line(FND_FILE.LOG, 'Preparing to submit child request');
2343:
2344: --dbms_output.put_line('Came to end');--test code to be removed
2345: --commit; --test code to be removed
2346:

Line 2352: fnd_file.put_line(FND_FILE.LOG, 'Before submitting child request');

2348: l_submit :=
2349: fnd_date.date_to_canonical(l_pb_input_header_rec.gen_schedule_date);
2350: END IF;
2351:
2352: fnd_file.put_line(FND_FILE.LOG, 'Before submitting child request');
2353:
2354: --submit a child concurrent request
2355: l_child_request_id := FND_REQUEST.SUBMIT_REQUEST(
2356: 'QP', 'QPXPRBKB', 'Price Book Generate and Publish', l_submit, FALSE,

Line 2367: fnd_file.put_line(FND_FILE.LOG, errbuf);

2363:
2364: IF l_child_request_id = 0 THEN
2365: errbuf := substr(FND_MESSAGE.GET, 1, 240);
2366: retcode := 2;
2367: fnd_file.put_line(FND_FILE.LOG, errbuf);
2368: ELSE --submit request successful
2369: errbuf := '';
2370: retcode := 0;
2371:

Line 2379: fnd_file.put_line(FND_FILE.LOG, 'After submitting child request');

2375:
2376: COMMIT; --to complete request submission
2377:
2378: --dbms_output.put_line('after submitting child request ');
2379: fnd_file.put_line(FND_FILE.LOG, 'After submitting child request');
2380:
2381: END IF; --If child_request_id = 0
2382:
2383: ELSE --p_spawned_request = 'Y'

Line 2385: fnd_file.put_line(FND_FILE.LOG, 'In child request');

2381: END IF; --If child_request_id = 0
2382:
2383: ELSE --p_spawned_request = 'Y'
2384:
2385: fnd_file.put_line(FND_FILE.LOG, 'In child request');
2386:
2387: --generate engine debug file if the 'QP: Debug' profile is on
2388: IF FND_PROFILE.VALUE_SPECIFIC(name => 'QP_DEBUG', application_id => 661)
2389: IN ('Y','V')

Line 2395: fnd_file.put_line(FND_FILE.LOG, 'Engine Debug File = '||l_debug_file);

2391: oe_debug_pub.SetDebugLevel(10);
2392: oe_debug_pub.Initialize;
2393: oe_debug_pub.debug_on;
2394: l_debug_file := oe_debug_pub.Set_Debug_Mode('FILE');
2395: fnd_file.put_line(FND_FILE.LOG, 'Engine Debug File = '||l_debug_file);
2396: END IF;
2397:
2398: IF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
2399: --Price Book is to be generated

Line 2406: fnd_file.put_line(FND_FILE.LOG, 'Before Insert_Price_Book_Content ');

2402: INTO l_pb_input_lines_tbl
2403: FROM qp_pb_input_lines
2404: WHERE pb_input_header_id = p_pb_input_header_id;
2405:
2406: fnd_file.put_line(FND_FILE.LOG, 'Before Insert_Price_Book_Content ');
2407:
2408: --Create price book line details, pricing attributes, price break lines
2409: BEGIN
2410: Insert_Price_Book_Content(

Line 2433: fnd_file.put_line(FND_FILE.LOG, 'After Insert_Price_Book_Content ');

2429: retcode := 0;
2430: RETURN;
2431: END;
2432:
2433: fnd_file.put_line(FND_FILE.LOG, 'After Insert_Price_Book_Content ');
2434:
2435: --Update price book line details with running net price
2436: OPEN pb_lines_cur;
2437: LOOP

Line 2523: fnd_file.put_line(FND_FILE.LOG, errbuf);

2519: l_price_book_messages_tbl.delete;
2520: commit;
2521: retcode := 2;
2522: errbuf := l_message_text;
2523: fnd_file.put_line(FND_FILE.LOG, errbuf);
2524: RETURN;
2525: END;
2526: END IF;
2527:

Line 2563: fnd_file.put_line(FND_FILE.LOG,'Begin Publishing');

2559:
2560: END IF; --publish_existing_pb_flag = 'N', i.e. price book is to be generated
2561:
2562: --Publish the price book identified by p_price_book_header_id
2563: fnd_file.put_line(FND_FILE.LOG,'Begin Publishing');
2564:
2565: --If a template has been specified
2566: IF l_pb_input_header_rec.pub_template_code IS NOT NULL
2567: THEN

Line 2574: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return status '||l_return_status);

2570: p_price_book_header_id => p_price_book_header_id,
2571: x_return_status => l_return_status,
2572: x_return_status_text => l_return_status_text);
2573:
2574: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return status '||l_return_status);
2575: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return text'||l_return_status_text);
2576:
2577: END IF;
2578:

Line 2575: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return text'||l_return_status_text);

2571: x_return_status => l_return_status,
2572: x_return_status_text => l_return_status_text);
2573:
2574: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return status '||l_return_status);
2575: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return text'||l_return_status_text);
2576:
2577: END IF;
2578:
2579: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 2590: fnd_file.put_line(FND_FILE.LOG, 'XML Message return status '||l_return_status);

2586: QP_PRICE_BOOK_UTIL.Send_Sync_Catalog(
2587: p_price_book_header_id => p_price_book_header_id,
2588: x_return_status => l_return_status,
2589: x_return_status_text => l_return_status_text);
2590: fnd_file.put_line(FND_FILE.LOG, 'XML Message return status '||l_return_status);
2591: fnd_file.put_line(FND_FILE.LOG, 'XML Message return text'||l_return_status_text);
2592:
2593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2594: l_price_book_messages_tbl(i).message_code := 'SYNC_CATALOG_ERROR';

Line 2591: fnd_file.put_line(FND_FILE.LOG, 'XML Message return text'||l_return_status_text);

2587: p_price_book_header_id => p_price_book_header_id,
2588: x_return_status => l_return_status,
2589: x_return_status_text => l_return_status_text);
2590: fnd_file.put_line(FND_FILE.LOG, 'XML Message return status '||l_return_status);
2591: fnd_file.put_line(FND_FILE.LOG, 'XML Message return text'||l_return_status_text);
2592:
2593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2594: l_price_book_messages_tbl(i).message_code := 'SYNC_CATALOG_ERROR';
2595: l_price_book_messages_tbl(i).message_text := l_return_status_text;

Line 2608: fnd_file.put_line(FND_FILE.LOG,'Done Publishing');

2604: END IF;
2605:
2606: END IF; --If xml flag checked
2607:
2608: fnd_file.put_line(FND_FILE.LOG,'Done Publishing');
2609:
2610: IF FND_PROFILE.VALUE_SPECIFIC(name => 'QP_DEBUG', application_id => 661)
2611: IN ('Y','V')
2612: THEN

Line 2623: fnd_file.put_line(fnd_file.Log, 'Stopping PL/SQL Profiler...');

2619:
2620: -- bug 7034445
2621: -- Introduced for the purpose of PL/SQL Profiling (snimmaga)
2622: /*
2623: fnd_file.put_line(fnd_file.Log, 'Stopping PL/SQL Profiler...');
2624: err := DBMS_PROFILER.STOP_PROFILER ;
2625: */
2626:
2627: EXCEPTION

Line 2640: fnd_file.put_line(FND_FILE.LOG, errbuf);

2636: l_price_book_messages_tbl.delete;
2637: commit;
2638: retcode := 2;
2639: errbuf := l_message_text;
2640: fnd_file.put_line(FND_FILE.LOG, errbuf);
2641: END Price_Book_Conc_Pgm;
2642:
2643:
2644: END QP_PRICE_BOOK_PVT;