eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_PM_CONTROLS SQL Statements

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

Line: 28


SELECT NVL(field_value_allowed_flag,'N')
FROM pa_pm_control_actions
WHERE action = p_action;

Line: 34


Select 'x'
FROM pa_pm_product_control_rules pc,
     pa_pm_control_actions pa
WHERE pa.action = p_action
AND pa.control_rule_id = pc.control_rule_id
AND pc.pm_product_code = p_pm_product_code
AND NVL(l_field_value_code,'N') = NVL(pc.field_value_code,'N')
AND TRUNC(SYSDATE) BETWEEN TRUNC(NVL(start_date_active,SYSDATE))
AND TRUNC(NVL(end_date_active,SYSDATE));

Line: 60


    p_error_stage := 'Select nvl(field_value_allowed_flag,N) from '||
                     'pa_pm_control_actions';

Line: 87


    'Select x from pa_pm_product_control_rules,pa_pm_control_actions';

Line: 117


                              p_delete_project_allowed      OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_num_allowed     OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_name_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_desc_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_dates_allowed   OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_status_allowed  OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_manager_allowed OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_proj_org_allowed     OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_add_task_allowed            OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_delete_task_allowed         OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_task_num_allowed     OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_task_name_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_task_dates_allowed   OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_task_desc_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_parent_task_allowed  OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_task_org_allowed     OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_error_code                  OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
                              p_error_stack              IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_error_stage              IN OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
-- This is a specific API being called by the Projects form
-- It returns 16 flags pertaining to project and tasks
-- indicating whether the action is allowed to be performed in Oracle Projects
-- The rules are set up , for each project management product
-- by system administrators . If an active record is found for the given
-- product code and action ,then the procedure returns the relevant flag
-- as 'N', else it returns 'Y'
-- The procedure is called only by the Projects form to determine
-- whether such actions can be performed on a project that has been imported
-- from an external project management system

   l_old_stack varchar2(630);

Line: 160


         p_delete_project_allowed      := 'Y';

Line: 161


         p_update_proj_num_allowed     := 'Y';

Line: 162


         p_update_proj_name_allowed    := 'Y';

Line: 163


         p_update_proj_desc_allowed    := 'Y';

Line: 164


         p_update_proj_dates_allowed   := 'Y';

Line: 165


         p_update_proj_status_allowed  := 'Y';

Line: 166


         p_update_proj_manager_allowed := 'Y';

Line: 167


         p_update_proj_org_allowed     := 'Y';

Line: 169


         p_delete_task_allowed         := 'Y';

Line: 170


         p_update_task_num_allowed     := 'Y';

Line: 171


         p_update_task_name_allowed    := 'Y';

Line: 172


         p_update_task_dates_allowed   := 'Y';

Line: 173


         p_update_task_desc_allowed    := 'Y';

Line: 174


         p_update_parent_task_allowed  := 'Y';

Line: 175


         p_update_task_org_allowed     := 'Y';

Line: 177


         l_action(1)  := 'DELETE_PROJECT';

Line: 178


         l_action(2)  := 'UPDATE_PROJECT_NUMBER';

Line: 179


         l_action(3)  := 'UPDATE_PROJECT_NAME';

Line: 180


         l_action(4)  := 'UPDATE_PROJECT_DESCRIPTION';

Line: 181


         l_action(5)  := 'UPDATE_PROJECT_DATES';

Line: 182


         l_action(6)  := 'UPDATE_PROJECT_STATUS';

Line: 183


         l_action(7)  := 'UPDATE_PROJECT_MANAGER';

Line: 184


         l_action(8)  := 'UPDATE_PROJECT_ORGANIZATION';

Line: 186


         l_action(10) := 'DELETE_TASK';

Line: 187


         l_action(11) := 'UPDATE_TASK_NUMBER';

Line: 188


         l_action(12) := 'UPDATE_TASK_NAME';

Line: 189


         l_action(13) := 'UPDATE_TASK_DATES';

Line: 190


         l_action(14) := 'UPDATE_TASK_DESCRIPTION';

Line: 191


         l_action(15) := 'UPDATE_PARENT_TASK';

Line: 192


         l_action(16) := 'UPDATE_TASK_ORGANIZATION';

Line: 198


             'Select x from pa_pm_product_control_rules,pa_pm_control_actions';

Line: 200


              SELECT 'x' INTO l_dummy
              FROM pa_pm_product_control_rules pc,
                   pa_pm_control_actions pa
              WHERE pa.action = l_action(i)
              AND pa.control_rule_id = pc.control_rule_id
              AND pc.pm_product_code = p_pm_product_code
              AND TRUNC(SYSDATE) BETWEEN TRUNC(NVL(start_date_active,SYSDATE))
              AND TRUNC(NVL(end_date_active,SYSDATE));

Line: 210


                 p_delete_project_allowed      := 'N';

Line: 212


                 p_update_proj_num_allowed     := 'N';

Line: 214


                 p_update_proj_name_allowed    := 'N';

Line: 216


                 p_update_proj_desc_allowed    := 'N';

Line: 218


                 p_update_proj_dates_allowed   := 'N';

Line: 220


                 p_update_proj_status_allowed  := 'N';

Line: 222


                 p_update_proj_manager_allowed := 'N';

Line: 224


                 p_update_proj_org_allowed     := 'N';

Line: 228


                 p_delete_task_allowed         := 'N';

Line: 230


                 p_update_task_num_allowed     := 'N';

Line: 232


                 p_update_task_name_allowed    := 'N';

Line: 234


                 p_update_task_dates_allowed   := 'N';

Line: 236


                 p_update_task_desc_allowed    := 'N';

Line: 238


                 p_update_parent_task_allowed  := 'N';

Line: 240


                 p_update_task_org_allowed     := 'N';

Line: 261


      p_delete_project_allowed      :=  'N' ;

Line: 262


      p_update_proj_num_allowed     :=  'N' ;

Line: 263


      p_update_proj_name_allowed    :=  'N' ;

Line: 264


      p_update_proj_desc_allowed    :=  'N' ;

Line: 265


      p_update_proj_dates_allowed   :=  'N' ;

Line: 266


      p_update_proj_status_allowed  :=  'N' ;

Line: 267


      p_update_proj_manager_allowed :=  'N' ;

Line: 268


      p_update_proj_org_allowed     :=  'N' ;

Line: 270


      p_delete_task_allowed         :=  'N' ;

Line: 271


      p_update_task_num_allowed     :=  'N' ;

Line: 272


      p_update_task_name_allowed    :=  'N' ;

Line: 273


      p_update_task_dates_allowed   :=  'N' ;

Line: 274


      p_update_task_desc_allowed    :=  'N' ;

Line: 275


      p_update_parent_task_allowed  :=  'N' ;

Line: 276


      p_update_task_org_allowed     :=  'N' ;

Line: 285


                              p_update_agreement_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_delete_agreement_allowed    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_add_funding_allowed         OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_update_funding_allowed      OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_delete_funding_allowed      OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_error_code                  OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
                              p_error_stack              IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                              p_error_stage              IN OUT NOCOPY VARCHAR2 ) --File.Sql.39 bug 4440895
IS
/* *****************************************************************************
-- This is a specific API being called by the Agreement/Funding Form
-- It returns 5 flags pertaining to Agreements and Fundings
-- indicating whether the action is allowed to be performed in Oracle Projects
-- The rules are set up , for each project management product
-- by system administrators . If an active record is found for the given
-- product code and action ,then the procedure returns the relevant flag
-- as 'N', else it returns 'Y'
-- The procedure is called only by the Projects form to determine
-- whether such actions can be performed on a project that has been imported
-- from an external project management system
   ***************************************************************************** */

   l_old_stack varchar2(630);

Line: 319


         p_update_agreement_allowed    := 'Y';

Line: 320


         p_delete_agreement_allowed    := 'Y';

Line: 322


         p_update_funding_allowed      := 'Y';

Line: 323


         p_delete_funding_allowed      := 'Y';

Line: 325


         l_action(1)  := 'UPDATE_AGREEMENT';

Line: 326


         l_action(2)  := 'DELETE_AGREEMENT';

Line: 328


         l_action(4)  := 'UPDATE_FUNDING';

Line: 329


         l_action(5)  := 'DELETE_FUNDING';

Line: 335


             'Select x from pa_pm_product_control_rules,pa_pm_control_actions';

Line: 337


              SELECT 'x' INTO l_dummy
              FROM pa_pm_product_control_rules pc,
                   pa_pm_control_actions pa
              WHERE pa.action = l_action(i)
              AND pa.control_rule_id = pc.control_rule_id
              AND pc.pm_product_code = p_pm_product_code
              AND TRUNC(SYSDATE) BETWEEN TRUNC(NVL(start_date_active,SYSDATE))
              AND TRUNC(NVL(end_date_active,SYSDATE));

Line: 347


                 p_update_agreement_allowed    := 'N';

Line: 349


                 p_delete_agreement_allowed    := 'N';

Line: 353


                 p_update_funding_allowed      := 'N';

Line: 355


                 p_delete_funding_allowed      := 'N';

Line: 376


        p_update_agreement_allowed    := 'N' ;

Line: 377


        p_delete_agreement_allowed    := 'N' ;

Line: 379


        p_update_funding_allowed      := 'N' ;

Line: 380


        p_delete_funding_allowed      := 'N' ;

Line: 392


                 p_update_Event_allowed      	OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                 p_delete_Event_allowed       	OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
		 p_update_event_bill_hold 	OUT NOCOPY VARCHAR2, /* added for bug 6870421*/
                 P_ERROR_CODE	           	OUT	NOCOPY NUMBER, --File.Sql.39 bug 4440895
                 P_ERROR_STACK              	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
                 P_ERROR_STAGE	           	IN OUT	NOCOPY VARCHAR2)  --File.Sql.39 bug 4440895
IS

TYPE actiontabtype IS TABLE OF pa_pm_control_actions.action%TYPE INDEX BY BINARY_INTEGER;

Line: 405


P_update_event_allowed :='Y';

Line: 406


P_delete_event_allowed := 'Y';

Line: 407


p_update_event_bill_hold :='Y'; /* added for bug 6870421*/

Line: 408


l_action(1) := 'UPDATE_EVENT';

Line: 409


l_action(2) := 'DELETE_EVENT';

Line: 410


l_action(3) := 'UPDATE_EVENT_BILL_HOLD'; /* added for bug 6870421*/

Line: 415


P_ERROR_STAGE := 'SELECT x INTO l_dummy FROM pa_pm_product_control_rules pc,pa_pm_control_actions pa' ; --4537865

Line: 417


	         SELECT 'x' INTO l_dummy
              FROM pa_pm_product_control_rules pc,
                   	  pa_pm_control_actions pa
              WHERE pa.action = l_action(i)
              AND pa.control_rule_id = pc.control_rule_id
              AND pc.pm_product_code = p_pm_product_code
              AND TRUNC(SYSDATE) BETWEEN TRUNC(NVL(start_date_active,SYSDATE))
              AND TRUNC(NVL(end_date_active,SYSDATE));

Line: 427


                 p_update_event_allowed    := 'N';

Line: 429


                 p_delete_event_allowed    := 'N';

Line: 431


                 p_update_event_bill_hold  := 'N';

Line: 441


	p_update_event_allowed    := 'N';

Line: 442


	p_delete_event_allowed    := 'N';