87: END LOOP;
88: END IF;
89:
90: -- reset boolean variable to NA for all the projects that were deleted from the project set
91: dbms_aw.execute('PUSH project_d');
92: dbms_aw.execute('LMT project_set_d to ' || p_project_set_id);
93: dbms_aw.execute('LMT project_d to project_set_project_m eq yes');
94: dbms_aw.execute('project_set_project_m = na');
95: dbms_aw.execute('POP project_d');
88: END IF;
89:
90: -- reset boolean variable to NA for all the projects that were deleted from the project set
91: dbms_aw.execute('PUSH project_d');
92: dbms_aw.execute('LMT project_set_d to ' || p_project_set_id);
93: dbms_aw.execute('LMT project_d to project_set_project_m eq yes');
94: dbms_aw.execute('project_set_project_m = na');
95: dbms_aw.execute('POP project_d');
96:
89:
90: -- reset boolean variable to NA for all the projects that were deleted from the project set
91: dbms_aw.execute('PUSH project_d');
92: dbms_aw.execute('LMT project_set_d to ' || p_project_set_id);
93: dbms_aw.execute('LMT project_d to project_set_project_m eq yes');
94: dbms_aw.execute('project_set_project_m = na');
95: dbms_aw.execute('POP project_d');
96:
97: /* IF (p_commit = FND_API.G_TRUE) THEN
90: -- reset boolean variable to NA for all the projects that were deleted from the project set
91: dbms_aw.execute('PUSH project_d');
92: dbms_aw.execute('LMT project_set_d to ' || p_project_set_id);
93: dbms_aw.execute('LMT project_d to project_set_project_m eq yes');
94: dbms_aw.execute('project_set_project_m = na');
95: dbms_aw.execute('POP project_d');
96:
97: /* IF (p_commit = FND_API.G_TRUE) THEN
98: COMMIT;
91: dbms_aw.execute('PUSH project_d');
92: dbms_aw.execute('LMT project_set_d to ' || p_project_set_id);
93: dbms_aw.execute('LMT project_d to project_set_project_m eq yes');
94: dbms_aw.execute('project_set_project_m = na');
95: dbms_aw.execute('POP project_d');
96:
97: /* IF (p_commit = FND_API.G_TRUE) THEN
98: COMMIT;
99: dbms_aw.execute('UPDATE');
95: dbms_aw.execute('POP project_d');
96:
97: /* IF (p_commit = FND_API.G_TRUE) THEN
98: COMMIT;
99: dbms_aw.execute('UPDATE');
100: END IF;
101: */
102:
103: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
251: 'FPA.SQL.fpa_portfolio_project_sets.create_project_set.',
252: 'Maintaining project_set_d with value ' || l_init_project_set_id
253: );
254: END IF;
255: dbms_aw.execute('MAINTAIN project_set_d ADD ' || l_init_project_set_id);
256:
257: --Limit the values of portfolio, project_set_id
258: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
259: FND_LOG.STRING
262: 'FPA.SQL.fpa_portfolio_project_sets.create_project_set.',
263: 'Limiting portfolio to ' || l_portfolio_id
264: );
265: END IF;
266: dbms_aw.execute('LMT portfolio_d TO ' || l_portfolio_id);
267:
268: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
269: FND_LOG.STRING
270: (
272: 'FPA.SQL.fpa_portfolio_project_sets.create_project_set.',
273: 'Setting PORTFOLIO_PROJECT_SET_SUBMITTED_R with value ' || l_init_project_set_id
274: );
275: END IF;
276: dbms_aw.execute('PORTFOLIO_PROJECT_SET_SUBMITTED_R = ' ||l_init_project_set_id);
277:
278: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
279: FND_LOG.STRING
280: (
312: 'FPA.SQL.fpa_portfolio_project_sets.create_project_set.begin',
313: 'Maintaining project_set_d with value ' || l_appr_project_set_id
314: );
315: END IF;
316: dbms_aw.execute('MAINTAIN project_set_d ADD ' || l_appr_project_set_id);
317:
318: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
319: FND_LOG.STRING
320: (
323: 'Limiting portfolio to value ' || l_portfolio_id
324: );
325: END IF;
326: --Limit the values of portfolio, project_set_id
327: dbms_aw.execute('LMT portfolio_d TO ' || l_portfolio_id);
328:
329: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
330: FND_LOG.STRING
331: (
333: 'FPA.SQL.fpa_portfolio_project_sets.create_project_set.begin',
334: 'Setting PORTFOLIO_PROJECT_SET_APPROVED_R with value ' || l_appr_project_set_id
335: );
336: END IF;
337: dbms_aw.execute('PORTFOLIO_PROJECT_SET_APPROVED_R = ' ||l_appr_project_set_id);
338:
339: -- End Project Set creation
340:
341: END IF;
341: END IF;
342: close c_project_sets;
343:
344: /* IF (p_commit = FND_API.G_TRUE) THEN
345: dbms_aw.execute('UPDATE');
346: COMMIT;
347: END IF;
348: */
349:
498: END LOOP;
499:
500:
501: --Limit the value of project_set_id
502: dbms_aw.execute('LMT project_set_d TO ' ||l_project_set_id);
503:
504: --Set the measure value between the project_set_id and each of
505: --the new projects added to the project_set_id
506:
505: --the new projects added to the project_set_id
506:
507: FOR i in l_proj_list.FIRST..l_proj_list.LAST
508: LOOP
509: dbms_aw.execute('LMT project_d TO ' || l_proj_list(i));
510: dbms_aw.execute('project_set_project_m = yes');
511: END LOOP;
512: END IF;
513: /* IF (p_commit = FND_API.G_TRUE) THEN
506:
507: FOR i in l_proj_list.FIRST..l_proj_list.LAST
508: LOOP
509: dbms_aw.execute('LMT project_d TO ' || l_proj_list(i));
510: dbms_aw.execute('project_set_project_m = yes');
511: END LOOP;
512: END IF;
513: /* IF (p_commit = FND_API.G_TRUE) THEN
514: dbms_aw.execute('UPDATE');
510: dbms_aw.execute('project_set_project_m = yes');
511: END LOOP;
512: END IF;
513: /* IF (p_commit = FND_API.G_TRUE) THEN
514: dbms_aw.execute('UPDATE');
515: COMMIT;
516: END IF;
517: */
518: