62:
63:
64: BEGIN
65:
66: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.insert_row (+)');
67:
68: FOR rec IN org_cur LOOP
69: l_org_id := rec.org_id;
70: END LOOP;
131: ,l_org_id
132: );
133:
134: END IF;
135: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.insert_row (-)');
136: END INSERT_ROW;
137:
138:
139:
160: ) IS
161:
162: BEGIN
163:
164: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.update_row (+)');
165:
166: UPDATE PN_INDEX_LEASE_TERMS_ALL
167: SET
168: INDEX_LEASE_TERM_ID = X_INDEX_LEASE_TERM_ID
179: WHERE INDEX_LEASE_TERM_ID = X_INDEX_LEASE_TERM_ID;
180:
181: if (sql%notfound) then raise no_data_found ; end if;
182:
183: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.update_row (-)');
184: end update_row;
185:
186:
187:
212: FOR UPDATE OF INDEX_LEASE_TERM_ID NOWAIT;
213: tlinfo c1%ROWTYPE;
214:
215: BEGIN
216: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.lock_row (+)');
217: open c1; fetch c1 into tlinfo; if (c1%notfound) then close c1; return; end if; close c1;
218: if (
219: tlinfo.INDEX_LEASE_TERM_ID = X_INDEX_LEASE_TERM_ID
220: AND tlinfo.INDEX_LEASE_ID = X_INDEX_LEASE_ID
227: )
228: then null; ELSE
229: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED'); app_exception.raise_exception;
230: end if;
231: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.lock_row (-)');
232: end LOCK_ROW;
233:
234:
235:
253:
254: l_rowExists VARCHAR2(10) := NULL;
255:
256: BEGIN
257: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.delete_row (+)');
258:
259: BEGIN
260: SELECT '1'
261: INTO l_rowExists
286: raise no_data_found;
287: end if;
288:
289: END IF;
290: PNP_DEBUG_PKG.debug (' PN_INDEX_LEASE_TERMS_PKG.delete_row (-)');
291: END delete_row;
292:
293:
294: END PN_INDEX_LEASE_TERMS_PKG;