DBA Data[Home] [Help]

APPS.AHL_PC_HEADER_PVT dependencies on FND_LOG

Line 2609: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2605: END IF;
2606:
2607: x_return_status := FND_API.G_RET_STS_SUCCESS;
2608:
2609: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'Start of the API');
2611: END IF;
2612:
2613: IF ( p_x_pc_header_rec.LINK_TO_PC_ID IS NULL OR p_x_pc_header_rec.LINK_TO_PC_ID = 0 )

Line 2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'Start of the API');

2606:
2607: x_return_status := FND_API.G_RET_STS_SUCCESS;
2608:
2609: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'Start of the API');
2611: END IF;
2612:
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

Line 2637: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2633: CLOSE delete_header;
2634:
2635: -- SATHAPLI::Bug# 6504069, 26-Mar-2008
2636: -- get all the applicable MRs for the linked (old) PC
2637: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2638: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2639: ' p_x_pc_header_rec.LINK_TO_PC_ID => '||p_x_pc_header_rec.LINK_TO_PC_ID);
2640: END IF;
2641:

Line 2638: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2634:
2635: -- SATHAPLI::Bug# 6504069, 26-Mar-2008
2636: -- get all the applicable MRs for the linked (old) PC
2637: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2638: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2639: ' p_x_pc_header_rec.LINK_TO_PC_ID => '||p_x_pc_header_rec.LINK_TO_PC_ID);
2640: END IF;
2641:
2642: OPEN get_mr_for_pc_csr(p_x_pc_header_rec.LINK_TO_PC_ID);

Line 2664: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

2660: x_mr_item_inst_tbl => l_mr_item_inst_tbl);
2661:
2662: -- check for the return status
2663: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2664: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
2665: FND_LOG.string(FND_LOG.level_statement,l_full_name,
2666: 'Raising exception with x_return_status => '||x_return_status);
2667: END IF;
2668: RAISE FND_API.G_EXC_ERROR;

Line 2665: FND_LOG.string(FND_LOG.level_statement,l_full_name,

2661:
2662: -- check for the return status
2663: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2664: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
2665: FND_LOG.string(FND_LOG.level_statement,l_full_name,
2666: 'Raising exception with x_return_status => '||x_return_status);
2667: END IF;
2668: RAISE FND_API.G_EXC_ERROR;
2669: END IF;

Line 2683: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2679: CLOSE get_mr_for_pc_csr;
2680:
2681: -- put all the applicable instances for the linked PC in the debug logs
2682: indx := l_link_mr_item_inst_tbl.FIRST;
2683: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2684: WHILE indx IS NOT NULL LOOP
2685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2686: ' l_link_mr_item_inst_tbl indx, item_instance_id => '||indx||
2687: ' ,'||l_link_mr_item_inst_tbl(indx));

Line 2685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2681: -- put all the applicable instances for the linked PC in the debug logs
2682: indx := l_link_mr_item_inst_tbl.FIRST;
2683: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2684: WHILE indx IS NOT NULL LOOP
2685: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2686: ' l_link_mr_item_inst_tbl indx, item_instance_id => '||indx||
2687: ' ,'||l_link_mr_item_inst_tbl(indx));
2688: indx := l_link_mr_item_inst_tbl.NEXT(indx);
2689: END LOOP;

Line 2705: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2701: SELECT OBJECT_VERSION_NUMBER INTO p_x_pc_header_rec.OBJECT_VERSION_NUMBER
2702: FROM AHL_PC_HEADERS_B
2703: WHERE PC_HEADER_ID = l_pc_header_rec.LINK_TO_PC_ID;
2704:
2705: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2706: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2707: 'About to call UPDATE_PC_HEADER with p_x_pc_header_rec.PC_HEADER_ID = ' || p_x_pc_header_rec.PC_HEADER_ID);
2708: END IF;
2709:

Line 2706: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2702: FROM AHL_PC_HEADERS_B
2703: WHERE PC_HEADER_ID = l_pc_header_rec.LINK_TO_PC_ID;
2704:
2705: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2706: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2707: 'About to call UPDATE_PC_HEADER with p_x_pc_header_rec.PC_HEADER_ID = ' || p_x_pc_header_rec.PC_HEADER_ID);
2708: END IF;
2709:
2710: UPDATE_PC_HEADER

Line 2723: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2719: x_msg_data => x_msg_data
2720: );
2721:
2722:
2723: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2724: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2725: 'Returned from UPDATE_PC_HEADER with x_return_status = ' || x_return_status);
2726: END IF;
2727:

Line 2724: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2720: );
2721:
2722:
2723: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2724: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2725: 'Returned from UPDATE_PC_HEADER with x_return_status = ' || x_return_status);
2726: END IF;
2727:
2728:

Line 2729: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2725: 'Returned from UPDATE_PC_HEADER with x_return_status = ' || x_return_status);
2726: END IF;
2727:
2728:
2729: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2730: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2731: ' Updated linked-to PC');
2732: END IF;
2733:

Line 2730: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2726: END IF;
2727:
2728:
2729: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2730: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2731: ' Updated linked-to PC');
2732: END IF;
2733:
2734: l_nodeCtr := 0;

Line 2737: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2733:
2734: l_nodeCtr := 0;
2735:
2736: -- Begin -- DELETE
2737: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2738: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2739: ' Starting DELETE-'||l_pc_header_rec.PC_HEADER_ID);
2740: END IF;
2741:

Line 2738: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2734: l_nodeCtr := 0;
2735:
2736: -- Begin -- DELETE
2737: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2738: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2739: ' Starting DELETE-'||l_pc_header_rec.PC_HEADER_ID);
2740: END IF;
2741:
2742: --delink before attach as the attached nodes also appear in the detach query due to id and no link id

Line 2749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2745: LOOP
2746: FETCH detach_nodes INTO l_node_data_rec_det;
2747: EXIT WHEN detach_nodes%NOTFOUND;
2748:
2749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2750: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2751: ' Starting DELETEING record -- '||l_node_data_rec_det.PC_NODE_ID);
2752: END IF;
2753:

Line 2750: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2746: FETCH detach_nodes INTO l_node_data_rec_det;
2747: EXIT WHEN detach_nodes%NOTFOUND;
2748:
2749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2750: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2751: ' Starting DELETEING record -- '||l_node_data_rec_det.PC_NODE_ID);
2752: END IF;
2753:
2754: IF l_node_data_rec_det.node_type = G_NODE

Line 2798: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2794: END IF;
2795: END LOOP;
2796: CLOSE detach_nodes;
2797:
2798: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2799: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2800: 'Completed detach_nodes loop');
2801: END IF;
2802:

Line 2799: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2795: END LOOP;
2796: CLOSE detach_nodes;
2797:
2798: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2799: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2800: 'Completed detach_nodes loop');
2801: END IF;
2802:
2803: -- Added to delete those associations which has association id, node id and header id the same

Line 2836: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2832:
2833: END LOOP;
2834: CLOSE detach_associations;
2835:
2836: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2837: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2838: 'Completed detach_associations loop');
2839: END IF;
2840:

Line 2837: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2833: END LOOP;
2834: CLOSE detach_associations;
2835:
2836: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2837: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2838: 'Completed detach_associations loop');
2839: END IF;
2840:
2841:

Line 2842: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2838: 'Completed detach_associations loop');
2839: END IF;
2840:
2841:
2842: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2843: -- End -- DELETE
2844: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2845: ' Ending DELETE msg_count='||x_msg_count);
2846:

Line 2844: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2840:
2841:
2842: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2843: -- End -- DELETE
2844: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2845: ' Ending DELETE msg_count='||x_msg_count);
2846:
2847: -- Begin -- COPY
2848: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

Line 2848: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

2844: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2845: ' Ending DELETE msg_count='||x_msg_count);
2846:
2847: -- Begin -- COPY
2848: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
2849: ' Starting COPY');
2850: END IF;
2851:
2852:

Line 2858: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2854: LOOP
2855: FETCH attach_nodes INTO l_node_data_rec;
2856: EXIT WHEN attach_nodes%NOTFOUND;
2857:
2858: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2859: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2860: 'In attach_nodes loop. l_node_data_rec.node_type = ' || l_node_data_rec.node_type ||
2861: ', l_node_data_rec.PC_NODE_ID = ' || l_node_data_rec.PC_NODE_ID ||
2862: ', l_node_data_rec.LINK_TO_NODE_ID = ' || l_node_data_rec.LINK_TO_NODE_ID);

Line 2859: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2855: FETCH attach_nodes INTO l_node_data_rec;
2856: EXIT WHEN attach_nodes%NOTFOUND;
2857:
2858: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2859: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2860: 'In attach_nodes loop. l_node_data_rec.node_type = ' || l_node_data_rec.node_type ||
2861: ', l_node_data_rec.PC_NODE_ID = ' || l_node_data_rec.PC_NODE_ID ||
2862: ', l_node_data_rec.LINK_TO_NODE_ID = ' || l_node_data_rec.LINK_TO_NODE_ID);
2863: END IF;

Line 2908: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2904: SELECT OBJECT_VERSION_NUMBER INTO l_node_rec.OBJECT_VERSION_NUMBER
2905: FROM AHL_PC_NODES_B
2906: WHERE PC_NODE_ID = l_node_rec.PC_NODE_ID;
2907:
2908: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2910: 'Got l_node_rec.OBJECT_VERSION_NUMBER as ' || l_node_rec.OBJECT_VERSION_NUMBER);
2911: END IF;
2912:

Line 2909: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',

2905: FROM AHL_PC_NODES_B
2906: WHERE PC_NODE_ID = l_node_rec.PC_NODE_ID;
2907:
2908: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'ahl.plsql.AHL_PC_HEADER_PVT.REMOVE_LINK',
2910: 'Got l_node_rec.OBJECT_VERSION_NUMBER as ' || l_node_rec.OBJECT_VERSION_NUMBER);
2911: END IF;
2912:
2913: ELSIF l_node_data_rec.node_type IN (G_PART, G_UNIT)

Line 3029: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3025: END IF;
3026:
3027: END LOOP;
3028: CLOSE attach_nodes;
3029: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3030: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Ending COPY');
3031: END IF;
3032: -- End -- COPY
3033:

Line 3030: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Ending COPY');

3026:
3027: END LOOP;
3028: CLOSE attach_nodes;
3029: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3030: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Ending COPY');
3031: END IF;
3032: -- End -- COPY
3033:
3034: -- To associate documents to the Complete version from draft version for new nodes.

Line 3038: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3034: -- To associate documents to the Complete version from draft version for new nodes.
3035: -- Fixed by Senthil for Bug # 3558557 and 3558601
3036:
3037:
3038: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3039: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Start of merging Docs');
3040: END IF;
3041:
3042:

Line 3039: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Start of merging Docs');

3035: -- Fixed by Senthil for Bug # 3558557 and 3558601
3036:
3037:
3038: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3039: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Start of merging Docs');
3040: END IF;
3041:
3042:
3043: SELECT pc_node_id,

Line 3054: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3050: AND NVL(LINK_TO_NODE_ID,0) <> 0
3051: START WITH PARENT_NODE_ID = 0
3052: CONNECT BY PRIOR PC_NODE_ID = PARENT_NODE_ID;
3053:
3054: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3055: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs count'||l_draft_nodeId_tbl.count);
3056: END IF;
3057:
3058:

Line 3055: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs count'||l_draft_nodeId_tbl.count);

3051: START WITH PARENT_NODE_ID = 0
3052: CONNECT BY PRIOR PC_NODE_ID = PARENT_NODE_ID;
3053:
3054: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3055: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs count'||l_draft_nodeId_tbl.count);
3056: END IF;
3057:
3058:
3059: -- There is no need to associate documents for newly created nodes of Complete PC b'coz the same

Line 3091: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3087: AND ASO_OBJECT_TYPE_CODE = 'PC';
3088:
3089: END IF;
3090:
3091: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3092: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs Merge ends');
3093: END IF;
3094:
3095:

Line 3092: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs Merge ends');

3088:
3089: END IF;
3090:
3091: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3092: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Docs Merge ends');
3093: END IF;
3094:
3095:
3096: l_pc_header_rec.OPERATION_FLAG := AHL_PC_HEADER_PVT.G_DML_DELETE;

Line 3100: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3096: l_pc_header_rec.OPERATION_FLAG := AHL_PC_HEADER_PVT.G_DML_DELETE;
3097:
3098: DELETE_PC_AND_TREE(l_pc_header_rec.pc_header_id);
3099:
3100: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3101: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Deleted Header Record');
3102: END IF;
3103:
3104: p_x_pc_header_rec.OPERATION_FLAG := AHL_PC_HEADER_PVT.G_DML_LINK;

Line 3101: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Deleted Header Record');

3097:
3098: DELETE_PC_AND_TREE(l_pc_header_rec.pc_header_id);
3099:
3100: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3101: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,' Deleted Header Record');
3102: END IF;
3103:
3104: p_x_pc_header_rec.OPERATION_FLAG := AHL_PC_HEADER_PVT.G_DML_LINK;
3105:

Line 3144: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3140: CLOSE get_mr_for_pc;
3141: */
3142:
3143: -- get all the applicable MRs for the new PC
3144: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3145: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3146: ' p_x_pc_header_rec.PC_HEADER_ID => '||p_x_pc_header_rec.PC_HEADER_ID);
3147: END IF;
3148:

Line 3145: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3141: */
3142:
3143: -- get all the applicable MRs for the new PC
3144: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3145: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3146: ' p_x_pc_header_rec.PC_HEADER_ID => '||p_x_pc_header_rec.PC_HEADER_ID);
3147: END IF;
3148:
3149: OPEN get_mr_for_pc_csr(p_x_pc_header_rec.PC_HEADER_ID);

Line 3171: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

3167: x_mr_item_inst_tbl => l_mr_item_inst_tbl);
3168:
3169: -- check for the return status
3170: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3171: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
3172: FND_LOG.string(FND_LOG.level_statement,l_full_name,
3173: 'Raising exception with x_return_status => '||x_return_status);
3174: END IF;
3175: RAISE FND_API.G_EXC_ERROR;

Line 3172: FND_LOG.string(FND_LOG.level_statement,l_full_name,

3168:
3169: -- check for the return status
3170: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3171: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
3172: FND_LOG.string(FND_LOG.level_statement,l_full_name,
3173: 'Raising exception with x_return_status => '||x_return_status);
3174: END IF;
3175: RAISE FND_API.G_EXC_ERROR;
3176: END IF;

Line 3190: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3186: CLOSE get_mr_for_pc_csr;
3187:
3188: -- put all the applicable instances for the new PC in the debug logs
3189: indx := l_new_mr_item_inst_tbl.FIRST;
3190: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3191: WHILE indx IS NOT NULL LOOP
3192: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3193: ' l_new_mr_item_inst_tbl indx, item_instance_id => '||indx||
3194: ' ,'||l_new_mr_item_inst_tbl(indx));

Line 3192: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3188: -- put all the applicable instances for the new PC in the debug logs
3189: indx := l_new_mr_item_inst_tbl.FIRST;
3190: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3191: WHILE indx IS NOT NULL LOOP
3192: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3193: ' l_new_mr_item_inst_tbl indx, item_instance_id => '||indx||
3194: ' ,'||l_new_mr_item_inst_tbl(indx));
3195: indx := l_new_mr_item_inst_tbl.NEXT(indx);
3196: END LOOP;

Line 3211: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3207:
3208: indx := l_link_mr_item_inst_tbl.NEXT(indx);
3209: END LOOP;
3210:
3211: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3212: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3213: ' l_diff_mr_item_inst_tbl.COUNT => '||l_diff_mr_item_inst_tbl.COUNT);
3214: END IF;
3215:

Line 3212: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3208: indx := l_link_mr_item_inst_tbl.NEXT(indx);
3209: END LOOP;
3210:
3211: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3212: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3213: ' l_diff_mr_item_inst_tbl.COUNT => '||l_diff_mr_item_inst_tbl.COUNT);
3214: END IF;
3215:
3216: -- put all the top instances of the removed units in the debug logs

Line 3218: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3214: END IF;
3215:
3216: -- put all the top instances of the removed units in the debug logs
3217: indx := l_diff_mr_item_inst_tbl.FIRST;
3218: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: WHILE indx IS NOT NULL LOOP
3220: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3221: ' l_diff_mr_item_inst_tbl indx, item_instance_id => '||indx||
3222: ' ,'||l_diff_mr_item_inst_tbl(indx));

Line 3220: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3216: -- put all the top instances of the removed units in the debug logs
3217: indx := l_diff_mr_item_inst_tbl.FIRST;
3218: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: WHILE indx IS NOT NULL LOOP
3220: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3221: ' l_diff_mr_item_inst_tbl indx, item_instance_id => '||indx||
3222: ' ,'||l_diff_mr_item_inst_tbl(indx));
3223: indx := l_diff_mr_item_inst_tbl.NEXT(indx);
3224: END LOOP;

Line 3231: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3227: -- for each of the top instance of removed units make a call to
3228: -- concurrent program AHLUEFF for recalculating unit effectivities
3229: indx := l_diff_mr_item_inst_tbl.FIRST;
3230: WHILE indx IS NOT NULL LOOP
3231: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3233: ' Submitting concurrent request to recalculate unit effectivities for instance => '||
3234: l_diff_mr_item_inst_tbl(indx));
3235: END IF;

Line 3232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3228: -- concurrent program AHLUEFF for recalculating unit effectivities
3229: indx := l_diff_mr_item_inst_tbl.FIRST;
3230: WHILE indx IS NOT NULL LOOP
3231: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3233: ' Submitting concurrent request to recalculate unit effectivities for instance => '||
3234: l_diff_mr_item_inst_tbl(indx));
3235: END IF;
3236:

Line 3245: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3241: argument2 => NULL,
3242: argument3 => l_diff_mr_item_inst_tbl(indx));
3243:
3244: IF (l_req_id = 0) THEN
3245: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3246: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3247: ' Concurrent request failed.');
3248: END IF;
3249: ELSE

Line 3246: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3242: argument3 => l_diff_mr_item_inst_tbl(indx));
3243:
3244: IF (l_req_id = 0) THEN
3245: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3246: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3247: ' Concurrent request failed.');
3248: END IF;
3249: ELSE
3250: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 3250: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3246: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3247: ' Concurrent request failed.');
3248: END IF;
3249: ELSE
3250: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3251: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3252: ' Concurrent request successful.');
3253: END IF;
3254: END IF;

Line 3251: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3247: ' Concurrent request failed.');
3248: END IF;
3249: ELSE
3250: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3251: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3252: ' Concurrent request successful.');
3253: END IF;
3254: END IF;
3255:

Line 3261: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3257: END LOOP;
3258:
3259: -- make a call to the concurrent program AHLPCUEFF to calculate unit
3260: -- effectivities for the new PC
3261: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3262: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3263: ' Submitting concurrent request to calculate unit effectivities for pc_header_id => '||
3264: p_x_pc_header_rec.PC_HEADER_ID);
3265: END IF;

Line 3262: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3258:
3259: -- make a call to the concurrent program AHLPCUEFF to calculate unit
3260: -- effectivities for the new PC
3261: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3262: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3263: ' Submitting concurrent request to calculate unit effectivities for pc_header_id => '||
3264: p_x_pc_header_rec.PC_HEADER_ID);
3265: END IF;
3266:

Line 3274: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3270: argument1 => 1.0,
3271: argument2 => p_x_pc_header_rec.PC_HEADER_ID);
3272:
3273: IF (l_req_id = 0) THEN
3274: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3275: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3276: ' Concurrent request failed.');
3277: END IF;
3278: ELSE

Line 3275: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3271: argument2 => p_x_pc_header_rec.PC_HEADER_ID);
3272:
3273: IF (l_req_id = 0) THEN
3274: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3275: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3276: ' Concurrent request failed.');
3277: END IF;
3278: ELSE
3279: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 3279: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3275: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3276: ' Concurrent request failed.');
3277: END IF;
3278: ELSE
3279: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3280: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3281: ' Concurrent request successful.');
3282: END IF;
3283: END IF;

Line 3280: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,

3276: ' Concurrent request failed.');
3277: END IF;
3278: ELSE
3279: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3280: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,l_full_name,
3281: ' Concurrent request successful.');
3282: END IF;
3283: END IF;
3284:

Line 3285: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3281: ' Concurrent request successful.');
3282: END IF;
3283: END IF;
3284:
3285: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3286: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'End of the API');
3287: END IF;
3288:
3289: END REMOVE_LINK;

Line 3286: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'End of the API');

3282: END IF;
3283: END IF;
3284:
3285: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3286: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,l_full_name,'End of the API');
3287: END IF;
3288:
3289: END REMOVE_LINK;
3290: