[Home] [Help]
11: TYPE char30_table is table of varchar2(30) index by binary_integer;
12: TYPE date_table is table of date index by binary_integer;
13:
14: /* Global tables that are defined for inserting into the global temp
15: * table po_retroprice_gt.
16: */
17: g_row_id_table char30_table;
18: g_exclude_row_id_table char30_table;
19: g_new_price_table num_table;
552: --
553:
554: cursor update_ship_price is
555: SELECT row_id, new_price
556: FROM po_retroprice_gt
557: WHERE po_release_id is not null;
558:
559: cursor update_line_price is
560: SELECT row_id, new_price, new_base_price --Enhanced Pricing
557: WHERE po_release_id is not null;
558:
559: cursor update_line_price is
560: SELECT row_id, new_price, new_base_price --Enhanced Pricing
561: FROM po_retroprice_gt
562: WHERE po_header_id is not null;
563:
564:
565: x_item_category_str varchar2(2000);
1604: --
1605:
1606: END IF; /* l_po_line_id_table(i) IS NOT NULL */
1607:
1608: /* Insert the values in the temp table po_retroprice_gt
1609: * for each Blanket Line that we process.
1610: */
1611: l_module := g_log_head||l_api_name||'.'||
1612: '090'||'.';
1610: */
1611: l_module := g_log_head||l_api_name||'.'||
1612: '090'||'.';
1613: FORALL insert_index in 1..g_row_id_table.COUNT
1614: INSERT into po_retroprice_gt(
1615: row_id,
1616: new_price,
1617: new_base_price, --Enhanced Pricing
1618: po_header_id,
1975: BULK COLLECT INTO
1976: g_po_release_id_table,
1977: g_rel_auth_table,
1978: l_global_arch_rev_num_table
1979: FROM po_retroprice_gt prp
1980: WHERE prp.po_release_id is not null;
1981:
1982: --
1983: -- Calculate Tax for updated Releases
2044: l_module := g_log_head||l_api_name||'.'||'020'||'.';
2045: SELECT row_id
2046: BULK COLLECT INTO
2047: l_row_id_table
2048: FROM po_retroprice_gt prp
2049: WHERE prp.po_release_id is not null
2050: and nvl(authorization_status,'INCOMPLETE') = 'APPROVED';
2051:
2052: l_module := g_log_head||l_api_name||'.'||'030'||'.';
2123: BULK COLLECT INTO
2124: g_po_header_id_table,
2125: g_po_auth_table,
2126: l_global_arch_rev_num_table
2127: FROM po_retroprice_gt prp
2128: WHERE prp.po_header_id is not null;
2129:
2130: --
2131: -- Calculate Tax for updated Releases
2190: l_module := g_log_head||l_api_name||'.'||'020'||'.';
2191: SELECT row_id
2192: BULK COLLECT INTO
2193: l_row_id_table
2194: FROM po_retroprice_gt prp
2195: WHERE prp.po_header_id is not null
2196: and nvl(authorization_status,'INCOMPLETE') = 'APPROVED';
2197:
2198: l_module := g_log_head||l_api_name||'.'||'030'||'.';
2611: /**
2612: * Private Procedure: Launch_PO_Approval
2613: * Modifies: Authorization_status of po_headers if the document was
2614: * already approved.
2615: * Effects: Get the po_header_id from the global temp table po_retroprice_gt
2616: * which has all the document ids that have been updated with
2617: * new price. If the document is in the approved state, then
2618: * call submission_check and if it is successful, initiate
2619: * approval. This is called from massupdate_releases procedure.
2768: /**
2769: * Private Procedure: Launch_REL_Approval
2770: * Modifies: Authorization_status of po_releases if the document was
2771: * already approved.
2772: * Effects: Get the po_release_id from the global temp table po_retroprice_gt
2773: * which has all the document ids that have been updated with
2774: * new price. If the document is in the approved state, then
2775: * call submission_check and if it is successful, initiate
2776: * approval. This is called from massupdate_releases procedure.