DBA Data[Home] [Help]

APPS.PO_REQAPPROVAL_INIT1 dependencies on PO_HEADERS_ALL

Line 7: g_document_subtype PO_HEADERS_ALL.TYPE_LOOKUP_CODE%TYPE;

3: -- Read the profile option that enables/disables the debug log
4: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');
5: -- Read the profile option that determines whether the promise date will be defaulted with need-by date or not
6: g_default_promise_date VARCHAR2(1) := NVL(FND_PROFILE.VALUE('POS_DEFAULT_PROMISE_DATE_ACK'),'N');
7: g_document_subtype PO_HEADERS_ALL.TYPE_LOOKUP_CODE%TYPE;
8: --Bug#3497033
9: --g_currency_format_mask declared to pass in as the second parameter
10: --in FND_CURRENCY.GET_FORMAT_MASK
11: g_currency_format_mask NUMBER := 60;

Line 565: -- 'PO' or 'PA': PO_HEADERS_ALL.po_header_id

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
569: -- document number from DocumentID and DocumentType. (Bug 3284628)

Line 578: -- 'PO' or 'PA': PO_HEADERS_ALL.type_lookup_code

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.
582: --ForwardToID

Line 638: -- If 'Y' or 'N', this procedure will update the xml_flag in PO_HEADERS_ALL

634: -- value as : 'SUPPLIER' or 'REQUESTER'. Other callers will pass as NULL
635: -- value (default). The corresponding value('REQUESTER'/'SUPPLIER') is used
636: -- to set INITIATOR wf attribute in RCO wf.
637: --p_xml_flag
638: -- If 'Y' or 'N', this procedure will update the xml_flag in PO_HEADERS_ALL
639: -- or PO_RELEASES_ALL accordingly. This is used by HTML Orders. (Bug 5218538)
640: -- If null, no updates will be made.
641: -- p_source_type_code VARCHAR2 DEFAULT null
642: -- For the internal change order for requisitions the value will be INVENTORY

Line 722: l_conterms_exist_flag PO_HEADERS_ALL.CONTERMS_EXIST_FLAG%TYPE; --

718: l_itemkey VARCHAR2(60);
719: l_type_name po_document_types.type_name%type;
720: /* RETROACTIVE FPI END */
721: l_drop_ship_flag po_line_locations.drop_ship_flag%type; --
722: l_conterms_exist_flag PO_HEADERS_ALL.CONTERMS_EXIST_FLAG%TYPE; --
723: --bug##3682458 replaced legal entity name with operating unit
724: l_operating_unit hr_all_organization_units_tl.name%TYPE; --
725: l_document_number PO_HEADERS_ALL.segment1%TYPE; -- Bug 3284628
726: l_consigned_flag PO_HEADERS_ALL.CONSIGNED_CONSUMPTION_FLAG%TYPE;

Line 725: l_document_number PO_HEADERS_ALL.segment1%TYPE; -- Bug 3284628

721: l_drop_ship_flag po_line_locations.drop_ship_flag%type; --
722: l_conterms_exist_flag PO_HEADERS_ALL.CONTERMS_EXIST_FLAG%TYPE; --
723: --bug##3682458 replaced legal entity name with operating unit
724: l_operating_unit hr_all_organization_units_tl.name%TYPE; --
725: l_document_number PO_HEADERS_ALL.segment1%TYPE; -- Bug 3284628
726: l_consigned_flag PO_HEADERS_ALL.CONSIGNED_CONSUMPTION_FLAG%TYPE;
727: l_autoapprove_retro VARCHAR2(1);
728: l_okc_doc_type VARCHAR2(20); --
729: l_vendor po_vendors.vendor_name%type; --Bug 4254468

Line 726: l_consigned_flag PO_HEADERS_ALL.CONSIGNED_CONSUMPTION_FLAG%TYPE;

722: l_conterms_exist_flag PO_HEADERS_ALL.CONTERMS_EXIST_FLAG%TYPE; --
723: --bug##3682458 replaced legal entity name with operating unit
724: l_operating_unit hr_all_organization_units_tl.name%TYPE; --
725: l_document_number PO_HEADERS_ALL.segment1%TYPE; -- Bug 3284628
726: l_consigned_flag PO_HEADERS_ALL.CONSIGNED_CONSUMPTION_FLAG%TYPE;
727: l_autoapprove_retro VARCHAR2(1);
728: l_okc_doc_type VARCHAR2(20); --
729: l_vendor po_vendors.vendor_name%type; --Bug 4254468
730: l_vendor_site_code po_vendor_sites_all.vendor_site_code%type; --Bug 4254468

Line 742: l_clm_document_number PO_HEADERS_ALL.clm_document_number%TYPE;

738: l_communicatePriceChange VARCHAR2(1); -- bug4176111
739: --CLM PR Amendment
740: l_federal_flag VARCHAR2(1) := 'N';
741: l_conformed_header_id NUMBER;
742: l_clm_document_number PO_HEADERS_ALL.clm_document_number%TYPE;
743: l_modification_number PO_DRAFTS.modification_number%TYPE;
744: /* Mod Project */
745: l_is_mod VARCHAR2(1) := 'N';
746: l_ame_approval_id NUMBER;

Line 752: l_clm_contract_officer po_headers_all.clm_contract_officer%TYPE;

748: l_ame_transaction_type PO_DOC_STYLE_HEADERS.ame_transaction_type%TYPE;
749: /* The new workflow with AME will be used for PO and PA */
750: /* Mod Project */
751: -- CLM CO signature ER
752: l_clm_contract_officer po_headers_all.clm_contract_officer%TYPE;
753: l_ko_sign_required VARCHAR2(1);
754: x_ko_username VARCHAR2(100);
755: x_ko_display_name VARCHAR2(240);
756: -- CLM CO signature ER

Line 844: UPDATE po_headers_all

840: SET xml_flag = 'Y',
841: edi_processed_flag = 'N'
842: WHERE po_release_id = DocumentID;
843: ELSE
844: UPDATE po_headers_all
845: SET xml_flag = 'Y',
846: edi_processed_flag = 'N'
847: WHERE po_header_id = DocumentID;
848: END IF;

Line 853: UPDATE po_headers_all SET xml_flag = 'N' WHERE po_header_id = DocumentID;

849: ELSIF (p_xml_flag = 'N') THEN
850: IF (DocumentTypeCode = 'RELEASE') THEN
851: UPDATE po_releases_all SET xml_flag = 'N' WHERE po_release_id = DocumentID;
852: ELSE
853: UPDATE po_headers_all SET xml_flag = 'N' WHERE po_header_id = DocumentID;
854: END IF;
855: END IF; -- p_xml_flag = 'Y'
856: END IF; -- p_xml_flag IS NOT NULL
857: -- Bug 5218538 END

Line 889: FROM po_headers_all

885: ame_approval_id),
886: ame_transaction_type
887: INTO l_ame_approval_id,
888: l_ame_transaction_type
889: FROM po_headers_all
890: WHERE po_header_id = DocumentID;
891:
892: if l_ame_transaction_type is not null AND ( l_ame_approval_id IS NULL or l_ame_approval_id = 0) THEN
893: --if l_ame_approval_id = 0 then

Line 895: update po_headers_all

891:
892: if l_ame_transaction_type is not null AND ( l_ame_approval_id IS NULL or l_ame_approval_id = 0) THEN
893: --if l_ame_approval_id = 0 then
894: select po_ame_approvals_s.nextval into l_ame_approval_id from dual;
895: update po_headers_all
896: set ame_approval_id = l_ame_approval_id,
897: ame_transaction_type = l_ame_transaction_type
898: where po_header_id = DocumentID;
899: end if;

Line 1099: FROM po_headers_all

1095: IF DocumentTypeCode IN ('PO', 'PA') THEN
1096: BEGIN
1097: SELECT clm_document_number
1098: INTO l_clm_document_number
1099: FROM po_headers_all
1100: WHERE po_header_id = DocumentID;
1101: EXCEPTION
1102: WHEN no_data_found THEN
1103: l_clm_document_number := NULL;

Line 1148: po_headers_all poh --

1144: INTO x_acceptance_required_flag,
1145: x_acceptance_due_date,
1146: x_agent_id
1147: FROM po_releases por,
1148: po_headers_all poh --
1149: WHERE por.po_release_id = DocumentID
1150: AND por.po_header_id = poh.po_header_id;
1151: END IF;
1152: --Mod Project

Line 1182: FROM po_headers_all

1178: -- Pass ga flag to the wf for all PA documents (BLANKET and CONTRACT)
1179: IF DocumentTypeCode = 'PA' THEN
1180: SELECT global_agreement_flag
1181: INTO l_ga_flag
1182: FROM po_headers_all
1183: WHERE po_header_id = DocumentID;
1184:
1185: PO_WF_UTIL_PKG.SetItemAttrText ( itemtype => l_itemtype, itemkey => l_itemkey, aname => 'GLOBAL_AGREEMENT_FLAG', avalue => l_ga_flag);
1186: END IF;

Line 1242: po_headers_all POH --

1238: l_release_num,
1239: l_doc_display_name,
1240: l_document_number -- Bug 3284628
1241: FROM po_releases POR,
1242: po_headers_all POH --
1243: WHERE POR.po_release_id = DocumentID
1244: AND POR.po_header_id = POH.po_header_id; -- JOIN
1245: l_doc_num_rel := l_document_number || '-' || l_release_num;
1246: END IF; -- DocumentTypeCode

Line 1296: FROM po_headers_all

1292: -- CLM Controls Project changes
1293: if DocumentTypeCode = 'PA' or DocumentTypeCode='PO' then
1294: SELECT org_id
1295: INTO l_org_id
1296: FROM po_headers_all
1297: WHERE po_header_id = DocumentID;
1298: l_ko_sign_required := PO_CORE_S.retrieveOptionValue(p_org_id => l_org_id,
1299: p_option_column => PO_CORE_S.g_KO_SIGNATURE_REQD_COL);
1300: --NVL(FND_PROFILE.VALUE('PO_CLM_KO_SIGNATURE_REQD'),'N');

Line 1307: FROM po_headers_all

1303: IF DraftID = -1 THEN
1304: BEGIN
1305: SELECT CLM_CONTRACT_OFFICER
1306: INTO l_clm_contract_officer
1307: FROM po_headers_all
1308: WHERE po_header_id = DocumentID;
1309:
1310: EXCEPTION
1311: WHEN no_data_found THEN

Line 1400: FROM po_headers_all

1396: WHERE po_release_id = DocumentId;
1397: ELSIF DocumentTypeCode = 'PO' THEN
1398: SELECT NVL(consigned_consumption_flag, 'N')
1399: INTO l_consigned_flag
1400: FROM po_headers_all
1401: WHERE po_header_id = DocumentId;
1402: END IF;
1403: EXCEPTION
1404: WHEN NO_DATA_FOUND THEN

Line 1705: l_style_id po_headers_all.style_id%TYPE;

1701: l_interface_source VARCHAR2(30);
1702: l_can_modify_flag VARCHAR2(1);
1703: l_view_po_url VARCHAR2(1000); -- HTML Orders R12
1704: l_edit_po_url VARCHAR2(1000); -- HTML Orders R12
1705: l_style_id po_headers_all.style_id%TYPE;
1706: l_ga_flag po_headers_all.global_agreement_flag%TYPE;
1707: /* Bug 7535468
1708: Increasing the length of x_progress from 200 to 1200 */
1709: x_progress VARCHAR2(1200);

Line 1706: l_ga_flag po_headers_all.global_agreement_flag%TYPE;

1702: l_can_modify_flag VARCHAR2(1);
1703: l_view_po_url VARCHAR2(1000); -- HTML Orders R12
1704: l_edit_po_url VARCHAR2(1000); -- HTML Orders R12
1705: l_style_id po_headers_all.style_id%TYPE;
1706: l_ga_flag po_headers_all.global_agreement_flag%TYPE;
1707: /* Bug 7535468
1708: Increasing the length of x_progress from 200 to 1200 */
1709: x_progress VARCHAR2(1200);
1710: l_draft_id NUMBER:=-1; --Mod Project

Line 1890: FROM po_headers_all

1886: ELSIF NVL(l_ga_flag,'N') = 'Y' OR l_doc_subtype = 'STANDARD' THEN
1887: BEGIN
1888: SELECT style_id
1889: INTO l_style_id
1890: FROM po_headers_all
1891: WHERE po_header_id = l_document_id;
1892: EXCEPTION
1893: WHEN OTHERS THEN
1894: l_style_id := NULL;

Line 3552: l_acceptance_flag PO_HEADERS_ALL.acceptance_required_flag%TYPE;

3548: l_notifier_resp VARCHAR2(100);
3549: l_doc_string VARCHAR2(200);
3550: l_preparer_user_name VARCHAR2(100);
3551: -- BINDING FPJ
3552: l_acceptance_flag PO_HEADERS_ALL.acceptance_required_flag%TYPE;
3553: BEGIN
3554: x_progress := 'PO_REQAPPROVAL_INIT1.Send_WS_FYI_Notif_Yes_No: 01';
3555: IF (g_po_wf_debug = 'Y') THEN
3556: /* DEBUG */

Line 3572: FROM po_headers_all

3568: -- BINDING FPJ START
3569: IF ((l_document_type <> 'RELEASE') AND l_document_subtype IN ('STANDARD','BLANKET','CONTRACT')) THEN
3570: SELECT acceptance_required_flag
3571: INTO l_acceptance_flag
3572: FROM po_headers_all
3573: WHERE po_header_Id = l_document_id;
3574: IF l_acceptance_flag = 'S' THEN
3575: PO_REQAPPROVAL_INIT1.locate_notifier(l_document_id, l_document_type, 'Y', l_notifier, l_notifier_resp);
3576: ELSE

Line 4913: UPDATE po_headers_all

4909: SAVEPOINT save_rev_num;
4910:
4911: IF l_doc_type IN ('PO', 'PA') THEN
4912:
4913: UPDATE po_headers_all
4914: SET comm_rev_num = l_po_revision_num_curr
4915: WHERE po_header_id = l_po_header_id;
4916:
4917: -- added for bug 9072034 (to update revision number for releases.)

Line 5255: SELECT org_id FROM po_headers_all WHERE po_header_id = document_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;
5256: CURSOR get_release_orgid
5257: IS
5258: SELECT org_id FROM po_releases_all WHERE po_release_id = document_id;
5259:

Line 7312: l_document_id PO_HEADERS_ALL.po_header_id%TYPE; --

7308: l_doc_num VARCHAR2(30);
7309: l_sys_error_msg VARCHAR2(2000) :='';
7310: l_release_num_dash VARCHAR2(30);
7311: l_release_num NUMBER; --1942901
7312: l_document_id PO_HEADERS_ALL.po_header_id%TYPE; --
7313: /* Bug# 2655410: kagarwal
7314: ** Desc: We will get the document type display value from
7315: ** po document types.
7316: */

Line 7409: l_acceptance_flag po_headers_all.acceptance_required_flag%TYPE;

7405: actid IN NUMBER,
7406: funcmode IN VARCHAR2,
7407: result OUT NOCOPY VARCHAR2 )
7408: IS
7409: l_acceptance_flag po_headers_all.acceptance_required_flag%TYPE;
7410: x_progress VARCHAR2(3) := '000';
7411: l_document_id NUMBER;
7412: l_document_type po_document_types.document_type_code%type;
7413: l_document_subtype po_document_types.document_subtype%type;

Line 7432: FROM po_headers_all --bug 4764963

7428: l_document_subtype := wf_engine.GetItemAttrText (itemtype => itemtype, itemkey => itemkey, aname => 'DOCUMENT_SUBTYPE');
7429: IF(l_document_type <> 'RELEASE') THEN
7430: SELECT acceptance_required_flag
7431: INTO l_acceptance_flag
7432: FROM po_headers_all --bug 4764963
7433: WHERE po_header_Id = l_document_id;
7434: ELSE
7435: SELECT acceptance_required_flag
7436: INTO l_acceptance_flag

Line 7452: FROM po_headers_all

7448: -- There should be no notification if there has been at least on reponse
7449: IF(l_document_type <> 'RELEASE') THEN
7450: SELECT revision_num
7451: INTO l_revision_num
7452: FROM po_headers_all
7453: WHERE po_header_id = l_document_id;
7454: SELECT COUNT(*)
7455: INTO l_responded_shipments
7456: FROM PO_ACCEPTANCES

Line 7494: x_po_header_id po_headers_all.po_header_id%TYPE;

7490: x_org_id NUMBER;
7491: x_user_id NUMBER;
7492: x_document_id NUMBER;
7493: x_document_type_code VARCHAR2(30);
7494: x_po_header_id po_headers_all.po_header_id%TYPE;
7495: x_vendor po_vendors.vendor_name%TYPE;
7496: /* Bug 7172641 Changing the size as equal to the column size of vendor_name in po_vendors table */
7497: x_supp_user_name VARCHAR2(100);
7498: x_supplier_displayname VARCHAR2(100);

Line 7531: po_headers_all poh, --

7527: INTO x_vendor,
7528: x_po_header_id,
7529: x_revision_num
7530: FROM po_releases por,
7531: po_headers_all poh, --
7532: po_vendors pov
7533: WHERE por.po_release_id = x_document_id
7534: AND por.po_header_id = poh.po_header_id
7535: AND poh.vendor_id = pov.vendor_id;

Line 7668: po_headers_all poh, --

7664: por.revision_num
7665: INTO x_vendor,
7666: l_revision_num
7667: FROM po_releases por,
7668: po_headers_all poh, --
7669: po_vendors pov
7670: WHERE por.po_release_id = x_document_id
7671: AND por.po_header_id = poh.po_header_id
7672: AND poh.vendor_id = pov.vendor_id;

Line 7782: l_acc_po_header_id PO_HEADERS_ALL.po_header_id%TYPE;

7778: l_rowid ROWID;
7779: l_Last_Update_Login PO_ACCEPTANCES.last_update_login%TYPE;
7780: l_Last_Update_Date PO_ACCEPTANCES.last_update_date%TYPE;
7781: l_Last_Updated_By PO_ACCEPTANCES.last_updated_by%TYPE;
7782: l_acc_po_header_id PO_HEADERS_ALL.po_header_id%TYPE;
7783: l_acceptance_id PO_ACCEPTANCES.acceptance_id%TYPE;
7784: -- End of Bug 2850566
7785: l_rspndr_usr_name fnd_user.user_name%TYPE := '';
7786: l_accepting_party VARCHAR2(1);

Line 7858: --Update the last update date when po_headers_all/po_releases_all tables are updated.

7854: p_accepted_flag => x_Accepted_Flag, p_note => x_acceptance_note, p_accepting_party => l_accepting_party );
7855: -- End of Bug 2850566 RBAIRRAJ
7856: -- Reset the Acceptance required Flag
7857: --Bug 6847039 - Start
7858: --Update the last update date when po_headers_all/po_releases_all tables are updated.
7859: IF x_po_release_id IS NOT NULL THEN
7860: UPDATE po_releases
7861: SET acceptance_required_flag = 'N',
7862: LAST_UPDATE_DATE = SYSDATE,

Line 8050: l_document_id po_headers_all.po_header_id%type;

8046: actid IN NUMBER,
8047: funcmode IN VARCHAR2,
8048: resultout OUT NOCOPY VARCHAR2 )
8049: IS
8050: l_document_id po_headers_all.po_header_id%type;
8051: l_vendor_id po_headers_all.vendor_id%type;
8052: l_vendor_site_id po_headers_all.vendor_site_id%type;
8053: l_progress VARCHAR2(300);
8054: l_update_releases VARCHAR2(1) := 'Y';

Line 8051: l_vendor_id po_headers_all.vendor_id%type;

8047: funcmode IN VARCHAR2,
8048: resultout OUT NOCOPY VARCHAR2 )
8049: IS
8050: l_document_id po_headers_all.po_header_id%type;
8051: l_vendor_id po_headers_all.vendor_id%type;
8052: l_vendor_site_id po_headers_all.vendor_site_id%type;
8053: l_progress VARCHAR2(300);
8054: l_update_releases VARCHAR2(1) := 'Y';
8055: l_return_status VARCHAR2(1) ;

Line 8052: l_vendor_site_id po_headers_all.vendor_site_id%type;

8048: resultout OUT NOCOPY VARCHAR2 )
8049: IS
8050: l_document_id po_headers_all.po_header_id%type;
8051: l_vendor_id po_headers_all.vendor_id%type;
8052: l_vendor_site_id po_headers_all.vendor_site_id%type;
8053: l_progress VARCHAR2(300);
8054: l_update_releases VARCHAR2(1) := 'Y';
8055: l_return_status VARCHAR2(1) ;
8056: l_communicate_update VARCHAR2(30); -- Bug 3574895. Length same as that on the form field PO_APPROVE.COMMUNICATE_UPDATES

Line 8204: l_document_id PO_HEADERS_ALL.po_header_id%TYPE;

8200: funcmode IN VARCHAR2,
8201: resultout OUT NOCOPY VARCHAR2)
8202: IS
8203: l_retro_change VARCHAR2(1);
8204: l_document_id PO_HEADERS_ALL.po_header_id%TYPE;
8205: l_document_type PO_DOCUMENT_TYPES.document_type_code%TYPE;
8206: l_progress VARCHAR2(2000);
8207: l_update_releases VARCHAR2(1) := 'Y';
8208: l_return_status VARCHAR2(1) ;

Line 8459: l_doc_type PO_HEADERS_ALL.TYPE_LOOKUP_CODE%type;

8455: x_result_out OUT NOCOPY VARCHAR2 )
8456: IS
8457: l_progress VARCHAR2(200);
8458: l_doc_id NUMBER;
8459: l_doc_type PO_HEADERS_ALL.TYPE_LOOKUP_CODE%type;
8460: l_cat_admin_user_name FND_USER.USER_NAME%type;
8461: BEGIN
8462: l_progress := '100';
8463: IF (g_po_wf_debug = 'Y') THEN

Line 8501: -- cleared from po_headers_all later. So first capture the item attribute

8497: -- initiator, then set the item attribute CATALOG_ADMIN_USER_NAME so that
8498: -- the catalog admin can be notified later in the workflow process.
8499: -- The reason why we are setting the attribute here instead of checking later
8500: -- in the wf process is because, the lock_owner_role/lock_owner_id will be
8501: -- cleared from po_headers_all later. So first capture the item attribute
8502: -- use it later in the workflow to decide whether a notification has to be
8503: -- sent. See Node "SHOULD_NOTIFY_CAT_ADMIN" function in the PO Approval and
8504: -- PO Approval Top Process(Also see function should_notify_cat_admin() in
8505: -- this file).

Line 8529: l_lock_owner_role PO_HEADERS_ALL.lock_owner_role%type;

8525: p_doc_type IN VARCHAR2)
8526: IS
8527: l_progress VARCHAR2(255);
8528: l_user_name FND_USER.USER_NAME%type;
8529: l_lock_owner_role PO_HEADERS_ALL.lock_owner_role%type;
8530: l_lock_owner_user_id PO_HEADERS_ALL.lock_owner_user_id%type;
8531: BEGIN
8532: l_progress := 'PO_REQAPPROVAL_INIT1.set_catalog_admin_user_name: 100' || 'Document Id='|| TO_CHAR(p_doc_id) || 'Document Type='|| p_doc_type;
8533: IF (g_po_wf_debug = 'Y') THEN

Line 8530: l_lock_owner_user_id PO_HEADERS_ALL.lock_owner_user_id%type;

8526: IS
8527: l_progress VARCHAR2(255);
8528: l_user_name FND_USER.USER_NAME%type;
8529: l_lock_owner_role PO_HEADERS_ALL.lock_owner_role%type;
8530: l_lock_owner_user_id PO_HEADERS_ALL.lock_owner_user_id%type;
8531: BEGIN
8532: l_progress := 'PO_REQAPPROVAL_INIT1.set_catalog_admin_user_name: 100' || 'Document Id='|| TO_CHAR(p_doc_id) || 'Document Type='|| p_doc_type;
8533: IF (g_po_wf_debug = 'Y') THEN
8534: PO_WF_DEBUG_PKG.insert_debug(p_item_type,p_item_key,l_progress);

Line 8547: FROM po_headers_all

8543: SELECT lock_owner_user_id,
8544: lock_owner_role
8545: INTO l_lock_owner_user_id,
8546: l_lock_owner_role
8547: FROM po_headers_all
8548: WHERE po_header_id = p_doc_id;
8549:
8550: l_progress := 'PO_REQAPPROVAL_INIT1.set_catalog_admin_user_name: 140' || 'l_lock_owner_user_id ='|| TO_CHAR(l_lock_owner_user_id) || 'l_lock_owner_role Type='|| l_lock_owner_role;
8551: IF (g_po_wf_debug = 'Y') THEN

Line 8797: -- from Cancel as the Cancel code also updates the po_headers_all/po_releases_all tables

8793:
8794: --
8795: -- Made the procedure non-autonomous
8796: -- There was deadlock error occurring when the communication was invoked
8797: -- from Cancel as the Cancel code also updates the po_headers_all/po_releases_all tables
8798: -- and the Commit/Rollback will not happen when the communication is invoked.
8799: PROCEDURE update_print_count( p_doc_id NUMBER,
8800: p_doc_type VARCHAR2 )
8801: IS

Line 8810: UPDATE po_headers_all ph

8806: SET pr.printed_date = sysdate,
8807: pr.print_count = NVL(pr.print_count,0) + 1
8808: WHERE pr.po_release_id = p_doc_id ;
8809: ELSIF (p_doc_type IN ('PO','PA')) THEN
8810: UPDATE po_headers_all ph
8811: SET ph.printed_date = sysdate,
8812: ph.print_count = NVL(ph.print_count,0) + 1
8813: WHERE ph.po_header_id = p_doc_id ;
8814: END IF;

Line 9079: UPDATE po_headers_all

9075: aname => 'DOCUMENT_TYPE');
9076:
9077: IF l_doc_type IN ('PO', 'PA') THEN
9078:
9079: UPDATE po_headers_all
9080: SET comm_rev_num = l_po_revision_num_curr
9081: WHERE po_header_id = l_po_header_id;
9082:
9083: -- added for bug 9072034 (to update revision number for releases.)