DBA Data[Home] [Help]

APPS.PO_DRAFTS_PVT dependencies on PO_DRAFTS

Line 1: PACKAGE BODY po_drafts_pvt AS

1: PACKAGE BODY po_drafts_pvt AS
2: /* $Header: PO_DRAFTS_PVT.plb 120.59.12020000.8 2013/03/25 08:25:54 mabaig ship $ */
3:
4: d_pkg_name CONSTANT varchar2(50) :=
5: PO_LOG.get_package_base('PO_DRAFTS_PVT');

Line 2: /* $Header: PO_DRAFTS_PVT.plb 120.59.12020000.8 2013/03/25 08:25:54 mabaig ship $ */

1: PACKAGE BODY po_drafts_pvt AS
2: /* $Header: PO_DRAFTS_PVT.plb 120.59.12020000.8 2013/03/25 08:25:54 mabaig ship $ */
3:
4: d_pkg_name CONSTANT varchar2(50) :=
5: PO_LOG.get_package_base('PO_DRAFTS_PVT');
6:

Line 5: PO_LOG.get_package_base('PO_DRAFTS_PVT');

1: PACKAGE BODY po_drafts_pvt AS
2: /* $Header: PO_DRAFTS_PVT.plb 120.59.12020000.8 2013/03/25 08:25:54 mabaig ship $ */
3:
4: d_pkg_name CONSTANT varchar2(50) :=
5: PO_LOG.get_package_base('PO_DRAFTS_PVT');
6:
7: --
8: -- Declare a table to store lock (F, P, S) compatibilities
9: g_entity_lock_comp_tbl po_entity_lock_comp_tbl_type;

Line 143: FROM po_drafts

139: BEGIN
140:
141: SELECT 'Y'
142: INTO l_is_mod_document
143: FROM po_drafts
144: WHERE draft_id = p_draft_id
145: AND draft_type = 'MOD';
146: EXCEPTION
147: WHEN others THEN

Line 184: -- Return next draft id from sequence PO_DRAFTS_S

180: --Pre-reqs: None
181: --Modifies:
182: --Locks:
183: --Function:
184: -- Return next draft id from sequence PO_DRAFTS_S
185: --Parameters:
186: --IN:
187: --IN OUT:
188: --OUT:

Line 200: SELECT PO_DRAFTS_S.nextval

196: RETURN NUMBER IS
197:
198: l_draft_id NUMBER;
199: BEGIN
200: SELECT PO_DRAFTS_S.nextval
201: INTO l_draft_id
202: FROM DUAL;
203:
204: RETURN l_draft_id;

Line 226: -- If 'X', drafts records except for the one in PO_DRAFTS will be removed

222: --p_delete_processed_draft
223: -- indicates whether draft changes should be removed after the process
224: -- If FND_API.G_TRUE, draft records will be removed after the process
225: -- If FND_API.G_FALSE, draft records will retain after the process
226: -- If 'X', drafts records except for the one in PO_DRAFTS will be removed
227: -- after the process
228: --IN OUT:
229: --OUT:
230: --x_return_status

Line 354: FROM po_drafts

350: BEGIN
351:
352: SELECT 'Y'
353: INTO l_is_mod_document
354: FROM po_drafts
355: WHERE draft_id = p_draft_id
356: AND draft_type = 'MOD';
357: EXCEPTION
358: WHEN others THEN

Line 579: -- FND_API.G_TRUE if PO_DRAFTS should be excluded

575: --p_draft_id
576: -- draft unique identifier
577: --p_exclude_ctrl_tbl
578: -- determines whether control table should be excluded from deletion
579: -- FND_API.G_TRUE if PO_DRAFTS should be excluded
580: -- FND_API.G_FALSE if PO_DRAFTS should not be excluded
581: --IN OUT:
582: --OUT:
583: --x_return_status

Line 580: -- FND_API.G_FALSE if PO_DRAFTS should not be excluded

576: -- draft unique identifier
577: --p_exclude_ctrl_tbl
578: -- determines whether control table should be excluded from deletion
579: -- FND_API.G_TRUE if PO_DRAFTS should be excluded
580: -- FND_API.G_FALSE if PO_DRAFTS should not be excluded
581: --IN OUT:
582: --OUT:
583: --x_return_status
584: -- return status of the procedure

Line 696: DELETE FROM po_drafts

692:
693: d_position := 90;
694: IF (NVL(p_exclude_ctrl_tbl, FND_API.G_FALSE) = FND_API.G_FALSE) THEN
695: -- delete draft control table as well
696: DELETE FROM po_drafts
697: WHERE draft_id = p_draft_id;
698: END IF;
699:
700: d_position := 100;

Line 800: FROM po_drafts pod

796:
797: -- Get the draft type
798: SELECT draft_type
799: INTO x_draft_info.draft_type
800: FROM po_drafts pod
801: WHERE pod.draft_id = p_draft_id;
802:
803: d_position := 30;
804: IF (l_type_lookup_code = 'QUOTATION') THEN

Line 1061: FROM po_drafts DFT

1057: DFT.owner_role
1058: INTO x_draft_id,
1059: x_draft_status,
1060: x_draft_owner_role
1061: FROM po_drafts DFT
1062: WHERE DFT.document_id = p_po_header_id
1063: AND DFT.status <> g_status_COMPLETED
1064: AND DFT.status <> g_status_WITHDRAWN --Mod Project
1065: AND Nvl(dft.draft_type,'NULL') <> 'PAR'; --

Line 1111: l_draft_status PO_DRAFTS.status%TYPE;

1107: d_api_name CONSTANT VARCHAR2(30) := 'find_draft';
1108: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1109: d_position NUMBER;
1110:
1111: l_draft_status PO_DRAFTS.status%TYPE;
1112: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1113:
1114: BEGIN
1115: d_position := 0;

Line 1112: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;

1108: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1109: d_position NUMBER;
1110:
1111: l_draft_status PO_DRAFTS.status%TYPE;
1112: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1113:
1114: BEGIN
1115: d_position := 0;
1116: IF (PO_LOG.d_proc) THEN

Line 1167: FROM po_drafts

1163: END IF;
1164:
1165: SELECT request_id
1166: INTO x_request_id
1167: FROM po_drafts
1168: WHERE draft_id = p_draft_id;
1169:
1170: IF (PO_LOG.d_proc) THEN
1171: PO_LOG.proc_end(d_module);

Line 1330: l_draft_id PO_DRAFTS.draft_id%TYPE;

1326: d_api_name CONSTANT VARCHAR2(30) := 'update_permission_check';
1327: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1328: d_position NUMBER;
1329:
1330: l_draft_id PO_DRAFTS.draft_id%TYPE;
1331: l_draft_status PO_DRAFTS.status%TYPE;
1332: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1333:
1334: l_calling_module VARCHAR2(100);

Line 1331: l_draft_status PO_DRAFTS.status%TYPE;

1327: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1328: d_position NUMBER;
1329:
1330: l_draft_id PO_DRAFTS.draft_id%TYPE;
1331: l_draft_status PO_DRAFTS.status%TYPE;
1332: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1333:
1334: l_calling_module VARCHAR2(100);
1335: l_upload_in_progress VARCHAR2(1);

Line 1332: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;

1328: d_position NUMBER;
1329:
1330: l_draft_id PO_DRAFTS.draft_id%TYPE;
1331: l_draft_status PO_DRAFTS.status%TYPE;
1332: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1333:
1334: l_calling_module VARCHAR2(100);
1335: l_upload_in_progress VARCHAR2(1);
1336: l_upload_status_code VARCHAR2(30);

Line 1337: l_upload_requestor_role PO_DRAFTS.owner_role%TYPE;

1333:
1334: l_calling_module VARCHAR2(100);
1335: l_upload_in_progress VARCHAR2(1);
1336: l_upload_status_code VARCHAR2(30);
1337: l_upload_requestor_role PO_DRAFTS.owner_role%TYPE;
1338: l_upload_requestor_role_id PO_DRAFTS.owner_user_id%TYPE;
1339: l_upload_job_number NUMBER;
1340: l_upload_status_display VARCHAR2(80);
1341:

Line 1338: l_upload_requestor_role_id PO_DRAFTS.owner_user_id%TYPE;

1334: l_calling_module VARCHAR2(100);
1335: l_upload_in_progress VARCHAR2(1);
1336: l_upload_status_code VARCHAR2(30);
1337: l_upload_requestor_role PO_DRAFTS.owner_role%TYPE;
1338: l_upload_requestor_role_id PO_DRAFTS.owner_user_id%TYPE;
1339: l_upload_job_number NUMBER;
1340: l_upload_status_display VARCHAR2(80);
1341:
1342: l_authorization_status PO_HEADERS_ALL.authorization_status%TYPE;

Line 1804: l_draft_id PO_DRAFTS.draft_id%TYPE;

1800: d_api_name CONSTANT VARCHAR2(30) := 'unlock_document';
1801: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1802: d_position NUMBER;
1803:
1804: l_draft_id PO_DRAFTS.draft_id%TYPE;
1805: l_draft_status PO_DRAFTS.status%TYPE;
1806: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1807:
1808: l_return_status VARCHAR2(1);

Line 1805: l_draft_status PO_DRAFTS.status%TYPE;

1801: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
1802: d_position NUMBER;
1803:
1804: l_draft_id PO_DRAFTS.draft_id%TYPE;
1805: l_draft_status PO_DRAFTS.status%TYPE;
1806: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1807:
1808: l_return_status VARCHAR2(1);
1809:

Line 1806: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;

1802: d_position NUMBER;
1803:
1804: l_draft_id PO_DRAFTS.draft_id%TYPE;
1805: l_draft_status PO_DRAFTS.status%TYPE;
1806: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
1807:
1808: l_return_status VARCHAR2(1);
1809:
1810: BEGIN

Line 1831: PO_DRAFTS_PVT.remove_draft_changes

1827: IF (PO_LOG.d_stmt) THEN
1828: PO_LOG.stmt(d_module, d_position, 'need to remove draft changes');
1829: END IF;
1830:
1831: PO_DRAFTS_PVT.remove_draft_changes
1832: ( p_draft_id => l_draft_id,
1833: p_exclude_ctrl_tbl => FND_API.G_FALSE,
1834: x_return_status => l_return_status
1835: );

Line 2180: UPDATE po_drafts

2176: PO_LOG.proc_begin(d_module);
2177: END IF;
2178:
2179: -- for request id, populate only if the draft is being processed by PDOI
2180: UPDATE po_drafts
2181: SET status = p_new_status,
2182: request_id = DECODE (p_new_status,
2183: g_status_PDOI_PROCESSING, l_cur_conc_request_id,
2184: NULL)

Line 2213: --l_draft_id PO_DRAFTS.draft_id%TYPE;

2209: d_api_name CONSTANT VARCHAR2(30) := 'pending_changes_exist';
2210: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
2211: d_position NUMBER;
2212:
2213: --l_draft_id PO_DRAFTS.draft_id%TYPE;
2214: --l_draft_status PO_DRAFTS.status%TYPE;
2215: --l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2216:
2217: l_pending_changes_exist VARCHAR2(1) := FND_API.G_FALSE;

Line 2214: --l_draft_status PO_DRAFTS.status%TYPE;

2210: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
2211: d_position NUMBER;
2212:
2213: --l_draft_id PO_DRAFTS.draft_id%TYPE;
2214: --l_draft_status PO_DRAFTS.status%TYPE;
2215: --l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2216:
2217: l_pending_changes_exist VARCHAR2(1) := FND_API.G_FALSE;
2218: BEGIN

Line 2215: --l_draft_owner_role PO_DRAFTS.owner_role%TYPE;

2211: d_position NUMBER;
2212:
2213: --l_draft_id PO_DRAFTS.draft_id%TYPE;
2214: --l_draft_status PO_DRAFTS.status%TYPE;
2215: --l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2216:
2217: l_pending_changes_exist VARCHAR2(1) := FND_API.G_FALSE;
2218: BEGIN
2219:

Line 2243: FROM po_drafts

2239: SELECT FND_API.G_TRUE
2240: INTO l_pending_changes_exist
2241: FROM dual
2242: WHERE EXISTS (SELECT 'Draft Exists'
2243: FROM po_drafts
2244: WHERE document_id = p_po_header_id
2245: AND status <> g_status_COMPLETED
2246: AND NVL(draft_type,g_draft_type_DOC_CHANGE) = g_draft_type_DOC_CHANGE);
2247:

Line 2471: l_draft_id PO_DRAFTS.draft_id%TYPE;

2467: d_api_name CONSTANT VARCHAR2(30) := 'is_pending_buyer_acceptance';
2468: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
2469: d_position NUMBER;
2470:
2471: l_draft_id PO_DRAFTS.draft_id%TYPE;
2472: l_draft_status PO_DRAFTS.status%TYPE;
2473: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2474:
2475: l_pending_acceptance VARCHAR2(1) := FND_API.G_FALSE;

Line 2472: l_draft_status PO_DRAFTS.status%TYPE;

2468: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
2469: d_position NUMBER;
2470:
2471: l_draft_id PO_DRAFTS.draft_id%TYPE;
2472: l_draft_status PO_DRAFTS.status%TYPE;
2473: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2474:
2475: l_pending_acceptance VARCHAR2(1) := FND_API.G_FALSE;
2476: BEGIN

Line 2473: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;

2469: d_position NUMBER;
2470:
2471: l_draft_id PO_DRAFTS.draft_id%TYPE;
2472: l_draft_status PO_DRAFTS.status%TYPE;
2473: l_draft_owner_role PO_DRAFTS.owner_role%TYPE;
2474:
2475: l_pending_acceptance VARCHAR2(1) := FND_API.G_FALSE;
2476: BEGIN
2477:

Line 3678: -- delete_draft = 'X' means that the PO_DRAFTS table should be

3674: IF (PO_LOG.d_proc) THEN
3675: PO_LOG.proc_begin(d_module);
3676: END IF;
3677:
3678: -- delete_draft = 'X' means that the PO_DRAFTS table should be
3679: -- excluded from deletion. We should just mark it as 'COMPLETED'
3680:
3681: IF (p_delete_draft = FND_API.G_FALSE OR
3682: p_delete_draft = 'X') THEN

Line 3888: FROM po_drafts

3884: END IF;
3885:
3886: SELECT Count(*)
3887: INTO l_draft_count
3888: FROM po_drafts
3889: WHERE document_id=p_po_header_id
3890: AND draft_type='MOD';
3891:
3892: IF (l_draft_count > 0 ) THEN

Line 3987: FROM po_drafts pod,

3983: SELECT 'Y'
3984: INTO l_open_mod_exist_flag
3985: FROM dual
3986: WHERE EXISTS (SELECT 'Open Mod Exists'
3987: FROM po_drafts pod,
3988: po_headers_all poh
3989: WHERE pod.document_id = poh.po_header_id
3990: AND poh.style_id = p_style_id
3991: AND pod.draft_type= 'MOD'

Line 4992: po_drafts dft

4988: pol.po_line_id,
4989: p_draft_id,
4990: 'S'
4991: FROM po_lines_all pol,
4992: po_drafts dft
4993: WHERE EXISTS ( SELECT line_location_id -- new shipment added
4994: FROM po_line_locations_draft_all poll_draft
4995: WHERE poll_draft.po_line_id = pol.po_line_id
4996: AND poll_draft.draft_id = p_draft_id

Line 5022: po_drafts dft

5018: pol.po_line_id,
5019: p_draft_id,
5020: 'S'
5021: FROM po_lines_all pol,
5022: po_drafts dft
5023: WHERE EXISTS ( SELECT po_distribution_id -- new distribution added
5024: FROM po_distributions_draft_all pod_draft
5025: WHERE pod_draft.po_line_id = pol.po_line_id
5026: AND pod_draft.draft_id = p_draft_id

Line 5268: po_drafts dft

5264: poll.line_location_id,
5265: p_draft_id,
5266: 'F'
5267: FROM po_line_locations_all poll,
5268: po_drafts dft
5269: WHERE poll.po_header_id = dft.document_id
5270: AND dft.draft_id = p_draft_id
5271: AND (EXISTS (SELECT 'Line is modified in current txn and requires F lock'
5272: FROM po_session_gt pol_lcks

Line 5526: po_drafts dft

5522: pod.po_distribution_id,
5523: p_draft_id,
5524: 'F'
5525: FROM po_distributions_all pod,
5526: po_drafts dft
5527: WHERE pod.po_header_id = dft.document_id
5528: AND dft.draft_id = p_draft_id
5529: AND (EXISTS (SELECT 'Line is modified in current txn and requires F lock'
5530: FROM po_session_gt pol_lcks

Line 5868: FROM po_drafts

5864: END IF;
5865:
5866: SELECT document_id
5867: INTO l_po_header_id
5868: FROM po_drafts
5869: WHERE draft_id = p_draft_id;
5870:
5871: -- When a UDA attribute group does not have any attribute which has default
5872: -- value and user also does not enter any attribute value, then records

Line 8096: po_drafts pod

8092: l_lock_by_mod_num_tbl
8093: FROM po_entity_locks poel_curr,
8094: po_entity_locks poel_oth,
8095: TABLE(g_entity_lock_comp_tbl) comp,
8096: po_drafts pod
8097: WHERE poel_curr.lock_by_draft_id = p_draft_id
8098: AND poel_oth.lock_by_draft_id <> p_draft_id
8099: AND poel_curr.entity_name = poel_oth.entity_name
8100: AND poel_curr.entity_pk1 = poel_oth.entity_pk1

Line 8261: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_ADDRESS_ENTITY, PO_DRAFTS_PVT.G_LOCK_HEADER_ENTITY,G_LOCK_HEADER_ATTACH_ENTITY);

8257: DELETE
8258: FROM po_entity_locks pel
8259: WHERE pel.entity_pk1 = p_po_header_id
8260: AND pel.lock_by_draft_id = p_draft_id
8261: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_ADDRESS_ENTITY, PO_DRAFTS_PVT.G_LOCK_HEADER_ENTITY,G_LOCK_HEADER_ATTACH_ENTITY);
8262:
8263: IF (PO_LOG.d_stmt) THEN
8264: PO_LOG.stmt(d_module,d_position ,'Deleted po_entity_locks');
8265: PO_LOG.stmt(d_module,d_position ,'number of rows deleted ',SQL%ROWCOUNT);

Line 8362: AND pel.entity_name = PO_DRAFTS_PVT.G_LOCK_DIST_ENTITY;

8358: DELETE
8359: FROM po_entity_locks pel
8360: WHERE pel.entity_pk1 = po_dest_line_ids_tbl(itr)
8361: AND pel.lock_by_draft_id = p_po_draft_id
8362: AND pel.entity_name = PO_DRAFTS_PVT.G_LOCK_DIST_ENTITY;
8363:
8364: IF (PO_LOG.d_stmt) THEN
8365: PO_LOG.stmt(d_module,d_position ,'Deleted po_entity_locks');
8366: PO_LOG.stmt(d_module,d_position ,'number of rows deleted ',SQL%ROWCOUNT);

Line 8428: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_SHIPMENT_ENTITY,PO_DRAFTS_PVT.G_LOCK_SHIPMENT_ATTACH_ENTITY);

8424: DELETE
8425: FROM po_entity_locks pel
8426: WHERE pel.entity_pk1 = po_ship_ids_tbl(itr)
8427: AND pel.lock_by_draft_id = p_po_draft_id
8428: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_SHIPMENT_ENTITY,PO_DRAFTS_PVT.G_LOCK_SHIPMENT_ATTACH_ENTITY);
8429:
8430: IF (PO_LOG.d_stmt) THEN
8431: PO_LOG.stmt(d_module,d_position ,'Deleted po_entity_locks');
8432: PO_LOG.stmt(d_module,d_position ,'number of rows deleted ',SQL%ROWCOUNT);

Line 8543: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_LINE_ENTITY,PO_DRAFTS_PVT.G_LOCK_LINE_ATTACH_ENTITY);

8539: DELETE
8540: FROM po_entity_locks pel
8541: WHERE pel.entity_pk1 = po_line_ids_tbl(i)
8542: AND pel.lock_by_draft_id = p_po_draft_id
8543: AND pel.entity_name IN (PO_DRAFTS_PVT.G_LOCK_LINE_ENTITY,PO_DRAFTS_PVT.G_LOCK_LINE_ATTACH_ENTITY);
8544:
8545: IF (PO_LOG.d_stmt) THEN
8546: PO_LOG.stmt(d_module,d_position ,'Deleted po_entity_locks');
8547: PO_LOG.stmt(d_module,d_position ,'number of rows deleted ',SQL%ROWCOUNT);

Line 9365: FROM po_drafts pod,

9361: SELECT 'Y'
9362: INTO l_par_exist_flag
9363: FROM dual
9364: WHERE EXISTS (SELECT 'PAR Exists'
9365: FROM po_drafts pod,
9366: po_headers_all poh
9367: WHERE pod.document_id = poh.po_header_id
9368: AND poh.style_id = p_style_id
9369: AND pod.draft_type= 'PAR');

Line 9582: END PO_DRAFTS_PVT;

9578: g_entity_lock_comp_tbl(7) := po_entity_lock_comp_type('F', 'S', 'I');
9579: g_entity_lock_comp_tbl(8) := po_entity_lock_comp_type('F', 'P', 'I');
9580: g_entity_lock_comp_tbl(9) := po_entity_lock_comp_type('F', 'F', 'I');
9581:
9582: END PO_DRAFTS_PVT;