DBA Data[Home] [Help]

APPS.MSD_LIABILITY dependencies on FND_FILE

Line 19: fnd_file.put_line(fnd_file.log, p_text);

15:
16: Begin
17:
18: if (p_text is not NULL) then
19: fnd_file.put_line(fnd_file.log, p_text);
20:
21: end if;
22:
23:

Line 36: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);

32: Begin
33:
34: if p_msg_type = DEBUG and C_MSC_DEBUG = 'Y' then
35:
36: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);
37:
38: elsif p_msg_type = ERROR then
39:
40: fnd_file.put_line(fnd_file.log, '**ERROR**:'||p_text);

Line 40: fnd_file.put_line(fnd_file.log, '**ERROR**:'||p_text);

36: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);
37:
38: elsif p_msg_type = ERROR then
39:
40: fnd_file.put_line(fnd_file.log, '**ERROR**:'||p_text);
41:
42: elsif p_msg_type = WARNING then
43:
44: fnd_file.put_line(fnd_file.log, 'WARNING:'||p_text);

Line 44: fnd_file.put_line(fnd_file.log, 'WARNING:'||p_text);

40: fnd_file.put_line(fnd_file.log, '**ERROR**:'||p_text);
41:
42: elsif p_msg_type = WARNING then
43:
44: fnd_file.put_line(fnd_file.log, 'WARNING:'||p_text);
45:
46: elsif p_msg_type = INFORMATION then
47:
48: fnd_file.put_line(fnd_file.log, 'INFO:'||p_text);

Line 48: fnd_file.put_line(fnd_file.log, 'INFO:'||p_text);

44: fnd_file.put_line(fnd_file.log, 'WARNING:'||p_text);
45:
46: elsif p_msg_type = INFORMATION then
47:
48: fnd_file.put_line(fnd_file.log, 'INFO:'||p_text);
49:
50: elsif p_msg_type =SUCCESS then
51:
52: fnd_file.put_line(fnd_file.log, 'SUCCESS:'||p_text);

Line 52: fnd_file.put_line(fnd_file.log, 'SUCCESS:'||p_text);

48: fnd_file.put_line(fnd_file.log, 'INFO:'||p_text);
49:
50: elsif p_msg_type =SUCCESS then
51:
52: fnd_file.put_line(fnd_file.log, 'SUCCESS:'||p_text);
53:
54: elsif p_msg_type = DEBUG then
55:
56: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);

Line 56: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);

52: fnd_file.put_line(fnd_file.log, 'SUCCESS:'||p_text);
53:
54: elsif p_msg_type = DEBUG then
55:
56: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);
57:
58: else
59:
60: fnd_file.put_line(fnd_file.log, 'FATAL_ERROR :'||p_text);

Line 60: fnd_file.put_line(fnd_file.log, 'FATAL_ERROR :'||p_text);

56: fnd_file.put_line(fnd_file.log, 'DEBUG:'||p_text);
57:
58: else
59:
60: fnd_file.put_line(fnd_file.log, 'FATAL_ERROR :'||p_text);
61:
62: end if ;
63:
64: End;

Line 687: fnd_file.put_line(fnd_file.log , sqlerrm );

683: EXCEPTION
684: WHEN others THEN
685: retcode := -1;
686: errbuf := substr(SQLERRM,1,150);
687: fnd_file.put_line(fnd_file.log , sqlerrm );
688:
689: END;
690: retcode := -1 ;
691: errbuf := substr(SQLERRM,1,150);

Line 799: --- fnd_file.put_line(fnd_file.log,'ERROR: Dim- '||get_dim_no_lvl_rec.dp_dimension_code||' Hierarchy- '||get_dim_no_lvl_rec.hierarchy_name||' Level-'||get_dim_no_lvl_rec.level_name||' No Data') ;

795: FOR get_dim_no_lvl_rec IN get_dim_no_lvl(x_plan_id)
796:
797:
798: LOOP
799: --- fnd_file.put_line(fnd_file.log,'ERROR: Dim- '||get_dim_no_lvl_rec.dp_dimension_code||' Hierarchy- '||get_dim_no_lvl_rec.hierarchy_name||' Level-'||get_dim_no_lvl_rec.level_name||' No Data') ;
800:
801: display_message( ' Dim '||get_dim_no_lvl_rec.dp_dimension_code||' Hierarchy- '||get_dim_no_lvl_rec.hierarchy_name||' Level-'||get_dim_no_lvl_rec.level_name||' No Data', ERROR) ;
802:
803:

Line 813: --- fnd_file.put_line(fnd_file.log, 'Note : Possible Causes of Error ') ;

809: END LOOP;
810:
811: IF retcode = 2 THEN
812:
813: --- fnd_file.put_line(fnd_file.log, 'Note : Possible Causes of Error ') ;
814:
815: display_message( 'Possible Causes of Error ' , INFORMATION ) ;
816:
817: ---fnd_file.put_line(fnd_file.log, '1. There is no Agreement defined for the any of the item/suppliers/org included in this Plan ') ;

Line 817: ---fnd_file.put_line(fnd_file.log, '1. There is no Agreement defined for the any of the item/suppliers/org included in this Plan ') ;

813: --- fnd_file.put_line(fnd_file.log, 'Note : Possible Causes of Error ') ;
814:
815: display_message( 'Possible Causes of Error ' , INFORMATION ) ;
816:
817: ---fnd_file.put_line(fnd_file.log, '1. There is no Agreement defined for the any of the item/suppliers/org included in this Plan ') ;
818:
819: display_message( '1. There is no Agreement defined for the any of the item/suppliers/org included in this Plan ',INFORMATION) ;
820:
821:

Line 822: --- fnd_file.put_line(fnd_file.log,' 2. The ASCP Plan has not been run') ;

818:
819: display_message( '1. There is no Agreement defined for the any of the item/suppliers/org included in this Plan ',INFORMATION) ;
820:
821:
822: --- fnd_file.put_line(fnd_file.log,' 2. The ASCP Plan has not been run') ;
823:
824: display_message(' 2. The ASCP Plan has not been run',INFORMATION) ;
825:
826: --fnd_file.put_line(fnd_file.log, ' 3. The Plan out put of the given ASCP Plan has been purged ') ;

Line 826: --fnd_file.put_line(fnd_file.log, ' 3. The Plan out put of the given ASCP Plan has been purged ') ;

822: --- fnd_file.put_line(fnd_file.log,' 2. The ASCP Plan has not been run') ;
823:
824: display_message(' 2. The ASCP Plan has not been run',INFORMATION) ;
825:
826: --fnd_file.put_line(fnd_file.log, ' 3. The Plan out put of the given ASCP Plan has been purged ') ;
827:
828: display_message(' 3. The Plan out put of the given ASCP Plan has been purged ',INFORMATION) ;
829:
830:

Line 862: --Fnd_file.put_line(fnd_file.log,'Warning:No data in '||x_input_param_rec.description) ;

858:
859: /* If No record exists for the given stream then give warning to the user */
860: IF x_no_of_recs = 0 THEN
861:
862: --Fnd_file.put_line(fnd_file.log,'Warning:No data in '||x_input_param_rec.description) ;
863:
864: display_message('No data in '||x_input_param_rec.description ,WARNING) ;
865:
866: IF retcode <> 2 THEN

Line 898: --- Fnd_file.put_line(fnd_file.log,'Validating '||cal_rec.calendar_code) ;

894: x_min_date := null;
895:
896: x_max_date := null;
897:
898: --- Fnd_file.put_line(fnd_file.log,'Validating '||cal_rec.calendar_code) ;
899:
900:
901:
902: FOR x_cal_rec IN get_tim(cal_rec.calendar_type, cal_rec.calendar_code,x_dp_min_date,x_dp_max_date)

Line 915: -- fnd_file.put_line(fnd_file.log,'Error:No Time data in '||cal_rec.calendar_code||' between Plan Start Date and End Date');

911:
912: retcode := 2 ;
913:
914:
915: -- fnd_file.put_line(fnd_file.log,'Error:No Time data in '||cal_rec.calendar_code||' between Plan Start Date and End Date');
916: display_message( 'No Time data in '||cal_rec.calendar_code||' between Plan Start Date and End Date',ERROR) ;
917: --- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;
918: display_message( 'Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ',INFORMATION) ;
919:

Line 917: --- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;

913:
914:
915: -- fnd_file.put_line(fnd_file.log,'Error:No Time data in '||cal_rec.calendar_code||' between Plan Start Date and End Date');
916: display_message( 'No Time data in '||cal_rec.calendar_code||' between Plan Start Date and End Date',ERROR) ;
917: --- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;
918: display_message( 'Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ',INFORMATION) ;
919:
920: END IF ;
921:

Line 926: -- fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||' Cal Start Date after plan start date' );

922: IF x_min_date > x_dp_min_date THEN
923:
924: retcode := 2 ;
925:
926: -- fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||' Cal Start Date after plan start date' );
927: display_message( cal_rec.calendar_code||' Cal Start Date after plan start date', ERROR ) ;
928:
929: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;
930: display_message(' Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ',INFORMATION) ;

Line 929: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;

925:
926: -- fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||' Cal Start Date after plan start date' );
927: display_message( cal_rec.calendar_code||' Cal Start Date after plan start date', ERROR ) ;
928:
929: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;
930: display_message(' Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ',INFORMATION) ;
931:
932: END IF ;
933:

Line 937: --fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||':Cal date ends before plan end date' ) ;

933:
934: IF x_max_date < x_dp_max_date THEN
935:
936: retcode := 2 ;
937: --fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||':Cal date ends before plan end date' ) ;
938:
939: display_message( cal_rec.calendar_code||':Cal date ends before plan end date',ERROR ) ;
940:
941: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;

Line 941: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;

937: --fnd_file.put_line(fnd_file.log,'Error: '||cal_rec.calendar_code||':Cal date ends before plan end date' ) ;
938:
939: display_message( cal_rec.calendar_code||':Cal date ends before plan end date',ERROR ) ;
940:
941: -- fnd_file.put_line(fnd_file.log, 'Note : Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ') ;
942:
943: display_message( 'Remove the Calendar ' ||cal_rec.calendar_code||' from the Liability Plan and rerun the concurrent program ',INFORMATION) ;
944:
945: END IF ;

Line 954: --fnd_file.put_line(fnd_file.log,'Error: Demand Plan Validation Failed ' ) ;

950:
951:
952: IF retcode = 2 THEN
953:
954: --fnd_file.put_line(fnd_file.log,'Error: Demand Plan Validation Failed ' ) ;
955: display_message( 'Demand Plan Validation Failed ',ERROR) ;
956:
957: --fnd_file.put_line(fnd_file.log,'Note: Fix the error and rerun the Concurrent Program' ) ;
958: display_message( ' Fix the error and rerun the Concurrent Program',INFORMATION ) ;

Line 957: --fnd_file.put_line(fnd_file.log,'Note: Fix the error and rerun the Concurrent Program' ) ;

953:
954: --fnd_file.put_line(fnd_file.log,'Error: Demand Plan Validation Failed ' ) ;
955: display_message( 'Demand Plan Validation Failed ',ERROR) ;
956:
957: --fnd_file.put_line(fnd_file.log,'Note: Fix the error and rerun the Concurrent Program' ) ;
958: display_message( ' Fix the error and rerun the Concurrent Program',INFORMATION ) ;
959:
960: END IF ;
961:

Line 968: fnd_file.put_line(fnd_file.log,'*****'||v_sql_stmt||'*****');

964:
965: when others then
966: retcode := 2;
967: errbuf := substr(SQLERRM,1,150);
968: fnd_file.put_line(fnd_file.log,'*****'||v_sql_stmt||'*****');
969:
970:
971:
972:

Line 1032: --fnd_file.put_line(fnd_file.log,'1:collect_level_parent_data ' );

1028:
1029:
1030: /* Relationship LOOP */
1031: For Relationship_Rec IN Relationship(p_level_id, p_parent_level_id) LOOP
1032: --fnd_file.put_line(fnd_file.log,'1:collect_level_parent_data ' );
1033: /* Check whether relationship_view is NULL or not.
1034: IF NULL then give WARNING message and go to the next cursor.
1035: Do not try to translate level values if the relationship_view is NULL */
1036:

Line 1046: fnd_file.put_line(fnd_file.log, ' ');

1042:
1043: p_level_name := MSD_COMMON_UTILITIES.get_level_name(p_level_id);
1044: p_parent_level_name := MSD_COMMON_UTILITIES.get_level_name(p_parent_level_id);
1045:
1046: fnd_file.put_line(fnd_file.log, ' ');
1047: fnd_file.put_line(fnd_file.log, 'Relationship view is not defined for ' ||
1048: 'Hierarchy : '|| p_hierarchy_name || '. (No Data Collected.)');
1049: fnd_file.put_line(fnd_file.log, ' Level : ' || p_level_name );
1050: fnd_file.put_line(fnd_file.log, ' Parent Level : ' || p_parent_level_name );

Line 1047: fnd_file.put_line(fnd_file.log, 'Relationship view is not defined for ' ||

1043: p_level_name := MSD_COMMON_UTILITIES.get_level_name(p_level_id);
1044: p_parent_level_name := MSD_COMMON_UTILITIES.get_level_name(p_parent_level_id);
1045:
1046: fnd_file.put_line(fnd_file.log, ' ');
1047: fnd_file.put_line(fnd_file.log, 'Relationship view is not defined for ' ||
1048: 'Hierarchy : '|| p_hierarchy_name || '. (No Data Collected.)');
1049: fnd_file.put_line(fnd_file.log, ' Level : ' || p_level_name );
1050: fnd_file.put_line(fnd_file.log, ' Parent Level : ' || p_parent_level_name );
1051:

Line 1049: fnd_file.put_line(fnd_file.log, ' Level : ' || p_level_name );

1045:
1046: fnd_file.put_line(fnd_file.log, ' ');
1047: fnd_file.put_line(fnd_file.log, 'Relationship view is not defined for ' ||
1048: 'Hierarchy : '|| p_hierarchy_name || '. (No Data Collected.)');
1049: fnd_file.put_line(fnd_file.log, ' Level : ' || p_level_name );
1050: fnd_file.put_line(fnd_file.log, ' Parent Level : ' || p_parent_level_name );
1051:
1052: /* IF we have relationship_view name then proceed the following codes */
1053: ELSE

Line 1050: fnd_file.put_line(fnd_file.log, ' Parent Level : ' || p_parent_level_name );

1046: fnd_file.put_line(fnd_file.log, ' ');
1047: fnd_file.put_line(fnd_file.log, 'Relationship view is not defined for ' ||
1048: 'Hierarchy : '|| p_hierarchy_name || '. (No Data Collected.)');
1049: fnd_file.put_line(fnd_file.log, ' Level : ' || p_level_name );
1050: fnd_file.put_line(fnd_file.log, ' Parent Level : ' || p_parent_level_name );
1051:
1052: /* IF we have relationship_view name then proceed the following codes */
1053: ELSE
1054: x_source_table := Relationship_Rec.relationship_view ;

Line 1089: fnd_file.put_line(fnd_file.log,'*****'||errbuf||'*****');

1085: when others then
1086: retcode := -1 ;
1087: errbuf := substr(SQLERRM,1,150);
1088: -- insert into msd_test values('Error: ' || errbuf) ;
1089: fnd_file.put_line(fnd_file.log,'*****'||errbuf||'*****');
1090:
1091: End collect_level_parent_data ;
1092:
1093:

Line 1129: --fnd_file.put_line(fnd_file.log,'1:Inside Collect dimension data ' );

1125:
1126:
1127: Begin
1128:
1129: --fnd_file.put_line(fnd_file.log,'1:Inside Collect dimension data ' );
1130: For Dim_Level_Parent_Rec IN Dim_Level_Parent (p_dimension_code) LOOP
1131:
1132:
1133: if (x_level_id = Dim_Level_Parent_Rec.level_id) then

Line 1142: -- fnd_file.put_line(fnd_file.log,'2:Inside Collect dimension data 2 ' );

1138: p_plan_id => p_plan_id,
1139: p_level_id => Dim_Level_Parent_Rec.level_id,
1140: p_parent_level_id => Dim_Level_Parent_Rec.parent_level_id,
1141: p_update_lvl_table => 0);
1142: -- fnd_file.put_line(fnd_file.log,'2:Inside Collect dimension data 2 ' );
1143: else
1144: collect_level_parent_data(
1145: errbuf => errbuf,
1146: retcode => retcode,

Line 1151: -- fnd_file.put_line(fnd_file.log,'3:Inside Collect dimension data 3 ' );

1147: p_plan_id => p_plan_id,
1148: p_level_id => Dim_Level_Parent_Rec.level_id,
1149: p_parent_level_id => Dim_Level_Parent_Rec.parent_level_id,
1150: p_update_lvl_table => 1);
1151: -- fnd_file.put_line(fnd_file.log,'3:Inside Collect dimension data 3 ' );
1152: end if;
1153:
1154: x_level_id := Dim_Level_Parent_Rec.level_id;
1155:

Line 1157: --- fnd_file.put_line(fnd_file.log,'4:Inside Collect dimension data ' );

1153:
1154: x_level_id := Dim_Level_Parent_Rec.level_id;
1155:
1156: end loop ;
1157: --- fnd_file.put_line(fnd_file.log,'4:Inside Collect dimension data ' );
1158:
1159:
1160:
1161:

Line 1215: ---- fnd_file.put_line(fnd_file.log,' ********* PULLING Data********* ' );

1211: /* Delete duplicate level association from staging table */
1212: Delete_duplicate_lvl_assoc(errbuf, retcode, p_plan_id);
1213:
1214:
1215: ---- fnd_file.put_line(fnd_file.log,' ********* PULLING Data********* ' );
1216:
1217: pull_level_values_data( errbuf => errbuf,
1218: retcode => retcode,
1219: p_plan_id => p_plan_id );

Line 1296: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1292: EXCEPTION
1293: when others then
1294: errbuf := substr(SQLERRM,1,150);
1295: retcode := -1;
1296: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1297:
1298:
1299: END Delete_duplicate_lvl_assoc;
1300:

Line 1334: -- fnd_file.put_line(fnd_file.log,'1:translate Level Values ' );

1330: ---x_dblink VARCHAR2(128);
1331:
1332: Begin
1333:
1334: -- fnd_file.put_line(fnd_file.log,'1:translate Level Values ' );
1335:
1336: v_up := p_update_lvl_table;
1337:
1338:

Line 1344: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );

1340:
1341: Savepoint Before_Delete ;
1342:
1343: /* Beginning of IF 1 */
1344: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );
1345: IF (p_dest_table = MSD_COMMON_UTILITIES_LB.LEVEL_VALUES_FACT_TABLE) THEN
1346: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );
1347: v_dest_ass_table := MSD_COMMON_UTILITIES_LB.LEVEL_ASSOC_FACT_TABLE ;
1348: v_sr_ass_table := MSD_COMMON_UTILITIES_LB.LEVEL_ASSOC_STAGING_TABLE ;

Line 1346: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );

1342:
1343: /* Beginning of IF 1 */
1344: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );
1345: IF (p_dest_table = MSD_COMMON_UTILITIES_LB.LEVEL_VALUES_FACT_TABLE) THEN
1346: -- fnd_file.put_line(fnd_file.log,'***********'||p_dest_table );
1347: v_dest_ass_table := MSD_COMMON_UTILITIES_LB.LEVEL_ASSOC_FACT_TABLE ;
1348: v_sr_ass_table := MSD_COMMON_UTILITIES_LB.LEVEL_ASSOC_STAGING_TABLE ;
1349:
1350: /* First time to process this level_id */

Line 1358: -- fnd_file.put_line(fnd_file.log,'3:translate Level Values ' );

1354: /* For Incremental Level Value Collection, p_delete_flag = 'N'
1355: So, we don't delete existing level values */
1356:
1357: /* Process row by row from staging level values table */
1358: -- fnd_file.put_line(fnd_file.log,'3:translate Level Values ' );
1359: PROCESS_LEVEL_VALUE_PER_ROW( errbuf,
1360: retcode,
1361: p_plan_id,
1362: p_level_id,

Line 1369: -- fnd_file.put_line(fnd_file.log,'4:translate Level Values ' );

1365:
1366:
1367:
1368: /* Process from staging level associations table */
1369: -- fnd_file.put_line(fnd_file.log,'4:translate Level Values ' );
1370: PROCESS_LEVEL_ASSOCIATION(
1371: errbuf,
1372: retcode,
1373: p_plan_id,

Line 1380: --- fnd_file.put_line(fnd_file.log,'5:translate Level Values ' );

1376: p_seq_num);
1377:
1378: /* ELSE for IF 1. COLLECTION */
1379: ELSIF (p_dest_table = MSD_COMMON_UTILITIES_LB.LEVEL_VALUES_STAGING_TABLE) THEN
1380: --- fnd_file.put_line(fnd_file.log,'5:translate Level Values ' );
1381: v_dest_ass_table := MSD_COMMON_UTILITIES_LB.LEVEL_ASSOC_STAGING_TABLE;
1382:
1383: /* Delete Staging Table only if delete flag = Yes */
1384: IF (p_delete_flag = 'Y') THEN

Line 1391: -- fnd_file.put_line(fnd_file.log,'5.1:translate Level Values ' );

1387: DELETE FROM msd_st_level_values_lb
1388: WHERE plan_id = p_plan_id AND level_id = p_level_id;
1389: END IF;
1390:
1391: -- fnd_file.put_line(fnd_file.log,'5.1:translate Level Values ' );
1392: DELETE FROM msd_st_level_associations_lb
1393: WHERE plan_id = p_plan_id AND
1394: level_id = p_level_id
1395: AND parent_level_id = p_parent_level_id;

Line 1396: -- fnd_file.put_line(fnd_file.log,'5.2:translate Level Values ' );

1392: DELETE FROM msd_st_level_associations_lb
1393: WHERE plan_id = p_plan_id AND
1394: level_id = p_level_id
1395: AND parent_level_id = p_parent_level_id;
1396: -- fnd_file.put_line(fnd_file.log,'5.2:translate Level Values ' );
1397: END IF;
1398: --- fnd_file.put_line(fnd_file.log,'2:translate Level Values ' );
1399: /* Insert Level Values into staging table */
1400: v_sql_stmt := 'insert /*+ ALL_ROWS */ into ' || p_dest_table || ' ( '

Line 1398: --- fnd_file.put_line(fnd_file.log,'2:translate Level Values ' );

1394: level_id = p_level_id
1395: AND parent_level_id = p_parent_level_id;
1396: -- fnd_file.put_line(fnd_file.log,'5.2:translate Level Values ' );
1397: END IF;
1398: --- fnd_file.put_line(fnd_file.log,'2:translate Level Values ' );
1399: /* Insert Level Values into staging table */
1400: v_sql_stmt := 'insert /*+ ALL_ROWS */ into ' || p_dest_table || ' ( '
1401: ||'plan_id, ' ||
1402: 'level_id, ' ||

Line 1428: --- fnd_file.put_line(fnd_file.log,v_sql_stmt );

1424: p_plan_id ;
1425:
1426:
1427: display_message( v_sql_stmt ,DEBUG) ;
1428: --- fnd_file.put_line(fnd_file.log,v_sql_stmt );
1429:
1430:
1431: EXECUTE IMMEDIATE v_sql_stmt;
1432:

Line 1463: ---fnd_file.put_line(fnd_file.log,'3:translate Level Values : after insert into ');

1459:
1460: display_message( v_sql_stmt,DEBUG ) ;
1461:
1462: EXECUTE IMMEDIATE v_sql_stmt;
1463: ---fnd_file.put_line(fnd_file.log,'3:translate Level Values : after insert into ');
1464:
1465: END IF; /* End of IF 1 */
1466:
1467: /* Get the Parent Level Type */

Line 1478: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1474: exception
1475: when NO_DATA_FOUND then
1476: null;
1477: WHEN others THEN
1478: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1479: errbuf := substr(SQLERRM,1,150);
1480: end ;
1481:
1482:

Line 1487: ---fnd_file.put_line(fnd_file.log,'********'||p_update_lvl_table||'*************');

1483:
1484: /* dbms_output.put_line('Parent Level : ' || p_parent_level_id ) ;
1485: dbms_output.put_line('Parent Level Type : ' || v_parent_lvl_type ) ; */
1486:
1487: ---fnd_file.put_line(fnd_file.log,'********'||p_update_lvl_table||'*************');
1488: /* Process parent level value only if it is TOP level value*/
1489: IF (v_parent_lvl_type = '1' AND p_update_lvl_table = 1) THEN
1490:
1491: --fnd_file.put_line(fnd_file.log,'1: Before PROCESS_TOP_LEVEL_VALUES ');

Line 1491: --fnd_file.put_line(fnd_file.log,'1: Before PROCESS_TOP_LEVEL_VALUES ');

1487: ---fnd_file.put_line(fnd_file.log,'********'||p_update_lvl_table||'*************');
1488: /* Process parent level value only if it is TOP level value*/
1489: IF (v_parent_lvl_type = '1' AND p_update_lvl_table = 1) THEN
1490:
1491: --fnd_file.put_line(fnd_file.log,'1: Before PROCESS_TOP_LEVEL_VALUES ');
1492: PROCESS_TOP_LEVEL_VALUES (
1493: errbuf,
1494: retcode,
1495: p_source_table,

Line 1515: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1511: when others then
1512: --write to log an back out
1513: errbuf := substr(SQLERRM,1,150);
1514: retcode := 1 ; --warning
1515: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1516: fnd_file.put_line(fnd_file.log, 'The offending sql is:');
1517: fnd_file.put_line(fnd_file.log, v_sql_stmt);
1518: rollback;
1519: -- rollback to Savepoint Before_Delete ;

Line 1516: fnd_file.put_line(fnd_file.log, 'The offending sql is:');

1512: --write to log an back out
1513: errbuf := substr(SQLERRM,1,150);
1514: retcode := 1 ; --warning
1515: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1516: fnd_file.put_line(fnd_file.log, 'The offending sql is:');
1517: fnd_file.put_line(fnd_file.log, v_sql_stmt);
1518: rollback;
1519: -- rollback to Savepoint Before_Delete ;
1520:

Line 1517: fnd_file.put_line(fnd_file.log, v_sql_stmt);

1513: errbuf := substr(SQLERRM,1,150);
1514: retcode := 1 ; --warning
1515: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1516: fnd_file.put_line(fnd_file.log, 'The offending sql is:');
1517: fnd_file.put_line(fnd_file.log, v_sql_stmt);
1518: rollback;
1519: -- rollback to Savepoint Before_Delete ;
1520:
1521: End translate_level_parent_values ;

Line 1575: ---fnd_file.put_line(fnd_file.log,'** In PROCESS_LEVEL_VALUE_PER_ROW ********');

1571: a_level_value level_val_tab;
1572: a_level_value_desc level_attribute_tab;
1573:
1574: BEGIN
1575: ---fnd_file.put_line(fnd_file.log,'** In PROCESS_LEVEL_VALUE_PER_ROW ********');
1576: OPEN c_insert;
1577: FETCH c_insert BULK COLLECT INTO a_sr_level_pk;
1578: CLOSE c_insert;
1579:

Line 1584: ---fnd_file.put_line(fnd_file.log,'**In 2 PROCESS_LEVEL_VALUE_PER_ROW********');

1580: IF (a_sr_level_pk.exists(1)) THEN
1581: /* First Delete fetched rows from staging, and then
1582: Insert them into Fact Table.
1583: */
1584: ---fnd_file.put_line(fnd_file.log,'**In 2 PROCESS_LEVEL_VALUE_PER_ROW********');
1585: FORALL i IN a_sr_level_pk.FIRST..a_sr_level_pk.LAST
1586: DELETE FROM msd_st_level_values_lb
1587: WHERE plan_id = p_plan_id and
1588: level_id = p_level_id and

Line 1597: -- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 1********');

1593:
1594:
1595: /* Generate Level_pk */
1596: FOR k IN a_sr_level_pk.FIRST..a_sr_level_pk.LAST LOOP
1597: -- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 1********');
1598: a_level_pk.extend ;
1599: a_level_pk( k ) := MSD_COMMON_UTILITIES_LB.get_level_pk( p_level_id , a_sr_level_pk(k)) ;
1600: --- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 2********');
1601: END LOOP ;

Line 1600: --- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 2********');

1596: FOR k IN a_sr_level_pk.FIRST..a_sr_level_pk.LAST LOOP
1597: -- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 1********');
1598: a_level_pk.extend ;
1599: a_level_pk( k ) := MSD_COMMON_UTILITIES_LB.get_level_pk( p_level_id , a_sr_level_pk(k)) ;
1600: --- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 2********');
1601: END LOOP ;
1602:
1603: ---fnd_file.put_line(fnd_file.log,'**inserting into fact********');
1604: --- fnd_file.put_line(fnd_file.log,'--'||p_plan_id||':'||p_level_id);

Line 1603: ---fnd_file.put_line(fnd_file.log,'**inserting into fact********');

1599: a_level_pk( k ) := MSD_COMMON_UTILITIES_LB.get_level_pk( p_level_id , a_sr_level_pk(k)) ;
1600: --- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 2********');
1601: END LOOP ;
1602:
1603: ---fnd_file.put_line(fnd_file.log,'**inserting into fact********');
1604: --- fnd_file.put_line(fnd_file.log,'--'||p_plan_id||':'||p_level_id);
1605:
1606: /* Insert new rows into fact table */
1607: FORALL j IN a_sr_level_pk.FIRST..a_sr_level_pk.LAST

Line 1604: --- fnd_file.put_line(fnd_file.log,'--'||p_plan_id||':'||p_level_id);

1600: --- fnd_file.put_line(fnd_file.log,'**Inside level_pk generation 2********');
1601: END LOOP ;
1602:
1603: ---fnd_file.put_line(fnd_file.log,'**inserting into fact********');
1604: --- fnd_file.put_line(fnd_file.log,'--'||p_plan_id||':'||p_level_id);
1605:
1606: /* Insert new rows into fact table */
1607: FORALL j IN a_sr_level_pk.FIRST..a_sr_level_pk.LAST
1608:

Line 1656: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1652: EXCEPTION
1653: when others then
1654: errbuf := substr(SQLERRM,1,150);
1655: retcode := -1;
1656: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1657:
1658:
1659:
1660: END PROCESS_LEVEL_VALUE_PER_ROW;

Line 1775: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1771: EXCEPTION
1772: when others then
1773: errbuf := substr(SQLERRM,1,150);
1774: retcode := -1;
1775: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1776:
1777:
1778: END PROCESS_LEVEL_ASSOCIATION;
1779:

Line 1811: ---fnd_file.put_line(fnd_file.log,'2:PROCESS_TOP_LEVEL_VALUES '||p_parent_level_id );

1807: /* dbms_output.put_line('Parent Level : ' || p_parent_level_id ) ; */
1808:
1809: /* Note that we will not be able to get the attributes 1 - 5 for the
1810: Top level as we will not have a separate view for the top level */
1811: ---fnd_file.put_line(fnd_file.log,'2:PROCESS_TOP_LEVEL_VALUES '||p_parent_level_id );
1812: /* For PULL */
1813: IF (p_dest_table = MSD_COMMON_UTILITIES_LB.LEVEL_VALUES_FACT_TABLE) THEN
1814: PROCESS_LEVEL_VALUE_PER_ROW( errbuf,
1815: retcode,

Line 1821: --fnd_file.put_line(fnd_file.log,'2:PROCESS_TOP_LEVEL_VALUES '||p_parent_level_id );

1817: p_parent_level_id,
1818: p_seq_num);
1819: ELSE
1820: /* Collect into Staging table*/
1821: --fnd_file.put_line(fnd_file.log,'2:PROCESS_TOP_LEVEL_VALUES '||p_parent_level_id );
1822: delete from msd_st_level_values_lb
1823: where plan_id = p_plan_id
1824: and level_id = p_parent_level_id ;
1825: --- fnd_file.put_line(fnd_file.log,'3:PROCESS_TOP_LEVEL_VALUES ' );

Line 1825: --- fnd_file.put_line(fnd_file.log,'3:PROCESS_TOP_LEVEL_VALUES ' );

1821: --fnd_file.put_line(fnd_file.log,'2:PROCESS_TOP_LEVEL_VALUES '||p_parent_level_id );
1822: delete from msd_st_level_values_lb
1823: where plan_id = p_plan_id
1824: and level_id = p_parent_level_id ;
1825: --- fnd_file.put_line(fnd_file.log,'3:PROCESS_TOP_LEVEL_VALUES ' );
1826:
1827: v_sql_stmt := 'insert /*+ ALL_ROWS */ into ' || p_dest_table || ' ( ' ||
1828: 'plan_id, ' ||
1829: 'level_value, ' ||

Line 1853: --- fnd_file.put_line(fnd_file.log ,v_sql_stmt) ;

1849: p_parent_value_desc_column || ' parent_desc_alias ' || ' from ' ||
1850: p_source_table||' where plan_id = '||p_plan_id|| ') src ';
1851:
1852:
1853: --- fnd_file.put_line(fnd_file.log ,v_sql_stmt) ;
1854: EXECUTE IMMEDIATE v_sql_stmt;
1855:
1856: END IF;
1857:

Line 1864: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

1860: EXCEPTION
1861: when others then
1862: errbuf := substr(SQLERRM,1,150);
1863: retcode := -1;
1864: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
1865:
1866:
1867:
1868: END PROCESS_TOP_LEVEL_VALUES;

Line 2022: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

2018:
2019: exception
2020: when others then
2021: errbuf := substr(SQLERRM,1,150);
2022: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
2023: retcode := -1 ;
2024:
2025:
2026: End pull_level_values_data ;

Line 2056: fnd_file.put_line(fnd_file.log,'Error: Cannot Obtain a Lock on this Demand Plan ' );

2052: When APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION then
2053: IF (C% ISOPEN) THEN
2054: close C;
2055: END IF;
2056: fnd_file.put_line(fnd_file.log,'Error: Cannot Obtain a Lock on this Demand Plan ' );
2057: return;
2058: END Lock_Row ;
2059:
2060:

Line 2114: fnd_file.put_line(fnd_file.log, 'Inside clean ');

2110:
2111: exception
2112: when others then
2113: errbuf := substr(SQLERRM,1,150);
2114: fnd_file.put_line(fnd_file.log, 'Inside clean ');
2115: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
2116: retcode := -1 ;
2117:
2118:

Line 2115: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));

2111: exception
2112: when others then
2113: errbuf := substr(SQLERRM,1,150);
2114: fnd_file.put_line(fnd_file.log, 'Inside clean ');
2115: fnd_file.put_line(fnd_file.log, substr(SQLERRM, 1, 1000));
2116: retcode := -1 ;
2117:
2118:
2119:

Line 2220: fnd_file.put_line(fnd_file.log,errbuf );

2216:
2217: when others then
2218: retcode := 2 ;
2219: errbuf := substr(SQLERRM,1,150);
2220: fnd_file.put_line(fnd_file.log,errbuf );
2221:
2222:
2223: END setup_validation ;
2224:

Line 2370: fnd_file.put_line(fnd_file.log,errbuf );

2366:
2367: when others then
2368: retcode := 2 ;
2369: errbuf := substr(SQLERRM,1,150);
2370: fnd_file.put_line(fnd_file.log,errbuf );
2371:
2372:
2373: END ;
2374: