[Home] [Help]
3436: -- c1_cons_from_supp_flag := 'N';
3437: -- end if;
3438:
3439: /* Bug#14305183: We will retain the document reference for consigned PO.
3440: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3441: * of consigned document to be created, if source document as local Blanket.
3442: * If Profile is set to 'Yes', we should still create a Standard PO without
3443: * having the source document reference. Hence x_doc_type_to_create should
3444: * be STANDARD in this case.
3438:
3439: /* Bug#14305183: We will retain the document reference for consigned PO.
3440: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3441: * of consigned document to be created, if source document as local Blanket.
3442: * If Profile is set to 'Yes', we should still create a Standard PO without
3443: * having the source document reference. Hence x_doc_type_to_create should
3444: * be STANDARD in this case.
3445: * In Case Profile is set to 'No', system will created Consigned Releases.
3446: */
3440: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3441: * of consigned document to be created, if source document as local Blanket.
3442: * If Profile is set to 'Yes', we should still create a Standard PO without
3443: * having the source document reference. Hence x_doc_type_to_create should
3444: * be STANDARD in this case.
3445: * In Case Profile is set to 'No', system will created Consigned Releases.
3446: */
3447: -- Bug#14305183::Start
3448:
3626: -- c2_cons_from_supp_flag := 'N';
3627: -- end if;
3628:
3629: /* Bug#14305183: We will retain the document reference for consigned PO.
3630: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3631: * of consigned document to be created, if source document as local Blanket.
3632: * If Profile is set to 'Yes', we should still create a Standard PO without
3633: * having the source document reference. Hence x_doc_type_to_create should
3634: * be STANDARD in this case.
3628:
3629: /* Bug#14305183: We will retain the document reference for consigned PO.
3630: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3631: * of consigned document to be created, if source document as local Blanket.
3632: * If Profile is set to 'Yes', we should still create a Standard PO without
3633: * having the source document reference. Hence x_doc_type_to_create should
3634: * be STANDARD in this case.
3635: * In Case Profile is set to 'No', system will created Consigned Releases.
3636: */
3630: * With Profile 'PO: Create Consigned PO As Standard PO' control the type
3631: * of consigned document to be created, if source document as local Blanket.
3632: * If Profile is set to 'Yes', we should still create a Standard PO without
3633: * having the source document reference. Hence x_doc_type_to_create should
3634: * be STANDARD in this case.
3635: * In Case Profile is set to 'No', system will created Consigned Releases.
3636: */
3637: -- Bug#14305183::Start
3638:
4149:
4150: x_batch_id := x_interface_header_id;
4151:
4152: /* If the source doc is a blanket then we are going to create a blanket release.
4153: * If the source doc is a quotation then we are going to create a standard po.
4154: */
4155:
4156: /* FPI GA - If ga flag is Y then we create a standard PO */
4157:
4152: /* If the source doc is a blanket then we are going to create a blanket release.
4153: * If the source doc is a quotation then we are going to create a standard po.
4154: */
4155:
4156: /* FPI GA - If ga flag is Y then we create a standard PO */
4157:
4158: -- Bug 2695074 getting the ga flag from the db as the attribute does not have any value
4159: -- in this process
4160:
4168: /* Bug 2735730.
4169: * If x_source_doc_id is null, then it would be only in the case
4170: * when the supplier is set up as a consigned enabled and the
4171: * destination type is INVENTORY for the requisition. In this case,
4172: * we should still create a Standard PO. Hence x_doc_type_to_create
4173: * should be STANDARD in this case.
4174: */
4175: if (x_source_doc_id is null) then
4176: x_doc_type_to_create := 'STANDARD';
4169: * If x_source_doc_id is null, then it would be only in the case
4170: * when the supplier is set up as a consigned enabled and the
4171: * destination type is INVENTORY for the requisition. In this case,
4172: * we should still create a Standard PO. Hence x_doc_type_to_create
4173: * should be STANDARD in this case.
4174: */
4175: if (x_source_doc_id is null) then
4176: x_doc_type_to_create := 'STANDARD';
4177: else
4172: * we should still create a Standard PO. Hence x_doc_type_to_create
4173: * should be STANDARD in this case.
4174: */
4175: if (x_source_doc_id is null) then
4176: x_doc_type_to_create := 'STANDARD';
4177: else
4178: if (x_source_doc_type_code = 'BLANKET')
4179: and nvl(x_ga_flag,'N') = 'N' then -- FPI GA
4180: x_doc_type_to_create := 'RELEASE';
4178: if (x_source_doc_type_code = 'BLANKET')
4179: and nvl(x_ga_flag,'N') = 'N' then -- FPI GA
4180: x_doc_type_to_create := 'RELEASE';
4181: else
4182: x_doc_type_to_create := 'STANDARD';
4183: end if;
4184: end if;
4185:
4186:
4183: end if;
4184: end if;
4185:
4186:
4187: if (x_doc_type_to_create = 'STANDARD') then
4188:
4189: /* Whether automatic numbering is on our not, we are going to use
4190: * the automatic number from the unique identifier table. This is
4191: * as per req import. If however we have an po num (eg. emergency po)
4245: into x_found
4246: from po_headers_all
4247: where segment1 = x_document_num
4248: and org_id = l_purchasing_org_id --
4249: and type_lookup_code IN ('STANDARD', 'PLANNED', 'BLANKET', 'CONTRACT');
4250:
4251: exception
4252: when NO_DATA_FOUND then
4253: null;
4597:
4598: x_created_by := to_number(FND_PROFILE.VALUE('user_id'));
4599: x_last_updated_by := to_number(FND_PROFILE.VALUE('user_id'));
4600:
4601: /* FPI GA - If ga flag is Y then we create a standard PO */
4602:
4603: if x_source_doc_id is not null then
4604: select global_agreement_flag
4605: into x_ga_flag
4610: /* Bug 2735730.
4611: * If x_source_doc_id is null, then it would be only in the case
4612: * when the supplier is set up as a consigned enabled and the
4613: * destination type is INVENTORY for the requisition. In this case,
4614: * we should still create a Standard PO. Hence x_doc_type_to_create
4615: * should be STANDARD in this case.
4616: */
4617: if (x_source_doc_id is null) then
4618: x_doc_type_to_create := 'STANDARD';
4611: * If x_source_doc_id is null, then it would be only in the case
4612: * when the supplier is set up as a consigned enabled and the
4613: * destination type is INVENTORY for the requisition. In this case,
4614: * we should still create a Standard PO. Hence x_doc_type_to_create
4615: * should be STANDARD in this case.
4616: */
4617: if (x_source_doc_id is null) then
4618: x_doc_type_to_create := 'STANDARD';
4619: else
4614: * we should still create a Standard PO. Hence x_doc_type_to_create
4615: * should be STANDARD in this case.
4616: */
4617: if (x_source_doc_id is null) then
4618: x_doc_type_to_create := 'STANDARD';
4619: else
4620: if (x_source_doc_type_code = 'BLANKET')
4621: and nvl(x_ga_flag,'N') = 'N' then -- FPI GA
4622: x_doc_type_to_create := 'RELEASE';
4620: if (x_source_doc_type_code = 'BLANKET')
4621: and nvl(x_ga_flag,'N') = 'N' then -- FPI GA
4622: x_doc_type_to_create := 'RELEASE';
4623: else
4624: x_doc_type_to_create := 'STANDARD';
4625: end if;
4626: end if;
4627:
4628: if (x_doc_type_to_create = 'STANDARD') then
4624: x_doc_type_to_create := 'STANDARD';
4625: end if;
4626: end if;
4627:
4628: if (x_doc_type_to_create = 'STANDARD') then
4629: x_action_type_code_line := NULL;
4630: x_line_num := NULL;
4631:
4632: --
5020: *
5021: * Procedure: create_doc
5022: *
5023: * Description: Calls backend autocreate package to create the
5024: * standard po or blanket release
5025: *
5026: *
5027: **************************************************************************/
5028: procedure create_doc (itemtype IN VARCHAR2,
5218: aname => 'AGENT_ID');
5219:
5220:
5221: /* Get the displayed value from po_lookup_codes so it will be translated
5222: * This will return either 'Standard PO' or 'Release'
5223: */
5224: --
5225: if (x_doc_type_to_create = 'STANDARD') then
5226: x_doc_type_created_disp:= PO_DOC_STYLE_PVT.get_style_display_name(x_autocreated_doc_id);
5221: /* Get the displayed value from po_lookup_codes so it will be translated
5222: * This will return either 'Standard PO' or 'Release'
5223: */
5224: --
5225: if (x_doc_type_to_create = 'STANDARD') then
5226: x_doc_type_created_disp:= PO_DOC_STYLE_PVT.get_style_display_name(x_autocreated_doc_id);
5227: else --releases
5228:
5229: select displayed_field
5241: avalue => x_doc_type_created_disp);
5242:
5243: /* Get the document number created */
5244:
5245: if (x_doc_type_to_create = 'STANDARD') then
5246:
5247: --
5248: --Modified the query to select from po_headers_all instead of
5249: --po_headers.
5276: p_po_header_id => x_autocreated_doc_id,
5277: p_doc_subtype => x_doc_type_to_create,
5278: p_mode => 'update');
5279:
5280: IF PO_DOC_STYLE_GRP.is_standard_doc_style(l_style_id) = 'Y' THEN
5281: l_open_form := 'PO_POXPOEPO:PO_HEADER_ID="' || '&' ||
5282: 'AUTOCREATED_DOC_ID"' ||
5283: ' ACCESS_LEVEL_CODE="MODIFY"' ||
5284: ' POXPOEPO_CALLING_FORM="POXSTNOT"';
5445: aname => 'AUTOCREATED_DOC_ID');
5446: l_document_id := l_po_release_id; --bug 14243104 fix
5447: ELSE
5448: l_doc_type := PO_CONSTANTS_SV.PO;
5449: l_doc_subtype := PO_CONSTANTS_SV.STANDARD;
5450: l_po_header_id := po_wf_util_pkg.GetItemAttrNumber
5451: (itemtype => itemtype,
5452: itemkey => itemkey,
5453: aname => 'AUTOCREATED_DOC_ID');
5627: if (x_doc_type_to_create = 'RELEASE') then
5628: x_doc_type := 'RELEASE';
5629: x_doc_subtype := 'BLANKET';
5630: else
5631: /* STANDARD */
5632: x_doc_type := 'PO';
5633: x_doc_subtype := 'STANDARD';
5634: end if;
5635:
5629: x_doc_subtype := 'BLANKET';
5630: else
5631: /* STANDARD */
5632: x_doc_type := 'PO';
5633: x_doc_subtype := 'STANDARD';
5634: end if;
5635:
5636: /* Need to get item_type and workflow process from po_document_types.
5637: * They may be different based on the doc/org.
6080: /* Get the group_id since we only want to process lines belonging
6081: * to the same group. We need to get the group_id before opening
6082: * the cursor since it is a parameter to the cursor.
6083: */
6084: l_style_id := PO_DOC_STYLE_GRP.get_standard_doc_style; --
6086: x_group_id := po_wf_util_pkg.GetItemAttrNumber (itemtype => itemtype,
6087: itemkey => itemkey,
6088: aname => 'GROUP_ID');
6136: x_suggested_vendor_contact_id := get_contact_id(x_suggested_vendor_contact, c_suggested_vendor_site_id);
6137: end if;
6138:
6139: /* Bug#14305183: For emergency requisition, outcome document is always a
6140: * STANDARD purchase order.
6141: * Customer in bug13496442 had requested that, if the emergency requisition
6142: * creating into the PO, retains the source document reference on the PO.
6143: * If source document is local Blanket. we should still create a Standard PO
6144: * without having the source document reference. Hence x_doc_type_to_create
6139: /* Bug#14305183: For emergency requisition, outcome document is always a
6140: * STANDARD purchase order.
6141: * Customer in bug13496442 had requested that, if the emergency requisition
6142: * creating into the PO, retains the source document reference on the PO.
6143: * If source document is local Blanket. we should still create a Standard PO
6144: * without having the source document reference. Hence x_doc_type_to_create
6145: * should be STANDARD in this case.
6146: */
6147:
6141: * Customer in bug13496442 had requested that, if the emergency requisition
6142: * creating into the PO, retains the source document reference on the PO.
6143: * If source document is local Blanket. we should still create a Standard PO
6144: * without having the source document reference. Hence x_doc_type_to_create
6145: * should be STANDARD in this case.
6146: */
6147:
6148: -- Bug#14305183: Start
6149: IF (c_source_doc_id is not null)