[Home] [Help]
397: -- vendor and not finally closed
398:
399: CURSOR C_ConsumeReqLines is
400: SELECT prl.requisition_line_id
401: FROM po_lines pol,
402: po_requisition_lines prl,
403: po_requisition_headers_all prh --
404: WHERE pol.po_header_id=l_consume_req_demand_doc_id
405: AND prl.auction_header_id = pol.auction_header_id
3889: else /* ie. x_first_time_for_this_comb = FALSE */
3890:
3891: /* The line we are checking now can put put onto the same header
3892: * as a previous one, so only insert a new line into the
3893: * po_lines_interface table.
3894: */
3895:
3896: po_autocreate_doc.insert_into_lines_interface (itemtype,
3897: itemkey,
4550: /***************************************************************************
4551: *
4552: * Procedure: insert_into_lines_interface
4553: *
4554: * Description: Inserts a row in the po_lines_interface table
4555: *
4556: *
4557: **************************************************************************/
4558: procedure insert_into_lines_interface (itemtype IN VARCHAR2,
4629: x_action_type_code_line := NULL;
4630: x_line_num := NULL;
4631:
4632: --
4633: -- We can now insert contract_id into po_lines_interface directly
4634: -- and therefore no need to derive contract_num
4635:
4636: --if (x_contract_id is not null) then
4637: --
4650: x_line_num := x_source_doc_line;
4651: end if;
4652:
4653:
4654: select po_lines_interface_s.nextval
4655: into x_interface_line_id
4656: from sys.dual;
4657:
4658: /* GA FPI start */
4661: x_source_doc_line is not null then
4662:
4663: -- SQL what Get the line id from the source doc line
4664: -- SQL why Requisition line does not store the line id
4665: -- Bug fix 2703592 - need to select from all table instead of po_lines
4666: Select po_line_id
4667: into x_source_line_id
4668: From po_lines_all
4669: Where po_header_id = x_source_doc_id
4664: -- SQL why Requisition line does not store the line id
4665: -- Bug fix 2703592 - need to select from all table instead of po_lines
4666: Select po_line_id
4667: into x_source_line_id
4668: From po_lines_all
4669: Where po_header_id = x_source_doc_id
4670: And line_num = x_source_doc_line;
4671:
4672: end if;
4672: end if;
4673:
4674: /* GA FPI end */
4675:
4676: /* Insert into po_lines */
4677:
4678: x_progress := '10: insert_into_lines_interface: Just about to insert into ' ||
4679: 'po_lines_interface';
4680:
4675:
4676: /* Insert into po_lines */
4677:
4678: x_progress := '10: insert_into_lines_interface: Just about to insert into ' ||
4679: 'po_lines_interface';
4680:
4681: IF (g_po_wf_debug = 'Y') THEN
4682: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4683: END IF;
4688: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4689: END IF;
4690: /*Bug11802312 We ll retain the document reference for an consigned PO*/
4691: begin
4692: insert into po_lines_interface
4693: (interface_header_id,
4694: interface_line_id,
4695: action,
4696: line_num,
4722:
4723: exception
4724: when others then
4725: x_progress:= '15: insert_into_lines_interface: IN EXCEPTION when' ||
4726: 'inserting into po_lines_interface';
4727: IF (g_po_wf_debug = 'Y') THEN
4728: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4729: END IF;
4730: raise;
4730: raise;
4731: end;
4732:
4733: x_progress := '20: insert_into_lines_interface: Inserted into ' ||
4734: 'po_lines_interface';
4735: IF (g_po_wf_debug = 'Y') THEN
4736: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4737: END IF;
4738:
6250: else /* ie. x_first_time_for_this_comb = FALSE */
6251:
6252: /* The line will be put onto the same header
6253: * as a previous one, so only insert a new line into the
6254: * po_lines_interface table.
6255: */
6256:
6257: po_autocreate_doc.insert_into_lines_interface (itemtype,
6258: itemkey,