DBA Data[Home] [Help]

APPS.AHL_PC_HEADER_PVT dependencies on AHL_DEBUG_PUB

Line 4: G_DEBUG VARCHAR2(1):=AHL_DEBUG_PUB.is_log_enabled;

1: PACKAGE BODY AHL_PC_HEADER_PVT AS
2: /* $Header: AHLVPCHB.pls 120.5.12010000.2 2008/11/28 04:55:27 skpathak ship $ */
3:
4: G_DEBUG VARCHAR2(1):=AHL_DEBUG_PUB.is_log_enabled;
5:
6: -----------------------------
7: -- GET_DUP_UNIT_ITEM_ASSOS --
8: -----------------------------

Line 140: AHL_DEBUG_PUB.ENABLE_DEBUG;

136:
137: x_return_status := FND_API.G_RET_STS_SUCCESS;
138:
139: IF G_DEBUG='Y' THEN
140: AHL_DEBUG_PUB.ENABLE_DEBUG;
141: END IF;
142:
143: IF p_x_pc_header_rec.OPERATION_FLAG = AHL_PC_HEADER_PVT.G_DML_CREATE
144: THEN

Line 206: AHL_DEBUG_PUB.debug('PCH -- PVT -- Created Header for ID='||p_x_pc_header_rec.PC_HEADER_ID);

202:
203: p_x_pc_header_rec.PC_HEADER_ID := l_header_id;
204:
205: IF G_DEBUG='Y' THEN
206: AHL_DEBUG_PUB.debug('PCH -- PVT -- Created Header for ID='||p_x_pc_header_rec.PC_HEADER_ID);
207: END IF;
208:
209: -- Check Error Message stack.
210: x_msg_count := FND_MSG_PUB.count_msg;

Line 309: AHL_DEBUG_PUB.ENABLE_DEBUG;

305:
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307:
308: IF G_DEBUG='Y' THEN
309: AHL_DEBUG_PUB.ENABLE_DEBUG;
310: END IF;
311:
312: -- If the to be PC was not primary and now changed to primary, and if it has duplicate...
313: -- unit/part associations, then abort Update...

Line 333: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- Can update PC, No duplicate unit/part associations');

329: END IF;
330: END IF;
331: END IF;
332: IF G_DEBUG='Y' THEN
333: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- Can update PC, No duplicate unit/part associations');
334: END IF;
335:
336: SELECT LINK_TO_PC_ID
337: INTO p_x_pc_header_rec.LINK_TO_PC_ID

Line 358: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- Operation Flag after VALIDATE_PC_HEADER_UPDATE = '||p_x_pc_header_rec.OPERATION_FLAG);

354: x_msg_data => x_msg_data
355: );
356:
357: IF G_DEBUG='Y' THEN
358: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- Operation Flag after VALIDATE_PC_HEADER_UPDATE = '||p_x_pc_header_rec.OPERATION_FLAG);
359: END IF;
360:
361: IF p_x_pc_header_rec.OPERATION_FLAG = AHL_PC_HEADER_PVT.G_DML_LINK
362: THEN

Line 429: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- After DB Update');

425: X_LAST_UPDATE_LOGIN => G_USER_ID
426: );
427:
428: IF G_DEBUG='Y' THEN
429: AHL_DEBUG_PUB.debug('PCH -- PVT -- UPDATE_PC_HEADER -- After DB Update');
430: END IF;
431:
432: -- Check Error Message stack.
433: x_msg_count := FND_MSG_PUB.count_msg;

Line 548: AHL_DEBUG_PUB.ENABLE_DEBUG;

544:
545: x_return_status := FND_API.G_RET_STS_SUCCESS;
546:
547: IF G_DEBUG='Y' THEN
548: AHL_DEBUG_PUB.ENABLE_DEBUG;
549: END IF;
550:
551: OPEN check_header_status(p_x_pc_header_rec.PC_HEADER_ID);
552: FETCH check_header_status INTO l_status;

Line 573: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Retrieving linked PC ID='||l_link_to_header_id);

569: OPEN delete_linked_header(p_x_pc_header_rec.PC_HEADER_ID);
570: FETCH delete_linked_header INTO l_link_to_header_id;
571: CLOSE delete_linked_header;
572: IF G_DEBUG='Y' THEN
573: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Retrieving linked PC ID='||l_link_to_header_id);
574: END IF;
575:
576: OPEN delete_node(p_x_pc_header_rec.PC_HEADER_ID);
577: FETCH delete_node INTO l_node_id;

Line 582: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Deleting Node Tree from ID='||l_node_rec.PC_NODE_ID);

578: IF(delete_node%FOUND)
579: THEN
580: l_node_rec.PC_HEADER_ID := p_x_pc_header_rec.PC_HEADER_ID;
581: IF G_DEBUG='Y' THEN
582: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Deleting Node Tree from ID='||l_node_rec.PC_NODE_ID);
583: END IF;
584: AHL_PC_NODE_PVT.DELETE_NODES
585: (
586: p_api_version => p_api_version,

Line 611: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Deleting PC with ID='||p_x_pc_header_rec.PC_HEADER_ID);

607: END IF;
608:
609:
610: IF G_DEBUG='Y' THEN
611: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Deleting PC with ID='||p_x_pc_header_rec.PC_HEADER_ID);
612: END IF;
613: AHL_PC_HEADERS_PKG.DELETE_ROW (p_x_pc_header_rec.PC_HEADER_ID);
614:
615: IF G_DEBUG='Y' THEN

Line 616: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Changing DRAFT_FLAG=Y for linked-to PC with ID='||l_link_to_header_id);

612: END IF;
613: AHL_PC_HEADERS_PKG.DELETE_ROW (p_x_pc_header_rec.PC_HEADER_ID);
614:
615: IF G_DEBUG='Y' THEN
616: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Changing DRAFT_FLAG=Y for linked-to PC with ID='||l_link_to_header_id);
617: END IF;
618:
619: IF (l_link_to_header_id <> 0)
620: THEN

Line 622: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Header ID='||l_link_to_header_id);

618:
619: IF (l_link_to_header_id <> 0)
620: THEN
621: IF G_DEBUG='Y' THEN
622: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Header ID='||l_link_to_header_id);
623: END IF;
624: UPDATE AHL_PC_HEADERS_B
625: SET DRAFT_FLAG='N'
626: WHERE PC_HEADER_ID = l_link_to_header_id;

Line 658: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Node ID='||l_node_tbl(i));

654: THEN
655: FOR i IN l_node_tbl.FIRST..l_node_tbl.LAST
656: LOOP
657: IF G_DEBUG='Y' THEN
658: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Node ID='||l_node_tbl(i));
659: END IF;
660: UPDATE AHL_PC_NODES_B
661: SET DRAFT_FLAG = 'N'
662: WHERE PC_NODE_ID = l_node_tbl(i);

Line 671: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Association ID='||l_assos_tbl(j));

667: THEN
668: FOR j IN l_assos_tbl.FIRST..l_assos_tbl.LAST
669: LOOP
670: IF G_DEBUG='Y' THEN
671: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- Done for Association ID='||l_assos_tbl(j));
672: END IF;
673: UPDATE AHL_PC_ASSOCIATIONS
674: SET DRAFT_FLAG = 'N'
675: WHERE PC_ASSOCIATION_ID = l_assos_tbl(j);

Line 684: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- After DB Delete');

680: END IF;
681: END IF;
682:
683: IF G_DEBUG='Y' THEN
684: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_HEADER -- After DB Delete');
685: END IF;
686:
687: -- Check Error Message stack.
688: x_msg_count := FND_MSG_PUB.count_msg;

Line 926: AHL_DEBUG_PUB.ENABLE_DEBUG;

922:
923: x_return_status := FND_API.G_RET_STS_SUCCESS;
924:
925: IF G_DEBUG='Y' THEN
926: AHL_DEBUG_PUB.ENABLE_DEBUG;
927: END IF;
928:
929: l_old_header_id := p_x_pc_header_rec.PC_HEADER_ID;
930: p_x_pc_header_rec.OPERATION_FLAG := AHL_PC_HEADER_PVT.G_DML_CREATE;

Line 985: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Copied into new PC with ID='||p_x_pc_header_rec.PC_HEADER_ID);

981: x_msg_count => x_msg_count,
982: x_msg_data => x_msg_data
983: );
984: IF G_DEBUG='Y' THEN
985: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Copied into new PC with ID='||p_x_pc_header_rec.PC_HEADER_ID);
986: END IF;
987:
988: x_msg_count := FND_MSG_PUB.count_msg;
989: IF x_msg_count > 0

Line 1005: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating node record for ID='||l_node_data_rec.PC_NODE_ID);

1001:
1002: IF l_node_data_rec.node_type = G_NODE
1003: THEN
1004: IF G_DEBUG='Y' THEN
1005: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating node record for ID='||l_node_data_rec.PC_NODE_ID);
1006: END IF;
1007: l_node_rec.PC_HEADER_ID := p_x_pc_header_rec.PC_HEADER_ID;
1008: l_node_rec.PC_NODE_ID := l_node_data_rec.PC_NODE_ID;
1009: l_node_rec.PARENT_NODE_ID := l_node_data_rec.PARENT_NODE_ID;

Line 1037: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating unit/part record for ID='||l_node_data_rec.PC_NODE_ID);

1033:
1034: ELSIF p_x_pc_header_rec.COPY_ASSOS_FLAG = 'Y' AND l_node_data_rec.node_type IN (G_PART, G_UNIT)
1035: THEN
1036: IF G_DEBUG='Y' THEN
1037: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating unit/part record for ID='||l_node_data_rec.PC_NODE_ID);
1038: END IF;
1039: l_assos_rec.UNIT_ITEM_ID := l_node_data_rec.UNIT_ITEM_ID;
1040: l_assos_rec.INVENTORY_ORG_ID := l_node_data_rec.INVENTORY_ORG_ID;
1041: l_assos_rec.ASSOCIATION_TYPE_FLAG := l_node_data_rec.node_type;

Line 1141: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating doc record for ID='||l_assos_data_rec.DOCUMENT_ID);

1137: LOOP
1138: FETCH copy_document INTO l_assos_data_rec;
1139: EXIT WHEN copy_document%NOTFOUND;
1140: IF G_DEBUG='Y' THEN
1141: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- Creating doc record for ID='||l_assos_data_rec.DOCUMENT_ID);
1142: END IF;
1143: l_assos_doc_tbl(l_assosCtr).DOC_TITLE_ASSO_ID := null;
1144: l_assos_doc_tbl(l_assosCtr).DOCUMENT_ID := l_assos_data_rec.DOCUMENT_ID ;
1145: l_assos_doc_tbl(l_assosCtr).DOC_REVISION_ID := l_assos_data_rec.DOC_REVISION_ID ;

Line 1197: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- After Copy PC');

1193:
1194: END LOOP;
1195:
1196: IF G_DEBUG='Y' THEN
1197: AHL_DEBUG_PUB.debug('PCH -- PVT -- COPY_PC_HEADER -- After Copy PC');
1198: END IF;
1199:
1200: -- Check Error Message stack.
1201: x_msg_count := FND_MSG_PUB.count_msg;

Line 1297: AHL_DEBUG_PUB.ENABLE_DEBUG;

1293:
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295:
1296: IF G_DEBUG='Y' THEN
1297: AHL_DEBUG_PUB.ENABLE_DEBUG;
1298: --END IF;
1299: --IF G_DEBUG='Y' THEN
1300: AHL_DEBUG_PUB.debug('PCH -- PVT -- Starting to call INITIATE_PC_APPROVAL');
1301: END IF;

Line 1300: AHL_DEBUG_PUB.debug('PCH -- PVT -- Starting to call INITIATE_PC_APPROVAL');

1296: IF G_DEBUG='Y' THEN
1297: AHL_DEBUG_PUB.ENABLE_DEBUG;
1298: --END IF;
1299: --IF G_DEBUG='Y' THEN
1300: AHL_DEBUG_PUB.debug('PCH -- PVT -- Starting to call INITIATE_PC_APPROVAL');
1301: END IF;
1302:
1303: -- Retrieve the workflow process name for object PCWF
1304: ahl_utility_pvt.get_wf_process_name

Line 1315: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_object='||l_object);

1311: x_msg_count =>l_msg_count,
1312: x_msg_data =>l_msg_data
1313: );
1314: IF G_DEBUG='Y' THEN
1315: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_object='||l_object);
1316: --END IF;
1317: --IF G_DEBUG='Y' THEN
1318: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_active='||l_active);
1319: --END IF;

Line 1318: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_active='||l_active);

1314: IF G_DEBUG='Y' THEN
1315: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_object='||l_object);
1316: --END IF;
1317: --IF G_DEBUG='Y' THEN
1318: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_active='||l_active);
1319: --END IF;
1320: --IF G_DEBUG='Y' THEN
1321: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_process_name='||l_process_name);
1322: --END IF;

Line 1321: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_process_name='||l_process_name);

1317: --IF G_DEBUG='Y' THEN
1318: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_active='||l_active);
1319: --END IF;
1320: --IF G_DEBUG='Y' THEN
1321: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_process_name='||l_process_name);
1322: --END IF;
1323: --IF G_DEBUG='Y' THEN
1324: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_item_type='||l_item_type);
1325: --END IF;

Line 1324: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_item_type='||l_item_type);

1320: --IF G_DEBUG='Y' THEN
1321: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_process_name='||l_process_name);
1322: --END IF;
1323: --IF G_DEBUG='Y' THEN
1324: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_item_type='||l_item_type);
1325: --END IF;
1326: --IF G_DEBUG='Y' THEN
1327: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_return_status='||l_return_status);
1328: END IF;

Line 1327: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_return_status='||l_return_status);

1323: --IF G_DEBUG='Y' THEN
1324: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_item_type='||l_item_type);
1325: --END IF;
1326: --IF G_DEBUG='Y' THEN
1327: AHL_DEBUG_PUB.debug('PCH -- PVT -- get_wf_process_name returns l_return_status='||l_return_status);
1328: END IF;
1329:
1330: -- If the workflow process is active...
1331: IF l_active = 'Y'

Line 1349: AHL_DEBUG_PUB.debug('PCH -- PVT -- Before calling ahl_generic_aprv_pvt.start_wf_process');

1345: RAISE FND_API.G_EXC_ERROR;
1346: -- Else start PCWF workflow process for this PC
1347: ELSE
1348: IF G_DEBUG='Y' THEN
1349: AHL_DEBUG_PUB.debug('PCH -- PVT -- Before calling ahl_generic_aprv_pvt.start_wf_process');
1350: END IF;
1351: ahl_generic_aprv_pvt.start_wf_process
1352: (
1353: P_OBJECT => l_object,

Line 1366: AHL_DEBUG_PUB.debug('PCH -- PVT -- After calling ahl_generic_aprv_pvt.start_wf_process');

1362: P_WORKFLOWPROCESS => l_process_name,
1363: P_ITEM_TYPE => l_item_type
1364: );
1365: IF G_DEBUG='Y' THEN
1366: AHL_DEBUG_PUB.debug('PCH -- PVT -- After calling ahl_generic_aprv_pvt.start_wf_process');
1367: END IF;
1368: END IF;
1369: ELSE
1370: -- If workflow process is inactive, then force complete the PC

Line 1375: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- This is not linked PC');

1371:
1372: IF ( p_x_pc_header_rec.LINK_TO_PC_ID IS NULL OR p_x_pc_header_rec.LINK_TO_PC_ID = 0 )
1373: THEN
1374: IF G_DEBUG='Y' THEN
1375: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- This is not linked PC');
1376: END IF;
1377:
1378: l_object_version_number := p_x_pc_header_rec.OBJECT_VERSION_NUMBER + 1;
1379:

Line 1392: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- This is linked PC');

1388:
1389: ELSE
1390:
1391: IF G_DEBUG='Y' THEN
1392: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- This is linked PC');
1393: END IF;
1394:
1395: p_x_pc_header_rec.STATUS := 'COMPLETE';
1396:

Line 1414: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- After PC Approval');

1410:
1411: END IF;
1412:
1413: IF G_DEBUG='Y' THEN
1414: AHL_DEBUG_PUB.debug('PCH -- PVT -- INITIATE_PC_APPROVAL -- After PC Approval');
1415: END IF;
1416:
1417: END INITIATE_PC_APPROVAL;
1418:

Line 1548: AHL_DEBUG_PUB.ENABLE_DEBUG;

1544: l_node_tbl T_ID_TBL;
1545:
1546: BEGIN
1547: IF G_DEBUG='Y' THEN
1548: AHL_DEBUG_PUB.ENABLE_DEBUG;
1549: --END IF;
1550: --IF G_DEBUG='Y' THEN
1551: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Reading PC Tree (Nodes)');
1552: END IF;

Line 1551: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Reading PC Tree (Nodes)');

1547: IF G_DEBUG='Y' THEN
1548: AHL_DEBUG_PUB.ENABLE_DEBUG;
1549: --END IF;
1550: --IF G_DEBUG='Y' THEN
1551: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Reading PC Tree (Nodes)');
1552: END IF;
1553:
1554: SELECT PC_NODE_ID
1555: BULK COLLECT INTO l_node_tbl

Line 1565: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Handling force delete for Node ID='||l_node_tbl(i));

1561: THEN
1562: FOR i IN l_node_tbl.FIRST..l_node_tbl.LAST
1563: LOOP
1564: IF G_DEBUG='Y' THEN
1565: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Handling force delete for Node ID='||l_node_tbl(i));
1566: END IF;
1567:
1568: -- Knocking off Doc Associations
1569: DELETE FROM AHL_DOC_TITLE_ASSOS_TL

Line 1592: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Handling force delete for PC');

1588: END LOOP;
1589: END IF;
1590:
1591: IF G_DEBUG='Y' THEN
1592: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_PC_AND_TREE -- Handling force delete for PC');
1593: END IF;
1594: -- Knocking off the PC
1595: AHL_PC_HEADERS_PKG.DELETE_ROW(p_pc_header_id);
1596:

Line 1761: AHL_DEBUG_PUB.ENABLE_DEBUG;

1757:
1758: x_return_status := FND_API.G_RET_STS_SUCCESS;
1759:
1760: IF G_DEBUG='Y' THEN
1761: AHL_DEBUG_PUB.ENABLE_DEBUG;
1762: END IF;
1763:
1764: l_old_header_id := p_x_pc_header_rec.PC_HEADER_ID;
1765: IF G_DEBUG='Y' THEN

Line 1766: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Old Header ID='||l_old_header_id);

1762: END IF;
1763:
1764: l_old_header_id := p_x_pc_header_rec.PC_HEADER_ID;
1765: IF G_DEBUG='Y' THEN
1766: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Old Header ID='||l_old_header_id);
1767: END IF;
1768:
1769: UPDATE AHL_PC_HEADERS_B
1770: SET DRAFT_FLAG = 'Y'

Line 1791: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- New Header ID='||p_x_pc_header_rec.PC_HEADER_ID);

1787: x_msg_data => x_msg_data
1788: );
1789:
1790: IF G_DEBUG='Y' THEN
1791: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- New Header ID='||p_x_pc_header_rec.PC_HEADER_ID);
1792: END IF;
1793:
1794: x_msg_count := FND_MSG_PUB.count_msg;
1795: IF x_msg_count > 0

Line 1809: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating node record for ID='||l_node_data_rec.PC_NODE_ID);

1805: EXIT WHEN copy_nodes_data%NOTFOUND;
1806: IF l_node_data_rec.node_type = G_NODE
1807: THEN
1808: IF G_DEBUG='Y' THEN
1809: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating node record for ID='||l_node_data_rec.PC_NODE_ID);
1810: END IF;
1811: l_node_rec.PC_NODE_ID := l_node_data_rec.PC_NODE_ID;
1812: l_node_rec.PC_HEADER_ID := p_x_pc_header_rec.PC_HEADER_ID;
1813: l_node_rec.PARENT_NODE_ID := l_node_data_rec.PARENT_NODE_ID;

Line 1846: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating unit/part record for ID='||l_node_data_rec.PC_NODE_ID);

1842:
1843: ELSIF l_node_data_rec.node_type IN (G_PART,G_UNIT)
1844: THEN
1845: IF G_DEBUG='Y' THEN
1846: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating unit/part record for ID='||l_node_data_rec.PC_NODE_ID);
1847: END IF;
1848: l_assos_rec.PC_ASSOCIATION_ID := l_node_data_rec.PC_NODE_ID;
1849: l_assos_rec.UNIT_ITEM_ID := l_node_data_rec.UNIT_ITEM_ID;
1850: l_assos_rec.INVENTORY_ORG_ID := l_node_data_rec.INVENTORY_ORG_ID;

Line 1930: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating doc record for ID='||l_assos_data_rec.DOCUMENT_ID);

1926: LOOP
1927: FETCH copy_document INTO l_assos_data_rec;
1928: EXIT WHEN copy_document%NOTFOUND;
1929: IF G_DEBUG='Y' THEN
1930: AHL_DEBUG_PUB.debug('PCH -- PVT -- CREATE_LINK -- Creating doc record for ID='||l_assos_data_rec.DOCUMENT_ID);
1931: END IF;
1932: l_assosCtr := l_assosCtr + 1;
1933: l_assos_doc_tbl(l_assosCtr).DOC_TITLE_ASSO_ID := null;
1934: l_assos_doc_tbl(l_assosCtr).DOCUMENT_ID := l_assos_data_rec.DOCUMENT_ID ;

Line 2114: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK reading child-node-tree');

2110: END IF;
2111: CLOSE get_pc_details;
2112:
2113: IF G_DEBUG='Y' THEN
2114: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK reading child-node-tree');
2115: END IF;
2116:
2117: SELECT pc_node_id
2118: BULK COLLECT

Line 2127: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK reading association-tree');

2123: START WITH pc_node_id = l_node_id
2124: ORDER BY pc_node_id DESC;
2125:
2126: IF G_DEBUG='Y' THEN
2127: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK reading association-tree');
2128: END IF;
2129:
2130: SELECT pc_association_id
2131: BULK COLLECT INTO l_assos_tbl

Line 2142: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK retrieving linked_node_id which will have FMP, UMP and Doc associations');

2138: START WITH pc_node_id = l_node_id
2139: );
2140:
2141: IF G_DEBUG='Y' THEN
2142: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK retrieving linked_node_id which will have FMP, UMP and Doc associations');
2143: END IF;
2144:
2145: If(l_assos_tbl.COUNT > 0)
2146: THEN

Line 2150: AHL_DEBUG_PUB.debug('PCN -- PVT -- Knocking off unit/part associations for unit_item_id='||l_assos_tbl(i));

2146: THEN
2147: FOR i IN l_assos_tbl.FIRST..l_assos_tbl.LAST
2148: LOOP
2149: IF G_DEBUG='Y' THEN
2150: AHL_DEBUG_PUB.debug('PCN -- PVT -- Knocking off unit/part associations for unit_item_id='||l_assos_tbl(i));
2151: END IF;
2152:
2153: -- Knocking off unit/part associations...
2154: DELETE

Line 2165: AHL_DEBUG_PUB.debug('PCN -- PVT -- Knocking off doc associations from PC nodes for pc_node_id='||get_linked_node_id(l_node_tbl(j)));

2161: THEN
2162: FOR j IN l_node_tbl.FIRST..l_node_tbl.LAST
2163: LOOP
2164: IF G_DEBUG='Y' THEN
2165: AHL_DEBUG_PUB.debug('PCN -- PVT -- Knocking off doc associations from PC nodes for pc_node_id='||get_linked_node_id(l_node_tbl(j)));
2166: END IF;
2167:
2168: l_linked_node_id := GET_LINKED_NODE_ID(l_node_tbl(j));
2169:

Line 2191: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK for pc_node_id='||p_x_node_rec.PC_NODE_ID);

2187: END LOOP;
2188: END IF;
2189:
2190: IF G_DEBUG='Y' THEN
2191: AHL_DEBUG_PUB.debug('PCH -- PVT -- DELETE_NODES_REMOVE_LINK for pc_node_id='||p_x_node_rec.PC_NODE_ID);
2192: END IF;
2193:
2194: IF ((l_node_tbl.COUNT > 0) AND (p_x_node_rec.pc_node_id IS NOT NULL))
2195: THEN

Line 2217: AHL_DEBUG_PUB.debug('PCH -- PVT -- DETACH_UNIT_REMOVE_LINK for ID='||p_x_assos_rec.PC_ASSOCIATION_ID);

2213: DELETE FROM AHL_PC_ASSOCIATIONS
2214: WHERE PC_ASSOCIATION_ID = p_x_assos_rec.PC_ASSOCIATION_ID;
2215:
2216: IF G_DEBUG='Y' THEN
2217: AHL_DEBUG_PUB.debug('PCH -- PVT -- DETACH_UNIT_REMOVE_LINK for ID='||p_x_assos_rec.PC_ASSOCIATION_ID);
2218: END IF;
2219:
2220: UPDATE ahl_pc_nodes_b
2221: SET child_count = NVL(child_count, 1) - 1

Line 2238: AHL_DEBUG_PUB.debug('PCH -- PVT -- DETACH_ITEM_REMOVE_LINK for ID='||p_x_assos_rec.PC_ASSOCIATION_ID);

2234: DELETE FROM AHL_PC_ASSOCIATIONS
2235: WHERE PC_ASSOCIATION_ID = p_x_assos_rec.PC_ASSOCIATION_ID;
2236:
2237: IF G_DEBUG='Y' THEN
2238: AHL_DEBUG_PUB.debug('PCH -- PVT -- DETACH_ITEM_REMOVE_LINK for ID='||p_x_assos_rec.PC_ASSOCIATION_ID);
2239: END IF;
2240:
2241: UPDATE ahl_pc_nodes_b
2242: SET child_count = NVL(child_count, 1) - 1

Line 2617: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Aborting because not linked PC');

2613: IF ( p_x_pc_header_rec.LINK_TO_PC_ID IS NULL OR p_x_pc_header_rec.LINK_TO_PC_ID = 0 )
2614: THEN
2615:
2616: IF G_DEBUG='Y' THEN
2617: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Aborting because not linked PC');
2618: END IF;
2619: RETURN;
2620: END IF;
2621:

Line 2628: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Aborting because not found linked-to PC');

2624: FETCH delete_header INTO l_dummy;
2625: IF (delete_header%NOTFOUND)
2626: THEN
2627: IF G_DEBUG='Y' THEN
2628: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Aborting because not found linked-to PC');
2629: END IF;
2630: CLOSE delete_header;
2631: RETURN;
2632: END IF;

Line 2877: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Node record for ID='||l_node_rec.PC_NODE_ID);

2873: l_node_rec.PC_NODE_ID := l_node_data_rec.LINK_TO_NODE_ID;
2874: END IF;
2875:
2876: IF G_DEBUG='Y' THEN
2877: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Node record for ID='||l_node_rec.PC_NODE_ID);
2878: END IF;
2879:
2880: l_node_rec.PARENT_NODE_ID := l_node_data_rec.PARENT_NODE_ID;
2881: l_node_rec.CHILD_COUNT := l_node_data_rec.CHILD_COUNT;

Line 2923: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Unit/Part record for ID='||l_assos_rec.PC_ASSOCIATION_ID);

2919: l_assos_rec.PC_ASSOCIATION_ID := l_node_data_rec.LINK_TO_NODE_ID;
2920: END IF;
2921:
2922: IF G_DEBUG='Y' THEN
2923: AHL_DEBUG_PUB.debug('PCH -- PVT -- REMOVE_LINK -- Unit/Part record for ID='||l_assos_rec.PC_ASSOCIATION_ID);
2924: END IF;
2925:
2926: l_assos_rec.PC_NODE_ID := l_node_data_rec.PARENT_NODE_ID;
2927: l_assos_rec.UNIT_ITEM_ID := l_node_data_rec.UNIT_ITEM_ID;

Line 3414: AHL_DEBUG_PUB.ENABLE_DEBUG;

3410:
3411: x_return_status := FND_API.G_RET_STS_SUCCESS;
3412:
3413: IF G_DEBUG='Y' THEN
3414: AHL_DEBUG_PUB.ENABLE_DEBUG;
3415: END IF;
3416:
3417: OPEN check_header_data (p_x_pc_header_rec.PC_HEADER_ID);
3418: FETCH check_header_data INTO

Line 3450: AHL_DEBUG_PUB.debug('PCH -- PVT -- VALIDATE_PC_HEADER_UPDATE -- Old Status = '||l_old_status||' -- New Status = '||p_x_pc_header_rec.STATUS);

3446: RAISE FND_API.G_EXC_ERROR;
3447: END IF;
3448:
3449: IF G_DEBUG='Y' THEN
3450: AHL_DEBUG_PUB.debug('PCH -- PVT -- VALIDATE_PC_HEADER_UPDATE -- Old Status = '||l_old_status||' -- New Status = '||p_x_pc_header_rec.STATUS);
3451: END IF;
3452:
3453: -- PC is COMPLETE -- User submits without changing to DRAFT -- ERROR
3454: IF p_x_pc_header_rec.STATUS = 'COMPLETE' AND l_old_status = 'COMPLETE'