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_PROJ_TASK_STRUC_PUB dependencies on DUAL

Line 71: FROM sys.dual;

67:
68: CURSOR cur_elem_ver_seq
69: IS
70: SELECT pa_proj_element_versions_s.nextval
71: FROM sys.dual;
72:
73: BEGIN
74:
75: --Clear Error Messages.

Line 411: FROM sys.dual;

407: IF p_struc_type = 'WORKPLAN' AND l_split_flag IS NOT NULL
408: THEN
409: --l_proj_element_id := null;
410: SELECT pa_tasks_s.nextval INTO l_proj_element_id
411: FROM sys.dual;
412: l_postfix := '-'||SUBSTR( p_struc_type, 1, 1 );
413: --hsiu added for parent_structure_id column
414: OPEN get_structure(p_project_id, 'WORKPLAN');
415: FETCH get_structure into l_structure_id;

Line 4737: FROM sys.dual;

4733: where project_id = p_project_id;
4734:
4735: CURSOR cur_elem_ver_seq IS
4736: SELECT pa_proj_element_versions_s.nextval
4737: FROM sys.dual;
4738:
4739: cursor get_working_ver_num(c_project_id NUMBER, c_proj_element_id NUMBER) IS
4740: select nvl(max(version_number),0)+1
4741: from pa_proj_elem_ver_structure

Line 5010: FROM sys.dual;

5006: and status_code <> 'STRUCTURE_PUBLISHED';
5007:
5008: CURSOR cur_elem_ver_seq IS
5009: SELECT pa_proj_element_versions_s.nextval
5010: FROM sys.dual;
5011:
5012: cursor get_working_ver_num(c_project_id NUMBER, c_proj_element_id NUMBER) IS
5013: select nvl(max(version_number),0)+1
5014: from pa_proj_elem_ver_structure

Line 7618: FROM dual

7614:
7615: --This cursor determines if atleast one WP version has been selected by the user
7616: CURSOR cur_min_one_wp_version_sel IS
7617: SELECT 'Y'
7618: FROM dual
7619: WHERE EXISTS( SELECT 'Y'
7620: FROM PA_PROJECT_COPY_OPTIONS_TMP
7621: WHERE CONTEXT = 'WORKPLAN'
7622: AND VERSION_ID IS NOT NULL) ;

Line 8839: FROM dual;

8835: --If it is a shared structure and the only WP version selected is Publish Upon Creation, then
8836: --create a working copy of the Published version
8837: IF l_shared_make_working_copy IS NOT NULL THEN
8838: SELECT pa_proj_element_versions_s.nextval INTO l_new_wp_ver_id
8839: FROM dual;
8840:
8841: SELECT meaning INTO l_prefix
8842: FROM pa_lookups
8843: WHERE lookup_type = 'PA_STRUCTURES_PREFIX'

Line 9787: FROM dual;

9783: check_str_sel_flag := 'Y';
9784:
9785: --Create new default WP structure version
9786: SELECT pa_proj_element_versions_s.nextval INTO l_new_wp_ver_id
9787: FROM dual;
9788:
9789: INSERT INTO pa_proj_element_versions(
9790: ELEMENT_VERSION_ID
9791: ,PROJ_ELEMENT_ID

Line 10645: FROM sys.dual;

10641:
10642: CURSOR cur_elem_ver_seq
10643: IS
10644: SELECT pa_proj_element_versions_s.nextval
10645: FROM sys.dual;
10646:
10647: l_get_structure_attr_csr_rec l_get_structure_attr_csr%ROWTYPE;
10648: l_get_structure_attr_csr_rec2 l_get_structure_attr_csr2%ROWTYPE;
10649:

Line 20363: ,residual_task_count Number

20359: ,cum_alloted_weightage pa_object_relationships.weighting_percentage%TYPE
20360: ,processed_child_count Number
20361: -- Following added for bug 3053472
20362: ,loop_count Number
20363: ,residual_task_count Number
20364: ,adj_direction Number -- This will be +1 / -1
20365: );
20366:
20367: TYPE CHILD_INFO_TBL IS TABLE OF CHILD_INFO_REC

Line 20611: -- These will be used in the second part of the api to calculate the weightage of the individual

20607: --bug 4726889
20608:
20609: -- The first part of this procedure reads the task version records of the structure version
20610: -- in batches and calculates the summed duration or the summed effort of all the parent tasks.
20611: -- These will be used in the second part of the api to calculate the weightage of the individual
20612: -- tasks.
20613: DECLARE
20614: l_object_rel_id_fetch_tbl object_rel_id_tbl;
20615: l_parent_task_ver_id_fetch_tbl parent_task_ver_id_tbl;

Line 20698: l_residual_weightage pa_object_relationships.weighting_percentage%TYPE;

20694:
20695: --Bug 3053472 - remaining weightage is no more required.
20696: --l_remaining_weightage pa_object_relationships.weighting_percentage%TYPE;
20697:
20698: l_residual_weightage pa_object_relationships.weighting_percentage%TYPE;
20699: BEGIN
20700: IF nvl(l_object_rel_id_tbl.last,0) > 0 THEN
20701: FOR i in l_object_rel_id_tbl.first..l_object_rel_id_tbl.last LOOP
20702: l_parent_id := l_parent_task_ver_id_tbl(i);

Line 20751: -- Bug 3053472. Loop over the plsql table once more to process the residual task weightage of

20747: + l_task_weightage;
20748: l_task_weightage_tbl(i) := l_task_weightage;
20749: END LOOP;
20750:
20751: -- Bug 3053472. Loop over the plsql table once more to process the residual task weightage of
20752: -- the tasks. The logic used is to distribute the residual task weightage to as many tasks as
20753: -- possible so that the task weightage is uniform. The updates in the bug gives more details
20754: -- on the logic.
20755: FOR i in l_object_rel_id_tbl.first..l_object_rel_id_tbl.last LOOP

Line 20752: -- the tasks. The logic used is to distribute the residual task weightage to as many tasks as

20748: l_task_weightage_tbl(i) := l_task_weightage;
20749: END LOOP;
20750:
20751: -- Bug 3053472. Loop over the plsql table once more to process the residual task weightage of
20752: -- the tasks. The logic used is to distribute the residual task weightage to as many tasks as
20753: -- possible so that the task weightage is uniform. The updates in the bug gives more details
20754: -- on the logic.
20755: FOR i in l_object_rel_id_tbl.first..l_object_rel_id_tbl.last LOOP
20756: l_parent_id := l_parent_task_ver_id_tbl(i);

Line 20760: -- So calculate how much is the residual weightage.

20756: l_parent_id := l_parent_task_ver_id_tbl(i);
20757:
20758: IF l_child_info_tbl(l_parent_id).loop_count is NULL THEN
20759: -- This means that this is the first task that is being processed for this parent.
20760: -- So calculate how much is the residual weightage.
20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;
20762: l_child_info_tbl(l_parent_id).loop_count :=
20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);
20764: l_child_info_tbl(l_parent_id).residual_task_count :=

Line 20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;

20757:
20758: IF l_child_info_tbl(l_parent_id).loop_count is NULL THEN
20759: -- This means that this is the first task that is being processed for this parent.
20760: -- So calculate how much is the residual weightage.
20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;
20762: l_child_info_tbl(l_parent_id).loop_count :=
20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);
20764: l_child_info_tbl(l_parent_id).residual_task_count :=
20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);

Line 20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);

20759: -- This means that this is the first task that is being processed for this parent.
20760: -- So calculate how much is the residual weightage.
20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;
20762: l_child_info_tbl(l_parent_id).loop_count :=
20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);
20764: l_child_info_tbl(l_parent_id).residual_task_count :=
20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);
20766:
20767: -- The adj_direction is set to -1 if the task weigtage has to be adjusted by reducing some amount

Line 20764: l_child_info_tbl(l_parent_id).residual_task_count :=

20760: -- So calculate how much is the residual weightage.
20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;
20762: l_child_info_tbl(l_parent_id).loop_count :=
20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);
20764: l_child_info_tbl(l_parent_id).residual_task_count :=
20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);
20766:
20767: -- The adj_direction is set to -1 if the task weigtage has to be adjusted by reducing some amount
20768: -- from the tasks. otherwise the adj_direction is 1.

Line 20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);

20761: l_residual_weightage := ( 100 - l_child_info_tbl(l_parent_id).cum_alloted_weightage ) * 100;
20762: l_child_info_tbl(l_parent_id).loop_count :=
20763: floor(abs(l_residual_weightage) / l_child_info_tbl(l_parent_id).processed_child_count);
20764: l_child_info_tbl(l_parent_id).residual_task_count :=
20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);
20766:
20767: -- The adj_direction is set to -1 if the task weigtage has to be adjusted by reducing some amount
20768: -- from the tasks. otherwise the adj_direction is 1.
20769: IF l_residual_weightage < 0 THEN

Line 20769: IF l_residual_weightage < 0 THEN

20765: mod(abs(l_residual_weightage) , l_child_info_tbl(l_parent_id).processed_child_count);
20766:
20767: -- The adj_direction is set to -1 if the task weigtage has to be adjusted by reducing some amount
20768: -- from the tasks. otherwise the adj_direction is 1.
20769: IF l_residual_weightage < 0 THEN
20770: l_child_info_tbl(l_parent_id).adj_direction := -1;
20771: ELSE
20772: l_child_info_tbl(l_parent_id).adj_direction := 1;
20773: END IF;

Line 20777: IF l_child_info_tbl(l_parent_id).residual_task_count > 0 THEN

20773: END IF;
20774: END IF;
20775:
20776: IF l_task_weightage_tbl(i) > 0 THEN
20777: IF l_child_info_tbl(l_parent_id).residual_task_count > 0 THEN
20778: l_task_weightage_tbl(i) := l_task_weightage_tbl(i) +
20779: (l_child_info_tbl(l_parent_id).loop_count + 1) * 0.01 * l_child_info_tbl(l_parent_id).adj_direction;
20780:
20781: l_child_info_tbl(l_parent_id).residual_task_count :=

Line 20781: l_child_info_tbl(l_parent_id).residual_task_count :=

20777: IF l_child_info_tbl(l_parent_id).residual_task_count > 0 THEN
20778: l_task_weightage_tbl(i) := l_task_weightage_tbl(i) +
20779: (l_child_info_tbl(l_parent_id).loop_count + 1) * 0.01 * l_child_info_tbl(l_parent_id).adj_direction;
20780:
20781: l_child_info_tbl(l_parent_id).residual_task_count :=
20782: l_child_info_tbl(l_parent_id).residual_task_count - 1;
20783: ELSE
20784: l_task_weightage_tbl(i) := l_task_weightage_tbl(i) +
20785: l_child_info_tbl(l_parent_id).loop_count * 0.01 * l_child_info_tbl(l_parent_id).adj_direction;

Line 20782: l_child_info_tbl(l_parent_id).residual_task_count - 1;

20778: l_task_weightage_tbl(i) := l_task_weightage_tbl(i) +
20779: (l_child_info_tbl(l_parent_id).loop_count + 1) * 0.01 * l_child_info_tbl(l_parent_id).adj_direction;
20780:
20781: l_child_info_tbl(l_parent_id).residual_task_count :=
20782: l_child_info_tbl(l_parent_id).residual_task_count - 1;
20783: ELSE
20784: l_task_weightage_tbl(i) := l_task_weightage_tbl(i) +
20785: l_child_info_tbl(l_parent_id).loop_count * 0.01 * l_child_info_tbl(l_parent_id).adj_direction;
20786: END IF;

Line 21577: Select Instr(P_String, l_Delimeter, 1, i) Into l_End from dual;

21573: -- Build the PL/SQL Table with all the required strings
21574: l_begin := 1;
21575: For i IN 1..200000 -- Romove this range. Used only for testing
21576: Loop
21577: Select Instr(P_String, l_Delimeter, 1, i) Into l_End from dual;
21578: Select substr(P_String, l_begin, Decode(l_End, 0, 1000, l_End-l_begin))
21579: Into l_Strings_Tab(i) From Dual;
21580: l_begin := l_end + 1;
21581: EXIT When nvl(l_End,0) = 0;

Line 21579: Into l_Strings_Tab(i) From Dual;

21575: For i IN 1..200000 -- Romove this range. Used only for testing
21576: Loop
21577: Select Instr(P_String, l_Delimeter, 1, i) Into l_End from dual;
21578: Select substr(P_String, l_begin, Decode(l_End, 0, 1000, l_End-l_begin))
21579: Into l_Strings_Tab(i) From Dual;
21580: l_begin := l_end + 1;
21581: EXIT When nvl(l_End,0) = 0;
21582: End Loop;
21583:

Line 21649: Into l_Col1 From Dual;

21645: End Loop;
21646: -- End of processing single string
21647:
21648: Select To_Number(SubStr(l_Strings_Tab(Rec), 1, Decode(l_Type_Position, 0, 100, l_Type_Position-2 )))
21649: Into l_Col1 From Dual;
21650:
21651: If l_Type_Position <> 0 then
21652: If l_Type_Count <> 2 then
21653: -- Dbms_Output.Put_Line('Error: Type code is invalid - 4');