[Home] [Help]
1126: begin
1127: select PROTECT_LEVEL, CUSTOM_LEVEL, VERSION, BEGIN_DATE, END_DATE
1128: into protection_level, customization_level,
1129: old_version, old_begin_date, old_end_date
1130: from WF_ACTIVITIES_VL
1131: where ITEM_TYPE = x_item_type
1132: and NAME = x_name
1133: and x_effective_date >= BEGIN_DATE
1134: and x_effective_date < nvl(END_DATE, x_effective_date+1);
1155: -- to be entered or a previously deleted activity is being
1156: -- recreated. OK to leave end_date as null.
1157: select min(BEGIN_DATE)
1158: into old_end_date
1159: from WF_ACTIVITIES_VL
1160: where ITEM_TYPE = x_item_type
1161: and NAME = x_name
1162: and BEGIN_DATE >= x_effective_date;
1163:
1188: -- Get current version number, if not exist, use 1
1189: -- If version exists, noinsert is positive, that is not to insert.
1190: select nvl(max(VERSION), 1), count(1)
1191: into new_version, noinsert
1192: from WF_ACTIVITIES
1193: where ITEM_TYPE = x_item_type
1194: and NAME = x_name;
1195:
1196: else
1196: else
1197: -- Get a new version number
1198: select nvl(max(VERSION), 0) + 1
1199: into new_version
1200: from WF_ACTIVITIES
1201: where ITEM_TYPE = x_item_type
1202: and NAME = x_name;
1203:
1204: -- Set the end_date of the old version covering x_effective_date to
1202: and NAME = x_name;
1203:
1204: -- Set the end_date of the old version covering x_effective_date to
1205: -- x_effective_date.
1206: update WF_ACTIVITIES set
1207: END_DATE = x_effective_date
1208: where ITEM_TYPE = x_item_type
1209: and NAME = x_name
1210: and VERSION = old_version;
1218: begin
1219: -- l_name will be the old data to update
1220: select ITEM_TYPE||':'||NAME||':'||to_char(VERSION), DISPLAY_NAME, NAME
1221: into conflict_name, l_dname, l_name
1222: from WF_ACTIVITIES_VL
1223: where DISPLAY_NAME = n_dname
1224: and ITEM_TYPE = x_item_type
1225: and x_effective_date >= BEGIN_DATE
1226: and x_effective_date < nvl(END_DATE, x_effective_date+1)
1232: loop
1233: begin
1234: select ITEM_TYPE||':'||NAME||':'||to_char(VERSION), DISPLAY_NAME
1235: into conflict_name, l_dname
1236: from WF_ACTIVITIES_VL
1237: where DISPLAY_NAME = n_dname
1238: and ITEM_TYPE = x_item_type
1239: and x_effective_date >= BEGIN_DATE
1240: and x_effective_date < nvl(END_DATE, x_effective_date+1)
1257:
1258: -- ### Not needed any more
1259: -- update the old data with the new display name
1260: -- begin
1261: -- update WF_ACTIVITIES_TL
1262: -- set display_name = n_dname
1263: -- where NAME = l_name
1264: -- and ITEM_TYPE = x_item_type
1265: -- and VERSION = new_version
1283: -- and ending at the end_date of the old version covering x_effective_date.
1284: if (noinsert <= 0) then
1285: if (x_event_filter is null and x_event_type = null) then
1286:
1287: Wf_Activities_Pkg.Insert_Row(
1288: x_rowid => row_id,
1289: x_item_type => x_item_type,
1290: x_name => x_name,
1291: x_version => new_version,
1313: );
1314:
1315: else
1316:
1317: Wf_Activities_Pkg.Insert_Row(
1318: x_rowid => row_id,
1319: x_item_type => x_item_type,
1320: x_name => x_name,
1321: x_version => new_version,
1387: -- in case it was set (deleted but not purged previously).
1388:
1389: if (old_begin_date is null) then
1390: -- only have future definition, need to update the begin date also
1391: update WF_ACTIVITIES
1392: set BEGIN_DATE = x_effective_date,
1393: END_DATE = to_date(NULL)
1394: where ITEM_TYPE = x_item_type
1395: and NAME = x_name
1403: -- ### most customer would not have such problem.
1404: -- ### in order to delete these, we may need to do a more
1405: -- ### complicated cursor query.
1406: else
1407: update WF_ACTIVITIES
1408: set END_DATE = to_date(NULL)
1409: where ITEM_TYPE = x_item_type
1410: and NAME = x_name
1411: and VERSION = new_version;
1866: --
1867: -- If version exists, noinsert is positive, that is not to insert.
1868: select nvl(max(VERSION), 1), count(1)
1869: into new_version, noinsert
1870: from WF_ACTIVITIES
1871: where ITEM_TYPE = x_process_item_type
1872: and NAME = 'ROOT';
1873:
1874: if (noinsert <= 0) then
2029: --
2030: begin
2031: select WAA.TYPE
2032: into l_type
2033: from WF_PROCESS_ACTIVITIES WPA, WF_ACTIVITIES WA,
2034: WF_ACTIVITY_ATTRIBUTES WAA
2035: where WPA.INSTANCE_ID = x_process_activity_id
2036: and WPA.ACTIVITY_ITEM_TYPE = WA.ITEM_TYPE
2037: and WPA.ACTIVITY_NAME = WA.NAME
2456: from WF_LOOKUP_TYPES
2457: where ITEM_TYPE = x_name)
2458: and not exists
2459: (select 1
2460: from WF_ACTIVITIES
2461: where ITEM_TYPE = x_name)
2462: and not exists
2463: (select 1
2464: from WF_MESSAGES
2619: into dummy
2620: from sys.dual
2621: where not exists
2622: (select 1
2623: from WF_ACTIVITIES
2624: where ITEM_TYPE = x_type
2625: and MESSAGE = x_name)
2626: and not exists
2627: (select 1
2762: x_level_error := 0;
2763:
2764: select PROTECT_LEVEL, CUSTOM_LEVEL
2765: into protection_level, customization_level
2766: from WF_ACTIVITIES_VL
2767: where ITEM_TYPE = x_item_type
2768: and NAME = x_name
2769: and END_DATE is null;
2770:
2780: return;
2781: end if;
2782:
2783: -- Do not delete, only set end_date
2784: update WF_ACTIVITIES set
2785: end_date = sysdate
2786: where ITEM_TYPE = x_item_type
2787: and NAME = x_name
2788: and END_DATE is null;
3114: READ_ROLE, WRITE_ROLE, EXECUTE_ROLE,
3115: to_char(BEGIN_DATE, 'YYYY/MM/DD HH24:MI:SS') EFFECTIVE_DATE,
3116: ERROR_ITEM_TYPE, RUNNABLE_FLAG, FUNCTION_TYPE,
3117: EVENT_NAME, DIRECTION
3118: from WF_ACTIVITIES_VL
3119: where sysdate >= BEGIN_DATE
3120: and (sysdate < END_DATE or END_DATE is null)
3121: and ITEM_TYPE = itt
3122: order by item_type, name;
3905: p_expand_role,
3906: p_error_item_type,
3907: p_runnable_flag,
3908: p_version
3909: from WF_ACTIVITIES_VL
3910: where ITEM_TYPE = p_item_type
3911: and NAME = p_name
3912: and END_DATE is null;
3913: exception
4032: begin
4033: -- l_name will be the old data to update
4034: select ITEM_TYPE||':'||NAME||':'||to_char(VERSION), DISPLAY_NAME, NAME
4035: into conflict_name, l_dname, l_name
4036: from WF_ACTIVITIES_VL
4037: where DISPLAY_NAME = n_dname
4038: and ITEM_TYPE = p_item_type
4039: and l_begin_date >= BEGIN_DATE
4040: and l_begin_date < nvl(END_DATE, l_begin_date+1)
4046: loop
4047: begin
4048: select ITEM_TYPE||':'||NAME||':'||to_char(VERSION), DISPLAY_NAME
4049: into conflict_name, l_dname
4050: from WF_ACTIVITIES_VL
4051: where DISPLAY_NAME = n_dname
4052: and ITEM_TYPE = p_item_type
4053: and l_begin_date >= BEGIN_DATE
4054: and l_begin_date < nvl(END_DATE, l_begin_date+1)
4077: raise;
4078: end;
4079:
4080: -- Do the Update
4081: update WF_ACTIVITIES
4082: set expand_role = l_expand_role
4083: where ITEM_TYPE = p_item_type
4084: and NAME = p_name
4085: and VERSION = l_version;
4083: where ITEM_TYPE = p_item_type
4084: and NAME = p_name
4085: and VERSION = l_version;
4086:
4087: update WF_ACTIVITIES_TL
4088: set DISPLAY_NAME = n_dname,
4089: DESCRIPTION = l_description
4090: where ITEM_TYPE = p_item_type
4091: and NAME = p_name
4335: p_names out NOCOPY t_nameTab
4336: )is
4337: cursor notfcur is
4338: select NAME
4339: from WF_ACTIVITIES
4340: where NAME like '%'||p_suffix
4341: and ITEM_TYPE = p_item_type
4342: and TYPE = 'NOTICE'
4343: and END_DATE is null;
4582:
4583: cursor actcur(ver number) is
4584: select WPA.ACTIVITY_ITEM_TYPE, WPA.ACTIVITY_NAME
4585: from WF_PROCESS_ACTIVITIES WPA,
4586: WF_ACTIVITIES WA
4587: where WPA.PROCESS_ITEM_TYPE = p_process_item_type
4588: and WPA.PROCESS_NAME = p_process_name
4589: and WPA.PROCESS_VERSION = ver
4590: and WPA.ACTIVITY_ITEM_TYPE = WA.ITEM_TYPE
4606:
4607: -- then get the active version
4608: begin
4609: select VERSION into m_version
4610: from WF_ACTIVITIES
4611: where ITEM_TYPE = p_process_item_type
4612: and NAME = p_process_name
4613: and active_date >= BEGIN_DATE
4614: and active_date < nvl(END_DATE, active_date + 1);