APPS.PA_STATUS_LIST_ITEMS_PKG dependencies on PA_STATUS_LIST_ITEMS

Line 1: package body PA_STATUS_LIST_ITEMS_PKG as

1: package body PA_STATUS_LIST_ITEMS_PKG as
2: /* $Header: PACISITB.pls 120.2 2005/08/22 05:13:16 sukhanna noship $ */
3: procedure INSERT_ROW (
4: X_RECORD_VERSION_NUMBER in NUMBER,
5: X_STATUS_LIST_ITEM_ID in out NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 14: cursor C is select ROWID from PA_STATUS_LIST_ITEMS

10: X_LAST_UPDATE_DATE in DATE ,
11: X_LAST_UPDATED_BY in NUMBER ,
12: X_LAST_UPDATE_LOGIN in NUMBER
13: ) is
14: cursor C is select ROWID from PA_STATUS_LIST_ITEMS
15: where STATUS_LIST_ITEM_ID = X_STATUS_LIST_ITEM_ID
16: ;
17: l_rowid ROWID;
18: l_status_list_item_id NUMBER;

Line 22: SELECT pa_status_list_items_s.nextval into l_status_list_item_id FROM dual;

18: l_status_list_item_id NUMBER;
19: begin
20: l_status_list_item_id := x_status_list_item_id; --Added for bug 4565156
21: IF (X_STATUS_LIST_ITEM_ID = -99) THEN
22: SELECT pa_status_list_items_s.nextval into l_status_list_item_id FROM dual;
23: X_STATUS_LIST_ITEM_ID := l_status_list_item_id;
24: END IF;
25:
26: insert into PA_STATUS_LIST_ITEMS (

Line 26: insert into PA_STATUS_LIST_ITEMS (

22: SELECT pa_status_list_items_s.nextval into l_status_list_item_id FROM dual;
23: X_STATUS_LIST_ITEM_ID := l_status_list_item_id;
24: END IF;
25:
26: insert into PA_STATUS_LIST_ITEMS (
27: STATUS_LIST_ID,
28: RECORD_VERSION_NUMBER,
29: PROJECT_STATUS_CODE,
30: CREATION_DATE,

Line 72: from PA_STATUS_LIST_ITEMS

68: STATUS_LIST_ID,
69: RECORD_VERSION_NUMBER,
70: PROJECT_STATUS_CODE,
71: STATUS_LIST_ITEM_ID
72: from PA_STATUS_LIST_ITEMS
73: where STATUS_LIST_ITEM_ID = X_STATUS_LIST_ITEM_ID
74: for update of STATUS_LIST_ITEM_ID nowait;
75: begin
76: for tlinfo in c1 loop

Line 104: update PA_STATUS_LIST_ITEMS set

100: X_CREATION_DATE IN DATE ,
101: X_CREATED_BY IN NUMBER
102: ) is
103: begin
104: update PA_STATUS_LIST_ITEMS set
105: STATUS_LIST_ID = X_STATUS_LIST_ID,
106: RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER,
107: PROJECT_STATUS_CODE = X_PROJECT_STATUS_CODE,
108: STATUS_LIST_ITEM_ID = X_STATUS_LIST_ITEM_ID,

Line 126: delete from PA_STATUS_LIST_ITEMS

122: X_STATUS_LIST_ITEM_ID in NUMBER,
123: X_RECORD_VERSION_NUMBER in NUMBER
124: ) is
125: begin
126: delete from PA_STATUS_LIST_ITEMS
127: where STATUS_LIST_ITEM_ID = X_STATUS_LIST_ITEM_ID;
128:
129: if (sql%notfound) then
130: raise no_data_found;

Line 135: end PA_STATUS_LIST_ITEMS_PKG;

131: end if;
132:
133: end DELETE_ROW;
134:
135: end PA_STATUS_LIST_ITEMS_PKG;