[Home] [Help]
152: l_attachments_text varchar2(32000) := '';
153:
154: /** Fix for PO UTF8 Project **/
155: -- This holds data from either po_headers.note_to_vendor or
156: -- po_releases.note_to_vendor:
157: l_header_note_to_vendor po_headers_all.note_to_vendor%TYPE;
158: -- l_header_note_to_vendor varchar2(240);
159:
160: x_pb_count number;
448: from po_headers_all
449: where po_header_id = l_document_id;
450:
451: elsif (l_document_type = 'RELEASE') then
452: /* Bug 2791859 po_releases_all should be used instead of po_releases */
453: select po_header_id into l_po_header_id from po_releases_all
454: where po_release_id = l_document_id;
455:
456: select authorization_status
449: where po_header_id = l_document_id;
450:
451: elsif (l_document_type = 'RELEASE') then
452: /* Bug 2791859 po_releases_all should be used instead of po_releases */
453: select po_header_id into l_po_header_id from po_releases_all
454: where po_release_id = l_document_id;
455:
456: select authorization_status
457: into l_document_status
595:
596:
597: select org_id, note_to_vendor ,po_header_id
598: into l_org_id, l_header_note_to_vendor , l_po_header_id
599: from po_releases
600: where po_release_id = to_number(l_document_id);
601:
602: select currency_code into l_currency_code
603: from po_headers
638: -- Getting the header level text information and displaying it if it exists
639: if (l_document_type in ('PO', 'PA')) then
640: open attachments_cursor('PO_HEADERS', l_document_id);
641: elsif (l_document_type = 'RELEASE') then
642: open attachments_cursor('PO_RELEASES', l_document_id);
643: else
644: null;
645: end if;
646: loop
696: --
697: -- Getting the header level text information and displaying it if it exists
698: -- for the blanket to which this release is sourced
699: if (l_document_type = 'RELEASE') THEN
700: select po_header_id into l_po_header_id from po_releases
701: where po_release_id = l_document_id;
702:
703: open attachments_cursor('PO_HEADERS', l_po_header_id);
704:
1779: open shipment_cursor(l_document_id);
1780: ELSIF (l_document_type = 'RELEASE') THEN
1781: select org_id, note_to_vendor
1782: into l_org_id, l_header_note_to_vendor
1783: from po_releases where po_release_id = to_number(l_document_id);
1784: open shipment_release_cursor(l_document_id);
1785: ELSIF (l_document_type = 'PA') THEN
1786: select org_id, note_to_vendor,currency_code
1787: into l_org_id, l_header_note_to_vendor ,l_currency_code
1795: -- Getting the header level text information and displaying it if it exists
1796: if (l_document_type = 'PO') then
1797: open attachments_cursor('PO_HEADERS', l_document_id);
1798: elsif (l_document_type = 'RELEASE') then
1799: open attachments_cursor('PO_RELEASES', l_document_id);
1800: else
1801: null;
1802: end if;
1803: loop
1850: -- Getting the header level text information and displaying it if it exists
1851: -- for the blanket to which this release is sourced
1852: if (l_document_type = 'RELEASE') THEN
1853:
1854: select po_header_id into l_po_header_id from po_releases
1855: where po_release_id = l_document_id;
1856:
1857: open attachments_cursor('PO_HEADERS', l_po_header_id);
1858:
2421:
2422:
2423: l_po_number PO_HEADERS_ALL.SEGMENT1%TYPE;
2424: l_po_revision NUMBER;
2425: l_release_num PO_RELEASES_ALL.RELEASE_NUM%TYPE;
2426:
2427: l_date_of_order VARCHAR2(80);
2428: l_buyer VARCHAR2(80);
2429: l_date_of_revision VARCHAR2(80);
2567: /* Bug# 3046054: kagarwal
2568: ** Desc: The org_context is not yet set hence need to use the _all table
2569: */
2570:
2571: select po_header_id into l_po_header_id from po_releases_all
2572: where po_release_id = l_document_id;
2573:
2574: select authorization_status
2575: into l_document_status
2856:
2857: IF (l_document_type = 'RELEASE') THEN
2858:
2859:
2860: select po_header_id into l_po_header_id from po_releases
2861: where po_release_id = l_document_id;
2862:
2863: select org_id into l_operating_unit_id from po_headers
2864: where po_header_id = l_po_header_id;
3132:
3133: begin
3134: select release_num, revised_date, revision_num
3135: into l_release_num, l_date_of_revision, l_po_revision
3136: from po_releases
3137: where po_release_id = l_document_id;
3138:
3139: /* Fix for 2341675 by davidng */
3140: select to_char(release_date)
3138:
3139: /* Fix for 2341675 by davidng */
3140: select to_char(release_date)
3141: into l_date_of_order
3142: from po_releases
3143: where po_release_id = l_document_id;
3144: /* End fix*/
3145:
3146: exception
3268: when no_data_found then
3269: null;
3270: end;
3271:
3272: -- Need to obtain the buyers from po_headers_archive and po_releases_archive
3273: -- for global buyer's need to get buyer name from per_employees_current_x
3274: if (l_document_type in ('PO', 'PA')) THEN
3275: -- there will be an entry in this table regardless of whether there is a revision
3276: -- or not
3320: -- or not
3321: begin
3322: select full_name into l_buyer
3323: from per_all_people_f --
3324: where person_id = (select agent_id from po_releases_archive
3325: where po_release_id = to_number(l_document_id) and
3326: revision_num = 0)
3327: and trunc(sysdate) between trunc(effective_start_date) and trunc(effective_end_date); --Bug#5161502
3328: exception
3334: begin
3335: if (l_po_revision > 0) then
3336: select full_name into l_revision_buyer
3337: from per_all_people_f --
3338: where person_id = (select agent_id from po_releases_archive
3339: where po_release_id = to_number(l_document_id) and
3340: revision_num = l_po_revision)
3341: and trunc(sysdate) between trunc(effective_start_date) and trunc(effective_end_date); --Bug#5161502
3342: else
4169: where po_header_id = l_document_id;
4170:
4171: elsif (l_document_type = 'RELEASE') then
4172:
4173: select po_header_id into l_po_header_id from po_releases
4174: where po_release_id = l_document_id;
4175:
4176: select authorization_status
4177: into l_document_status