[Home] [Help]
351: -- vendor and not finally closed
352:
353: CURSOR C_ConsumeReqLines is
354: SELECT prl.requisition_line_id
355: FROM po_lines pol,
356: po_requisition_lines prl,
357: po_requisition_headers_all prh --
358: WHERE pol.po_header_id=l_consume_req_demand_doc_id
359: AND prl.auction_header_id = pol.auction_header_id
3564: else /* ie. x_first_time_for_this_comb = FALSE */
3565:
3566: /* The line we are checking now can put put onto the same header
3567: * as a previous one, so only insert a new line into the
3568: * po_lines_interface table.
3569: */
3570:
3571: po_autocreate_doc.insert_into_lines_interface (itemtype,
3572: itemkey,
4225: /***************************************************************************
4226: *
4227: * Procedure: insert_into_lines_interface
4228: *
4229: * Description: Inserts a row in the po_lines_interface table
4230: *
4231: *
4232: **************************************************************************/
4233: procedure insert_into_lines_interface (itemtype IN VARCHAR2,
4304: x_action_type_code_line := NULL;
4305: x_line_num := NULL;
4306:
4307: --
4308: -- We can now insert contract_id into po_lines_interface directly
4309: -- and therefore no need to derive contract_num
4310:
4311: --if (x_contract_id is not null) then
4312: --
4325: x_line_num := x_source_doc_line;
4326: end if;
4327:
4328:
4329: select po_lines_interface_s.nextval
4330: into x_interface_line_id
4331: from sys.dual;
4332:
4333: /* GA FPI start */
4336: x_source_doc_line is not null then
4337:
4338: -- SQL what Get the line id from the source doc line
4339: -- SQL why Requisition line does not store the line id
4340: -- Bug fix 2703592 - need to select from all table instead of po_lines
4341: Select po_line_id
4342: into x_source_line_id
4343: From po_lines_all
4344: Where po_header_id = x_source_doc_id
4339: -- SQL why Requisition line does not store the line id
4340: -- Bug fix 2703592 - need to select from all table instead of po_lines
4341: Select po_line_id
4342: into x_source_line_id
4343: From po_lines_all
4344: Where po_header_id = x_source_doc_id
4345: And line_num = x_source_doc_line;
4346:
4347: end if;
4347: end if;
4348:
4349: /* GA FPI end */
4350:
4351: /* Insert into po_lines */
4352:
4353: x_progress := '10: insert_into_lines_interface: Just about to insert into ' ||
4354: 'po_lines_interface';
4355:
4350:
4351: /* Insert into po_lines */
4352:
4353: x_progress := '10: insert_into_lines_interface: Just about to insert into ' ||
4354: 'po_lines_interface';
4355:
4356: IF (g_po_wf_debug = 'Y') THEN
4357: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4358: END IF;
4363: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4364: END IF;
4365:
4366: begin
4367: insert into po_lines_interface
4368: (interface_header_id,
4369: interface_line_id,
4370: action,
4371: line_num,
4397:
4398: exception
4399: when others then
4400: x_progress:= '15: insert_into_lines_interface: IN EXCEPTION when' ||
4401: 'inserting into po_lines_interface';
4402: IF (g_po_wf_debug = 'Y') THEN
4403: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4404: END IF;
4405: raise;
4405: raise;
4406: end;
4407:
4408: x_progress := '20: insert_into_lines_interface: Inserted into ' ||
4409: 'po_lines_interface';
4410: IF (g_po_wf_debug = 'Y') THEN
4411: po_wf_debug_pkg.insert_debug(itemtype,itemkey,x_progress);
4412: END IF;
4413:
5834: else /* ie. x_first_time_for_this_comb = FALSE */
5835:
5836: /* The line will be put onto the same header
5837: * as a previous one, so only insert a new line into the
5838: * po_lines_interface table.
5839: */
5840:
5841: po_autocreate_doc.insert_into_lines_interface (itemtype,
5842: itemkey,