APPS.IGW_PROP_PROGRAM_ADDRESSES_TBH dependencies on IGW_PROP_PROGRAM_ADDRESSES

Line 1: package body IGW_PROP_PROGRAM_ADDRESSES_TBH as

1: package body IGW_PROP_PROGRAM_ADDRESSES_TBH as
2: --$Header: igwtpadb.pls 115.4 2002/11/15 00:43:47 ashkumar ship $
3: procedure INSERT_ROW (
4: X_ROWID out NOCOPY ROWID,
5: X_PROPOSAL_ID in NUMBER,

Line 12: cursor C is select ROWID from IGW_PROP_PROGRAM_ADDRESSES

8: X_MAIL_DESCRIPTION in VARCHAR2,
9: X_MODE in VARCHAR2 default 'R',
10: X_RETURN_STATUS out NOCOPY VARCHAR2
11: ) is
12: cursor C is select ROWID from IGW_PROP_PROGRAM_ADDRESSES
13: where PROPOSAL_ID = X_PROPOSAL_ID
14: and ADDRESS_ID = X_ADDRESS_ID;
15: X_LAST_UPDATE_DATE DATE;
16: X_LAST_UPDATED_BY NUMBER;

Line 38: insert into IGW_PROP_PROGRAM_ADDRESSES (

34: else
35: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
36: app_exception.raise_exception;
37: end if;
38: insert into IGW_PROP_PROGRAM_ADDRESSES (
39: PROPOSAL_ID,
40: ADDRESS_ID,
41: NUMBER_OF_COPIES,
42: MAIL_DESCRIPTION,

Line 72: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'IGW_PROP_PROGRAM_ADDRESSES_TBH'

68: close c;
69:
70: EXCEPTION
71: WHEN OTHERS THEN
72: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'IGW_PROP_PROGRAM_ADDRESSES_TBH'
73: ,p_procedure_name => 'INSERT_ROW' );
74: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
75: RAISE;
76: end INSERT_ROW;

Line 96: FROM IGW_PROP_PROGRAM_ADDRESSES

92: l_row_id ROWID := x_rowid;
93:
94: CURSOR get_row_id IS
95: SELECT rowid
96: FROM IGW_PROP_PROGRAM_ADDRESSES
97: WHERE proposal_id = x_proposal_id
98: AND address_id = x_address_id;
99:
100: begin

Line 126: update IGW_PROP_PROGRAM_ADDRESSES set

122: else
123: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
124: app_exception.raise_exception;
125: end if;
126: update IGW_PROP_PROGRAM_ADDRESSES set
127: ADDRESS_ID = X_ADDRESS_ID,
128: NUMBER_OF_COPIES = decode(X_NUMBER_OF_COPIES, FND_API.G_MISS_CHAR, NULL, X_NUMBER_OF_COPIES),
129: MAIL_DESCRIPTION = decode(X_MAIL_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, X_MAIL_DESCRIPTION),
130: RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER + 1,

Line 164: FROM IGW_PROP_PROGRAM_ADDRESSES

160: l_row_id ROWID := x_rowid;
161:
162: CURSOR get_row_id IS
163: SELECT rowid
164: FROM IGW_PROP_PROGRAM_ADDRESSES
165: WHERE proposal_id = x_proposal_id
166: AND address_id = x_address_id;
167:
168: begin

Line 177: delete from IGW_PROP_PROGRAM_ADDRESSES

173: FETCH get_row_id INTO l_row_id;
174: CLOSE get_row_id;
175: END IF;
176:
177: delete from IGW_PROP_PROGRAM_ADDRESSES
178: where ROWID = L_ROW_ID
179: AND RECORD_VERSION_NUMBER = X_RECORD_VERSION_NUMBER;
180:
181:

Line 191: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'IGW_PROP_PROGRAM_ADDRESSES_TBH'

187: end if;
188:
189: EXCEPTION
190: WHEN OTHERS THEN
191: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'IGW_PROP_PROGRAM_ADDRESSES_TBH'
192: ,p_procedure_name => 'DELETE_ROW' );
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
194: RAISE;
195: end DELETE_ROW;

Line 197: end IGW_PROP_PROGRAM_ADDRESSES_TBH;

193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
194: RAISE;
195: end DELETE_ROW;
196:
197: end IGW_PROP_PROGRAM_ADDRESSES_TBH;