450: EntityList(l_maxnum_entities) := v_entity_name.entity_name;
451: END LOOP;
452:
453: --fnd_file.put_line(fnd_file.log, 'Begin CMTB XML generation');
454: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
455: THEN
456: fnd_log.STRING
457: (fnd_log.level_statement,
458: g_api, 'Begin CMTB XML generation'
452:
453: --fnd_file.put_line(fnd_file.log, 'Begin CMTB XML generation');
454: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
455: THEN
456: fnd_log.STRING
457: (fnd_log.level_statement,
458: g_api, 'Begin CMTB XML generation'
459: );
460: END IF;
453: --fnd_file.put_line(fnd_file.log, 'Begin CMTB XML generation');
454: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
455: THEN
456: fnd_log.STRING
457: (fnd_log.level_statement,
458: g_api, 'Begin CMTB XML generation'
459: );
460: END IF;
461:
466: DBMS_LOB.WRITEAPPEND(l_cmtb_lines_xml ,
467: length('
468: '
469: --fnd_file.put_line(fnd_file.log, 'Collect Data');
470: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
471: THEN
472: fnd_log.STRING
473: (fnd_log.level_statement,
474: g_api, 'Collect Data'
468: '
469: --fnd_file.put_line(fnd_file.log, 'Collect Data');
470: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
471: THEN
472: fnd_log.STRING
473: (fnd_log.level_statement,
474: g_api, 'Collect Data'
475: );
476: END IF;
469: --fnd_file.put_line(fnd_file.log, 'Collect Data');
470: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
471: THEN
472: fnd_log.STRING
473: (fnd_log.level_statement,
474: g_api, 'Collect Data'
475: );
476: END IF;
477: OPEN c_tb_data( p_language_code,
491: l_cmtb_is_drillable_list;
492: CLOSE c_tb_data;
493:
494: --fnd_file.put_line(fnd_file.log, 'End of Data Collection');
495: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
496: THEN
497: fnd_log.STRING
498: (fnd_log.level_statement,
499: g_api, 'End of Data Collection'
493:
494: --fnd_file.put_line(fnd_file.log, 'End of Data Collection');
495: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
496: THEN
497: fnd_log.STRING
498: (fnd_log.level_statement,
499: g_api, 'End of Data Collection'
500: );
501: END IF;
494: --fnd_file.put_line(fnd_file.log, 'End of Data Collection');
495: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
496: THEN
497: fnd_log.STRING
498: (fnd_log.level_statement,
499: g_api, 'End of Data Collection'
500: );
501: END IF;
502: l_item_list_first := l_cmtb_line_item_list.FIRST;
507: LOOP
508: --And check for balance availability against each reported line item
509: LOOP
510: --fnd_file.put_line(fnd_file.log, 'Processing Entity : ' || EntityList(l_entity_index));
511: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
512: THEN
513: fnd_log.STRING
514: (fnd_log.level_statement,
515: g_api, 'Processing Entity : ' || EntityList(l_entity_index)
509: LOOP
510: --fnd_file.put_line(fnd_file.log, 'Processing Entity : ' || EntityList(l_entity_index));
511: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
512: THEN
513: fnd_log.STRING
514: (fnd_log.level_statement,
515: g_api, 'Processing Entity : ' || EntityList(l_entity_index)
516: );
517: END IF;
510: --fnd_file.put_line(fnd_file.log, 'Processing Entity : ' || EntityList(l_entity_index));
511: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
512: THEN
513: fnd_log.STRING
514: (fnd_log.level_statement,
515: g_api, 'Processing Entity : ' || EntityList(l_entity_index)
516: );
517: END IF;
518: --fnd_file.put_line(fnd_file.log, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current));
515: g_api, 'Processing Entity : ' || EntityList(l_entity_index)
516: );
517: END IF;
518: --fnd_file.put_line(fnd_file.log, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current));
519: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
520: THEN
521: fnd_log.STRING
522: (fnd_log.level_statement,
523: g_api, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current)
517: END IF;
518: --fnd_file.put_line(fnd_file.log, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current));
519: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
520: THEN
521: fnd_log.STRING
522: (fnd_log.level_statement,
523: g_api, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current)
524: );
525: END IF;
518: --fnd_file.put_line(fnd_file.log, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current));
519: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
520: THEN
521: fnd_log.STRING
522: (fnd_log.level_statement,
523: g_api, 'for line item : ' || l_cmtb_line_item_list(l_item_list_current)
524: );
525: END IF;
526: --If the line item list contains reported entiry, then generate not for the actual balance
527: IF EntityList(l_entity_index) = l_cmtb_entity_name_list(l_item_list_current) THEN
528: BEGIN
529: --fnd_file.put_line(fnd_file.log, 'Processing Entity (with balance): ' ||
530: -- l_cmtb_entity_name_list(l_item_list_current));
531: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
532: THEN
533: fnd_log.STRING
534: (fnd_log.level_statement,
535: g_api, 'Processing Entity (with balance): ' ||
529: --fnd_file.put_line(fnd_file.log, 'Processing Entity (with balance): ' ||
530: -- l_cmtb_entity_name_list(l_item_list_current));
531: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
532: THEN
533: fnd_log.STRING
534: (fnd_log.level_statement,
535: g_api, 'Processing Entity (with balance): ' ||
536: l_cmtb_entity_name_list(l_item_list_current)
537: );
530: -- l_cmtb_entity_name_list(l_item_list_current));
531: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
532: THEN
533: fnd_log.STRING
534: (fnd_log.level_statement,
535: g_api, 'Processing Entity (with balance): ' ||
536: l_cmtb_entity_name_list(l_item_list_current)
537: );
538: END IF;
584:
585: BEGIN
586: --fnd_file.put_line(fnd_file.log, 'Processing Entity (without balance): ' ||
587: -- EntityList(l_entity_index));
588: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
589: THEN
590: fnd_log.STRING
591: (fnd_log.level_statement,
592: g_api, 'Processing Entity (without balance): ' ||
586: --fnd_file.put_line(fnd_file.log, 'Processing Entity (without balance): ' ||
587: -- EntityList(l_entity_index));
588: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
589: THEN
590: fnd_log.STRING
591: (fnd_log.level_statement,
592: g_api, 'Processing Entity (without balance): ' ||
593: EntityList(l_entity_index)
594: );
587: -- EntityList(l_entity_index));
588: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
589: THEN
590: fnd_log.STRING
591: (fnd_log.level_statement,
592: g_api, 'Processing Entity (without balance): ' ||
593: EntityList(l_entity_index)
594: );
595: END IF;
630: '
631: '
632:
633: --fnd_file.put_line(fnd_file.log, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml));
634: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
635: THEN
636: fnd_log.STRING
637: (fnd_log.level_statement,
638: g_api, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml)
632:
633: --fnd_file.put_line(fnd_file.log, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml));
634: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
635: THEN
636: fnd_log.STRING
637: (fnd_log.level_statement,
638: g_api, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml)
639: );
640: END IF;
633: --fnd_file.put_line(fnd_file.log, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml));
634: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
635: THEN
636: fnd_log.STRING
637: (fnd_log.level_statement,
638: g_api, 'Line item context: '||l_item_list_current ||length(p_cmtb_lines_xml)
639: );
640: END IF;
641: END;
642: END IF;
643: IF l_entity_index = l_maxnum_entities THEN
644: --fnd_file.put_line(fnd_file.log, 'Exit inner loop when: l_entity_index('||l_entity_index||
645: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
646: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
647: THEN
648: fnd_log.STRING
649: (fnd_log.level_statement,
650: g_api, 'Exit inner loop when: l_entity_index('||l_entity_index||
644: --fnd_file.put_line(fnd_file.log, 'Exit inner loop when: l_entity_index('||l_entity_index||
645: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
646: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
647: THEN
648: fnd_log.STRING
649: (fnd_log.level_statement,
650: g_api, 'Exit inner loop when: l_entity_index('||l_entity_index||
651: ') = l_maxnum_entities('||l_maxnum_entities||')'
652: );
645: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
646: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
647: THEN
648: fnd_log.STRING
649: (fnd_log.level_statement,
650: g_api, 'Exit inner loop when: l_entity_index('||l_entity_index||
651: ') = l_maxnum_entities('||l_maxnum_entities||')'
652: );
653: END IF;
658:
659: IF l_item_list_current > l_item_list_last THEN
660: --fnd_file.put_line(fnd_file.log, 'Exit outer loop when: l_item_list_current('||l_item_list_current||
661: -- ') = l_item_list_last('||l_item_list_last||')');
662: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
663: THEN
664: fnd_log.STRING
665: (fnd_log.level_statement,
666: g_api, 'Exit outer loop when: l_item_list_current('||l_item_list_current||
660: --fnd_file.put_line(fnd_file.log, 'Exit outer loop when: l_item_list_current('||l_item_list_current||
661: -- ') = l_item_list_last('||l_item_list_last||')');
662: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
663: THEN
664: fnd_log.STRING
665: (fnd_log.level_statement,
666: g_api, 'Exit outer loop when: l_item_list_current('||l_item_list_current||
667: ') = l_item_list_last('||l_item_list_last||')'
668: );
661: -- ') = l_item_list_last('||l_item_list_last||')');
662: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
663: THEN
664: fnd_log.STRING
665: (fnd_log.level_statement,
666: g_api, 'Exit outer loop when: l_item_list_current('||l_item_list_current||
667: ') = l_item_list_last('||l_item_list_last||')'
668: );
669: END IF;
673: EXIT;
674: ELSIF l_entity_index = l_maxnum_entities THEN
675: --fnd_file.put_line(fnd_file.log, 'Reset entity context when: l_entity_index('||l_entity_index||
676: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
677: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
678: THEN
679: fnd_log.STRING
680: (fnd_log.level_statement,
681: g_api, 'Reset entity context when: l_entity_index('||l_entity_index||
675: --fnd_file.put_line(fnd_file.log, 'Reset entity context when: l_entity_index('||l_entity_index||
676: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
677: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
678: THEN
679: fnd_log.STRING
680: (fnd_log.level_statement,
681: g_api, 'Reset entity context when: l_entity_index('||l_entity_index||
682: ') = l_maxnum_entities('||l_maxnum_entities||')'
683: );
676: -- ') = l_maxnum_entities('||l_maxnum_entities||')');
677: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
678: THEN
679: fnd_log.STRING
680: (fnd_log.level_statement,
681: g_api, 'Reset entity context when: l_entity_index('||l_entity_index||
682: ') = l_maxnum_entities('||l_maxnum_entities||')'
683: );
684: END IF;
772: AND gcer.MOST_RECENT_FLAG = 'Y'
773: AND rownum <= 1;
774:
775: --fnd_file.put_line(fnd_file.log, 'Start CMTB XML for entry_id: ' || p_entry_id);
776: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
777: THEN
778: fnd_log.STRING
779: (fnd_log.level_statement,
780: g_api, 'Start CMTB XML for entry_id: '||p_entry_id
774:
775: --fnd_file.put_line(fnd_file.log, 'Start CMTB XML for entry_id: ' || p_entry_id);
776: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
777: THEN
778: fnd_log.STRING
779: (fnd_log.level_statement,
780: g_api, 'Start CMTB XML for entry_id: '||p_entry_id
781: );
782: END IF;
775: --fnd_file.put_line(fnd_file.log, 'Start CMTB XML for entry_id: ' || p_entry_id);
776: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
777: THEN
778: fnd_log.STRING
779: (fnd_log.level_statement,
780: g_api, 'Start CMTB XML for entry_id: '||p_entry_id
781: );
782: END IF;
783:
821: 0);
822: CLOSE c_xml_id;
823:
824: --fnd_file.put_line(fnd_file.log, 'Inserted CMTB XML for entry_id: ' || p_entry_id);
825: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
826: THEN
827: fnd_log.STRING
828: (fnd_log.level_statement,
829: g_api, 'Inserted CMTB XML for entry_id: '||p_entry_id
823:
824: --fnd_file.put_line(fnd_file.log, 'Inserted CMTB XML for entry_id: ' || p_entry_id);
825: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
826: THEN
827: fnd_log.STRING
828: (fnd_log.level_statement,
829: g_api, 'Inserted CMTB XML for entry_id: '||p_entry_id
830: );
831: END IF;
824: --fnd_file.put_line(fnd_file.log, 'Inserted CMTB XML for entry_id: ' || p_entry_id);
825: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
826: THEN
827: fnd_log.STRING
828: (fnd_log.level_statement,
829: g_api, 'Inserted CMTB XML for entry_id: '||p_entry_id
830: );
831: END IF;
832:
842:
843: CLOSE c_xml_id;
844:
845: --fnd_file.put_line(fnd_file.log, 'Updated CMTB XML for entry_id: ' || p_entry_id);
846: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
847: THEN
848: fnd_log.STRING
849: (fnd_log.level_statement,
850: g_api, 'Updated CMTB XML for entry_id: '||p_entry_id
844:
845: --fnd_file.put_line(fnd_file.log, 'Updated CMTB XML for entry_id: ' || p_entry_id);
846: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
847: THEN
848: fnd_log.STRING
849: (fnd_log.level_statement,
850: g_api, 'Updated CMTB XML for entry_id: '||p_entry_id
851: );
852: END IF;
845: --fnd_file.put_line(fnd_file.log, 'Updated CMTB XML for entry_id: ' || p_entry_id);
846: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
847: THEN
848: fnd_log.STRING
849: (fnd_log.level_statement,
850: g_api, 'Updated CMTB XML for entry_id: '||p_entry_id
851: );
852: END IF;
853:
858: EXCEPTION
859: WHEN others THEN
860: BEGIN
861: --fnd_file.put_line(fnd_file.log, 'Exception CMTB XML for entry_id: ' || p_entry_id||' - ' || SQLERRM);
862: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
863: THEN
864: fnd_log.STRING
865: (fnd_log.level_statement,
866: g_api, 'Exception CMTB XML for entry_id: '||p_entry_id ||' - '||SQLERRM
860: BEGIN
861: --fnd_file.put_line(fnd_file.log, 'Exception CMTB XML for entry_id: ' || p_entry_id||' - ' || SQLERRM);
862: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
863: THEN
864: fnd_log.STRING
865: (fnd_log.level_statement,
866: g_api, 'Exception CMTB XML for entry_id: '||p_entry_id ||' - '||SQLERRM
867: );
868: END IF;
861: --fnd_file.put_line(fnd_file.log, 'Exception CMTB XML for entry_id: ' || p_entry_id||' - ' || SQLERRM);
862: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
863: THEN
864: fnd_log.STRING
865: (fnd_log.level_statement,
866: g_api, 'Exception CMTB XML for entry_id: '||p_entry_id ||' - '||SQLERRM
867: );
868: END IF;
869: END;
946: BEGIN
947:
948: --fnd_file.put_line(fnd_file.log, 'Enter: gcs_xml_gen_pkg.generate_entry_xml(p_entry_id =>'||p_entry_id||
949: -- ', p_category_code =>'||p_category_code||', p_cons_rule_flag =>' || p_cons_rule_flag ||' )');
950: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
951: THEN
952: fnd_log.STRING
953: (fnd_log.level_statement,
954: g_api,
948: --fnd_file.put_line(fnd_file.log, 'Enter: gcs_xml_gen_pkg.generate_entry_xml(p_entry_id =>'||p_entry_id||
949: -- ', p_category_code =>'||p_category_code||', p_cons_rule_flag =>' || p_cons_rule_flag ||' )');
950: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
951: THEN
952: fnd_log.STRING
953: (fnd_log.level_statement,
954: g_api,
955: 'Enter: gcs_xml_gen_pkg.generate_entry_xml(p_entry_id =>'||p_entry_id||
956: ', p_category_code =>'||p_category_code||', p_cons_rule_flag =>' || p_cons_rule_flag ||' )'
949: -- ', p_category_code =>'||p_category_code||', p_cons_rule_flag =>' || p_cons_rule_flag ||' )');
950: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
951: THEN
952: fnd_log.STRING
953: (fnd_log.level_statement,
954: g_api,
955: 'Enter: gcs_xml_gen_pkg.generate_entry_xml(p_entry_id =>'||p_entry_id||
956: ', p_category_code =>'||p_category_code||', p_cons_rule_flag =>' || p_cons_rule_flag ||' )'
957: );
1013: AND fea_type.attribute_id = l_entity_type_attr
1014: AND fea_type.version_id = l_entity_type_version
1015: AND ROWNUM <= 1;
1016: --fnd_file.put_line(fnd_file.log, ' Start Header XML generation ');
1017: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1018: THEN
1019: fnd_log.STRING
1020: (fnd_log.level_statement,
1021: g_api, ' Select statement results: '||
1015: AND ROWNUM <= 1;
1016: --fnd_file.put_line(fnd_file.log, ' Start Header XML generation ');
1017: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1018: THEN
1019: fnd_log.STRING
1020: (fnd_log.level_statement,
1021: g_api, ' Select statement results: '||
1022: 'l_entry_header_data.entry_name =>'||l_entry_header_data.entry_name||
1023: 'l_entry_header_data.description =>'||l_entry_header_data.description||
1016: --fnd_file.put_line(fnd_file.log, ' Start Header XML generation ');
1017: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1018: THEN
1019: fnd_log.STRING
1020: (fnd_log.level_statement,
1021: g_api, ' Select statement results: '||
1022: 'l_entry_header_data.entry_name =>'||l_entry_header_data.entry_name||
1023: 'l_entry_header_data.description =>'||l_entry_header_data.description||
1024: 'l_entry_header_data.hierarchy_name =>'||l_entry_header_data.hierarchy_name||
1039: generate_entry_header_xml( p_entry_header_data => l_entry_header_data,
1040: p_entry_header_xml => l_entry_header_xml );
1041:
1042: --fnd_file.put_line(fnd_file.log, ' Generated Header XML Successfully ');
1043: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1044: THEN
1045: fnd_log.STRING
1046: (fnd_log.level_statement,
1047: g_api, ' Generated Header XML Successfully '
1041:
1042: --fnd_file.put_line(fnd_file.log, ' Generated Header XML Successfully ');
1043: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1044: THEN
1045: fnd_log.STRING
1046: (fnd_log.level_statement,
1047: g_api, ' Generated Header XML Successfully '
1048: );
1049: END IF;
1042: --fnd_file.put_line(fnd_file.log, ' Generated Header XML Successfully ');
1043: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1044: THEN
1045: fnd_log.STRING
1046: (fnd_log.level_statement,
1047: g_api, ' Generated Header XML Successfully '
1048: );
1049: END IF;
1050:
1054: -- v_languages.language_code||
1055: -- 'p_fem_dim_y_n => N'||
1056: -- 'p_xml_file_type => ENTRY'||
1057: -- 'p_dimension_name_xml => ');
1058: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1059: THEN
1060: fnd_log.STRING
1061: (fnd_log.level_statement,
1062: g_api, 'Start: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1056: -- 'p_xml_file_type => ENTRY'||
1057: -- 'p_dimension_name_xml => ');
1058: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1059: THEN
1060: fnd_log.STRING
1061: (fnd_log.level_statement,
1062: g_api, 'Start: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1063: 'p_fem_dim_y_n => N'||
1064: 'p_xml_file_type => ENTRY'||
1057: -- 'p_dimension_name_xml => ');
1058: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1059: THEN
1060: fnd_log.STRING
1061: (fnd_log.level_statement,
1062: g_api, 'Start: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1063: 'p_fem_dim_y_n => N'||
1064: 'p_xml_file_type => ENTRY'||
1065: 'p_dimension_name_xml => '
1075: -- v_languages.language_code||
1076: -- 'p_fem_dim_y_n => N'||
1077: -- 'p_xml_file_type => ENTRY'||
1078: -- 'p_dimension_name_xml => ');
1079: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1080: THEN
1081: fnd_log.STRING
1082: (fnd_log.level_statement,
1083: g_api, 'End: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1077: -- 'p_xml_file_type => ENTRY'||
1078: -- 'p_dimension_name_xml => ');
1079: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1080: THEN
1081: fnd_log.STRING
1082: (fnd_log.level_statement,
1083: g_api, 'End: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1084: 'p_fem_dim_y_n => N'||
1085: 'p_xml_file_type => ENTRY'||
1078: -- 'p_dimension_name_xml => ');
1079: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1080: THEN
1081: fnd_log.STRING
1082: (fnd_log.level_statement,
1083: g_api, 'End: generate_dimension_name_xml ( p_language_code => '||v_languages.language_code||
1084: 'p_fem_dim_y_n => N'||
1085: 'p_xml_file_type => ENTRY'||
1086: 'p_dimension_name_xml => '
1096: p_entry_id|| ' ORDER BY ' ||
1097: gcs_xml_utility_pkg.g_order_by_stmnt;
1098:
1099: --fnd_file.put_line(fnd_file.log, 'l_entry_lines_sql ' || l_entry_lines_sql);
1100: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1101: THEN
1102: fnd_log.STRING
1103: (fnd_log.level_statement,
1104: g_api, 'l_entry_lines_sql '||l_entry_lines_sql
1098:
1099: --fnd_file.put_line(fnd_file.log, 'l_entry_lines_sql ' || l_entry_lines_sql);
1100: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1101: THEN
1102: fnd_log.STRING
1103: (fnd_log.level_statement,
1104: g_api, 'l_entry_lines_sql '||l_entry_lines_sql
1105: );
1106: END IF;
1099: --fnd_file.put_line(fnd_file.log, 'l_entry_lines_sql ' || l_entry_lines_sql);
1100: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1101: THEN
1102: fnd_log.STRING
1103: (fnd_log.level_statement,
1104: g_api, 'l_entry_lines_sql '||l_entry_lines_sql
1105: );
1106: END IF;
1107: -- Generate new query context and set desired Row Set and Row Tag and
1126: l_entry_header_xml|| l_dimension_name_xml|| l_entry_lines_xml||
1127: ' ';
1128:
1129: --fnd_file.put_line(fnd_file.log, 'Entry XML generated for entry id: ' || p_entry_id);
1130: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1131: THEN
1132: fnd_log.STRING
1133: (fnd_log.level_statement,
1134: g_api, 'Entry XML generated for entry id: '||p_entry_id
1128:
1129: --fnd_file.put_line(fnd_file.log, 'Entry XML generated for entry id: ' || p_entry_id);
1130: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1131: THEN
1132: fnd_log.STRING
1133: (fnd_log.level_statement,
1134: g_api, 'Entry XML generated for entry id: '||p_entry_id
1135: );
1136: END IF;
1129: --fnd_file.put_line(fnd_file.log, 'Entry XML generated for entry id: ' || p_entry_id);
1130: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1131: THEN
1132: fnd_log.STRING
1133: (fnd_log.level_statement,
1134: g_api, 'Entry XML generated for entry id: '||p_entry_id
1135: );
1136: END IF;
1137:
1204:
1205: CLOSE c_xml_id;
1206:
1207: --fnd_file.put_line(fnd_file.log, 'Inserted Entry XML for entry_id: ' || p_entry_id);
1208: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1209: THEN
1210: fnd_log.STRING
1211: (fnd_log.level_statement,
1212: g_api, 'Inserted Entry XML for entry_id: '||p_entry_id
1206:
1207: --fnd_file.put_line(fnd_file.log, 'Inserted Entry XML for entry_id: ' || p_entry_id);
1208: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1209: THEN
1210: fnd_log.STRING
1211: (fnd_log.level_statement,
1212: g_api, 'Inserted Entry XML for entry_id: '||p_entry_id
1213: );
1214: END IF;
1207: --fnd_file.put_line(fnd_file.log, 'Inserted Entry XML for entry_id: ' || p_entry_id);
1208: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1209: THEN
1210: fnd_log.STRING
1211: (fnd_log.level_statement,
1212: g_api, 'Inserted Entry XML for entry_id: '||p_entry_id
1213: );
1214: END IF;
1215:
1214: END IF;
1215:
1216: IF p_cons_rule_flag = 'Y' THEN
1217: --fnd_file.put_line(fnd_file.log, 'Inserted RP XML for entry_id: ' || p_entry_id);
1218: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1219: THEN
1220: fnd_log.STRING
1221: (fnd_log.level_statement,
1222: g_api, 'Inserted RP XML for entry_id: '||p_entry_id );
1216: IF p_cons_rule_flag = 'Y' THEN
1217: --fnd_file.put_line(fnd_file.log, 'Inserted RP XML for entry_id: ' || p_entry_id);
1218: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1219: THEN
1220: fnd_log.STRING
1221: (fnd_log.level_statement,
1222: g_api, 'Inserted RP XML for entry_id: '||p_entry_id );
1223: END IF;
1224: END IF;
1217: --fnd_file.put_line(fnd_file.log, 'Inserted RP XML for entry_id: ' || p_entry_id);
1218: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1219: THEN
1220: fnd_log.STRING
1221: (fnd_log.level_statement,
1222: g_api, 'Inserted RP XML for entry_id: '||p_entry_id );
1223: END IF;
1224: END IF;
1225:
1236:
1237: CLOSE c_xml_id;
1238:
1239: --fnd_file.put_line(fnd_file.log, 'Updated Entry XML for entry_id: ' || p_entry_id);
1240: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1241: THEN
1242: fnd_log.STRING
1243: (fnd_log.level_statement,
1244: g_api, 'Updated Entry XML for entry_id: '||p_entry_id
1238:
1239: --fnd_file.put_line(fnd_file.log, 'Updated Entry XML for entry_id: ' || p_entry_id);
1240: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1241: THEN
1242: fnd_log.STRING
1243: (fnd_log.level_statement,
1244: g_api, 'Updated Entry XML for entry_id: '||p_entry_id
1245: );
1246: END IF;
1239: --fnd_file.put_line(fnd_file.log, 'Updated Entry XML for entry_id: ' || p_entry_id);
1240: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1241: THEN
1242: fnd_log.STRING
1243: (fnd_log.level_statement,
1244: g_api, 'Updated Entry XML for entry_id: '||p_entry_id
1245: );
1246: END IF;
1247:
1246: END IF;
1247:
1248: IF p_cons_rule_flag = 'Y' THEN
1249: --fnd_file.put_line(fnd_file.log, 'Updated RP XML for entry_id: ' || p_entry_id);
1250: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1251: THEN
1252: fnd_log.STRING
1253: (fnd_log.level_statement,
1254: g_api, 'Updated RP XML for entry_id: '||p_entry_id );
1248: IF p_cons_rule_flag = 'Y' THEN
1249: --fnd_file.put_line(fnd_file.log, 'Updated RP XML for entry_id: ' || p_entry_id);
1250: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1251: THEN
1252: fnd_log.STRING
1253: (fnd_log.level_statement,
1254: g_api, 'Updated RP XML for entry_id: '||p_entry_id );
1255: END IF;
1256: END IF;
1249: --fnd_file.put_line(fnd_file.log, 'Updated RP XML for entry_id: ' || p_entry_id);
1250: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1251: THEN
1252: fnd_log.STRING
1253: (fnd_log.level_statement,
1254: g_api, 'Updated RP XML for entry_id: '||p_entry_id );
1255: END IF;
1256: END IF;
1257:
1262: when others then
1263: begin
1264: DBMS_XMLGEN.closeContext(l_qryCtx);
1265: --fnd_file.put_line(fnd_file.log, 'Exception: Others - entry_id: ' || p_entry_id||' - '|| SQLERRM);
1266: IF fnd_log.g_current_runtime_level <= fnd_log.level_error
1267: THEN
1268: fnd_log.STRING
1269: (fnd_log.level_error,
1270: g_api, 'Exception: Others - entry_id: '||p_entry_id ||' - '||SQLERRM);
1264: DBMS_XMLGEN.closeContext(l_qryCtx);
1265: --fnd_file.put_line(fnd_file.log, 'Exception: Others - entry_id: ' || p_entry_id||' - '|| SQLERRM);
1266: IF fnd_log.g_current_runtime_level <= fnd_log.level_error
1267: THEN
1268: fnd_log.STRING
1269: (fnd_log.level_error,
1270: g_api, 'Exception: Others - entry_id: '||p_entry_id ||' - '||SQLERRM);
1271: END IF;
1272: end;
1265: --fnd_file.put_line(fnd_file.log, 'Exception: Others - entry_id: ' || p_entry_id||' - '|| SQLERRM);
1266: IF fnd_log.g_current_runtime_level <= fnd_log.level_error
1267: THEN
1268: fnd_log.STRING
1269: (fnd_log.level_error,
1270: g_api, 'Exception: Others - entry_id: '||p_entry_id ||' - '||SQLERRM);
1271: END IF;
1272: end;
1273: END;
1491: AND ROWNUM < 2;
1492: END IF;
1493:
1494: --fnd_file.put_line(fnd_file.log, 'start DS XML for Load Id : ' || p_load_id);
1495: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1496: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.begin', 'Start DS XML for Load Id : '||p_load_id);
1497: END IF;
1498:
1499: -- Generate the header level XML
1492: END IF;
1493:
1494: --fnd_file.put_line(fnd_file.log, 'start DS XML for Load Id : ' || p_load_id);
1495: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1496: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.begin', 'Start DS XML for Load Id : '||p_load_id);
1497: END IF;
1498:
1499: -- Generate the header level XML
1500: generate_ds_header_xml( p_ds_header_data => l_ds_header_data,
1568: 0 );
1569: CLOSE c_xml_id;
1570:
1571: --fnd_file.put_line(fnd_file.log, 'Inserted DS LOAD XML for Load Id : ' || p_load_id);
1572: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1573: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.INSERT', 'Inserted DS LOAD XML for Load Id : '||p_load_id);
1574: END IF;
1575:
1576: ELSE
1569: CLOSE c_xml_id;
1570:
1571: --fnd_file.put_line(fnd_file.log, 'Inserted DS LOAD XML for Load Id : ' || p_load_id);
1572: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1573: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.INSERT', 'Inserted DS LOAD XML for Load Id : '||p_load_id);
1574: END IF;
1575:
1576: ELSE
1577: update gcs_xml_files
1585:
1586: CLOSE c_xml_id;
1587:
1588: --fnd_file.put_line(fnd_file.log, 'Updated DS LOAD XML for Load Id : ' || p_load_id);
1589: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1590: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Updated DS LOAD XML for Load Id : '||p_load_id);
1591: END IF;
1592:
1593: END IF;
1586: CLOSE c_xml_id;
1587:
1588: --fnd_file.put_line(fnd_file.log, 'Updated DS LOAD XML for Load Id : ' || p_load_id);
1589: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1590: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Updated DS LOAD XML for Load Id : '||p_load_id);
1591: END IF;
1592:
1593: END IF;
1594: COMMIT;
1742: 0 );
1743: CLOSE c_xml_id;
1744:
1745: --fnd_file.put_line(fnd_file.log, 'Inserted DSTB XML for Load Id : ' || p_load_id);
1746: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1747: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.INSERT', 'Inserted DSTB XML for Load Id : '||p_load_id);
1748: END IF;
1749:
1750: ELSE
1743: CLOSE c_xml_id;
1744:
1745: --fnd_file.put_line(fnd_file.log, 'Inserted DSTB XML for Load Id : ' || p_load_id);
1746: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1747: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.INSERT', 'Inserted DSTB XML for Load Id : '||p_load_id);
1748: END IF;
1749:
1750: ELSE
1751: update gcs_xml_files
1758: and language = v_languages.language_code;
1759:
1760: CLOSE c_xml_id;
1761: --fnd_file.put_line(fnd_file.log, 'Updated DSTB XML for Load Id : ' || p_load_id);
1762: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1763: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Updated DSTB XML for Load Id : '||p_load_id);
1764: END IF;
1765:
1766: END IF;
1759:
1760: CLOSE c_xml_id;
1761: --fnd_file.put_line(fnd_file.log, 'Updated DSTB XML for Load Id : ' || p_load_id);
1762: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1763: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Updated DSTB XML for Load Id : '||p_load_id);
1764: END IF;
1765:
1766: END IF;
1767: COMMIT;
1770: when others then
1771: begin
1772: DBMS_XMLGEN.closeContext(l_qryCtx);
1773: --fnd_file.put_line(fnd_file.log, 'Error DS XML for Load Id : ' || p_load_id||' - '|| SQLERRM);
1774: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1775: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Error DS XML for Load Id : '||p_load_id||' - '||SQLERRM);
1776: END IF;
1777: end;
1778: END;
1771: begin
1772: DBMS_XMLGEN.closeContext(l_qryCtx);
1773: --fnd_file.put_line(fnd_file.log, 'Error DS XML for Load Id : ' || p_load_id||' - '|| SQLERRM);
1774: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1775: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_DS_XML.UPDATE', 'Error DS XML for Load Id : '||p_load_id||' - '||SQLERRM);
1776: END IF;
1777: end;
1778: END;
1779: END LOOP;
1932: fct.LANGUAGE = v_languages.language_code AND
1933: ROWNUM <= 1;
1934:
1935: --fnd_file.put_line(fnd_file.log, 'Start AD XML for AD Transaction Id : ' || p_ad_transaction_id);
1936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1937: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.begin', 'Start AD XML for AD Transaction Id : '||p_ad_transaction_id);
1938: END IF;
1939:
1940: -- Generate the header level XML
1933: ROWNUM <= 1;
1934:
1935: --fnd_file.put_line(fnd_file.log, 'Start AD XML for AD Transaction Id : ' || p_ad_transaction_id);
1936: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1937: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.begin', 'Start AD XML for AD Transaction Id : '||p_ad_transaction_id);
1938: END IF;
1939:
1940: -- Generate the header level XML
1941: generate_ad_header_xml( p_ad_header_data => l_ad_header_data,
2002: 0);
2003: CLOSE c_xml_id;
2004:
2005: --fnd_file.put_line(fnd_file.log, 'Inserted AD XML for AD Transaction Id : ' || p_ad_transaction_id);
2006: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.INSERT', 'Inserted AD XML for AD Transaction Id : '||p_ad_transaction_id);
2008: END IF;
2009:
2010: ELSE
2003: CLOSE c_xml_id;
2004:
2005: --fnd_file.put_line(fnd_file.log, 'Inserted AD XML for AD Transaction Id : ' || p_ad_transaction_id);
2006: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2007: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.INSERT', 'Inserted AD XML for AD Transaction Id : '||p_ad_transaction_id);
2008: END IF;
2009:
2010: ELSE
2011: update gcs_xml_files
2019:
2020: CLOSE c_xml_id;
2021:
2022: --fnd_file.put_line(fnd_file.log, 'Updated AD XML for AD Transaction Id : ' || p_ad_transaction_id);
2023: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2024: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.UPDATE', 'Updated AD XML for AD Transaction Id : '||p_ad_transaction_id);
2025: END IF;
2026:
2027: END IF;
2020: CLOSE c_xml_id;
2021:
2022: --fnd_file.put_line(fnd_file.log, 'Updated AD XML for AD Transaction Id : ' || p_ad_transaction_id);
2023: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2024: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.UPDATE', 'Updated AD XML for AD Transaction Id : '||p_ad_transaction_id);
2025: END IF;
2026:
2027: END IF;
2028: COMMIt;
2031: when others then
2032: begin
2033: DBMS_XMLGEN.closeContext(l_qryCtx);
2034: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2035: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2036: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.EXCEPTION', '<
2037: END IF;
2038: end;
2039: END;
2032: begin
2033: DBMS_XMLGEN.closeContext(l_qryCtx);
2034: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2035: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2036: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.GENERATE_AD_XML.EXCEPTION', '<
2038: end;
2039: END;
2040: END LOOP;
2111: AND category_code = p_category_code;
2112:
2113: BEGIN
2114: --fnd_file.put_line(fnd_file.log, 'Beginning XML generation');
2115: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.begin', '<
2117: END IF;
2118:
2119: IF p_category_code = 'DATAPREPARATION' THEN
2112:
2113: BEGIN
2114: --fnd_file.put_line(fnd_file.log, 'Beginning XML generation');
2115: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.begin', '<
2118:
2119: IF p_category_code = 'DATAPREPARATION' THEN
2120: BEGIN
2130: EXCEPTION
2131: WHEN OTHERS THEN
2132: BEGIN
2133: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2134: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2135: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.DATAPREPARATION', 'Error:' ||SQLERRM);
2136: END IF;
2137: END;
2138: END;
2131: WHEN OTHERS THEN
2132: BEGIN
2133: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2134: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2135: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.DATAPREPARATION', 'Error:' ||SQLERRM);
2136: END IF;
2137: END;
2138: END;
2139: ELSIF p_category_code = 'TRANSLATION' OR p_category_code = 'AGGREGATION' THEN
2148: EXCEPTION
2149: WHEN OTHERS THEN
2150: BEGIN
2151: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2152: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2153: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code, 'Error:' ||SQLERRM);
2154: END IF;
2155: END;
2156: END;
2149: WHEN OTHERS THEN
2150: BEGIN
2151: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2152: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2153: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code, 'Error:' ||SQLERRM);
2154: END IF;
2155: END;
2156: END;
2157: ELSIF p_category_code = 'INTRACOMPANY' THEN
2177: generate_entry_xml( p_entry_id => l_entry_id,
2178: p_category_code => p_category_code,
2179: p_cons_rule_flag => 'N' );
2180: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2181: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2182: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2183: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2184: END IF;
2185: END IF;
2178: p_category_code => p_category_code,
2179: p_cons_rule_flag => 'N' );
2180: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2181: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2182: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2183: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2184: END IF;
2185: END IF;
2186: IF l_stat_entry_id IS NOT NULL THEN
2187: generate_entry_xml( p_entry_id => l_stat_entry_id,
2188: p_category_code => p_category_code,
2189: p_cons_rule_flag => 'N' );
2190: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_stat_entry_id || ' category= ' ||p_category_code);
2191: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2192: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2193: 'generate_entry_xml Entry_id ='|| l_stat_entry_id || ' category= ' ||p_category_code);
2194: END IF;
2195: END IF; */
2188: p_category_code => p_category_code,
2189: p_cons_rule_flag => 'N' );
2190: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_stat_entry_id || ' category= ' ||p_category_code);
2191: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2192: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2193: 'generate_entry_xml Entry_id ='|| l_stat_entry_id || ' category= ' ||p_category_code);
2194: END IF;
2195: END IF; */
2196: IF (l_request_error_code NOT IN ('COMPLETED', 'N/A')) THEN
2202: generate_entry_xml( p_entry_id => l_entry_id,
2203: p_category_code => p_category_code,
2204: p_cons_rule_flag => 'N' );
2205: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2206: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2207: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2208: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2209: END IF;
2210: END IF;*/
2203: p_category_code => p_category_code,
2204: p_cons_rule_flag => 'N' );
2205: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2206: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2207: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2208: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2209: END IF;
2210: END IF;*/
2211: ELSIF (p_category_code = 'TRANSLATION') THEN
2213: generate_entry_xml( p_entry_id => l_entry_id,
2214: p_category_code => p_category_code,
2215: p_cons_rule_flag => 'N' );
2216: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2217: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2219: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2220: END IF;
2221: END IF;*/
2214: p_category_code => p_category_code,
2215: p_cons_rule_flag => 'N' );
2216: --fnd_file.put_line(fnd_file.log, 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2217: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.'||p_category_code,
2219: 'generate_entry_xml Entry_id ='|| l_entry_id || ' category= ' ||p_category_code);
2220: END IF;
2221: END IF;*/
2222: IF (l_request_error_code NOT IN ('COMPLETED', 'N/A')) THEN
2248: END IF;
2249: END IF;
2250:
2251: --fnd_file.put_line(fnd_file.log, 'Completed XML generation');
2252: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2253: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.end', '<
2254: END IF;
2255:
2256: EXCEPTION
2249: END IF;
2250:
2251: --fnd_file.put_line(fnd_file.log, 'Completed XML generation');
2252: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2253: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.end', '<
2255:
2256: EXCEPTION
2257: WHEN OTHERS THEN
2256: EXCEPTION
2257: WHEN OTHERS THEN
2258: BEGIN
2259: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.EXCEPTION', '<
2262: END IF;
2263: END;
2264: END submit_entry_xml_gen;
2257: WHEN OTHERS THEN
2258: BEGIN
2259: --fnd_file.put_line(fnd_file.log, 'Error occurred : ' || SQLERRM);
2260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
2261: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_ENTRY_XML_GEN.EXCEPTION', '<
2263: END;
2264: END submit_entry_xml_gen;
2265: