The following lines contain the word 'select', 'insert', 'update' or 'delete':
select STATUS_CODE, NAME, PUBLISHED_BY
into ACstatusCode, ACname, OwnerID
from zpb_analysis_cycles
where ANALYSIS_CYCLE_ID = ACID;
select TAG as PARAM_ID
into paramID
from FND_LOOKUP_VALUES_VL WHERE LOOKUP_CODE = 'CALENDAR_START_DATE'
and LOOKUP_TYPE = 'ZPB_PARAMS';
select value
Into StartDateTxt
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = paramID;
select pva.value into freqType
from zpb_ac_param_values pva,
fnd_lookup_values_vl pna
where pna.lookup_code='CALENDAR_FREQUENCY_TYPE'
and pna.tag = pva.param_id and
pna.lookup_type = 'ZPB_PARAMS' and
pva.analysis_cycle_id=ACID;
select BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACId;
select *
from zpb_analysis_cycle_tasks
where ANALYSIS_CYCLE_ID = InstanceID
and Sequence = CurrtaskSeq+1;
select value
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = InstanceID and PARAM_ID = 28;
select STATUS_CODE
into ACstatusCode
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACID;
select STATUS_CODE
into ACstatusCode
from ZPB_PUBLISHED_CYCLES_V
where ANALYSIS_CYCLE_ID = ACID;
update zpb_analysis_cycle_tasks
set status_code = 'COMPLETE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID and TASK_ID = priorTaskID;
select STATUS_CODE
into InstatusCode
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = InstanceID;
DeleteCurrInstMeas(ACID, ownerID);
update zpb_ANALYSIS_CYCLES
set status_code = 'COMPLETE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID;
update zpb_analysis_cycle_instances
set LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE, LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
zpb_wf.markfordelete(ACID, ownerID, respID, respAppID);
select LAST_UPDATED_BY into usr_paused_BP_ID
from zpb_ANALYSIS_CYCLES where ANALYSIS_CYCLE_ID = INSTANCEID;
update zpb_ANALYSIS_CYCLES
set status_code = 'PAUSED',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE, LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID;
update zpb_analysis_cycle_instances
set LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE, LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
select user_name into usr_paused_BP_Name from
FND_USER where user_id = usr_paused_BP_ID;
update zpb_analysis_cycle_tasks
set item_KEY = newitemkey,
Start_date = to_Date(charDate,'MM/DD/YYYY-HH24-MI-SS'),
status_code = 'ACTIVE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID and task_id = TaskID;
| Selector
| ZPB_CONTROLLER_RESP 56073, ZPB 210, USER ID: ownerID
|
| This is an ItemType Selector function that contains callback
| functionality to reestablish context for each process in our
| ItemType. This is a requierment of the Concurrent Manager
| Standard Activity to be sure that the context is set up by
| calling:
| fnd_global.apps_initialize(user_id, resp_id, resp_appl_id)
|
| IN
| Set of arguments for Standard Activity Function:
| itemtype - A valid item type from WF_ITEM_TYPES table.
| itemkey - string generated as WF primary key.
| actid - An Activity ID.
| command - Oracle Workflow calls selector/callback function with
| following commands: 'RUN', 'TEST_CTX'.
|
| OUT
| resultout - A result that can be returned.
+==================================================================+*/
procedure Selector(itemtype in varchar2,
itemkey in varchar2,
actid in number,
command in varchar2,
resultout out nocopy varchar2)
IS
ownerID number;
select root_activity into l_wfprocess
from wf_items_v
where item_key = ItemKey;
WF_CORE.CONTEXT('ZPB_WF.Selector', itemtype, itemkey,
to_char(actid), command);
end Selector;
select count(*)
into itemsToProcess
from wf_items_v v
WHERE v.ITEM_TYPE = 'ZPBSCHED' AND end_date is NULL
AND v.item_key in (select t.item_key from WF_ITEM_ACTIVITY_STATUSES t
where t.item_type = 'ZPBSCHED' AND t.ACTIVITY_STATUS IN ('DEFERRED', 'NOTIFIED'));
select count(*)
into itemsToProcess
from wf_items_v v
WHERE v.ITEM_TYPE = 'ZPBSCHED' AND end_date is NULL
AND v.item_key in (select t.item_key from WF_ITEM_ACTIVITY_STATUSES t
where t.item_type = 'ZPBSCHED' AND t.ACTIVITY_STATUS IN ('DEFERRED', 'NOTIFIED'));
select count(*)
into itemsToProcess
from wf_items_v v
WHERE v.ITEM_TYPE = 'EPBCYCLE' AND end_date is NULL
AND v.item_key in (select t.item_key from WF_ITEM_ACTIVITY_STATUSES t
where t.item_type = 'EPBCYCLE' AND t.ACTIVITY_STATUS IN ('DEFERRED', 'NOTIFIED'));
select count(*)
into itemsToProcess
from wf_items_v v
WHERE v.ITEM_TYPE = 'EPBCYCLE' AND end_date is NULL
AND v.item_key in (select t.item_key from WF_ITEM_ACTIVITY_STATUSES t
where t.item_type = 'EPBCYCLE' AND t.ACTIVITY_STATUS IN ('DEFERRED', 'NOTIFIED'));
procedure DeleteWorkflow (errbuf out nocopy varchar2,
retcode out nocopy varchar2,
inACID in Number,
ACIDType in varchar2 default 'I')
IS
--ItemType varchar2(20);
select item_type, item_key
from WF_ITEM_ATTRIBUTE_VALUES
where (item_type = 'ZPBSCHED' OR item_type = 'EPBCYCLE')
and name = AttrName
and number_value = inACID;
errbuf:='Plan has an ACTIVE process and Workflow cannot be deleted.';
end DeleteWorkflow;
select instance_ac_id
from zpb_analysis_cycle_instances
where analysis_cycle_id = inACID;
ZPB_WF.DeleteWorkflow(errbuf, retcode, inACID, ACIDType);
delete from zpb_excp_results re
where re.task_id in (select pd.task_id from zpb_process_details_v pd
where analysis_cycle_id = inACID);
delete from zpb_excp_explanations ex
where ex.task_id in (select pd.task_id from zpb_process_details_v pd
where analysis_cycle_id = inACID);
delete from zpb_excp_results re
where re.task_id in (select pd.task_id from zpb_process_details_v pd
where analysis_cycle_id = thisInst);
delete from zpb_excp_explanations ex
where ex.task_id in (select pd.task_id from zpb_process_details_v pd
where analysis_cycle_id = thisInst);
PROCEDURE updateHorizonParams(p_start_mem IN VARCHAR2
,p_end_mem IN VARCHAR2
,new_ac_id IN NUMBER)
is
CURSOR records_cur IS
SELECT AcParamValuesEO.VALUE,ParamsEO.lookup_code
FROM ZPB_AC_PARAM_VALUES AcParamValuesEO,
FND_LOOKUP_VALUES_VL ParamsEO
WHERE AcParamValuesEO.PARAM_ID = ParamsEO.TAG and
ParamsEO.LOOKUP_TYPE = 'ZPB_PARAMS' and ParamsEO.TAG in (4,5,6,7,8,9,10,11,12,13,14,15,16,17) and AcParamValuesEO.ANALYSIS_CYCLE_ID = new_ac_id;
UPDATE zpb_ac_param_values SET value = p_start_mem,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
WHERE
analysis_cycle_id = new_ac_id AND param_id =
( SELECT tag FROM fnd_lookup_values_vl WHERE lookup_type = 'ZPB_PARAMS' AND
lookup_code = 'CAL_HS_TIME_MEMBER');
UPDATE zpb_ac_param_values SET value = p_end_mem,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
WHERE
analysis_cycle_id = new_ac_id AND param_id =
( SELECT tag FROM fnd_lookup_values_vl WHERE lookup_type = 'ZPB_PARAMS' AND
lookup_code = 'CAL_HE_TIME_MEMBER');
END updateHorizonParams;
select STATUS_CODE
into ACstatusCode
-- from ZPB_PUBLISHED_CYCLES_V
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACID;
updateHorizonParams(overide_start_mem, overide_end_mem, outInstanceID);
select ITEM_TYPE into ItemType from WF_ITEMS_V
where item_key = ItemKey;
select WF_Process_Name, TASK_ID, TASK_NAME
into workflowprocess, TaskID, taskName
from zpb_analysis_cycle_tasks
where ANALYSIS_CYCLE_ID = InstanceID and Sequence = 1;
select NAME into l_BUSINESSAREA
from zpb_business_areas_vl
where BUSINESS_AREA_ID = p_business_area_id;
select INSTANCE_DESCRIPTION
into l_InstanceDesc
from zpb_analysis_cycle_instances
where instance_ac_id = InstanceID;
update zpb_analysis_cycle_tasks
set item_KEY = newitemkey,
Start_date = to_Date(charDate,'MM/DD/YYYY-HH24-MI-SS'),
status_code = 'ACTIVE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID and task_id = TaskID;
update zpb_ANALYSIS_CYCLES
set status_code = 'ACTIVE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
UPDATE_STATUS('ERROR', Instanceid, taskid, NULL);
procedure MarkforDelete (ACID in Number,
ownerID in number,
respID in number,
RespAppID in number)
AS
retValue varchar2(16);
select instance_ac_id
from zpb_analysis_cycle_instances
where zpb_analysis_cycle_instances.ANALYSIS_CYCLE_ID = ACID
and instance_ac_id = (select ac.ANALYSIS_CYCLE_ID from zpb_ANALYSIS_CYCLES ac
where ac.ANALYSIS_CYCLE_ID = instance_ac_id and
ac.status_code in ('COMPLETE','COMPLETE_WITH_WARNING', 'ERROR'))
order by instance_ac_id DESC;
select value
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 2;
select BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACId;
update zpb_ANALYSIS_CYCLES
set status_code = 'MARKED_FOR_DELETION',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
zpb_dc_objects_pvt.delete_template(
1.0, FND_API.G_TRUE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL,
l_return_status, l_msg_count, l_msg_data, InstanceID);
select value
into l_appended
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 26;
end MarkforDelete;
| p_itemtype - The itemType of the workflow for which attributes will be updated
| p_itemkey - The itemKey of the workflow for which attributes will be updated
| p_daylist - list of days of the month
|
| OUT - the day in the list that is closest to current day
|
|
+========================================================================+
*/
function set_monthly_list(p_itemtype in varchar2,
p_itemkey in varchar2,
p_daylist in varchar2) return varchar2
AS
l_api_name CONSTANT VARCHAR2(30) := 'SET_MONTHLY_LIST';
| p_itemtype - The itemType of the workflow for which attributes will be updated
| p_itemkey - The itemKey of the workflow for which attributes will be updated
| p_daylist - list of days of the week
|
| OUT - the day in the list that is closest to current day
|
|
+========================================================================+
*/
function set_weekly_list(p_itemtype in varchar2,
p_itemkey in varchar2,
p_daylist in varchar2) return varchar2
IS
l_api_name CONSTANT VARCHAR2(30) := 'SET_WEEKLY_LIST';
select param_id, value
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID IN (19, 20, 21, 22, 23, 24);
select Value
into freqRep
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 21;
select Value
into freqSel
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 24;
select Value
into freqRep
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 21;
select Value
into freqSel
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 23;
select Value
into freqRep
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = ACID and PARAM_ID = 21;
select STATUS_CODE
into InstatusCode
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = InstanceID
for update nowait;
update ZPB_ANALYSIS_CYCLES
set prev_status_code = status_code
where ANALYSIS_CYCLE_ID = InstanceID;
update ZPB_ANALYSIS_CYCLES
set status_code = 'PAUSING',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID;
select *
from zpb_analysis_cycle_tasks
where ANALYSIS_CYCLE_ID = InstanceID
and Sequence = CurrtaskSeq+1;
select A.RESP_ID
from zpb_account_states A, fnd_responsibility_vl R
where A.ACCOUNT_STATUS = 0
AND A.USER_ID = ownerID
AND A.BUSINESS_AREA_ID = l_business_area_id
AND A.RESP_ID = R.RESPONSIBILITY_ID
AND R.RESPONSIBILITY_KEY IN
('ZPB_MANAGER_RESP', 'ZPB_CONTROLLER_RESP', 'ZPB_SUPER_CONTROLLER_RESP');
select status_code, prev_status_code
into InstanceStatusCode, InPrevStatusCode
from zpb_analysis_cycles
where analysis_cycle_id = InstanceID;
update zpb_analysis_cycles
set status_code= InPrevStatusCode
where analysis_cycle_id = InstanceID;
select sequence, owner_id
into CurrtaskSeq, ownerID
from ZPB_ANALYSIS_CYCLE_TASKS
where ANALYSIS_CYCLE_ID = InstanceID and
sequence = (select MAX(SEQUENCE) from ZPB_ANALYSIS_CYCLE_TASKS
where ANALYSIS_CYCLE_ID = InstanceID and STATUS_CODE = 'COMPLETE');
update ZPB_ANALYSIS_CYCLE_TASKS
set STATUS_CODE = null,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = InstanceID;
select i.ANALYSIS_CYCLE_ID, c.name, c.BUSINESS_AREA_ID
into ACID, ACNAME, l_business_area_id
from zpb_analysis_cycle_instances i,
zpb_analysis_cycles c
where i.INSTANCE_AC_ID = InstanceID
and i.ANALYSIS_CYCLE_ID = c.ANALYSIS_CYCLE_ID;
update zpb_ANALYSIS_CYCLES
set status_code = 'COMPLETE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
zpb_wf.markfordelete(ACID, ownerID, respID, respAppID);
update zpb_analysis_cycle_tasks
set item_KEY = newitemkey,
Start_date = to_Date(charDate,'MM/DD/YYYY-HH24-MI-SS'),
status_code = 'ACTIVE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID and task_id = TaskID;
update ZPB_ANALYSIS_CYCLES
set status_code = InPrevStatusCode,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = INSTANCEID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = INSTANCEID;
select value
from ZPB_AC_PARAM_VALUES
where ANALYSIS_CYCLE_ID = l_InstanceID and PARAM_ID = 28;
select published_by into l_published_by
from zpb_analysis_cycles
where analysis_cycle_id = ACID;
select analysis_cycle_id into l_InstanceID
from zpb_analysis_cycle_tasks
where task_id = TaskID;
UPDATE_STATUS('ERROR', l_InstanceID, taskid, NULL);
select BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACId;
select analysis_cycle_id, v.status_code, v.validate_status
from zpb_published_cycles_v v
where v.status_code not in ('DISABLE_ASAP', 'DISABLE_NEXT') and
v.validate_status = 'VALID' and
v.analysis_cycle_id in (select pa.analysis_cycle_id
from zpb_ac_param_values pa
where pa.param_id = 20 and pa.value in (select d.value
from ZPB_PROCESS_DETAILS_V d
where d.name = 'CREATE_EVENT_IDENTIFIER' and d.task_id = TaskID));
SELECT ACTIVITY_NAME INTO ActEntry
FROM WF_PROCESS_ACTIVITIES
WHERE INSTANCE_ID=actid;
select value into EventName from zpb_task_parameters
where task_ID = taskID and NAME = 'CREATE_EVENT_NAME';
select NAME into EventACname
from zpb_all_cycles_v
where ANALYSIS_CYCLE_ID = thisACID;
CodeToUpdateTo varchar2(30);
select distinct zac.analysis_cycle_id
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci,
ZPB_ANALYSIS_CYCLE_TASKS zact,
ZPB_ANALYSIS_CYCLES zac
WHERE zaci.analysis_cycle_id = Pacid and
zaci.instance_ac_id = zac.analysis_cycle_id and
zac.analysis_cycle_id = zact.analysis_cycle_id and
zac.status_code = 'DISABLE_ASAP' and
zact.status_code not in ('ACTIVE', 'PENDING');
select C.OWNER_ID, A.RESP_ID
from zpb_analysis_cycles C, zpb_account_states A, fnd_responsibility_vl R
where ANALYSIS_CYCLE_ID = Pacid
AND A.ACCOUNT_STATUS = 0
AND A.USER_ID = C.OWNER_ID
AND C.BUSINESS_AREA_ID = A.BUSINESS_AREA_ID
AND A.RESP_ID = R.RESPONSIBILITY_ID
AND R.RESPONSIBILITY_KEY IN
('ZPB_MANAGER_RESP', 'ZPB_CONTROLLER_RESP', 'ZPB_SUPER_CONTROLLER_RESP');
select STATUS_CODE, BUSINESS_AREA_ID
into ACstatusCode, l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = Pacid;
update ZPB_ANALYSIS_CYCLES
set STATUS_CODE = 'ENABLE_TASK',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = Pacid;
CodeToUpdateTo:='ACTIVE';
CodeToUpdateTo:='ACTIVE';
CodeToUpdateTo:='ENABLE_FIRST';
CodeToUpdateTo:='MARKED_FOR_DELETION';
if CodeToUpdateTo = 'ACTIVE' then
UPDATE zpb_analysis_cycles
SET status_code=decode(prev_status_code, null, 'ACTIVE', prev_status_code)
where analysis_cycle_id in
(select distinct zac.analysis_cycle_id
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci,
ZPB_ANALYSIS_CYCLE_TASKS zact,
ZPB_ANALYSIS_CYCLES zac
WHERE zaci.analysis_cycle_id = Pacid and
zaci.instance_ac_id = zac.analysis_cycle_id and
zac.analysis_cycle_id = zact.analysis_cycle_id and
zac.status_code = 'DISABLE_ASAP' and
zact.status_code in ('ACTIVE', 'PENDING'));
UPDATE zpb_analysis_cycles
SET status_code=CodeToUpdateTo
where analysis_cycle_id in
(select distinct zac.analysis_cycle_id
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci,
ZPB_ANALYSIS_CYCLE_TASKS zact,
ZPB_ANALYSIS_CYCLES zac
WHERE zaci.analysis_cycle_id = Pacid and
zaci.instance_ac_id = zac.analysis_cycle_id and
zac.analysis_cycle_id = zact.analysis_cycle_id and
zac.status_code = 'DISABLE_ASAP' and
zact.status_code in ('ACTIVE', 'PENDING'));
update zpb_analysis_cycles
set status_code='ENABLE_FIRST'
where analysis_cycle_id=InstanceID;
update zpb_analysis_cycles
set status_code='MARKED_FOR_DELETION'
where analysis_cycle_id=InstanceID;
select pva.value into freqType
from zpb_ac_param_values pva,
fnd_lookup_values_vl pna
where pna.lookup_code='CALENDAR_FREQUENCY_TYPE'
and pna.tag = pva.param_id and
pna.lookup_type = 'ZPB_PARAMS' and
pva.analysis_cycle_id=Pacid;
select count(wf_process_name)
into thisCount
from zpb_analysis_cycle_tasks
where analysis_cycle_id = InstanceID and
wf_process_name in ('LOAD_DATA', 'GENERATE_TEMPLATE', 'DISTRIBUTE_TEMPLATE', 'SOLVE', 'MANAGE_SUBMISSION');
UPDATE_STATUS('ERROR', Instanceid);
UPDATE_STATUS('ERROR', Instanceid, taskid, UserID);
procedure UPDATE_STATUS (p_type in varchar2,
p_InstanceID in Number default NULL,
p_TaskID in Number default NULL,
p_UserID in Number default NULL)
IS
l_InstanceID number;
select /*+ FIRST_ROWS */ item_key
from WF_ITEM_ATTRIBUTE_VALUES
where item_type = 'ZPBSCHED'
and name = 'ACID'
and number_value = ACID;
select /*+ FIRST_ROWS */ responsibility_id, responsibility_application_id
from fnd_user_resp_groups
where user_id=ownerID;
select status_code, published_by into instance_status, ownerID
from zpb_analysis_cycles
where analysis_cycle_id=p_InstanceID;
instance_status:='NotMarkedForDelete';
select ANALYSIS_CYCLE_ID into ACID
from ZPB_ANALYSIS_CYCLE_INSTANCES
where INSTANCE_AC_ID = p_InstanceID;
select BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACId;
update zpb_analysis_cycle_tasks
set status_code = p_type,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where task_id = p_TaskID;
update zpb_ANALYSIS_CYCLES
set status_code = p_type,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = p_InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = p_InstanceID;
select distinct ANALYSIS_CYCLE_ID into l_InstanceID
from zpb_analysis_cycle_tasks
where task_id = p_TaskID;
update zpb_ANALYSIS_CYCLES
set status_code = p_type,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = l_InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = l_InstanceID;
select ANALYSIS_CYCLE_ID into ACID
from ZPB_ANALYSIS_CYCLE_INSTANCES
where INSTANCE_AC_ID = p_InstanceID;
MarkforDelete(ACID, ownerID, respIDW, RespAppID);
end UPDATE_STATUS;
select distinct A.BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES A,
ZPB_DC_OBJECTS B
where B.AC_INSTANCE_ID = A.ANALYSIS_CYCLE_ID
and B.TEMPLATE_ID = p_templateID;
UPDATE_STATUS('ERROR', Instanceid);
delete from zpb_measures
where instance_id = InstanceID;
select instance_description
into instanceDesc from zpb_analysis_cycle_instances
where instance_ac_id = Instanceid;
select item_type, item_key
from WF_ITEM_ATTRIBUTE_VALUES
where item_type = 'ZPBSCHED'
and name = AttrName
and number_value = inACID;
procedure DeleteCurrInstMeas (ACId in number,
ownerId in number)
IS
activeInstances number;
select /*+ FIRST_ROWS */ item_key
from WF_ITEM_ATTRIBUTE_VALUES
where item_type = 'ZPBSCHED'
and name = 'ACID'
and number_value = ACId;
select /*+ FIRST_ROWS */ responsibility_id, responsibility_application_id
from fnd_user_resp_groups
where user_id=ownerId;
select status_code, BUSINESS_AREA_ID
into ACStatusCode, l_business_area_id
from zpb_analysis_cycles
where analysis_cycle_id = ACId;
ACStatusCode:='Do Not Delete';
select current_instance_id into currInstanceId
from zpb_analysis_cycles
where analysis_cycle_id = ACId;
select count(*) into currInstExistsCnt
from zpb_measures
where instance_id = currInstanceId;
select count(*) into activeInstances
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci,
ZPB_ANALYSIS_CYCLE_TASKS zact,
ZPB_ANALYSIS_CYCLES zac
WHERE zaci.analysis_cycle_id = ACId and
zaci.instance_ac_id = zac.analysis_cycle_id and
zac.analysis_cycle_id = zact.analysis_cycle_id and
zact.status_code in ('ACTIVE', 'PENDING');
SELECT zac2.analysis_cycle_id into lastCompleted
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci2,
ZPB_ANALYSIS_CYCLE_TASKS zact2,
ZPB_ANALYSIS_CYCLES zac2
WHERE zaci2.analysis_cycle_id = ACId and
zaci2.instance_ac_id = zac2.analysis_cycle_id and
zac2.analysis_cycle_id = zact2.analysis_cycle_id and
zact2.wf_process_name='SET_CURRENT_INSTANCE' and
zac2.status_code in ('COMPLETE', 'COMPLETE_WITH_WARNING') and
zact2.last_update_date =
(SELECT max(zact.last_update_date)
FROM ZPB_ANALYSIS_CYCLE_INSTANCES zaci,
ZPB_ANALYSIS_CYCLE_TASKS zact,
ZPB_ANALYSIS_CYCLES zac
WHERE zaci.analysis_cycle_id = ACId and
zaci.instance_ac_id = zac.analysis_cycle_id and
zac.analysis_cycle_id = zact.analysis_cycle_id and
zact.wf_process_name='SET_CURRENT_INSTANCE' and
zac.status_code in ('COMPLETE', 'COMPLETE_WITH_WARNING'));
select BUSINESS_AREA_ID
into l_business_area_id
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACId;
end DeleteCurrInstMeas;
select published_by into ownerID
from zpb_analysis_cycles
where analysis_cycle_id = P_ACId;
select TASK_ID
into TaskId
from zpb_analysis_cycle_tasks
where ANALYSIS_CYCLE_ID = P_InstanceId and Sequence = 1;
select *
from zpb_analysis_cycle_tasks
where ANALYSIS_CYCLE_ID = p_InstanceID
and Sequence = 1;
select status_code, prev_status_code
into InstanceStatusCode, InPrevStatusCode
from zpb_analysis_cycles
where analysis_cycle_id = p_InstanceID;
select ANALYSIS_CYCLE_ID into ACID
from ZPB_ANALYSIS_CYCLE_INSTANCES
where INSTANCE_AC_ID = p_InstanceID;
select NAME, CREATED_BY into ACNAME, ownerID
from ZPB_ANALYSIS_CYCLES
where ANALYSIS_CYCLE_ID = ACID;
select RESPONSIBILITY_ID
into respID
from fnd_responsibility_vl
where APPLICATION_ID = 210 and RESPONSIBILITY_KEY = 'ZPB_CONTROLLER_RESP';
update zpb_analysis_cycles
set status_code= InPrevStatusCode
where analysis_cycle_id = p_InstanceID;
update zpb_ANALYSIS_CYCLES
set status_code = 'ERROR',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = p_InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = p_InstanceID;
update zpb_analysis_cycle_tasks
set item_KEY = newitemkey,
Start_date = to_Date(charDate,'MM/DD/YYYY-HH24-MI-SS'),
status_code = 'ACTIVE',
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = p_InstanceID and task_id = TaskID;
update ZPB_ANALYSIS_CYCLES
set status_code = InPrevStatusCode,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where ANALYSIS_CYCLE_ID = p_InstanceID;
update zpb_analysis_cycle_instances
set last_update_date = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
where instance_ac_id = p_InstanceID;
select root_activity
into l_wfprocess
from wf_items_v
where item_type = itemtype
and item_KEY = itemkey;
SELECT ACTIVITY_NAME INTO l_ActEntry
FROM WF_PROCESS_ACTIVITIES
WHERE INSTANCE_ID=actid;