[Home] [Help]
1756: x_level_error := 0;
1757: begin
1758: -- instance_id of zero means generate locally
1759: if (x_instance_id = 0) then
1760: select WF_PROCESS_ACTIVITIES_S.NEXTVAL
1761: into x_instance_id
1762: from sys.dual;
1763:
1764: raise NO_DATA_FOUND; --jump to insert
1764: raise NO_DATA_FOUND; --jump to insert
1765: else
1766: select PROTECT_LEVEL, CUSTOM_LEVEL
1767: into protection_level, customization_level
1768: from WF_PROCESS_ACTIVITIES
1769: where INSTANCE_ID = x_instance_id;
1770:
1771: if (x_process_name <> 'ROOT') then
1772: if ((wf_core.upload_mode <> 'FORCE') and
1808: end if;
1809: end if;
1810:
1811: -- Update existing row
1812: update WF_PROCESS_ACTIVITIES set
1813: PROCESS_ITEM_TYPE = x_process_item_type,
1814: PROCESS_NAME = x_process_name,
1815: PROCESS_VERSION = x_process_version,
1816: ACTIVITY_ITEM_TYPE = x_activity_item_type,
1907: -- Check if ROOT process of such activity has already been inserted,
1908: -- since each process activity must be attached to ROOT.
1909: select count(1)
1910: into noinsert
1911: from WF_PROCESS_ACTIVITIES
1912: where PROCESS_NAME = 'ROOT'
1913: and ACTIVITY_ITEM_TYPE = x_process_item_type
1914: and ACTIVITY_NAME = x_activity_name
1915: and rownum=1;
1916:
1917: -- no need to insert when ROOT already exists (noinsert > 0)
1918: if (x_process_name <> 'ROOT' or noinsert <= 0) then
1919: -- Insert new row
1920: insert into WF_PROCESS_ACTIVITIES (
1921: PROCESS_ITEM_TYPE,
1922: PROCESS_NAME,
1923: PROCESS_VERSION,
1924: ACTIVITY_ITEM_TYPE,
2030: --
2031: begin
2032: select WAA.TYPE
2033: into l_type
2034: from WF_PROCESS_ACTIVITIES WPA, WF_ACTIVITIES WA,
2035: WF_ACTIVITY_ATTRIBUTES WAA
2036: where WPA.INSTANCE_ID = x_process_activity_id
2037: and WPA.ACTIVITY_ITEM_TYPE = WA.ITEM_TYPE
2038: and WPA.ACTIVITY_NAME = WA.NAME
2886: WF_CACHE.Reset;
2887:
2888: select ICON_GEOMETRY, ACTIVITY_NAME, INSTANCE_LABEL
2889: into l_icon_geometry, p_activity_name, p_instance_label
2890: from WF_PROCESS_ACTIVITIES
2891: where instance_id = p_activity_instance;
2892:
2893: comma_position := instr(l_icon_geometry, ',');
2894: p_xcor := to_number(substr(l_icon_geometry, 1, comma_position - 1));
3141: and ACTIVITY_NAME = actname
3142: and ACTIVITY_VERSION = ver
3143: order by SEQUENCE;
3144:
3145: type t_pacTable is table of WF_PROCESS_ACTIVITIES.INSTANCE_ID%TYPE
3146: index by binary_integer;
3147:
3148: v_opac t_pacTable;
3149: v_npac t_pacTable;
3152: select ACTIVITY_ITEM_TYPE, ACTIVITY_NAME, INSTANCE_ID, START_END,
3153: DEFAULT_RESULT, ICON_GEOMETRY, PERFORM_ROLE,
3154: USER_COMMENT, PERFORM_ROLE_TYPE, INSTANCE_LABEL,
3155: PROTECT_LEVEL, CUSTOM_LEVEL
3156: from WF_PROCESS_ACTIVITIES
3157: where PROCESS_ITEM_TYPE = itt
3158: and PROCESS_NAME = actname
3159: and PROCESS_VERSION = ver
3160: order by INSTANCE_ID;
3554:
3555: -- check if process activity already exists
3556: begin
3557: select INSTANCE_ID into v_npac(i)
3558: from WF_PROCESS_ACTIVITIES
3559: where INSTANCE_LABEL = pacr.instance_label
3560: and PROCESS_ITEM_TYPE = p_destination_item_type
3561: and PROCESS_NAME = l_pname
3562: and PROCESS_VERSION = 1;
3726: -- Delete all related attribute values
3727: delete from WF_ACTIVITY_ATTR_VALUES where PROCESS_ACTIVITY_ID = p_step;
3728:
3729: -- Delete the process activity
3730: delete from WF_PROCESS_ACTIVITIES where INSTANCE_ID = p_step;
3731:
3732: exception
3733: when OTHERS then
3734: Wf_Core.Context('Wf_Load', 'Delete_Process_Activity',
4129: end if;
4130:
4131: if (p_instance_label is not null) then
4132: select INSTANCE_ID into id
4133: from WF_PROCESS_ACTIVITIES
4134: where INSTANCE_LABEL = p_instance_label
4135: and PROCESS_NAME = p_process_name
4136: and PROCESS_ITEM_TYPE = p_process_item_type
4137: and PROCESS_VERSION = p_process_version;
4140: end if;
4141:
4142: -- return only the first row if there are more.
4143: select INSTANCE_ID into id
4144: from WF_PROCESS_ACTIVITIES
4145: where PROCESS_NAME = p_process_name
4146: and PROCESS_ITEM_TYPE = p_process_item_type
4147: and PROCESS_VERSION = p_process_version
4148: and ACTIVITY_ITEM_TYPE = p_activity_item_type
4173: l_actname varchar2(30);
4174: begin
4175: select ACTIVITY_NAME
4176: into l_actname
4177: from WF_PROCESS_ACTIVITIES
4178: where INSTANCE_ID = p_instance_id;
4179:
4180: return l_actname;
4181: exception
4406: p_instance_ids out NOCOPY t_instanceidTab
4407: )is
4408: cursor paccur is
4409: select INSTANCE_ID
4410: from WF_PROCESS_ACTIVITIES
4411: where PROCESS_NAME = p_process_name
4412: and PROCESS_ITEM_TYPE = p_process_item_type
4413: and PROCESS_VERSION = p_process_version;
4414:
4582: n number;
4583:
4584: cursor actcur(ver number) is
4585: select WPA.ACTIVITY_ITEM_TYPE, WPA.ACTIVITY_NAME
4586: from WF_PROCESS_ACTIVITIES WPA,
4587: WF_ACTIVITIES WA
4588: where WPA.PROCESS_ITEM_TYPE = p_process_item_type
4589: and WPA.PROCESS_NAME = p_process_name
4590: and WPA.PROCESS_VERSION = ver
4623: end;
4624:
4625: -- then check to see if such activity exist
4626: select count(1) into n
4627: from WF_PROCESS_ACTIVITIES
4628: where PROCESS_ITEM_TYPE = p_process_item_type
4629: and PROCESS_NAME = p_process_name
4630: and PROCESS_VERSION = m_version
4631: and ACTIVITY_ITEM_TYPE = nvl(p_activity_item_type, p_process_item_type)
4733: 'WF_MESSAGES',
4734: 'WF_MESSAGES_TL',
4735: 'WF_MESSAGE_ATTRIBUTES',
4736: 'WF_MESSAGE_ATTRIBUTES_TL',
4737: 'WF_PROCESS_ACTIVITIES');
4738: begin
4739: for i in WFTable.FIRST..WFTable.LAST loop
4740: l_tem_tab_name := WFTable(i);
4741: AD_ZD_SEED.PREPARE(l_tem_tab_name);