DBA Data[Home] [Help]

APPS.QP_PRICE_BOOK_PVT dependencies on FND_FILE

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

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

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

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

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

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

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

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

Line 676: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...');

672: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return status '|| l_return_status);
673: fnd_file.put_line(FND_FILE.LOG, 'insert_lines2 return text'|| l_return_status_text);
674:
675: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
676: fnd_file.put_line(fnd_file.Log, ' Raising SQL Exception...');
677: RAISE SQL_EXCEPTION;
678: END IF;
679: END IF; --if l_line_type_code_tbl.count > 0
680:

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

678: END IF;
679: END IF; --if l_line_type_code_tbl.count > 0
680:
681: IF p_pb_input_lines_tbl.COUNT > 0 THEN
682: fnd_file.put_line(fnd_file.Log, ' p_pb_input_lines_tbl.count: ' || p_pb_input_lines_tbl.Count);
683:
684: --Build sql stmts and execute them dynamically to assign values to ORDER
685: --level global structure columns
686: FOR j IN p_pb_input_lines_tbl.FIRST..p_pb_input_lines_tbl.COUNT

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

1105: x_status_code => l_return_status,
1106: x_status_text => l_return_status_text
1107: );
1108:
1109: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return status '||l_return_status);
1110: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return text'||l_return_status_text);
1111:
1112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1113: RAISE SQL_EXCEPTION;

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

1106: x_status_text => l_return_status_text
1107: );
1108:
1109: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return status '||l_return_status);
1110: fnd_file.put_line(FND_FILE.LOG, 'insert_line_attrs2 return text'||l_return_status_text);
1111:
1112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1113: RAISE SQL_EXCEPTION;
1114: END IF;

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

1145: p_level => 'REQ', --For Request Type level
1146: p_level_name => p_pb_input_header_rec.pricing_perspective_code,
1147: p_parameter_code => 'QP_PRICE_BOOK_PRICING_EVENTS');
1148:
1149: fnd_file.put_line(FND_FILE.LOG, 'Pricing Events - '||l_pricing_events);
1150: --Set the l_control_rec field values
1151: l_control_rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
1152: l_control_rec.simulation_flag := 'Y';
1153: l_control_rec.pricing_event := l_pricing_events; --from pricing parameter

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

1159: l_control_rec.function_currency:= null;
1160: l_control_rec.org_id := p_pb_input_header_rec.org_id;
1161: l_control_rec.full_pricing_call := 'Y';
1162:
1163: --fnd_file.put_line(fnd_file.Log, 'l_request_type_code: '|| l_request_type_code);
1164: fnd_file.put_line(fnd_file.Log, 'Before Pricing Engine call');
1165:
1166: --Call the Pricing Engine
1167:

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

1160: l_control_rec.org_id := p_pb_input_header_rec.org_id;
1161: l_control_rec.full_pricing_call := 'Y';
1162:
1163: --fnd_file.put_line(fnd_file.Log, 'l_request_type_code: '|| l_request_type_code);
1164: fnd_file.put_line(fnd_file.Log, 'Before Pricing Engine call');
1165:
1166: --Call the Pricing Engine
1167:
1168: QP_PREQ_PUB.Price_Request(l_control_rec,

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

1168: QP_PREQ_PUB.Price_Request(l_control_rec,
1169: l_return_status,
1170: l_return_status_text);
1171:
1172: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1173: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status: '||l_return_status);
1174: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text: '||l_return_status_text);
1175:
1176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

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

1169: l_return_status,
1170: l_return_status_text);
1171:
1172: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1173: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status: '||l_return_status);
1174: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text: '||l_return_status_text);
1175:
1176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1177: RAISE SQL_EXCEPTION;

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

1170: l_return_status_text);
1171:
1172: fnd_file.put_line(fnd_file.Log, 'After Pricing Engine Call...');
1173: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return status: '||l_return_status);
1174: fnd_file.put_line(FND_FILE.LOG, 'Price_Request return text: '||l_return_status_text);
1175:
1176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1177: RAISE SQL_EXCEPTION;
1178: END IF;

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

1315: l_price_break_type_code_tbl, l_line_index_tbl,
1316: l_line_detail_index_tbl, l_line_id_tbl
1317: LIMIT rows;
1318:
1319: fnd_file.put_line(FND_FILE.LOG, 'No of line details '||to_char(l_line_id_tbl.count));
1320:
1321: --Insert records into the price book line details table from the line
1322: --details temp table
1323: FORALL j IN l_line_id_tbl.FIRST..l_line_id_tbl.LAST

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

1390: -- the tmp table depending on the number of qualifier attributes
1391: -- attached to a pricelist. However split the select stmt since
1392: -- sequence.next cannot be selected in conjunction with DISTINCT.
1393:
1394: fnd_file.put_line(FND_FILE.LOG, 'No of pricing attributes '||to_char(sql%rowcount));
1395:
1396: --Insert records into the price book break lines table from the line attrs
1397: --temp table for PBH Price List and Modifier Lines
1398: FORALL k IN l_line_index2_tbl.FIRST..l_line_index2_tbl.LAST

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

1419: AND r.relationship_type_code = QP_PREQ_GRP.G_PBH_LINE -- just in case db goes to table before first condition
1420: AND b.line_detail_index = r.related_line_detail_index
1421: AND a.line_detail_index = b.line_detail_index;
1422:
1423: fnd_file.put_line(FND_FILE.LOG, 'No of price breaks '||to_char(sql%rowcount));
1424:
1425: EXIT WHEN line_dets_cur%NOTFOUND;
1426:
1427: END LOOP; --loop over line_dets_cur

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

1702: BEGIN
1703:
1704: -- Introduced for the purpose of PL/SQL profiling (snimmaga)
1705: /*
1706: fnd_file.put_line(fnd_file.Log, 'Switching on PL/SQL Profiler...');
1707: err := DBMS_PROFILER.START_PROFILER (to_char(sysdate,'dd-Mon-YYYY hh:mi:ss'));
1708: */
1709:
1710: fnd_file.put_line(FND_FILE.LOG, 'In Conc Program');

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

1706: fnd_file.put_line(fnd_file.Log, 'Switching on PL/SQL Profiler...');
1707: err := DBMS_PROFILER.START_PROFILER (to_char(sysdate,'dd-Mon-YYYY hh:mi:ss'));
1708: */
1709:
1710: fnd_file.put_line(FND_FILE.LOG, 'In Conc Program');
1711:
1712: BEGIN
1713: SELECT *
1714: INTO l_pb_input_header_rec

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

1726: l_price_book_messages_tbl.delete;
1727: commit;
1728: retcode := 2;
1729: errbuf := substr(l_message_text,1,240);
1730: fnd_file.put_line(FND_FILE.LOG, errbuf);
1731: RETURN;
1732: END;
1733:
1734: l_user_id := fnd_global.user_id;

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

1739: IF MO_GLOBAL.get_access_mode is null THEN
1740: MO_GLOBAL.Init('QP');
1741: END IF;
1742:
1743: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1744: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1745: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1746: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1747:

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

1740: MO_GLOBAL.Init('QP');
1741: END IF;
1742:
1743: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1744: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1745: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1746: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1747:
1748: -- SNIMMAGA.

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

1741: END IF;
1742:
1743: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1744: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1745: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1746: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1747:
1748: -- SNIMMAGA.
1749: --

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

1742:
1743: fnd_file.put_line(FND_FILE.LOG, 'Orgs initialized');
1744: fnd_file.put_line(FND_FILE.LOG, 'Price Book Name = '|| l_pb_input_header_rec.price_book_name);
1745: fnd_file.put_line(FND_FILE.LOG, 'Price Book Type = '|| l_pb_input_header_rec.price_book_type_code);
1746: fnd_file.put_line(FND_FILE.LOG, 'Customer = '|| l_pb_input_header_rec.customer_attr_value);
1747:
1748: -- SNIMMAGA.
1749: --
1750: -- If not already done, initialize the global variable:

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

1756: END IF;
1757:
1758: rows := QP_PRICE_BOOK_PVT.G_pb_Processor_Batchsize;
1759:
1760: fnd_file.put_line(fnd_file.Log, 'Processing Batch Size: ' ||
1761: qp_price_book_pvt.G_pb_Processor_Batchsize);
1762:
1763:
1764: IF p_spawned_request = 'N' THEN --Parent request

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

1762:
1763:
1764: IF p_spawned_request = 'N' THEN --Parent request
1765:
1766: fnd_file.put_line(FND_FILE.LOG, 'In Parent Concurrent Request');
1767:
1768: IF l_pb_input_header_rec.publish_existing_pb_flag = 'Y' THEN
1769: --Publish existing price book
1770: BEGIN

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

1794: commit;--inserted message with pb_input_header_id
1795: --since price_book_header_id not yet usable.
1796: retcode := 2;
1797: errbuf := substr(l_message_text,1,240);
1798: fnd_file.put_line(FND_FILE.LOG, errbuf);
1799: RETURN;
1800: END;
1801: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1802: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN

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

1797: errbuf := substr(l_message_text,1,240);
1798: fnd_file.put_line(FND_FILE.LOG, errbuf);
1799: RETURN;
1800: END;
1801: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1802: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
1803: --Generate new price book or existing price book to publish not found
1804:
1805: fnd_file.put_line(FND_FILE.LOG, 'Publish_existing_pb_flag = N');

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

1801: fnd_file.put_line(FND_FILE.LOG, ' price book header id to publish '||l_publish_price_book_header_id);
1802: ELSIF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
1803: --Generate new price book or existing price book to publish not found
1804:
1805: fnd_file.put_line(FND_FILE.LOG, 'Publish_existing_pb_flag = N');
1806:
1807: BEGIN
1808: SELECT price_book_header_id, request_id
1809: INTO l_overwrite_pb_header_id, l_old_request_id

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

1844: commit; --inserted message with pb_input_header_id
1845: --since price_book_header_id not yet usable.
1846: retcode := 2;
1847: errbuf := l_message_text;
1848: fnd_file.put_line(FND_FILE.LOG, errbuf);
1849: RETURN;
1850:
1851: ELSE --Old Request is Null or Completed
1852: DELETE FROM qp_price_book_headers_b

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

1928: commit; --inserted message with pb_input_header_id
1929: --since price_book_header_id not yet usable.
1930: retcode := 2;
1931: errbuf := l_message_text;
1932: fnd_file.put_line(FND_FILE.LOG, errbuf);
1933: RETURN;
1934:
1935: ELSE --Old Delta Request is Null or Complete
1936: DELETE FROM qp_price_book_headers_b

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

1980: END IF; --If Old request is not Null or Completed
1981:
1982: END IF; --If l_overwrite_pb_header_id is not null
1983:
1984: fnd_file.put_line(FND_FILE.LOG, 'Before inserting price book header');
1985:
1986: --Create Price Book Header
1987: BEGIN
1988: QP_PRICE_BOOK_UTIL.Insert_Price_Book_Header(

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

1988: QP_PRICE_BOOK_UTIL.Insert_Price_Book_Header(
1989: p_pb_input_header_rec => l_pb_input_header_rec,
1990: x_price_book_header_id => l_publish_price_book_header_id);
1991:
1992: fnd_file.put_line(FND_FILE.LOG, 'After inserting price book header'||
1993: to_char(l_publish_price_book_header_id));
1994: EXCEPTION
1995: WHEN FND_API.G_EXC_ERROR THEN
1996: FND_MESSAGE.SET_NAME('QP', 'QP_PB_EXISTS_IN_ANOTHER_ORG');

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

2008: commit; --inserted message with pb_input_header_id
2009: --since price_book_header_id not yet usable.
2010: retcode := 2;
2011: errbuf := l_message_text;
2012: fnd_file.put_line(FND_FILE.LOG, errbuf);
2013: RETURN;
2014:
2015: WHEN OTHERS THEN
2016: l_price_book_messages_tbl(i).message_code :=

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

2025: commit; --inserted message with pb_input_header_id
2026: --since price_book_header_id not yet usable.
2027: retcode := 2;
2028: errbuf := l_message_text;
2029: fnd_file.put_line(FND_FILE.LOG, errbuf);
2030: RETURN;
2031: END;
2032:
2033: --dbms_output.put_line('Conc Program price book header id = '||l_publish_price_book_header_id);

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

2057: commit; --inserted message with pb_input_header_id
2058: --since price_book_header_id not yet usable.
2059: retcode := 2;
2060: errbuf := l_message_text;
2061: fnd_file.put_line(FND_FILE.LOG, errbuf);
2062: RETURN;
2063:
2064: WHEN OTHERS THEN
2065: l_price_book_messages_tbl(i).message_code :=

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

2074: commit; --inserted message with pb_input_header_id
2075: --since price_book_header_id not yet usable.
2076: retcode := 2;
2077: errbuf := l_message_text;
2078: fnd_file.put_line(FND_FILE.LOG, errbuf);
2079: RETURN;
2080: END;
2081:
2082: ELSE

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

2097: commit; --inserted message with pb_input_header_id
2098: --since price_book_header_id not yet usable.
2099: retcode := 2;
2100: errbuf := substr(l_message_text,1,240);
2101: fnd_file.put_line(FND_FILE.LOG, errbuf);
2102: RETURN;
2103: END IF; --overwrite_price_book_header_id is null
2104:
2105: END IF;--If overwrite flag = 'Y'

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

2108: --that will be updated by child process with information obtained from
2109: --pricing engine
2110: l_item_validation_org_id := QP_UTIL.Get_Item_Validation_Org;
2111:
2112: fnd_file.put_line(FND_FILE.LOG, 'Item Validation Org = ' ||
2113: to_char(l_item_validation_org_id));
2114: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2115: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2116:

Line 2117: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST ');

2113: to_char(l_item_validation_org_id));
2114: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2115: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2116:
2117: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST ');
2118: fnd_file.put_line(fnd_file.Log, 'pl_agr_bsa_id = '||l_pb_input_header_rec.pl_agr_bsa_id);
2119:
2120: --For items in price list
2121: OPEN pl_items_cur(l_pb_input_header_rec.pl_agr_bsa_id);

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

2114: --dbms_output.put_line('l_item_validation_org_id = '||l_item_validation_org_id);
2115: IF l_pb_input_header_rec.limit_products_by = 'PRICE_LIST' THEN
2116:
2117: fnd_file.put_line(fnd_file.Log, 'limit products by = PRICE_LIST ');
2118: fnd_file.put_line(fnd_file.Log, 'pl_agr_bsa_id = '||l_pb_input_header_rec.pl_agr_bsa_id);
2119:
2120: --For items in price list
2121: OPEN pl_items_cur(l_pb_input_header_rec.pl_agr_bsa_id);
2122: LOOP

Line 2185: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM');

2181:
2182: ELSIF l_pb_input_header_rec.limit_products_by = 'ITEM' THEN
2183:
2184: --get item and uom combinations for item and insert prelim price book lines
2185: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM');
2186:
2187: OPEN item_uom_cur(l_pb_input_header_rec.product_attr_value,
2188: l_item_validation_org_id,
2189: l_pb_input_header_rec.effective_date);

Line 2232: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM_CATEGORY');

2228:
2229: ELSIF l_pb_input_header_rec.limit_products_by = 'ITEM_CATEGORY' THEN
2230:
2231: --For items in category
2232: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ITEM_CATEGORY');
2233:
2234: OPEN cat_items_cur(l_pb_input_header_rec.product_attr_value,
2235: l_item_validation_org_id);
2236: LOOP

Line 2297: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ALL_ITEMS');

2293:
2294: ELSIF l_pb_input_header_rec.limit_products_by = 'ALL_ITEMS' THEN
2295:
2296: --get all item-uom combinations and create price book lines
2297: fnd_file.put_line(fnd_file.Log, 'limit_products_by = ALL_ITEMS');
2298:
2299: OPEN items_cur(l_item_validation_org_id,
2300: l_pb_input_header_rec.pricing_perspective_code);
2301: LOOP

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

2358: END IF; --If limit_products_by is price_list, item or item_category
2359:
2360: END IF; --Publish existing price book
2361:
2362: fnd_file.put_line(FND_FILE.LOG, 'Preparing to submit child request');
2363:
2364: --dbms_output.put_line('Came to end');--test code to be removed
2365: --commit; --test code to be removed
2366:

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

2368: l_submit :=
2369: fnd_date.date_to_canonical(l_pb_input_header_rec.gen_schedule_date);
2370: END IF;
2371:
2372: fnd_file.put_line(FND_FILE.LOG, 'Before submitting child request');
2373:
2374: --submit a child concurrent request
2375:
2376: l_child_request_id := FND_REQUEST.SUBMIT_REQUEST(

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

2384:
2385: IF l_child_request_id = 0 THEN
2386: errbuf := substr(FND_MESSAGE.GET, 1, 240);
2387: retcode := 2;
2388: fnd_file.put_line(FND_FILE.LOG, errbuf);
2389: ELSE --submit request successful
2390: errbuf := '';
2391: retcode := 0;
2392:

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

2396:
2397: COMMIT; --to complete request submission
2398:
2399: --dbms_output.put_line('after submitting child request ');
2400: fnd_file.put_line(FND_FILE.LOG, 'After submitting child request');
2401:
2402: END IF; --If child_request_id = 0
2403:
2404: ELSE --p_spawned_request = 'Y'

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

2402: END IF; --If child_request_id = 0
2403:
2404: ELSE --p_spawned_request = 'Y'
2405:
2406: fnd_file.put_line(FND_FILE.LOG, 'In child request');
2407:
2408: --generate engine debug file if the 'QP: Debug' profile is on
2409: IF FND_PROFILE.VALUE_SPECIFIC(name => 'QP_DEBUG', application_id => 661)
2410: IN ('Y','V')

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

2412: oe_debug_pub.SetDebugLevel(10);
2413: oe_debug_pub.Initialize;
2414: oe_debug_pub.debug_on;
2415: l_debug_file := oe_debug_pub.Set_Debug_Mode('FILE');
2416: fnd_file.put_line(FND_FILE.LOG, 'Engine Debug File = '||l_debug_file);
2417: END IF;
2418:
2419: IF nvl(l_pb_input_header_rec.publish_existing_pb_flag, 'N') = 'N' THEN
2420: --Price Book is to be generated

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

2423: INTO l_pb_input_lines_tbl
2424: FROM qp_pb_input_lines
2425: WHERE pb_input_header_id = p_pb_input_header_id;
2426:
2427: fnd_file.put_line(FND_FILE.LOG, 'Before Insert_Price_Book_Content ');
2428:
2429: --Create price book line details, pricing attributes, price break lines
2430: BEGIN
2431: Insert_Price_Book_Content(

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

2450: retcode := 0;
2451: RETURN;
2452: END;
2453:
2454: fnd_file.put_line(FND_FILE.LOG, 'After Insert_Price_Book_Content ');
2455:
2456: --Update price book line details with running net price
2457: OPEN pb_lines_cur;
2458: LOOP

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

2541: l_price_book_messages_tbl.delete;
2542: commit;
2543: retcode := 2;
2544: errbuf := l_message_text;
2545: fnd_file.put_line(FND_FILE.LOG, errbuf);
2546: RETURN;
2547: END;
2548: END IF;
2549:

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

2581:
2582: END IF; --publish_existing_pb_flag = 'N', i.e. price book is to be generated
2583:
2584: --Publish the price book identified by p_price_book_header_id
2585: fnd_file.put_line(FND_FILE.LOG,'Begin Publishing');
2586: /** KDURGASI **/
2587: SELECT PUB_OUTPUT_DOCUMENT_TYPE
2588: INTO l_document_type
2589: FROM QP_PB_INPUT_HEADERS_B

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

2612: p_price_book_header_id => p_price_book_header_id,
2613: x_return_status => l_return_status,
2614: x_return_status_text => l_return_status_text);
2615:
2616: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return status '||l_return_status);
2617: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return text'||l_return_status_text);
2618:
2619: END IF;
2620:

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

2613: x_return_status => l_return_status,
2614: x_return_status_text => l_return_status_text);
2615:
2616: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return status '||l_return_status);
2617: fnd_file.put_line(FND_FILE.LOG, 'Publish_and_Deliver return text'||l_return_status_text);
2618:
2619: END IF;
2620:
2621: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

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

2628: QP_PRICE_BOOK_UTIL.Send_Sync_Catalog(
2629: p_price_book_header_id => p_price_book_header_id,
2630: x_return_status => l_return_status,
2631: x_return_status_text => l_return_status_text);
2632: fnd_file.put_line(FND_FILE.LOG, 'XML Message return status '||l_return_status);
2633: fnd_file.put_line(FND_FILE.LOG, 'XML Message return text'||l_return_status_text);
2634:
2635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2636: l_price_book_messages_tbl(i).message_code := 'SYNC_CATALOG_ERROR';

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

2629: p_price_book_header_id => p_price_book_header_id,
2630: x_return_status => l_return_status,
2631: x_return_status_text => l_return_status_text);
2632: fnd_file.put_line(FND_FILE.LOG, 'XML Message return status '||l_return_status);
2633: fnd_file.put_line(FND_FILE.LOG, 'XML Message return text'||l_return_status_text);
2634:
2635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2636: l_price_book_messages_tbl(i).message_code := 'SYNC_CATALOG_ERROR';
2637: l_price_book_messages_tbl(i).message_text := l_return_status_text;

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

2646: END IF;
2647:
2648: END IF; --If xml flag checked
2649:
2650: fnd_file.put_line(FND_FILE.LOG,'Done Publishing');
2651:
2652: IF FND_PROFILE.VALUE_SPECIFIC(name => 'QP_DEBUG', application_id => 661)
2653: IN ('Y','V')
2654: THEN

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

2660: COMMIT;
2661:
2662: -- Introduced for the purpose of PL/SQL Profiling (snimmaga)
2663: /*
2664: fnd_file.put_line(fnd_file.Log, 'Stopping PL/SQL Profiler...');
2665: err := DBMS_PROFILER.STOP_PROFILER ;
2666: */
2667:
2668: EXCEPTION

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

2677: l_price_book_messages_tbl.delete;
2678: commit;
2679: retcode := 2;
2680: errbuf := l_message_text;
2681: fnd_file.put_line(FND_FILE.LOG, errbuf);
2682: END Price_Book_Conc_Pgm;
2683:
2684:
2685: END qp_price_book_pvt;