[Home] [Help]
43: EMERGENCY_PO_NUM,
44: NVL(CONTRACTOR_REQUISITION_FLAG, 'N'),
45: NVL(CONTRACTOR_STATUS, 'NULL'),
46: NOTE_TO_AUTHORIZER
47: FROM po_requisition_headers_all
48: WHERE REQUISITION_HEADER_ID = p_requisition_header_id;
49: /*****************************************************************************
50: * The following are local/Private procedure that support the workflow APIs: *
51: *****************************************************************************/
560: -- Indicates the caller of this procedure. If 'CANCEL', then the approval will
561: -- not insert into the action history.
562: --DocumentID
563: -- This value for this parameter depends on the DocumentType:
564: -- 'REQUISITION': PO_REQUISITION_HEADERS_ALL.requisition_header_id
565: -- 'PO' or 'PA': PO_HEADERS_ALL.po_header_id
566: -- 'RELEASE': PO_RELEASES_ALL.po_release_id
567: --DocumentNumber
568: -- (Obsolete) This parameter is ignored. This procedure will derive the
573: --DocumentType
574: -- 'REQUISITION', 'PO', 'PA', 'RELEASE'
575: --DocumentSubType
576: -- The value for this parameter depends on the DocumentType:
577: -- 'REQUISITION': PO_REQUISITION_HEADERS_ALL.type_lookup_code
578: -- 'PO' or 'PA': PO_HEADERS_ALL.type_lookup_code
579: -- 'RELEASE': PO_RELEASES_ALL.release_type
580: --SubmitterAction
581: -- (Unused) This parameter is not currently used.
1076: PO_WF_UTIL_PKG.SetItemAttrText (itemtype => l_itemtype, itemkey => l_itemkey, aname => 'JUSTIFICATION', avalue => Note);
1077: IF (DocumentTypeCode = 'REQUISITION') THEN
1078: SELECT PRH.segment1
1079: INTO l_document_number
1080: FROM po_requisition_headers PRH
1081: WHERE PRH.requisition_header_id = DocumentID;
1082: BEGIN
1083: wf_engine.SetItemUserKey(itemtype => l_itemtype, itemkey => l_itemkey, userkey => l_document_number);
1084: EXCEPTION
1446: INTO l_document_number,
1447: l_federal_flag,
1448: l_revision_num,
1449: l_conformed_header_id
1450: FROM po_requisition_headers PRH
1451: WHERE PRH.requisition_header_id = DocumentID;
1452:
1453: PO_WF_UTIL_PKG.SetItemAttrText ( itemtype => l_itemtype, itemkey => l_itemkey, aname => 'FEDERAL_FLAG', avalue => l_federal_flag);
1454: IF(l_revision_num IS NOT NULL) THEN
2022: */
2023: IF l_document_type='REQUISITION' THEN
2024: SELECT AUTHORIZATION_STATUS
2025: INTO l_authorization_status
2026: FROM po_requisition_headers_all
2027: WHERE REQUISITION_HEADER_ID = l_document_id;
2028: /* Bug#1810322: kagarwal
2029: ** Desc: If the original authorization status is IN PROCESS or PRE-APPROVED
2030: ** for Reqs then we need to store INCOMPLETE as the original authorization
2475: */
2476: IF l_doc_type = 'REQUISITION' THEN
2477: SELECT NVL(authorization_status, 'INCOMPLETE')
2478: INTO l_auth_stat
2479: FROM PO_REQUISITION_HEADERS
2480: WHERE requisition_header_id = l_doc_id;
2481: IF l_auth_stat <> 'APPROVED' THEN
2482: SetReqAuthStat(l_doc_id, itemtype,itemkey,NULL, l_orig_auth_stat);
2483: END IF;
2741: END IF;
2742: IF l_doc_type = 'REQUISITION' THEN
2743: SELECT NVL(authorization_status, 'INCOMPLETE')
2744: INTO l_auth_stat
2745: FROM PO_REQUISITION_HEADERS
2746: WHERE requisition_header_id = l_doc_id;
2747: ELSIF l_doc_type IN ('PO', 'PA') THEN
2748: SELECT NVL(authorization_status,'INCOMPLETE')
2749: INTO l_auth_stat
2836: ** Desc:Initially the Workflow sets the preparer_id, approver_empid
2837: ** as the value passed to it by the POXAPAPC.pld file. As it always
2838: ** assumed that an Incomplete Requisition would get approved by
2839: ** preparer only. Then when it calls the GetReqAttributes()
2840: ** it would reget the preparer_id from the po_requisition_headers_all
2841: ** table hence if the preparer_id and approver_empid are different
2842: ** then the action history would be wrongly updated.
2843: **
2844: ** Modifying the parameter l_employee_id to be passed to
3211: AND draft_id = p_draft_id;
3212: CURSOR req_cursor(p_header_id NUMBER)
3213: IS
3214: SELECT wf_item_key
3215: FROM po_requisition_headers
3216: WHERE requisition_header_id= p_header_id;
3217: CURSOR rel_cursor(p_header_id NUMBER)
3218: IS
3219: SELECT wf_item_key FROM po_releases WHERE po_release_id= p_header_id;
4236: IF l_doc_type ='REQUISITION' THEN
4237: x_progress := '002';
4238: SELECT NVL(authorization_status, 'INCOMPLETE')
4239: INTO l_auth_stat
4240: FROM PO_REQUISITION_HEADERS
4241: WHERE requisition_header_id = l_doc_id;
4242: ELSIF l_doc_type IN ('PO','PA') THEN
4243: x_progress := '003';
4244: SELECT NVL(authorization_status,'INCOMPLETE')
4707:
4708: -- MIPR Changes
4709: CURSOR mipr_csr(p_doc_id NUMBER) IS
4710: SELECT clm_mipr_type
4711: FROM po_requisition_headers
4712: WHERE requisition_header_id = p_doc_id
4713: AND NVL(cancel_flag,'N') = 'N';
4714:
4715: BEGIN
4986: ** to set the Requisiton to 'Pre-Approved' status then it will go to the
4987: ** else part and set its authorization status to 'Pre-Approved'.
4988: */
4989: IF (note = 'UPGRADE_TO_R11' AND p_auth_status = 'IN PROCESS') THEN
4990: UPDATE po_requisition_headers
4991: SET WF_ITEM_TYPE = itemtype,
4992: WF_ITEM_KEY = itemkey,
4993: active_shopping_cart_flag = NULL,
4994: last_updated_by = fnd_global.user_id,
4995: last_update_login = fnd_global.login_id,
4996: last_update_date = sysdate
4997: WHERE requisition_header_id = l_requisition_header_id;
4998: ELSE
4999: UPDATE po_requisition_headers
5000: SET AUTHORIZATION_STATUS = p_auth_status,
5001: WF_ITEM_TYPE = itemtype,
5002: WF_ITEM_KEY = itemkey,
5003: active_shopping_cart_flag = NULL,
5140: pragma AUTONOMOUS_TRANSACTION;
5141: x_progress VARCHAR2(3):= '000';
5142: BEGIN
5143: x_progress := '001';
5144: UPDATE po_requisition_headers
5145: SET WF_ITEM_TYPE = itemtype,
5146: WF_ITEM_KEY = itemkey,
5147: last_updated_by = fnd_global.user_id,
5148: last_update_login = fnd_global.login_id,
5247: IS
5248: CURSOR get_req_orgid
5249: IS
5250: SELECT org_id
5251: FROM po_requisition_headers_all
5252: WHERE requisition_header_id = document_id;
5253: CURSOR get_po_orgid
5254: IS
5255: SELECT org_id FROM po_headers_all WHERE po_header_id = document_id;
5402: IF p_doc_type ='REQUISITION' THEN
5403: x_progress := '002';
5404: SELECT NVL(authorization_status, 'INCOMPLETE')
5405: INTO l_auth_stat
5406: FROM PO_REQUISITION_HEADERS
5407: WHERE requisition_header_id = p_doc_id;
5408: ELSIF p_doc_type IN ('PO','PA') THEN
5409: x_progress := '003';
5410: -- Mod Project
6822: ;
6823: IF l_document_id IS NOT NULL THEN
6824: SELECT NVL(apps_source_code, 'PO')
6825: INTO l_apps_source_code
6826: FROM po_requisition_headers_all
6827: WHERE requisition_header_id=l_document_id;
6828: END IF;
6829: l_progress:='002-'||TO_CHAR(l_document_id);
6830: /* POR = Web Requisition 4.0 or higher */
6992: || ty.DISPLAYED_FIELD
6993: || ' '
6994: || hd.SEGMENT1
6995: INTO l_doc_string
6996: FROM po_requisition_headers hd,
6997: po_lookup_codes ty,
6998: po_lookup_codes st
6999: WHERE hd.requisition_header_id = l_document_id
7000: AND ty.lookup_type = 'DOCUMENT TYPE'