8: X_LAST_UPDATED_BY out nocopy NUMBER,
9: X_LAST_UPDATE_LOGIN out nocopy NUMBER
10: ) is
11: begin
12: X_CREATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
13: X_LAST_UPDATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
14: X_LAST_UPDATE_LOGIN := 0;
15: end OWNER_TO_WHO;
16:
9: X_LAST_UPDATE_LOGIN out nocopy NUMBER
10: ) is
11: begin
12: X_CREATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
13: X_LAST_UPDATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
14: X_LAST_UPDATE_LOGIN := 0;
15: end OWNER_TO_WHO;
16:
17: procedure KEY_TO_IDS (
63: open CSR_IS_ATTRIBUTE_SEED(
64: X_ATTRIBUTE_ID
65: );
66: fetch CSR_IS_ATTRIBUTE_SEED into X_CREATED_BY;
67: if (CSR_IS_ATTRIBUTE_SEED%notfound) OR (X_CREATED_BY <> AME_SEED_UTILITY.SEED_USER_ID)
68: then
69: X_CREATED_BY := null;
70: end if;
71: close CSR_IS_ATTRIBUTE_SEED;
308: X_LAST_UPDATED_BY,
309: X_LAST_UPDATE_DATE,
310: X_LAST_UPDATE_LOGIN,
311: X_START_DATE,
312: AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
313: X_OBJECT_VERSION_NUMBER
314: from sys.dual
315: where not exists (select NULL
316: from AME_CONDITIONS