APPS.PA_PROJ_ELEM_VER_STRUCTURE_PKG dependencies on PA_PROJ_ELEM_VER_STRUCTURE

Line 1: package BODY PA_PROJ_ELEM_VER_STRUCTURE_PKG as

1: package BODY PA_PROJ_ELEM_VER_STRUCTURE_PKG as
2: /*$Header: PAXSVATB.pls 120.2 2005/08/25 23:24:29 avaithia noship $*/
3:
4: -- API name : insert_row
5: -- Type : Table Handlers

Line 46: cursor c is select rowid from PA_PROJ_ELEM_VER_STRUCTURE

42: , x_source_object_id IN NUMBER:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM --Bug No 3594635 SMukka
43: , x_source_object_type IN VARCHAR2:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR --Bug No 3594635 SMukka
44: )
45: IS
46: cursor c is select rowid from PA_PROJ_ELEM_VER_STRUCTURE
47: where pev_structure_id = X_PEV_STRUCTURE_ID;
48: cursor c2 is select pa_proj_elem_ver_structure_s.nextval from sys.dual;
49:
50: -- 4537865 : Start

Line 48: cursor c2 is select pa_proj_elem_ver_structure_s.nextval from sys.dual;

44: )
45: IS
46: cursor c is select rowid from PA_PROJ_ELEM_VER_STRUCTURE
47: where pev_structure_id = X_PEV_STRUCTURE_ID;
48: cursor c2 is select pa_proj_elem_ver_structure_s.nextval from sys.dual;
49:
50: -- 4537865 : Start
51: l_incoming_rowid NUMBER ;
52: l_incoming_pev_structure_id NUMBER ;

Line 67: INSERT INTO PA_PROJ_ELEM_VER_STRUCTURE(

63: fetch c2 into X_PEV_STRUCTURE_ID;
64: close c2;
65: end if;
66:
67: INSERT INTO PA_PROJ_ELEM_VER_STRUCTURE(
68: PEV_STRUCTURE_ID
69: ,ELEMENT_VERSION_ID
70: ,VERSION_NUMBER
71: ,NAME

Line 155: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEM_VER_STRUCTURE_PKG',

151: X_ROWID := l_incoming_rowid ;
152: x_pev_structure_id := l_incoming_pev_structure_id ;
153:
154: -- Add the xception message to stack and RAISE
155: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEM_VER_STRUCTURE_PKG',
156: p_procedure_name => 'Insert_Row',
157: p_error_text => SUBSTRB(SQLERRM,1,240));
158: RAISE ;
159: END;

Line 204: UPDATE PA_PROJ_ELEM_VER_STRUCTURE

200: , X_CURRENT_WORKING_FLAG VARCHAR2 := 'N' --FPM changes bug 3301192
201: )
202: IS
203: BEGIN
204: UPDATE PA_PROJ_ELEM_VER_STRUCTURE
205: SET
206: PEV_STRUCTURE_ID = X_PEV_STRUCTURE_ID
207: , ELEMENT_VERSION_ID = X_ELEMENT_VERSION_ID
208: , VERSION_NUMBER = X_VERSION_NUMBER

Line 262: DELETE FROM PA_PROJ_ELEM_VER_STRUCTURE

258: )
259: IS
260: BEGIN
261:
262: DELETE FROM PA_PROJ_ELEM_VER_STRUCTURE
263: WHERE ROWID = X_ROWID;
264:
265: if (SQL%NOTFOUND) then
266: Raise NO_DATA_FOUND;

Line 273: end PA_PROJ_ELEM_VER_STRUCTURE_PKG;

269: END;
270:
271:
272:
273: end PA_PROJ_ELEM_VER_STRUCTURE_PKG;