[Home] [Help]
678: if (P_USES_REL_CLASS = 1) then
679: begin
680: select class_type, class_info, date1, date2
681: into schedule_type, schedule_info, sch_req_date, sch_end_date
682: from fnd_conc_release_classes
683: where application_id = P_REL_CLASS_APP_ID
684: and release_class_id = P_REL_CLASS_ID;
685:
686: if schedule_type = 'S' then
1572: -- Create request
1573: if (P_REL_CLASS_ID is null) and (P_REPEAT_INTERVAL is not null) then
1574: new_class := TRUE;
1575: begin
1576: Select FND_CONC_RELEASE_CLASSES_S.nextval, 0
1577: into P_REL_CLASS_ID, P_REL_CLASS_APP_ID from Sys.dual;
1578: exception
1579: when no_data_found then
1580: raise dual_no_rows;
1833:
1834:
1835: if (new_class) then
1836: begin
1837: INSERT INTO Fnd_Conc_Release_Classes
1838: (APPLICATION_ID, RELEASE_CLASS_ID,
1839: RELEASE_CLASS_NAME, OWNER_REQ_ID,
1840: ENABLED_FLAG, LAST_UPDATE_DATE,
1841: LAST_UPDATED_BY, LAST_UPDATE_LOGIN,
1866: if (sql%rowcount = 0) then
1867: raise relclass_insert_error;
1868: end if;
1869:
1870: INSERT INTO Fnd_Conc_Release_Classes_TL
1871: (APPLICATION_ID, RELEASE_CLASS_ID,
1872: LANGUAGE, SOURCE_LANG, USER_RELEASE_CLASS_NAME,
1873: LAST_UPDATE_DATE,
1874: LAST_UPDATED_BY, LAST_UPDATE_LOGIN,
1921: IF (P_USES_REL_CLASS = 1 AND schedule_type = 'X') THEN
1922: begin
1923: select c.resubmit_interval, c.resubmit_interval_unit_code, c.resubmit_interval_type_code
1924: into adv_sch_ri, adv_sch_riuc, adv_sch_ritc
1925: from fnd_conc_release_classes c, fnd_concurrent_requests r
1926: where r.request_id = cur_request_id and r.release_class_id = c.release_class_id
1927: and r.release_class_app_id = c.application_id;
1928: exception when others then
1929: adv_sch_ri := null;
2360: if (class_name is not null) then
2361: begin
2362: Select A.Application_ID, C.Release_Class_Id
2363: Into P_REL_CLASS_APP_ID, P_REL_CLASS_ID
2364: From Fnd_Conc_Release_Classes C, Fnd_Application A
2365: Where Upper(Release_class_Name) = upper(class_name)
2366: And C.Application_ID = A.Application_ID
2367: And A.Application_Short_Name = upper(application);
2368:
3799: else
3800: P_REPEAT_END_DATE := FND_CONC_DATE.STRING_TO_DATE(P_REQUESTED_END_DATE);
3801: end if;
3802:
3803: Select FND_CONC_RELEASE_CLASSES_S.nextval, 0
3804: into P_RELEASE_CLASS_ID, P_RELEASE_CLASS_APP_ID from Sys.dual;
3805:
3806: SELECT (DECODE(P_CLASS_TYPE, 'P', Decode(P_REPEAT_INTERVAL_UNIT, NULL, NULL,
3807: P_REPEAT_INTERVAL||':'||
3814: 'START', 'S', 'C')), NULL)) INTO P_REPEAT_VALUE FROM SYS.DUAL;
3815:
3816: -- Bug 6808926. Consider repeat start date as SYSDATE if null
3817:
3818: INSERT INTO FND_CONC_RELEASE_CLASSES
3819: (APPLICATION_ID, RELEASE_CLASS_ID, RELEASE_CLASS_NAME,
3820: ENABLED_FLAG, LAST_UPDATE_DATE, LAST_UPDATED_BY,
3821: LAST_UPDATE_LOGIN, CREATION_DATE, CREATED_BY,
3822: UPDATED_FLAG, DATE1, DATE2,
3830: if (sql%rowcount = 0) then
3831: raise RELCLASS_INSERT_ERROR;
3832: end if;
3833:
3834: INSERT INTO FND_CONC_RELEASE_CLASSES_TL
3835: (APPLICATION_ID, RELEASE_CLASS_ID,
3836: LANGUAGE, SOURCE_LANG, USER_RELEASE_CLASS_NAME,
3837: LAST_UPDATE_DATE, LAST_UPDATED_BY, LAST_UPDATE_LOGIN,
3838: CREATION_DATE, CREATED_BY, DESCRIPTION)