[Home] [Help]
5: PRAGMA AUTONOMOUS_TRANSACTION;
6: BEGIN
7: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
8: INSERT INTO
9: qp_debug_req( REQUEST_ID,
10: REQUEST_NAME,
11: ORDER_NUMBER, -- sfiresto 2374448
12: CREATED_BY,
13: CREATION_DATE,
52: g_control_rec.currency_code
53: );
54:
55: IF l_debug = FND_API.G_TRUE THEN
56: QP_PREQ_GRP.engine_debug('***Inserted 1 Record into QP_DEBUG_REQ***');
57: END IF;
58: -- dbms_output.put_line('***Inserted 1 Record into QP_DEBUG_REQ***');
59: COMMIT;
60:
54:
55: IF l_debug = FND_API.G_TRUE THEN
56: QP_PREQ_GRP.engine_debug('***Inserted 1 Record into QP_DEBUG_REQ***');
57: END IF;
58: -- dbms_output.put_line('***Inserted 1 Record into QP_DEBUG_REQ***');
59: COMMIT;
60:
61: END Insert_Request;
62:
67: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
68: IF LINE_ID_T.COUNT >= 1 then
69: FORALL Tbl_Index IN LINE_ID_T.FIRST .. LINE_ID_T.LAST
70: INSERT INTO
71: QP_DEBUG_REQ_LINES( REQUEST_ID,
72: REQUEST_TYPE_CODE,
73: LINE_NUMBER, -- sfiresto 2374448
74: LINE_ID,
75: LINE_INDEX,
160: USAGE_PRICING_TYPE_T(Tbl_Index)
161: );
162:
163: IF l_debug = FND_API.G_TRUE THEN
164: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_ID_T.COUNT || ' Records into QP_DEBUG_REQ_LINES***');
165: END IF;
166: -- dbms_output.put_line('***Inserted 1 Record into QP_DEBUG_REQ_LINES***');
167: COMMIT;
168: REQUEST_ID_T.delete;
162:
163: IF l_debug = FND_API.G_TRUE THEN
164: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_ID_T.COUNT || ' Records into QP_DEBUG_REQ_LINES***');
165: END IF;
166: -- dbms_output.put_line('***Inserted 1 Record into QP_DEBUG_REQ_LINES***');
167: COMMIT;
168: REQUEST_ID_T.delete;
169: REQUEST_TYPE_CODE_T.delete;
170: LINE_ID_T.delete;
218: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
219: IF LINE_DETAIL_INDEX_T.COUNT >= 1 then
220: FORALL Tbl_Index IN LINE_DETAIL_INDEX_T.FIRST .. LINE_DETAIL_INDEX_T.LAST
221: INSERT INTO
222: QP_DEBUG_REQ_LDETS( REQUEST_ID,
223: LINE_DETAIL_INDEX,
224: LINE_DETAIL_TYPE_CODE,
225: PRICE_BREAK_TYPE_CODE,
226: LINE_INDEX,
329: nvl(LINE_LIMIT_EXISTS_T(Tbl_Index),'N')
330: );
331:
332: IF l_debug = FND_API.G_TRUE THEN
333: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_DETAIL_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LDETS***');
334: END IF;
335: -- dbms_output.put_line('***Inserted ' || LINE_DETAIL_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LDETS***');
336:
337: COMMIT;
331:
332: IF l_debug = FND_API.G_TRUE THEN
333: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_DETAIL_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LDETS***');
334: END IF;
335: -- dbms_output.put_line('***Inserted ' || LINE_DETAIL_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LDETS***');
336:
337: COMMIT;
338: REQUEST_ID_T.delete;
339: LINE_DETAIL_INDEX_T.delete;
400: IF LINE_INDEX_T.COUNT >= 1 then
401: -- dbms_output.put_line('***attrs - 5***');
402: FORALL Tbl_Index IN LINE_INDEX_T.FIRST .. LINE_INDEX_T.LAST
403: INSERT INTO
404: QP_DEBUG_REQ_LINE_ATTRS( REQUEST_ID,
405: LINE_INDEX,
406: LINE_DETAIL_INDEX,
407: LINE_ATTRIBUTE_ID,
408: ATTRIBUTE_LEVEL,
476: MODIFIER_LEVEL_CODE_T(Tbl_Index),
477: nvl(PRIMARY_UOM_FLAG_T(Tbl_Index),'N')
478: );
479: IF l_debug = FND_API.G_TRUE THEN
480: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LINE_ATTRS***');
481: END IF;
482: -- dbms_output.put_line('***Inserted ' || LINE_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LINE_ATTRS***');
483: COMMIT;
484: -- dbms_output.put_line('***attrs - 6***');
478: );
479: IF l_debug = FND_API.G_TRUE THEN
480: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LINE_ATTRS***');
481: END IF;
482: -- dbms_output.put_line('***Inserted ' || LINE_INDEX_T.COUNT || ' Records into QP_DEBUG_REQ_LINE_ATTRS***');
483: COMMIT;
484: -- dbms_output.put_line('***attrs - 6***');
485: REQUEST_ID_T.delete;
486: LINE_INDEX_T.delete;
528: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
529: IF LINE_INDEX_T.COUNT >= 1 then
530: FORALL Tbl_Index IN LINE_INDEX_T.FIRST .. LINE_INDEX_T.LAST
531: INSERT INTO
532: QP_DEBUG_REQ_RLTD_LINES( REQUEST_ID,
533: REQUEST_TYPE_CODE,
534: LINE_INDEX,
535: LINE_DETAIL_INDEX,
536: RELATIONSHIP_TYPE_CODE,
575: SATISFIED_RANGE_VALUE_T(Tbl_Index)
576: );
577:
578: IF l_debug = FND_API.G_TRUE THEN
579: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_INDEX_T.COUNT || ' Record into QP_DEBUG_REQ_RLTD_LINES***');
580: END IF;
581: -- dbms_output.put_line('***Inserted ' || LINE_INDEX_T.COUNT || ' Record into QP_DEBUG_REQ_RLTD_LINES***');
582:
583: COMMIT;
577:
578: IF l_debug = FND_API.G_TRUE THEN
579: QP_PREQ_GRP.engine_debug('***Inserted ' || LINE_INDEX_T.COUNT || ' Record into QP_DEBUG_REQ_RLTD_LINES***');
580: END IF;
581: -- dbms_output.put_line('***Inserted ' || LINE_INDEX_T.COUNT || ' Record into QP_DEBUG_REQ_RLTD_LINES***');
582:
583: COMMIT;
584: REQUEST_ID_T.delete;
585: REQUEST_TYPE_CODE_T.delete;
686: PROCEDURE Generate_Debug_Req_Seq(x_return_status out NOCOPY varchar2,
687: x_status_text out NOCOPY varchar2)
688: IS
689: CURSOR DEBUG_REQUEST_ID_CUR IS
690: SELECT qp_debug_req_s.nextval FROM dual;
691: l_request_id number;
692: BEGIN
693: -- dbms_output.put_line('*** Initializing Global Variables***');
694: G_DEBUG_TEXT_LINE_NO := 0;
1099: --added by yangli for Java Engine 3086881
1100: ORDER BY LINE_INDEX, PRICE_FORMULA_ID, STEP_NUMBER;
1101:
1102: -- CURSOR REQUEST_ID_CUR IS
1103: -- SELECT qp_debug_req_s.nextval FROM dual;
1104:
1105: CURSOR LINE_ID_CUR IS
1106: SELECT LINE_ID FROM qp_npreq_lines_tmp
1107: WHERE QP_JAVA_ENGINE_UTIL_PUB.Java_Engine_Running = 'N'