DBA Data[Home] [Help]

APPS.POR_AMENDMENT_PKG dependencies on FND_LOG

Line 7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

3:
4:
5: -- Logging Static Variables
6: G_CURRENT_RUNTIME_LEVEL NUMBER;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

4:
5: -- Logging Static Variables
6: G_CURRENT_RUNTIME_LEVEL NUMBER;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

5: -- Logging Static Variables
6: G_CURRENT_RUNTIME_LEVEL NUMBER;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ICX.PLSQL.POR_AMENDMENT_PKG';

Line 10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

6: G_CURRENT_RUNTIME_LEVEL NUMBER;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ICX.PLSQL.POR_AMENDMENT_PKG';
14:

Line 11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ICX.PLSQL.POR_AMENDMENT_PKG';
14:
15: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');

Line 12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ICX.PLSQL.POR_AMENDMENT_PKG';
14:
15: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');
16:

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

91: BEGIN
92:
93:
94: v_progress:='000';
95: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
96: l_log_msg := 'Invoked '||l_procedure_name;
97: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
98: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_table_name :'||p_table_name;
99: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 97: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

93:
94: v_progress:='000';
95: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
96: l_log_msg := 'Invoked '||l_procedure_name;
97: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
98: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_table_name :'||p_table_name;
99: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
100: END IF;
101:

Line 99: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

95: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
96: l_log_msg := 'Invoked '||l_procedure_name;
97: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
98: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_table_name :'||p_table_name;
99: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
100: END IF;
101:
102: -- SQL What: Querying the archive table for the given revision_num and previous revision_num
103: -- SQL Why: Need to compare the values for each column

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

380: p_level:= 'UDA_LINES';
381: END IF;
382:
383: v_progress:='001';
384: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
385: l_log_msg := v_progress||' : After creating queries';
386: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
387: END IF;
388:

Line 386: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

382:
383: v_progress:='001';
384: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
385: l_log_msg := v_progress||' : After creating queries';
386: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
387: END IF;
388:
389: -- Comparing the data between two revisions
390: compare(sql_stmt1, sql_stmt2, p_level, p_revision_num, amend_num);

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

389: -- Comparing the data between two revisions
390: compare(sql_stmt1, sql_stmt2, p_level, p_revision_num, amend_num);
391:
392: v_progress:='006';
393: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
394: l_log_msg := v_progress||' : After comparing two revisions';
395: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
396: END IF;
397:

Line 395: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

391:
392: v_progress:='006';
393: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
394: l_log_msg := v_progress||' : After comparing two revisions';
395: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
396: END IF;
397:
398:
399: EXCEPTION

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

398:
399: EXCEPTION
400: WHEN others THEN
401:
402: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
403: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
404: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
405: END IF;
406: RAISE;

Line 404: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

400: WHEN others THEN
401:
402: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
403: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
404: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
405: END IF;
406: RAISE;
407:
408: END compare_table;

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

493:
494:
495: v_progress:='000';
496:
497: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
498: l_log_msg := 'Invoked '||l_procedure_name;
499: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
500: END IF;
501:

Line 499: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

495: v_progress:='000';
496:
497: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
498: l_log_msg := 'Invoked '||l_procedure_name;
499: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
500: END IF;
501:
502: -- UDA related changes
503:

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

540: x_xml1:= create_xml(sql_stmt1);
541: x_xml2:= create_xml(sql_stmt2);
542:
543: v_progress:='002';
544: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
545: l_log_msg := v_progress||' : After creating XMLs';
546: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
547: END IF;
548:

Line 546: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

542:
543: v_progress:='002';
544: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
545: l_log_msg := v_progress||' : After creating XMLs';
546: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
547: END IF;
548:
549:
550: IF (x_xml2 IS NOT NULL) THEN

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

933: END LOOP;
934: END IF; -- If x_xml1 is NOT NULL
935:
936: v_progress:='006';
937: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
938: l_log_msg := v_progress||' : After comparing xmls';
939: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
940: END IF;
941:

Line 939: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

935:
936: v_progress:='006';
937: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
938: l_log_msg := v_progress||' : After comparing xmls';
939: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
940: END IF;
941:
942:
943: EXCEPTION

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

942:
943: EXCEPTION
944: WHEN others THEN
945:
946: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
947: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
948: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
949: END IF;
950: RAISE;

Line 948: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

944: WHEN others THEN
945:
946: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
947: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
948: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
949: END IF;
950: RAISE;
951:
952: END compare;

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

990: l_log_msg VARCHAR2(2000);
991:
992: BEGIN
993: v_progress := '000';
994: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
995: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
996: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
997: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_sequence_num : '||p_sequence_num;
998: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 996: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

992: BEGIN
993: v_progress := '000';
994: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
995: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
996: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
997: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_sequence_num : '||p_sequence_num;
998: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
999: END IF;
1000:

Line 998: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

994: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
995: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
996: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
997: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num||', p_sequence_num : '||p_sequence_num;
998: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
999: END IF;
1000:
1001: v_progress := '001';
1002: compare_table('PO_REQUISITION_HEADERS_ALL',p_revision_num,p_confirmed_id,amend_num);

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

1015: v_progress := '005';
1016: compare_table('PO_REQ_LINES_UDA',p_revision_num,p_confirmed_id,amend_num);
1017: -- UDA related Changes
1018:
1019: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1020: l_log_msg := v_progress||': After comparing header, lines and distributions';
1021: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1022: END IF;
1023:

Line 1021: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1017: -- UDA related Changes
1018:
1019: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1020: l_log_msg := v_progress||': After comparing header, lines and distributions';
1021: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1022: END IF;
1023:
1024: v_progress := '006';
1025:

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

1024: v_progress := '006';
1025:
1026: insert_changes(p_sequence_num,p_confirmed_id);
1027:
1028: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1029: l_log_msg := v_progress||': After inserting into temp tabl';
1030: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1031: END IF;
1032:

Line 1030: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1026: insert_changes(p_sequence_num,p_confirmed_id);
1027:
1028: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1029: l_log_msg := v_progress||': After inserting into temp tabl';
1030: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1031: END IF;
1032:
1033: v_progress := '007';
1034: verify_no_differences(p_sequence_num,p_revision_num,amend_num);

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

1032:
1033: v_progress := '007';
1034: verify_no_differences(p_sequence_num,p_revision_num,amend_num);
1035:
1036: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1037: l_log_msg := v_progress||': After verifying if there is no changes';
1038: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1039: END IF;
1040:

Line 1038: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1034: verify_no_differences(p_sequence_num,p_revision_num,amend_num);
1035:
1036: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1037: l_log_msg := v_progress||': After verifying if there is no changes';
1038: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1039: END IF;
1040:
1041:
1042: EXCEPTION

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

1040:
1041:
1042: EXCEPTION
1043: WHEN OTHERS THEN
1044: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1045: l_log_msg := v_progress||': Exception at procedure change_history';
1046: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1047: END IF;
1048: RAISE;

Line 1046: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1042: EXCEPTION
1043: WHEN OTHERS THEN
1044: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1045: l_log_msg := v_progress||': Exception at procedure change_history';
1046: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1047: END IF;
1048: RAISE;
1049: END change_history;
1050:

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

1125: BEGIN
1126:
1127: v_progress := '000';
1128:
1129: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1130: l_log_msg := 'Inside procedure '||l_procedure_name;
1131: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1132: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num||' p_comparison_flag: '||p_comparison_flag;
1133: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 1131: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1127: v_progress := '000';
1128:
1129: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1130: l_log_msg := 'Inside procedure '||l_procedure_name;
1131: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1132: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num||' p_comparison_flag: '||p_comparison_flag;
1133: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1134: END IF;
1135:

Line 1133: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1129: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1130: l_log_msg := 'Inside procedure '||l_procedure_name;
1131: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1132: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num||' p_comparison_flag: '||p_comparison_flag;
1133: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1134: END IF;
1135:
1136: rec_index := 1;
1137:

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

1141: SELECT icx_po_history_details_s.nextval
1142: INTO p_sequence_num
1143: FROM DUAL;
1144:
1145: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1146: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
1147: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1148: END IF;
1149:

Line 1147: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1143: FROM DUAL;
1144:
1145: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1146: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
1147: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1148: END IF;
1149:
1150:
1151: v_sequence_num:=p_sequence_num;

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

1159: INTO v_revision_counter
1160: FROM po_requisition_headers_all
1161: WHERE conformed_header_id=p_confirmed_id;
1162:
1163: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1164: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
1165: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1166: END IF;
1167:

Line 1165: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1161: WHERE conformed_header_id=p_confirmed_id;
1162:
1163: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1164: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
1165: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1166: END IF;
1167:
1168:
1169: END IF;

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

1206:
1207: EXCEPTION
1208: WHEN others THEN
1209:
1210: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1211: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
1212: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1213: END IF;
1214: RAISE;

Line 1212: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1208: WHEN others THEN
1209:
1210: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1211: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
1212: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1213: END IF;
1214: RAISE;
1215:
1216: END compare_req;

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

1292:
1293: BEGIN
1294:
1295: v_progress := '000';
1296: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1297: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1299: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_confirmed_id: '||p_confirmed_id;
1300: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 1298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1294:
1295: v_progress := '000';
1296: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1297: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1299: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_confirmed_id: '||p_confirmed_id;
1300: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1301: END IF;
1302:

Line 1300: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1296: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1297: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1299: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_confirmed_id: '||p_confirmed_id;
1300: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1301: END IF;
1302:
1303: FORALL i in po_num_tab.FIRST..po_num_tab.LAST
1304: INSERT INTO

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

1338:
1339: EXCEPTION
1340: WHEN others THEN
1341:
1342: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1343: l_log_msg := v_progress||' : Exception at procedure insert_changes: '|| SQLERRM;
1344: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1345: END IF;
1346: RAISE;

Line 1344: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1340: WHEN others THEN
1341:
1342: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1343: l_log_msg := v_progress||' : Exception at procedure insert_changes: '|| SQLERRM;
1344: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1345: END IF;
1346: RAISE;
1347:
1348: END insert_changes;

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

1377: id VARCHAR2(1000);
1378:
1379: BEGIN
1380: v_progress:= '000';
1381: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1382: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1383: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1384: l_log_msg := 'p_id: ' ||p_id || ' label: '||label;
1385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 1383: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1379: BEGIN
1380: v_progress:= '000';
1381: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1382: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1383: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1384: l_log_msg := 'p_id: ' ||p_id || ' label: '||label;
1385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1386: END IF;
1387:

Line 1385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1381: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1382: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1383: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1384: l_log_msg := 'p_id: ' ||p_id || ' label: '||label;
1385: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1386: END IF;
1387:
1388: IF label IN ('DELIVER_TO_LOCATION_ID') THEN
1389: id:= po_compare_revisions.get_location(p_id);

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

1448: END IF;
1449:
1450: v_progress:= '001';
1451:
1452: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1453: l_log_msg := v_progress||' : Function map_id_to_num returns: '||id;
1454: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1455: END IF;
1456:

Line 1454: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1450: v_progress:= '001';
1451:
1452: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1453: l_log_msg := v_progress||' : Function map_id_to_num returns: '||id;
1454: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1455: END IF;
1456:
1457: RETURN id;
1458:

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

1458:
1459: EXCEPTION
1460: WHEN others THEN
1461:
1462: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1463: l_log_msg := v_progress||' : Exception at function map_id_to_num : '|| SQLERRM;
1464: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1465: END IF;
1466: RETURN NULL;

Line 1464: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1460: WHEN others THEN
1461:
1462: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1463: l_log_msg := v_progress||' : Exception at function map_id_to_num : '|| SQLERRM;
1464: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1465: END IF;
1466: RETURN NULL;
1467:
1468: END map_id_to_num;

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

1505:
1506: BEGIN
1507:
1508: v_progress := '000';
1509: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1510: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1511: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1512: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_revision_num: '||p_revision_num;
1513: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 1511: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1507:
1508: v_progress := '000';
1509: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1510: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1511: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1512: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_revision_num: '||p_revision_num;
1513: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1514: END IF;
1515:

Line 1513: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1509: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1510: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1511: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1512: l_log_msg := 'p_line_seq: ' ||p_line_seq || ' p_revision_num: '||p_revision_num;
1513: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1514: END IF;
1515:
1516: SELECT COUNT(*)
1517: INTO records_exist

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

1519: WHERE line_seq = p_line_seq;
1520:
1521: v_progress := '001';
1522:
1523: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1524: l_log_msg := v_progress||' : Number of records in temp table: '||records_exist;
1525: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1526: END IF;
1527:

Line 1525: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1521: v_progress := '001';
1522:
1523: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1524: l_log_msg := v_progress||' : Number of records in temp table: '||records_exist;
1525: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1526: END IF;
1527:
1528: IF records_exist = 0 THEN
1529:

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

1566:
1567: EXCEPTION
1568: WHEN others THEN
1569:
1570: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1571: l_log_msg := v_progress||' : Exception at procedure verify_no_differences : '|| SQLERRM;
1572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1573: END IF;
1574: RAISE;

Line 1572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1568: WHEN others THEN
1569:
1570: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1571: l_log_msg := v_progress||' : Exception at procedure verify_no_differences : '|| SQLERRM;
1572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1573: END IF;
1574: RAISE;
1575:
1576: END verify_no_differences;

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

1668:
1669:
1670: v_progress:='000';
1671:
1672: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1673: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1674: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1675: l_log_msg := 'p_table_name: ' ||p_table_name ||' p_confirmed_id: '||p_confirmed_id|| ' p_revision_num: '||p_revision_num;
1676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 1674: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1670: v_progress:='000';
1671:
1672: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1673: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1674: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1675: l_log_msg := 'p_table_name: ' ||p_table_name ||' p_confirmed_id: '||p_confirmed_id|| ' p_revision_num: '||p_revision_num;
1676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1677: END IF;
1678:

Line 1676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1672: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1673: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
1674: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1675: l_log_msg := 'p_table_name: ' ||p_table_name ||' p_confirmed_id: '||p_confirmed_id|| ' p_revision_num: '||p_revision_num;
1676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1677: END IF;
1678:
1679: -- SQL What: Querying the archive table for the given revision_num and previous revision_num
1680: -- SQL Why: Need to compare the values for each column

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

1847:
1848: END IF;
1849:
1850: v_progress:='001';
1851: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1852: l_log_msg := v_progress||' : After creating queries';
1853: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1854: END IF;
1855:

Line 1853: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1849:
1850: v_progress:='001';
1851: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1852: l_log_msg := v_progress||' : After creating queries';
1853: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1854: END IF;
1855:
1856:
1857: -- Getting the XMLs based on the dynamic queries

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

1859: x_xml1:= create_xml(sql_stmt1);
1860: x_xml2:= create_xml(sql_stmt2);
1861:
1862: v_progress:='002';
1863: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1864: l_log_msg := v_progress||' : After creating XMLs';
1865: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1866: END IF;
1867:

Line 1865: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

1861:
1862: v_progress:='002';
1863: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1864: l_log_msg := v_progress||' : After creating XMLs';
1865: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1866: END IF;
1867:
1868:
1869: IF (x_xml1 IS NOT NULL AND x_xml2 IS NOT NULL) THEN

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

2170:
2171: END IF; -- If x_xml1 is NOT NULL
2172:
2173: v_progress:='005';
2174: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2175: l_log_msg := v_progress||' : After comparing xmls';
2176: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2177: END IF;
2178:

Line 2176: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2172:
2173: v_progress:='005';
2174: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2175: l_log_msg := v_progress||' : After comparing xmls';
2176: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2177: END IF;
2178:
2179:
2180: EXCEPTION

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

2179:
2180: EXCEPTION
2181: WHEN others THEN
2182:
2183: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2184: l_log_msg := v_progress||' : Exception at procedure set_amendment_status : '|| SQLERRM;
2185: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2186: END IF;
2187: RAISE;

Line 2185: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2181: WHEN others THEN
2182:
2183: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2184: l_log_msg := v_progress||' : Exception at procedure set_amendment_status : '|| SQLERRM;
2185: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2186: END IF;
2187: RAISE;
2188:
2189: END set_amendment_status;

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

2221: BEGIN
2222:
2223: v_progress:='000';
2224:
2225: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2226: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2227: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2228: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num;
2229: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 2227: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2223: v_progress:='000';
2224:
2225: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2226: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2227: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2228: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num;
2229: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2230: END IF;
2231:

Line 2229: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2225: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2226: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2227: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2228: l_log_msg := 'p_confirmed_id: ' ||p_confirmed_id || ' p_revision_num: '||p_revision_num;
2229: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2230: END IF;
2231:
2232: set_amendment_status('PO_REQUISITION_HEADERS_ALL',p_revision_num,p_confirmed_id);
2233: set_amendment_status('PO_REQUISITION_LINES_ALL',p_revision_num,p_confirmed_id);

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

2234: set_amendment_status('PO_REQ_DISTRIBUTIONS_ALL',p_revision_num,p_confirmed_id);
2235:
2236: v_progress:='001';
2237:
2238: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2239: l_log_msg := v_progress||' : Update completes';
2240: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2241: END IF;
2242:

Line 2240: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2236: v_progress:='001';
2237:
2238: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2239: l_log_msg := v_progress||' : Update completes';
2240: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2241: END IF;
2242:
2243: COMMIT;
2244:

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

2246: WHEN OTHERS THEN
2247:
2248: ROLLBACK;
2249:
2250: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2251: l_log_msg := v_progress||' : Exception at procedure update_amendment : '|| SQLERRM;
2252: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2253: END IF;
2254: RAISE;

Line 2252: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2248: ROLLBACK;
2249:
2250: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2251: l_log_msg := v_progress||' : Exception at procedure update_amendment : '|| SQLERRM;
2252: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2253: END IF;
2254: RAISE;
2255:
2256: END update_amendment;

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

2273: l_log_msg VARCHAR2(2000);
2274:
2275: BEGIN
2276:
2277: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2278: l_log_msg := 'Inside procedure : '||l_procedure_name;
2279: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2280: l_log_msg := 'p_req_header_id : '||p_req_header_id||', p_req_number : '||p_req_number;
2281: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 2279: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2275: BEGIN
2276:
2277: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2278: l_log_msg := 'Inside procedure : '||l_procedure_name;
2279: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2280: l_log_msg := 'p_req_header_id : '||p_req_header_id||', p_req_number : '||p_req_number;
2281: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2282: END IF;
2283:

Line 2281: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2277: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2278: l_log_msg := 'Inside procedure : '||l_procedure_name;
2279: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2280: l_log_msg := 'p_req_header_id : '||p_req_header_id||', p_req_number : '||p_req_number;
2281: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2282: END IF;
2283:
2284:
2285: BEGIN

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

2292: END IF;
2293:
2294: EXCEPTION
2295: WHEN No_Data_Found THEN
2296: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2297: l_log_msg := 'Inside No_DATA_FOUND';
2298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2299: END IF;
2300:

Line 2298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2294: EXCEPTION
2295: WHEN No_Data_Found THEN
2296: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2297: l_log_msg := 'Inside No_DATA_FOUND';
2298: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2299: END IF;
2300:
2301: x_revision_num := 1;
2302: END;

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

2304: SELECT LPad(x_revision_num ,3,'0') INTO l_val FROM dual;
2305:
2306: x_segment1 := p_req_number||'-'||l_val;
2307:
2308: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2309: l_log_msg := 'Exiting with values x_revision_num : '||x_revision_num||', x_segment1: '||x_segment1;
2310: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2311: END IF;
2312:

Line 2310: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2306: x_segment1 := p_req_number||'-'||l_val;
2307:
2308: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2309: l_log_msg := 'Exiting with values x_revision_num : '||x_revision_num||', x_segment1: '||x_segment1;
2310: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2311: END IF;
2312:
2313:
2314: END getAmendmentAttributes;

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

2342:
2343: BEGIN
2344:
2345: v_progress := '000';
2346: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2347: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2348: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2349: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2350: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 2348: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2344:
2345: v_progress := '000';
2346: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2347: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2348: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2349: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2350: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2351: END IF;
2352:

Line 2350: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2346: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2347: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2348: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2349: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2350: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2351: END IF;
2352:
2353: -- Creating the sql statement
2354:

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

2417: '',
2418: '',
2419: '');
2420: v_progress := '005';
2421: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2422: l_log_msg := v_progress||' : After merging attachments for Header';
2423: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2424: END IF;
2425: /* Merging attachments - end */

Line 2423: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2419: '');
2420: v_progress := '005';
2421: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2422: l_log_msg := v_progress||' : After merging attachments for Header';
2423: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2424: END IF;
2425: /* Merging attachments - end */
2426:
2427:

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

2427:
2428: EXCEPTION
2429: WHEN OTHERS THEN
2430:
2431: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2432: l_log_msg := v_progress||' : Exception at merge_amendment_header : '|| SQLERRM;
2433: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2434: END IF;
2435: RAISE;

Line 2433: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2429: WHEN OTHERS THEN
2430:
2431: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2432: l_log_msg := v_progress||' : Exception at merge_amendment_header : '|| SQLERRM;
2433: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2434: END IF;
2435: RAISE;
2436: END merge_amendment_header;
2437:

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

2445: l_log_msg VARCHAR2(2000);
2446:
2447:
2448: BEGIN
2449: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2450: l_log_msg := ': Inside procedure '||l_procedure_name;
2451: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2452: END IF;
2453:

Line 2451: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2447:
2448: BEGIN
2449: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2450: l_log_msg := ': Inside procedure '||l_procedure_name;
2451: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2452: END IF;
2453:
2454: SELECT po_req_distributions_s.NEXTVAL
2455: INTO x_new_dist_id

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

2621: WHERE distribution_id = p_from_dist_id;
2622:
2623: EXCEPTION
2624: WHEN OTHERS THEN
2625: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2626: l_log_msg := ' : Exception at create_amd_dist_on_conf_copy: '|| SQLERRM;
2627: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2628: END IF;
2629: RAISE;

Line 2627: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2623: EXCEPTION
2624: WHEN OTHERS THEN
2625: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2626: l_log_msg := ' : Exception at create_amd_dist_on_conf_copy: '|| SQLERRM;
2627: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2628: END IF;
2629: RAISE;
2630:
2631: END create_amd_dist_on_conf_copy;

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

2638: l_procedure_name VARCHAR2(100) := 'update_amd_dist_on_conf_copy';
2639: l_log_msg VARCHAR2(2000);
2640:
2641: BEGIN
2642: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2643: l_log_msg := ': Inside procedure '||l_procedure_name;
2644: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2645: END IF;
2646:

Line 2644: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2640:
2641: BEGIN
2642: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2643: l_log_msg := ': Inside procedure '||l_procedure_name;
2644: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2645: END IF;
2646:
2647: MERGE
2648: INTO po_req_distributions_all target

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

2679: target.change_in_funded_value = Nvl(source.change_in_funded_value,0) ;
2680: -- <>
2681: EXCEPTION
2682: WHEN OTHERS THEN
2683: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2684: l_log_msg := ' : Exception at update_amd_dist_on_conf_copy: '|| SQLERRM;
2685: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2686: END IF;
2687: RAISE;

Line 2685: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2681: EXCEPTION
2682: WHEN OTHERS THEN
2683: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2684: l_log_msg := ' : Exception at update_amd_dist_on_conf_copy: '|| SQLERRM;
2685: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2686: END IF;
2687: RAISE;
2688: END update_amd_dist_on_conf_copy;
2689:

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

2705: l_info_line_temp_id NUMBER;
2706:
2707: BEGIN
2708: v_progress := '000';
2709: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2710: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2711: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2712: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2713: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 2711: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2707: BEGIN
2708: v_progress := '000';
2709: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2710: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2711: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2712: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2713: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2714: END IF;
2715:

Line 2713: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2709: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2710: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
2711: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2712: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
2713: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2714: END IF;
2715:
2716: SELECT distribution_id, requisition_line_id, conformed_dist_id, info_line_id
2717: BULK COLLECT INTO l_distribution_ids, l_req_line_id, l_conformed_dist_ids, l_info_line_id

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

2740:
2741:
2742: EXCEPTION
2743: WHEN OTHERS THEN
2744: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2745: l_log_msg := v_progress||' : Exception at merge_amendment_distribution: '|| SQLERRM;
2746: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2747: END IF;
2748: RAISE;

Line 2746: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2742: EXCEPTION
2743: WHEN OTHERS THEN
2744: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2745: l_log_msg := v_progress||' : Exception at merge_amendment_distribution: '|| SQLERRM;
2746: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2747: END IF;
2748: RAISE;
2749: END merge_amendment_distribution;
2750:

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

2757: l_procedure_name VARCHAR2(100) := 'update_amd_line_on_conf_copy';
2758: l_log_msg VARCHAR2(2000);
2759:
2760: BEGIN
2761: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2762: l_log_msg := ': Inside procedure '||l_procedure_name;
2763: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2764: END IF;
2765:

Line 2763: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2759:
2760: BEGIN
2761: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2762: l_log_msg := ': Inside procedure '||l_procedure_name;
2763: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2764: END IF;
2765:
2766: MERGE
2767: INTO po_requisition_lines_all target

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

2840: target.CLM_MIPR_OBLIGATION_TYPE = source.CLM_MIPR_OBLIGATION_TYPE;
2841:
2842: EXCEPTION
2843: WHEN OTHERS THEN
2844: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2845: l_log_msg := ' : Exception at update_amd_line_on_conf_copy : '|| SQLERRM;
2846: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2847: END IF;
2848: RAISE;

Line 2846: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2842: EXCEPTION
2843: WHEN OTHERS THEN
2844: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2845: l_log_msg := ' : Exception at update_amd_line_on_conf_copy : '|| SQLERRM;
2846: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2847: END IF;
2848: RAISE;
2849:
2850: END update_amd_line_on_conf_copy;

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

2861: l_log_msg VARCHAR2(2000);
2862:
2863:
2864: BEGIN
2865: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2866: l_log_msg := ': Inside procedure '||l_procedure_name;
2867: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2868: END IF;
2869:

Line 2867: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

2863:
2864: BEGIN
2865: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2866: l_log_msg := ': Inside procedure '||l_procedure_name;
2867: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
2868: END IF;
2869:
2870: SELECT po_requisition_lines_s.NEXTVAL
2871: INTO x_new_line_id

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

3299: WHERE source.requisition_line_id = p_from_line_id;
3300:
3301: EXCEPTION
3302: WHEN OTHERS THEN
3303: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3304: l_log_msg := ' : Exception at create_amd_line_on_conf_copy : '|| SQLERRM;
3305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3306: END IF;
3307: RAISE;

Line 3305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3301: EXCEPTION
3302: WHEN OTHERS THEN
3303: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3304: l_log_msg := ' : Exception at create_amd_line_on_conf_copy : '|| SQLERRM;
3305: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3306: END IF;
3307: RAISE;
3308:
3309: END create_amd_line_on_conf_copy;

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

3318: l_log_msg VARCHAR2(2000);
3319:
3320: BEGIN
3321: v_progress := '000';
3322: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3323: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3324: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3325: END IF;
3326:

Line 3324: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3320: BEGIN
3321: v_progress := '000';
3322: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3323: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3324: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3325: END IF;
3326:
3327: /* Merging one time location - start */
3328:

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

3384: WHERE piav.requisition_line_id = p_from_line_id;
3385:
3386: v_progress := '003';
3387:
3388: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3389: l_log_msg := v_progress||' : After merging one time location for line';
3390: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3391: END IF;
3392:

Line 3390: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3386: v_progress := '003';
3387:
3388: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3389: l_log_msg := v_progress||' : After merging one time location for line';
3390: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3391: END IF;
3392:
3393: /* Merging one time location - end */
3394:

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

3425: '');
3426:
3427:
3428: v_progress := '005';
3429: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3430: l_log_msg := v_progress||' : After merging attachments for Lines';
3431: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3432: END IF;
3433: /* Merging attachments - end */

Line 3431: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3427:
3428: v_progress := '005';
3429: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3430: l_log_msg := v_progress||' : After merging attachments for Lines';
3431: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3432: END IF;
3433: /* Merging attachments - end */
3434:
3435: EXCEPTION

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

3433: /* Merging attachments - end */
3434:
3435: EXCEPTION
3436: WHEN OTHERS THEN
3437: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3438: l_log_msg := ' : Exception at update_oneTimeL_and_Atchmnt : '|| SQLERRM;
3439: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3440: END IF;
3441:

Line 3439: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3435: EXCEPTION
3436: WHEN OTHERS THEN
3437: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3438: l_log_msg := ' : Exception at update_oneTimeL_and_Atchmnt : '|| SQLERRM;
3439: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3440: END IF;
3441:
3442: END update_oneTimeL_and_Atchmnt;
3443:

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

3459:
3460: BEGIN
3461:
3462: v_progress := '000';
3463: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3464: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3465: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3466: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3467: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 3465: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3461:
3462: v_progress := '000';
3463: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3464: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3465: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3466: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3467: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3468: END IF;
3469:

Line 3467: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3463: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3464: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3465: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3466: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3467: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3468: END IF;
3469:
3470: SELECT requisition_header_id
3471: INTO l_req_header_id

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

3472: FROM po_requisition_headers_all
3473: WHERE conformed_header_id = p_confirmed_id
3474: AND revision_num = p_revision_num;
3475:
3476: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3477: l_log_msg := v_progress||': req_header_id of the amendment record : '||l_req_header_id;
3478: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3479: END IF;
3480:

Line 3478: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3474: AND revision_num = p_revision_num;
3475:
3476: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3477: l_log_msg := v_progress||': req_header_id of the amendment record : '||l_req_header_id;
3478: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3479: END IF;
3480:
3481: /*
3482: For merging lines, we have to do at line by line basis.

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

3611: merge_amendment_distribution(p_confirmed_id,p_revision_num, line_map);
3612:
3613: EXCEPTION
3614: WHEN OTHERS THEN
3615: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3616: l_log_msg := v_progress||' : Exception at merge_amendment_line: '|| SQLERRM;
3617: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3618: END IF;
3619: RAISE;

Line 3617: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3613: EXCEPTION
3614: WHEN OTHERS THEN
3615: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3616: l_log_msg := v_progress||' : Exception at merge_amendment_line: '|| SQLERRM;
3617: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3618: END IF;
3619: RAISE;
3620: END merge_amendment_line;
3621:

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

3630: max_seq NUMBER;
3631: BEGIN
3632:
3633: v_progress:='000';
3634: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3635: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3636: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3637: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3638: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 3636: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3632:
3633: v_progress:='000';
3634: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3635: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3636: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3637: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3638: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3639: END IF;
3640:

Line 3638: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3634: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3635: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3636: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3637: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3638: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3639: END IF;
3640:
3641: SELECT Max(sequence_num)
3642: INTO max_seq

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

3648: AND object_type_code = 'REQUISITION';
3649:
3650: v_progress:='001';
3651:
3652: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3653: l_log_msg := v_progress||' At procedure merge_action_history: max_seq: '|| max_seq;
3654: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3655: END IF;
3656:

Line 3654: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3650: v_progress:='001';
3651:
3652: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3653: l_log_msg := v_progress||' At procedure merge_action_history: max_seq: '|| max_seq;
3654: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3655: END IF;
3656:
3657: INSERT INTO po_action_history(
3658: object_id,

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

3706: AND revision_num =p_revision_num)
3707: AND object_type_code = 'REQUISITION';
3708:
3709: v_progress:='002';
3710: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3711: l_log_msg := v_progress||' After merging requisition action history';
3712: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3713: END IF;
3714:

Line 3712: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3708:
3709: v_progress:='002';
3710: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3711: l_log_msg := v_progress||' After merging requisition action history';
3712: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3713: END IF;
3714:
3715:
3716: EXCEPTION

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

3714:
3715:
3716: EXCEPTION
3717: WHEN OTHERS THEN
3718: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3719: l_log_msg := v_progress||' : Exception at procedure merge_action_history '|| SQLERRM;
3720: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3721: END IF;
3722: RAISE;

Line 3720: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3716: EXCEPTION
3717: WHEN OTHERS THEN
3718: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3719: l_log_msg := v_progress||' : Exception at procedure merge_action_history '|| SQLERRM;
3720: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3721: END IF;
3722: RAISE;
3723: END merge_action_history;
3724:

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

3734: -- Standard start of API savepoint
3735: SAVEPOINT MERGE_AMENDMENT;
3736:
3737: v_progress:='000';
3738: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3739: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3740: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3741: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3742: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 3740: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3736:
3737: v_progress:='000';
3738: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3739: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3740: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3741: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3742: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3743: END IF;
3744:

Line 3742: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3738: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3739: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3740: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3741: l_log_msg := 'p_confirmed_id : '||p_confirmed_id||', p_revision_num : '||p_revision_num;
3742: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3743: END IF;
3744:
3745: merge_amendment_header(p_confirmed_id,p_revision_num);
3746: v_progress:='001';

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

3761:
3762: EXCEPTION
3763: WHEN OTHERS THEN
3764: ROLLBACK TO SAVEPOINT MERGE_AMENDMENT;
3765: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3766: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
3767: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3768: END IF;
3769: RAISE;

Line 3767: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3763: WHEN OTHERS THEN
3764: ROLLBACK TO SAVEPOINT MERGE_AMENDMENT;
3765: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3766: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
3767: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3768: END IF;
3769: RAISE;
3770: END merge_amendment;
3771:

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

3784: l_log_msg VARCHAR2(2000);
3785: BEGIN
3786:
3787: v_progress := '000';
3788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3789: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3790: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3791: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3792: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 3790: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3786:
3787: v_progress := '000';
3788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3789: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3790: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3791: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3792: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3793: END IF;
3794:

Line 3792: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3789: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3790: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3791: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3792: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3793: END IF;
3794:
3795: -- Standard start of API savepoint
3796: SAVEPOINT CREATE_BASE_COPY;

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

3803: v_progress := '002';
3804: /* Call the procedure to copy the header*/
3805: copy_header(p_from_req_header_id, 0, x_to_req_header_id, x_return_status, x_return_msg);
3806:
3807: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3808: l_log_msg := v_progress||' : Procedure copy_header: x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id ||' x_return_msg: '||x_return_msg;
3809: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3810: END IF;
3811:

Line 3809: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3805: copy_header(p_from_req_header_id, 0, x_to_req_header_id, x_return_status, x_return_msg);
3806:
3807: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3808: l_log_msg := v_progress||' : Procedure copy_header: x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id ||' x_return_msg: '||x_return_msg;
3809: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3810: END IF;
3811:
3812: copy_lines(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3813:

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

3810: END IF;
3811:
3812: copy_lines(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3813:
3814: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3815: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3816: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3817: END IF;
3818:

Line 3816: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3812: copy_lines(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3813:
3814: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3815: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3816: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3817: END IF;
3818:
3819: v_progress := '003';
3820: --Copy Uda lines into base version.

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

3819: v_progress := '003';
3820: --Copy Uda lines into base version.
3821: POR_UDA_PKG.copy_uda_header(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3822:
3823: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3824: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3825: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3826: END IF;
3827:

Line 3825: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3821: POR_UDA_PKG.copy_uda_header(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3822:
3823: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3824: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3825: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3826: END IF;
3827:
3828: v_progress := '004';
3829: POR_UDA_PKG.copy_uda_line(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);

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

3827:
3828: v_progress := '004';
3829: POR_UDA_PKG.copy_uda_line(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3830:
3831: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3832: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3833: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3834: END IF;
3835:

Line 3833: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3829: POR_UDA_PKG.copy_uda_line(p_from_req_header_id, x_to_req_header_id, x_return_status, x_return_msg);
3830:
3831: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3832: l_log_msg := v_progress||' : x_return_status: '||x_return_status ||' x_to_req_header_id: '||x_to_req_header_id||' x_return_msg: '||x_return_msg;
3833: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3834: END IF;
3835:
3836: v_progress := '005';
3837:

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

3836: v_progress := '005';
3837:
3838: COMMIT;
3839:
3840: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3841: l_log_msg := v_progress||' : After Commit';
3842: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3843: END IF;
3844:

Line 3842: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3838: COMMIT;
3839:
3840: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3841: l_log_msg := v_progress||' : After Commit';
3842: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3843: END IF;
3844:
3845:
3846: EXCEPTION

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

3846: EXCEPTION
3847: WHEN OTHERS THEN
3848: ROLLBACK TO SAVEPOINT CREATE_BASE_COPY;
3849:
3850: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3851: l_log_msg := v_progress||' : Exception at create_base_copy: '|| SQLERRM;
3852: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3853: END IF;
3854: RAISE;

Line 3852: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3848: ROLLBACK TO SAVEPOINT CREATE_BASE_COPY;
3849:
3850: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3851: l_log_msg := v_progress||' : Exception at create_base_copy: '|| SQLERRM;
3852: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3853: END IF;
3854: RAISE;
3855: END create_base_copy;
3856:

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

3868: BEGIN
3869:
3870: v_progress := '000';
3871: x_return_status := FND_API.g_ret_sts_success;
3872: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3873: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3874: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3875: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3876: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 3874: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3870: v_progress := '000';
3871: x_return_status := FND_API.g_ret_sts_success;
3872: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3873: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3874: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3875: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3876: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3877: END IF;
3878:

Line 3876: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3872: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3873: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
3874: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3875: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
3876: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3877: END IF;
3878:
3879: x_return_msg := NULL;
3880:

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

3882: INTO x_to_req_header_id
3883: FROM dual;
3884:
3885: v_progress := '001';
3886: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3887: l_log_msg := v_progress||' : x_to_req_header_id: ' ||x_to_req_header_id;
3888: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3889: END IF;
3890:

Line 3888: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

3884:
3885: v_progress := '001';
3886: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3887: l_log_msg := v_progress||' : x_to_req_header_id: ' ||x_to_req_header_id;
3888: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
3889: END IF;
3890:
3891:
3892: INSERT INTO po_requisition_headers_all (

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

4074: FROM po_requisition_headers_all
4075: WHERE requisition_header_id = p_from_req_header_id;
4076:
4077: v_progress := '002';
4078: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4079: l_log_msg := v_progress||' : After insert into po_requisition_headers_all';
4080: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4081: END IF;
4082:

Line 4080: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4076:
4077: v_progress := '002';
4078: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4079: l_log_msg := v_progress||' : After insert into po_requisition_headers_all';
4080: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4081: END IF;
4082:
4083:
4084: /* Copying header level attachments */

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

4101: '',
4102: '');
4103:
4104: v_progress := '003';
4105: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4106: l_log_msg := v_progress||' : After copying header level attachments';
4107: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4108: END IF;
4109:

Line 4107: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4103:
4104: v_progress := '003';
4105: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4106: l_log_msg := v_progress||' : After copying header level attachments';
4107: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4108: END IF;
4109:
4110: /* Copying header level attachments - end */
4111:

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

4114:
4115: x_return_msg := SQLERRM;
4116: x_return_status := FND_API.g_ret_sts_error;
4117:
4118: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4119: l_log_msg := v_progress||' : Exception at copy_header: '|| SQLERRM;
4120: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4121: END IF;
4122:

Line 4120: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4116: x_return_status := FND_API.g_ret_sts_error;
4117:
4118: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4119: l_log_msg := v_progress||' : Exception at copy_header: '|| SQLERRM;
4120: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4121: END IF;
4122:
4123: RAISE;
4124: END copy_header;

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

4151: v_progress := '000';
4152:
4153: x_return_status := fnd_api.G_RET_STS_SUCCESS;
4154:
4155: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4156: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4157: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4158: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id || ' p_to_req_header_id: '||p_to_req_header_id;
4159: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 4157: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4153: x_return_status := fnd_api.G_RET_STS_SUCCESS;
4154:
4155: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4156: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4157: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4158: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id || ' p_to_req_header_id: '||p_to_req_header_id;
4159: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4160: END IF;
4161:

Line 4159: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4155: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4156: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4157: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4158: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id || ' p_to_req_header_id: '||p_to_req_header_id;
4159: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4160: END IF;
4161:
4162: x_return_msg := NULL;
4163:

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

4598: WHERE prl.requisition_line_id = from_req_line_id;
4599:
4600: v_progress := '002';
4601:
4602: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4603: l_log_msg := v_progress||' : After inserting line: '||to_req_line_id;
4604: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4605: END IF;
4606:

Line 4604: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4600: v_progress := '002';
4601:
4602: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4603: l_log_msg := v_progress||' : After inserting line: '||to_req_line_id;
4604: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4605: END IF;
4606:
4607: /* Copying header level attachments */
4608:

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

4624: '',
4625: '');
4626:
4627: v_progress := '003';
4628: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4629: l_log_msg := v_progress||' : After copying line level attachments';
4630: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4631: END IF;
4632:

Line 4630: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4626:
4627: v_progress := '003';
4628: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4629: l_log_msg := v_progress||' : After copying line level attachments';
4630: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4631: END IF;
4632:
4633: /* Copying header level attachments - end */
4634:

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

4691: AND item_type = 'AD_HOC_LOCATION';
4692:
4693: v_progress := '005';
4694:
4695: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4696: l_log_msg := v_progress||' : After copying one time location for line: '||to_req_line_id;
4697: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4698: END IF;
4699:

Line 4697: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4693: v_progress := '005';
4694:
4695: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4696: l_log_msg := v_progress||' : After copying one time location for line: '||to_req_line_id;
4697: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4698: END IF;
4699:
4700: /* Copying One Time location - end */
4701:

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

4702: copy_distributions(from_req_line_id,to_req_line_id,x_return_status,x_return_msg);
4703:
4704: v_progress := '006';
4705:
4706: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4707: l_log_msg := v_progress||' : After inserting distributions for line: '||to_req_line_id;
4708: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4709: END IF;
4710:

Line 4708: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4704: v_progress := '006';
4705:
4706: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4707: l_log_msg := v_progress||' : After inserting distributions for line: '||to_req_line_id;
4708: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4709: END IF;
4710:
4711: END LOOP;
4712:

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

4711: END LOOP;
4712:
4713: v_progress := '007';
4714:
4715: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4716: l_log_msg := v_progress||' : After insert into po_requisition_lines_all and po_req_distributions_all';
4717: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4718: END IF;
4719:

Line 4717: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4713: v_progress := '007';
4714:
4715: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4716: l_log_msg := v_progress||' : After insert into po_requisition_lines_all and po_req_distributions_all';
4717: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4718: END IF;
4719:
4720: EXCEPTION
4721: WHEN OTHERS THEN

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

4722:
4723: x_return_msg := SQLERRM;
4724: x_return_status := FND_API.g_ret_sts_error;
4725:
4726: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4727: l_log_msg := v_progress||' : Exception at copy_lines: '|| SQLERRM;
4728: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4729: END IF;
4730: RAISE;

Line 4728: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4724: x_return_status := FND_API.g_ret_sts_error;
4725:
4726: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4727: l_log_msg := v_progress||' : Exception at copy_lines: '|| SQLERRM;
4728: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4729: END IF;
4730: RAISE;
4731: END copy_lines;
4732:

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

4746: BEGIN
4747:
4748: v_progress := '000';
4749: x_return_status := fnd_api.G_RET_STS_SUCCESS;
4750: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4751: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4752: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4753: l_log_msg := 'p_from_req_line_id: ' ||p_from_req_line_id || ' p_to_req_line_id: '||p_to_req_line_id;
4754: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 4752: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4748: v_progress := '000';
4749: x_return_status := fnd_api.G_RET_STS_SUCCESS;
4750: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4751: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4752: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4753: l_log_msg := 'p_from_req_line_id: ' ||p_from_req_line_id || ' p_to_req_line_id: '||p_to_req_line_id;
4754: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4755: END IF;
4756:

Line 4754: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4750: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4751: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
4752: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4753: l_log_msg := 'p_from_req_line_id: ' ||p_from_req_line_id || ' p_to_req_line_id: '||p_to_req_line_id;
4754: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4755: END IF;
4756:
4757: x_return_msg := NULL;
4758:

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

4926: WHERE requisition_line_id = p_from_req_line_id;
4927:
4928: v_progress := '001';
4929:
4930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4931: l_log_msg := v_progress||' : After inserting distribution';
4932: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4933: END IF;
4934:

Line 4932: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4928: v_progress := '001';
4929:
4930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4931: l_log_msg := v_progress||' : After inserting distribution';
4932: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4933: END IF;
4934:
4935: EXCEPTION
4936: WHEN OTHERS THEN

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

4937:
4938: x_return_msg := SQLERRM;
4939: x_return_status := FND_API.g_ret_sts_error;
4940:
4941: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4942: l_log_msg := v_progress||' : Exception at copy_distributions: '|| SQLERRM;
4943: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4944: END IF;
4945: RAISE;

Line 4943: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4939: x_return_status := FND_API.g_ret_sts_error;
4940:
4941: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4942: l_log_msg := v_progress||' : Exception at copy_distributions: '|| SQLERRM;
4943: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4944: END IF;
4945: RAISE;
4946: END copy_distributions;
4947:

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

4952: l_procedure_name VARCHAR2(100) := 'carry_auto_aceept_and_reject';
4953: l_log_msg VARCHAR2(2000);
4954: BEGIN
4955:
4956: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4957: l_log_msg := ' Begin ';
4958: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4959: END IF;
4960:

Line 4958: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

4954: BEGIN
4955:
4956: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
4957: l_log_msg := ' Begin ';
4958: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
4959: END IF;
4960:
4961: --First update all those lines and distribution to accepted whose
4962: --conformed_ids are null and they are CLIN

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

5012: WHERE prla1.requisition_line_id = prla.conformed_line_id
5013: AND prla1.line_location_id IS NULL
5014: AND prla1.auction_header_id is NULL));
5015:
5016: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5017: l_log_msg := ' Auto Accept completed';
5018: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5019: END IF;
5020:

Line 5018: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5014: AND prla1.auction_header_id is NULL));
5015:
5016: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5017: l_log_msg := ' Auto Accept completed';
5018: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5019: END IF;
5020:
5021:
5022: END carry_auto_aceept_and_reject;

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

5608: END IF;
5609:
5610: EXCEPTION
5611: WHEN OTHERS THEN
5612: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5613: l_log_msg := x_progress||'CException: '||SQLERRM;
5614: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);
5615:
5616: END IF;

Line 5614: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);

5610: EXCEPTION
5611: WHEN OTHERS THEN
5612: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5613: l_log_msg := x_progress||'CException: '||SQLERRM;
5614: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);
5615:
5616: END IF;
5617: wf_core.context('POR_AMENDMENT_PKG','amendment_post_merge_actions',x_progress);
5618: raise;

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

5637:
5638: x_return_status := FND_API.g_ret_sts_success;
5639:
5640: v_progress := '000';
5641: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5642: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
5643: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5644: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
5645: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 5643: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5639:
5640: v_progress := '000';
5641: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5642: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
5643: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5644: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
5645: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5646: END IF;
5647:

Line 5645: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5641: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5642: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
5643: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5644: l_log_msg := 'p_from_req_header_id: ' ||p_from_req_header_id;
5645: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5646: END IF;
5647:
5648: -- Standard start of API savepoint
5649: SAVEPOINT CREATE_CANCEL_AMENDMENT;

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

5658:
5659: /* Call the procedure to copy the header*/
5660: copy_header(p_from_req_header_id, l_revision_num+1, l_to_req_header_id, l_return_status, l_return_msg);
5661:
5662: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5663: l_log_msg := v_progress||' : Procedure copy_header: l_return_status: '||l_return_status ||' l_to_req_header_id: '||l_to_req_header_id ||' l_return_msg: '||l_return_msg;
5664: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5665: END IF;
5666:

Line 5664: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5660: copy_header(p_from_req_header_id, l_revision_num+1, l_to_req_header_id, l_return_status, l_return_msg);
5661:
5662: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5663: l_log_msg := v_progress||' : Procedure copy_header: l_return_status: '||l_return_status ||' l_to_req_header_id: '||l_to_req_header_id ||' l_return_msg: '||l_return_msg;
5664: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5665: END IF;
5666:
5667: update po_requisition_headers_all
5668: set amendment_reason = p_cancel_Reason

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

5671: v_progress := '002';
5672:
5673: copy_lines(p_from_req_header_id, l_to_req_header_id, l_return_status, l_return_msg);
5674:
5675: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5676: l_log_msg := v_progress||' : l_return_status: '||l_return_status ||' l_to_req_header_id: '||l_to_req_header_id||' l_return_msg: '||l_return_msg;
5677: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5678: END IF;
5679:

Line 5677: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5673: copy_lines(p_from_req_header_id, l_to_req_header_id, l_return_status, l_return_msg);
5674:
5675: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5676: l_log_msg := v_progress||' : l_return_status: '||l_return_status ||' l_to_req_header_id: '||l_to_req_header_id||' l_return_msg: '||l_return_msg;
5677: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5678: END IF;
5679:
5680: x_return_status := l_return_status;
5681: x_amendment_header_id := l_to_req_header_id;

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

5683: EXCEPTION
5684: WHEN OTHERS THEN
5685: ROLLBACK TO SAVEPOINT CREATE_CANCEL_AMENDMENT;
5686:
5687: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5688: l_log_msg := v_progress||' : Exception at CREATE_CANCEL_AMENDMENT: '|| SQLERRM;
5689: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5690: END IF;
5691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5689: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5685: ROLLBACK TO SAVEPOINT CREATE_CANCEL_AMENDMENT;
5686:
5687: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5688: l_log_msg := v_progress||' : Exception at CREATE_CANCEL_AMENDMENT: '|| SQLERRM;
5689: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5690: END IF;
5691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5692:
5693: END create_cancel_amendment;

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

5703:
5704: BEGIN
5705:
5706: v_progress := '000';
5707: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5708: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
5709: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5710: END IF;
5711:

Line 5709: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5705:
5706: v_progress := '000';
5707: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5708: l_log_msg := v_progress||': Inside procedure '||l_procedure_name;
5709: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5710: END IF;
5711:
5712:
5713: v_progress := '001';

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

5719: cancel_flag='Y'
5720: where requisition_header_id = p_req_header_id
5721: and conformed_line_id = p_line_id_list(i);
5722:
5723: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5724: l_log_msg := v_progress||': Bulk set amendment type completed'||l_procedure_name;
5725: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5726: END IF;
5727:

Line 5725: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5721: and conformed_line_id = p_line_id_list(i);
5722:
5723: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5724: l_log_msg := v_progress||': Bulk set amendment type completed'||l_procedure_name;
5725: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5726: END IF;
5727:
5728: EXCEPTION
5729: WHEN OTHERS THEN

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

5727:
5728: EXCEPTION
5729: WHEN OTHERS THEN
5730:
5731: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5732: l_log_msg := v_progress||' : Exception at set_amend_lines_cancel: '|| SQLERRM;
5733: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5734: END IF;
5735: raise;

Line 5733: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5729: WHEN OTHERS THEN
5730:
5731: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5732: l_log_msg := v_progress||' : Exception at set_amend_lines_cancel: '|| SQLERRM;
5733: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5734: END IF;
5735: raise;
5736:
5737: END set_amend_lines_cancel;

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

5848:
5849: --introduced to hold the value of drop_ship_flag for shipments
5850: BEGIN
5851:
5852: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5853: l_log_msg := l_progress||' Create_distributions: po_line_loc_id: '||x_line_location_id;
5854: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5855:
5856: l_log_msg := l_progress||' Create_distributions: po_release_id: '||x_po_release_id;

Line 5854: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5850: BEGIN
5851:
5852: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5853: l_log_msg := l_progress||' Create_distributions: po_line_loc_id: '||x_line_location_id;
5854: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5855:
5856: l_log_msg := l_progress||' Create_distributions: po_release_id: '||x_po_release_id;
5857: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5858:

Line 5857: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5853: l_log_msg := l_progress||' Create_distributions: po_line_loc_id: '||x_line_location_id;
5854: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5855:
5856: l_log_msg := l_progress||' Create_distributions: po_release_id: '||x_po_release_id;
5857: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5858:
5859: END IF;
5860:
5861: /*

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

5885: FROM po_requisition_lines_all
5886: WHERE requisition_line_id = x_requisition_line_id);
5887:
5888:
5889: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5890: l_log_msg := l_progress||'Create_distributions: Order type: '||x_order_type_lookup_code;
5891: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5892:
5893: END IF;

Line 5891: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5887:
5888:
5889: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5890: l_log_msg := l_progress||'Create_distributions: Order type: '||x_order_type_lookup_code;
5891: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5892:
5893: END IF;
5894:
5895: SELECT PRH.org_id

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

5974: Exception
5975: WHEN NO_DATA_FOUND THEN
5976: /* Not all req has kanban id */
5977:
5978: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5979: l_log_msg := l_progress||'NO_DATA_FOUND: '||SQLERRM;
5980: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5981:
5982: END IF;

Line 5980: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5976: /* Not all req has kanban id */
5977:
5978: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5979: l_log_msg := l_progress||'NO_DATA_FOUND: '||SQLERRM;
5980: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5981:
5982: END IF;
5983:
5984: WHEN OTHERS THEN

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

5981:
5982: END IF;
5983:
5984: WHEN OTHERS THEN
5985: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5986: l_log_msg := l_progress||'OTHER EXCEPTON: '||SQLERRM;
5987: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5988:
5989: END IF;

Line 5987: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

5983:
5984: WHEN OTHERS THEN
5985: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
5986: l_log_msg := l_progress||'OTHER EXCEPTON: '||SQLERRM;
5987: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5988:
5989: END IF;
5990:
5991: raise;

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

6051: WHERE pol.po_line_id = pll.po_line_id
6052: AND pll.line_location_id = x_line_location_id;
6053:
6054:
6055: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6056: l_log_msg := l_progress||'Create_distributions: PO UOM is: '||x_po_uom;
6057: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6058:
6059: END IF;

Line 6057: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6053:
6054:
6055: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6056: l_log_msg := l_progress||'Create_distributions: PO UOM is: '||x_po_uom;
6057: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6058:
6059: END IF;
6060:
6061:

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

6069: WHERE prl.requisition_line_id = x_requisition_line_id;
6070:
6071:
6072:
6073: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6074: l_log_msg := l_progress||'Create_distributions: Req UOM is: '||x_req_uom;
6075: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6076:
6077: END IF;

Line 6075: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6071:
6072:
6073: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6074: l_log_msg := l_progress||'Create_distributions: Req UOM is: '||x_req_uom;
6075: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6076:
6077: END IF;
6078:
6079:

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

6092: x_conversion_rate := 1;
6093:
6094: end if;
6095:
6096: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6097: l_log_msg := l_progress||'Create_distributions: Conversion rate is: '||x_conversion_rate;
6098: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6099:
6100: END IF;

Line 6098: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6094: end if;
6095:
6096: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6097: l_log_msg := l_progress||'Create_distributions: Conversion rate is: '||x_conversion_rate;
6098: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6099:
6100: END IF;
6101:
6102:

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

6511:
6512: EXCEPTION
6513: WHEN OTHERS THEN
6514:
6515: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6516: l_log_msg := l_progress||'CException: '||SQLERRM;
6517: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6518:
6519: END IF;

Line 6517: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6513: WHEN OTHERS THEN
6514:
6515: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6516: l_log_msg := l_progress||'CException: '||SQLERRM;
6517: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6518:
6519: END IF;
6520: po_message_s.sql_error('CREATE_DISTRIBUTIONS',l_progress,sqlcode);
6521: raise;

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

6566:
6567: BEGIN
6568:
6569: l_progress :='000';
6570: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6571: l_log_msg := 'Invoked '||l_procedure_name;
6572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6573: END IF;
6574:

Line 6572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6568:
6569: l_progress :='000';
6570: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6571: l_log_msg := 'Invoked '||l_procedure_name;
6572: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6573: END IF;
6574:
6575: OPEN valid_lines(x_req_line_id);
6576:

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

6587:
6588: EXCEPTION
6589: WHEN OTHERS THEN
6590:
6591: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6592: l_log_msg := l_progress||'Exception: '||SQLERRM;
6593: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6594:
6595: END IF;

Line 6593: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6589: WHEN OTHERS THEN
6590:
6591: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6592: l_log_msg := l_progress||'Exception: '||SQLERRM;
6593: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6594:
6595: END IF;
6596: raise;
6597: END implement_dist_auto;

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

6622:
6623: BEGIN
6624:
6625: l_progress :='000';
6626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6627: l_log_msg := 'Invoked '||l_procedure_name;
6628: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6629: END IF;
6630:

Line 6628: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6624:
6625: l_progress :='000';
6626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6627: l_log_msg := 'Invoked '||l_procedure_name;
6628: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6629: END IF;
6630:
6631: IF dest_doc_id IS NOT NULL THEN
6632: auction_id := To_Number(dest_doc_id);

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

6642: AND slin.group_line_id IS NOT NULL ;
6643: END IF;
6644:
6645: l_progress :='001';
6646: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6647: l_log_msg := 'valid slin found in'||l_procedure_name;
6648: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6649: END IF;
6650:

Line 6648: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6644:
6645: l_progress :='001';
6646: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6647: l_log_msg := 'valid slin found in'||l_procedure_name;
6648: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6649: END IF;
6650:
6651: po_negotiations_sv1.add_line_to_negotiation(auction_id,x_req_line_id,x_result,x_error_code,x_error_message );
6652:

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

6651: po_negotiations_sv1.add_line_to_negotiation(auction_id,x_req_line_id,x_result,x_error_code,x_error_message );
6652:
6653:
6654: l_progress :='002';
6655: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6656: l_log_msg := 'sourcing API called in '||l_procedure_name;
6657: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6658: END IF;
6659:

Line 6657: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6653:
6654: l_progress :='002';
6655: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6656: l_log_msg := 'sourcing API called in '||l_procedure_name;
6657: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6658: END IF;
6659:
6660:
6661: EXCEPTION

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

6659:
6660:
6661: EXCEPTION
6662: WHEN NO_DATA_FOUND THEN
6663: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6664: l_log_msg := l_progress||'No Valid Slin Found '||SQLERRM;
6665: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6666: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6667: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 6665: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6661: EXCEPTION
6662: WHEN NO_DATA_FOUND THEN
6663: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6664: l_log_msg := l_progress||'No Valid Slin Found '||SQLERRM;
6665: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6666: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6667: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6668:
6669: END IF;

Line 6667: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6663: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6664: l_log_msg := l_progress||'No Valid Slin Found '||SQLERRM;
6665: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6666: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6667: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6668:
6669: END IF;
6670:
6671:

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

6670:
6671:
6672: WHEN OTHERS THEN
6673:
6674: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6675: l_log_msg := l_progress||'Exception: '||SQLERRM;
6676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6677: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6678: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

Line 6676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6672: WHEN OTHERS THEN
6673:
6674: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6675: l_log_msg := l_progress||'Exception: '||SQLERRM;
6676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6677: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6678: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6679:
6680:

Line 6678: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6674: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6675: l_log_msg := l_progress||'Exception: '||SQLERRM;
6676: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6677: l_log_msg := 'x_error_code:'|| x_error_code|| ' x_error_message:'||x_error_message;
6678: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6679:
6680:
6681: END IF;
6682: raise;

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

6728: BEGIN
6729:
6730: v_progress := '000';
6731:
6732: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6733: l_log_msg := 'Inside procedure '||l_procedure_name;
6734: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6735: END IF;
6736:

Line 6734: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6730: v_progress := '000';
6731:
6732: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6733: l_log_msg := 'Inside procedure '||l_procedure_name;
6734: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6735: END IF;
6736:
6737: rec_index := 1;
6738:

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

6744: INTO p_sequence_num
6745: FROM DUAL;
6746: END IF;
6747:
6748: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6749: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
6750: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6751: END IF;
6752:

Line 6750: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6746: END IF;
6747:
6748: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6749: l_log_msg := v_progress||' : Getting sequence number: '||p_sequence_num;
6750: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6751: END IF;
6752:
6753: SELECT getLatestAmendmentNum(prh.requisition_header_id)
6754: INTO x_amendment_num

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

6875:
6876: EXCEPTION
6877: WHEN others THEN
6878:
6879: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6880: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
6881: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6882: END IF;
6883: RAISE;

Line 6881: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6877: WHEN others THEN
6878:
6879: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6880: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
6881: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6882: END IF;
6883: RAISE;
6884:
6885: END compare_for_implement;

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

6931:
6932: BEGIN
6933:
6934: v_progress:='000';
6935: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6936: l_log_msg := 'Invoked '||l_procedure_name;
6937: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6938: END IF;
6939:

Line 6937: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

6933:
6934: v_progress:='000';
6935: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
6936: l_log_msg := 'Invoked '||l_procedure_name;
6937: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
6938: END IF;
6939:
6940: -- SQL What: Querying the archive table for the given revision_num and previous revision_num
6941: -- SQL Why: Need to compare the values for each column

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

7071: END IF;
7072:
7073:
7074: v_progress:='001';
7075: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7076: l_log_msg := v_progress||' : After creating queries';
7077: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7078: END IF;
7079:

Line 7077: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7073:
7074: v_progress:='001';
7075: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7076: l_log_msg := v_progress||' : After creating queries';
7077: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7078: END IF;
7079:
7080:
7081: -- Comparing the data between two revisions

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

7083:
7084:
7085:
7086: v_progress:='002';
7087: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7088: l_log_msg := v_progress||' : After comparing two revisions';
7089: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7090: END IF;
7091:

Line 7089: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7085:
7086: v_progress:='002';
7087: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7088: l_log_msg := v_progress||' : After comparing two revisions';
7089: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7090: END IF;
7091:
7092:
7093: -- Insert the comparison result into the temp table

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

7093: -- Insert the comparison result into the temp table
7094: insert_changes(p_sequence_num,p_from_req_line_id);
7095:
7096: v_progress:='003';
7097: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7098: l_log_msg := v_progress||' : After cinserting into the temp table';
7099: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7100: END IF;
7101:

Line 7099: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7095:
7096: v_progress:='003';
7097: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7098: l_log_msg := v_progress||' : After cinserting into the temp table';
7099: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7100: END IF;
7101:
7102:
7103: EXCEPTION

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

7102:
7103: EXCEPTION
7104: WHEN others THEN
7105:
7106: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7107: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
7108: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7109: END IF;
7110: RAISE;

Line 7108: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7104: WHEN others THEN
7105:
7106: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7107: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
7108: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7109: END IF;
7110: RAISE;
7111:
7112: END compare_table_for_implement;

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

7149:
7150: BEGIN
7151:
7152: v_progress:='000';
7153: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7154: l_log_msg := 'Invoked '||l_procedure_name;
7155: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7156: END IF;
7157:

Line 7155: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7151:
7152: v_progress:='000';
7153: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7154: l_log_msg := 'Invoked '||l_procedure_name;
7155: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7156: END IF;
7157:
7158: IF implement_mode = 'ACCEPT' THEN
7159: FOR i IN 1..selected_lines.count

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

7270:
7271: EXCEPTION
7272: WHEN others THEN
7273:
7274: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7275: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
7276: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7277: END IF;
7278: RAISE;

Line 7276: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7272: WHEN others THEN
7273:
7274: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7275: l_log_msg := v_progress||' : Exception : '|| SQLERRM;
7276: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7277: END IF;
7278: RAISE;
7279:
7280: END implement_amendment_changes;

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

7411: END IF;
7412:
7413: EXCEPTION
7414: WHEN OTHERS THEN
7415: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7416: l_log_msg := x_progress||'CException: '||SQLERRM;
7417: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);
7418:
7419: END IF;

Line 7417: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);

7413: EXCEPTION
7414: WHEN OTHERS THEN
7415: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7416: l_log_msg := x_progress||'CException: '||SQLERRM;
7417: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_api_name, l_log_msg);
7418:
7419: END IF;
7420: wf_core.context('POR_AMENDMENT_PKG','set_amendment_related_attrib',x_progress);
7421: raise;

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

7843:
7844: EXCEPTION
7845: WHEN others THEN
7846:
7847: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7848: l_log_msg := l_progress||' : Exception at function getUDAAttributeName : '|| SQLERRM;
7849: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7850: END IF;
7851: RETURN p_node_name;

Line 7849: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

7845: WHEN others THEN
7846:
7847: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
7848: l_log_msg := l_progress||' : Exception at function getUDAAttributeName : '|| SQLERRM;
7849: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
7850: END IF;
7851: RETURN p_node_name;
7852:
7853: END getUDAAttributeName;

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

8023:
8024: EXCEPTION
8025: WHEN others THEN
8026:
8027: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
8028: l_log_msg := l_progress||' : Exception at function getUDAAttributeValue : '|| SQLERRM;
8029: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
8030: END IF;
8031: RETURN l_attr_disp_value;

Line 8029: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);

8025: WHEN others THEN
8026:
8027: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
8028: l_log_msg := l_progress||' : Exception at function getUDAAttributeValue : '|| SQLERRM;
8029: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
8030: END IF;
8031: RETURN l_attr_disp_value;
8032:
8033: END getUDAAttributeValue;