APPS.FPA_PLANNINGCYCLE_PVT SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 28

	SELECT 	fpa_planning_cycle_s.nextval AS l_pc_id
	FROM dual;

Line: 40

    SELECT language_code
    FROM   fnd_languages
    WHERE  installed_flag IN ('I','B');

Line: 78

                   INSERT INTO FPA_OBJECTS_TL( object
                          ,id
                          ,name
                          ,description
                          ,LANGUAGE
                          ,SOURCE_LANG
                          ,created_by
                          ,creation_date
                          ,last_updated_by
                          ,last_update_date
                          ,last_update_login)
                    VALUES( 'PLANNING_CYCLE'
                          ,l_pc_s_r.l_pc_id
                          ,p_pc_all_obj.pc_desc_fields.name
                          ,p_pc_all_obj.pc_desc_fields.description
                          ,l_language
                          ,USERENV('LANG')
                          ,fnd_global.user_id
                          ,sysdate()
                          ,fnd_global.user_id
                          ,sysdate()
                          ,0);

Line: 161

PROCEDURE Update_Pc_Invest_Mix
     ( p_api_version        IN NUMBER,
       p_inv_matrix         IN fpa_pc_inv_matrix_tbl,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS
l_pc_catg number;

Line: 175

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
		);

Line: 188

      SELECT distinct(pc_category) INTO l_pc_catg
      FROM fpa_aw_pc_inv_matrices_v
      WHERE planning_cycle =  p_inv_matrix(1).planning_cycle;

Line: 205

	-- Update the InvestMix
	-- Limit PCID
	  dbms_aw.execute('LMT planning_cycle_d TO ' || p_inv_matrix(1).planning_cycle );

Line: 226

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
		);

Line: 242

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix',
			SQLERRM
		);

Line: 254

END Update_Pc_Invest_Mix;

Line: 256

PROCEDURE Update_Pc_Fin_Targets
     ( p_api_version        IN NUMBER,
       p_fin_targets_tbl    IN fpa_pc_fin_targets_tbl,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS
l_pc_catg number;

Line: 274

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
		);

Line: 287

  SELECT b.PC_DISPLAY_FACTOR
  INTO l_pc_disply_factor
  FROM  fpa_aw_pc_disc_funds_v b
  WHERE b.planning_cycle = p_fin_targets_tbl(1).planning_cycle;

Line: 294

	-- Update the financial targets
	-- Limit PCID
	  dbms_aw.execute('LMT planning_cycle_d TO ' || p_fin_targets_tbl(1).planning_cycle );

Line: 306

            SELECT meaning
              INTO l_target_name
              FROM fpa_lookups_v
             WHERE lookup_type = 'FPA_PC_FIN_TARGETS'
               AND lookup_code = p_fin_targets_tbl(i).financial_metrics;

Line: 331

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
		);

Line: 349

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets',
			SQLERRM
		);

Line: 361

END Update_Pc_Fin_Targets;

Line: 363

PROCEDURE Update_Pc_Inv_Criteria_Data
     ( p_api_version        IN NUMBER,
       p_inv_crit_tbl       IN fpa_pc_inv_criteria_tbl,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS
l_pc_obj varchar2(3);

Line: 377

	       	'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.begin',
		'Entering FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
		);

Line: 388

	-- Update the investment criteria data
	-- Limit PCID
        IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
                FND_LOG.String
                ( FND_LOG.LEVEL_PROCEDURE,
                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Limit pc dimension to ' || p_inv_crit_tbl(1).planning_cycle || ' value.'
                );

Line: 403

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Setting score_type_pc_r to: ' || p_inv_crit_tbl(1).pc_project_score_source || ' value.'
                );

Line: 413

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Setting pc_project_score_scale_m to: ' || p_inv_crit_tbl(1).pc_project_score_scale || ' value.'
                );

Line: 426

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Debugging, we are in ' || i || ' value.'
                );

Line: 436

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Limit strategic_obj_d dimension to ' || p_inv_crit_tbl(i).investment_criteria || ' value.'
                );

Line: 448

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Setting pc_strategic_obj_weights_m: ' || p_inv_crit_tbl(i).pc_inv_criteria_weight || ' value.'
                );

Line: 460

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Setting pc_obj_wscore_targets_from_m: ' || p_inv_crit_tbl(i).pc_inv_crit_score_target_from || ' value.'
                );

Line: 465

	-- If the target_from value from UI is null, update it in AW with NA

        IF p_inv_crit_tbl(i).pc_inv_crit_score_target_from IS NULL THEN
          dbms_aw.execute('pc_obj_wscore_targets_from_m = NA');

Line: 479

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Setting pc_obj_wscore_targets_to_m: ' || p_inv_crit_tbl(i).pc_inv_crit_score_target_to || ' value.'
                );

Line: 483

	-- If the target_to value from UI is null, update it in AW with NA

        IF p_inv_crit_tbl(i).pc_inv_crit_score_target_to IS NULL THEN
          dbms_aw.execute('pc_obj_wscore_targets_to_m = NA');

Line: 498

                'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
                'Calling AW program: set_pc_invest_criteria_prg( ' || p_inv_crit_tbl(1).planning_cycle || ').'
                );

Line: 510

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
		);

Line: 526

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
			SQLERRM
		);

Line: 538

END Update_Pc_Inv_Criteria_Data;

Line: 541

PROCEDURE Update_Pc_Desc_Fields
     ( p_api_version        IN NUMBER,
       p_pc_all_obj         IN fpa_pc_all_obj,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN

	IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
		FND_LOG.String
		(
			FND_LOG.LEVEL_PROCEDURE,
			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
		);

Line: 560

	-- Update name and description

    --DBMS_OUTPUT.put_line('Before Updating Update_Pc_Desc_Fields...');

Line: 564

    UPDATE FPA_OBJECTS_TL
    SET  name = p_pc_all_obj.pc_desc_fields.name
        ,description = p_pc_all_obj.pc_desc_fields.description
        ,SOURCE_LANG     = userenv('LANG')
        ,last_update_date = sysdate()
    WHERE id = p_pc_all_obj.pc_desc_fields.id
    AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG)
    AND OBJECT = 'PLANNING_CYCLE'; --Added for bug 6142322

Line: 577

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
		);

Line: 591

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields',
			SQLERRM
		);

Line: 603

END Update_Pc_Desc_Fields;

Line: 627

	-- Update the status
	dbms_aw.execute('LMT planning_cycle_d TO ' || p_pc_id );

Line: 751

PROCEDURE Update_Pc_Class_Category
     ( p_api_version        IN NUMBER,
       p_pc_id              IN NUMBER,
       p_catg_id            IN NUMBER,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN
    --DBMS_OUTPUT.put_line('Inside Update_Pc_Class_Category....');

Line: 767

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
		);

Line: 773

	-- Update the Basic Info
	-- Limit PCID
	dbms_aw.execute('LMT planning_cycle_d TO ' || p_pc_id );

Line: 785

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
		);

Line: 799

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category',
			SQLERRM
		);

Line: 811

END Update_Pc_Class_Category;

Line: 813

PROCEDURE Update_Pc_Calendar
     ( p_api_version        IN NUMBER,
       p_pc_info            IN fpa_pc_info_obj,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN
    --DBMS_OUTPUT.put_line('Inside Update_Pc_Calendar....');

Line: 828

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
		);

Line: 834

	-- Update the Calendar
	-- Limit PCID
	dbms_aw.execute('LMT planning_cycle_d TO ' || p_pc_info.planning_cycle );

Line: 891

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
		);

Line: 905

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar',
			SQLERRM
		);

Line: 917

END Update_Pc_Calendar;

Line: 919

PROCEDURE Update_Pc_Currency
     ( p_api_version        IN NUMBER,
       p_pc_info            IN fpa_pc_info_obj,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN
    --DBMS_OUTPUT.put_line('Inside Update_Pc_Currency....');

Line: 933

		 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.begin',
		 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Currency'
		);

Line: 939

	-- Update the Currency
	-- Limit PCID
	dbms_aw.execute('LMT planning_cycle_d TO ' || p_pc_info.planning_cycle );

Line: 972

                 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
                 'Setting currency_date_pc_r to : ' || to_char(fnd_date.chardate_to_date(p_pc_info.conversion_rate_date), 'DDMONYYYY' || '''') || ' value.'
                );

Line: 990

                 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
                 'Setting currency_date_pc_r to sysdate value.'||to_char(sysdate,'DDMONYYYY' || '''')
                );

Line: 1010

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Currency'
		);

Line: 1024

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
			SQLERRM
		);

Line: 1036

END Update_Pc_Currency;

Line: 1039

PROCEDURE Update_Pc_Sub_Due_Date
     ( p_api_version        IN NUMBER,
       p_pc_info            IN fpa_pc_info_obj,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN
    --DBMS_OUTPUT.put_line('Inside Update_Pc_Sub_Due_Date....');

Line: 1054

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
		);

Line: 1060

	-- Update the Currency
	-- Limit PCID
	dbms_aw.execute('LMT planning_cycle_d TO ' || p_pc_info.planning_cycle );

Line: 1095

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
		);

Line: 1109

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date',
			SQLERRM
		);

Line: 1121

END Update_Pc_Sub_Due_Date;

Line: 1125

PROCEDURE Update_Pc_Discount_funds
     ( p_api_version        IN NUMBER,
       p_disc_funds         IN fpa_pc_discount_obj,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
IS

BEGIN
    --DBMS_OUTPUT.put_line('Inside Update_Pc_Discount_funds....');

Line: 1140

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.begin',
			'Entering FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
		);

Line: 1147

  	-- Update the Discount
    -- Limit PCID
    dbms_aw.execute('LMT planning_cycle_d TO ' || p_disc_funds.planning_cycle);

Line: 1172

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.end',
			'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
		);

Line: 1186

			'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds',
			SQLERRM
		);

Line: 1198

END Update_Pc_Discount_funds;

Line: 1227

        SELECT count(p.name)
        INTO l_pcName_Count
        FROM fpa_aw_pc_info_v a, fpa_pcs_vl p
        WHERE a.planning_cycle = p.planning_cycle
        AND portfolio = p_portfolio_id
        AND p.name = p_pc_name ;

Line: 1235

        SELECT count(p.name)
        INTO l_pcName_Count
        FROM fpa_aw_pc_info_v a, fpa_pcs_vl p
        WHERE a.planning_cycle = p.planning_cycle
        AND portfolio = p_portfolio_id
        AND p.name = p_pc_name
        AND a.planning_cycle <> p_pc_id ;

Line: 1279

PROCEDURE Pa_Distrb_Lists_Insert_Row (
       p_api_version    IN NUMBER,
       p_distr_list     IN fpa_pc_distr_list_obj,
       p_list_id 	    IN OUT NOCOPY NUMBER,
       x_return_status  OUT NOCOPY VARCHAR2,
       x_msg_data       OUT NOCOPY VARCHAR2,
       x_msg_count      OUT NOCOPY NUMBER )

IS
l_list_id NUMBER;

Line: 1295

			'fpa.sql.FPA_Process_Pvt.Pa_Distrb_Lists_Insert_Row.begin',
			'Entering FPA_Process_Pvt.Pa_Distrb_Lists_Insert_Row'
		);

Line: 1302

     PA_DISTRIBUTION_LISTS_PKG.INSERT_ROW
            (
                P_LIST_ID => l_list_id,
                P_NAME => l_obj_name,
                P_DESCRIPTION => p_distr_list.description,
                P_RECORD_VERSION_NUMBER => NULL,
                P_CREATED_BY =>	fnd_global.user_id,
                P_CREATION_DATE => sysdate,
                P_LAST_UPDATED_BY => fnd_global.user_id,
                P_LAST_UPDATE_DATE => sysdate,
                P_LAST_UPDATE_LOGIN => fnd_global.user_id
            );

Line: 1318

     PA_OBJECT_DIST_LISTS_PKG.INSERT_ROW
            (
                P_LIST_ID => l_list_id,
                P_OBJECT_TYPE => p_distr_list.object_type,
                P_OBJECT_ID => p_distr_list.object_id,
                P_RECORD_VERSION_NUMBER => NULL,
                P_CREATED_BY =>	fnd_global.user_id,
                P_CREATION_DATE => sysdate,
                P_LAST_UPDATED_BY => fnd_global.user_id,
                P_LAST_UPDATE_DATE => sysdate,
                P_LAST_UPDATE_LOGIN => fnd_global.user_id
            );

Line: 1336

			'fpa.sql.FPA_Process_Pvt.Pa_Distrb_Lists_Insert_Row.end',
			'Exiting FPA_Process_Pvt.Pa_Distrb_Lists_Insert_Row'
		);

Line: 1353

			'fpa.sql.FPA_Process_Pvt.Pa_Distrb_Lists_Insert_Row',
			SQLERRM
		);

Line: 1365

END Pa_Distrb_Lists_Insert_Row;

Line: 1368

PROCEDURE Pa_Dist_List_Items_Update_Row (
       p_api_version           IN NUMBER,
       p_distr_list_items_tbl  fpa_pc_distr_list_items_tbl,
       x_return_status         OUT NOCOPY VARCHAR2,
       x_msg_data              OUT NOCOPY VARCHAR2,
       x_msg_count             OUT NOCOPY NUMBER )
IS
l_list_item_id NUMBER;

Line: 1382

			'fpa.sql.FPA_Process_Pvt.Pa_Dist_List_Items_Update_Row.begin',
			'Entering FPA_Process_Pvt.Pa_Dist_List_Items_Update_Row'
		);

Line: 1391

         SELECT list_id INTO l_list_id
   	     FROM  pa_object_dist_lists
         WHERE object_id = p_distr_list_items_tbl(1).planning_cycle
		 AND object_type = 'PJP_PLANNING_CYCLE';

Line: 1414

              PA_DIST_LIST_ITEMS_PKG.Update_Row
                (
                    P_LIST_ITEM_ID   => p_distr_list_items_tbl(i).list_item_id,
                    P_LIST_ID        => l_list_id,
                    P_RECIPIENT_TYPE => p_distr_list_items_tbl(i).recipient_type,
                    P_RECIPIENT_ID   => p_distr_list_items_tbl(i).recipient_id,
                    P_ACCESS_LEVEL   => NULL,
                    P_MENU_ID        => NULL,
                    P_EMAIL          => p_distr_list_items_tbl(i).email_exists,
                    P_RECORD_VERSION_NUMBER => NULL,
                    P_LAST_UPDATED_BY   => fnd_global.user_id,
                    P_LAST_UPDATE_DATE  => sysdate,
                    P_LAST_UPDATE_LOGIN => fnd_global.user_id
                );

Line: 1434

                PA_DIST_LIST_ITEMS_PKG.INSERT_ROW
                 (
                    P_LIST_ITEM_ID => l_list_item_id,
                    P_LIST_ID => l_list_id,
                    P_RECIPIENT_TYPE => p_distr_list_items_tbl(i).recipient_type,
                    P_RECIPIENT_ID => p_distr_list_items_tbl(i).recipient_id,
                    P_ACCESS_LEVEL => NULL,
                    P_MENU_ID => NULL,
                    P_EMAIL => p_distr_list_items_tbl(i).email_exists,
                    P_RECORD_VERSION_NUMBER => NULL,
                    P_CREATED_BY =>	fnd_global.user_id,
                    P_CREATION_DATE => sysdate,
                    P_LAST_UPDATED_BY => fnd_global.user_id,
                    P_LAST_UPDATE_DATE => sysdate,
                    P_LAST_UPDATE_LOGIN => fnd_global.user_id
                 );

Line: 1462

			'fpa.sql.FPA_Process_Pvt.Pa_Dist_List_Items_Update_Row.end',
			'Exiting FPA_Process_Pvt.Pa_Dist_List_Items_Update_Row'
		);

Line: 1479

			'fpa.sql.FPA_Process_Pvt.Pa_Dist_List_Items_Update_Row',
			SQLERRM
		);

Line: 1491

END Pa_Dist_List_Items_Update_Row;

Line: 1776

PROCEDURE Update_Pc_Annual_Disc_Rates
     ( p_api_version        IN NUMBER,
       p_pc_id              IN NUMBER,
       p_period             IN VARCHAR2,
       p_rate               IN VARCHAR2,
       x_return_status      OUT NOCOPY VARCHAR2,
       x_msg_data           OUT NOCOPY VARCHAR2,
       x_msg_count          OUT NOCOPY NUMBER )
is

  l_api_version            CONSTANT NUMBER    := 1.0;

Line: 1793

     'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.begin',
     'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');

Line: 1801

       'FPA.SQL.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
       'Checking API version.');

Line: 1810

     'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
     'Updating Annual discount rates for the PC in AW.');

Line: 1821

     'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
     'Done Updating  Annual discount rates for the PC in AW.');

Line: 1828

     'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.end',
     'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');

Line: 1841

        'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates',
        SQLERRM);

Line: 1851

END Update_Pc_Annual_Disc_Rates;