[Home] [Help]
28: X_Num_Workers in number) IS
29:
30: l_worker_id number;
31: l_product varchar2(30) := 'CN';
32: l_table_name varchar2(30) := 'CN_REASONS_ALL';
33: l_update_name varchar2(30) := 'cnupreas.sql';
34: l_status varchar2(30);
35: l_industry varchar2(30);
36: l_retstatus boolean;
51: decode(r.lookup_type, 'ANALYST_NOTE_REASON',
52: decode(r.reason_code, 'USER_DEFINED', 'CN_USER', 'CN_SYSGEN'),
53: 'CN_SYSGEN') note_type,
54: r.reason_id, r.created_by, r.creation_date, 0 id, r.rowid rowid1
55: from cn_reasons_all r, cn_lookups l
56: where r.rowid between l_start_rowid and l_end_rowid
57: and r.attribute1 is null
58: and l.lookup_type (+) = r.lookup_type
59: and l.lookup_code (+) = r.reason_code;
138: -- Code your update logic here
139: --
140: -- clean out dangling junk records
141: fnd_file.put_line(FND_FILE.LOG, 'About to clean out dangling junk records');
142: delete /*+ ROWID(r) */ from cn_reasons_all r
143: where rowid between l_start_rowid and l_end_rowid
144: and (updated_table = 'CN_PAYMENT_WORKSHEETS' and not exists
145: (select 1 from cn_payment_worksheets_all
146: where payment_worksheet_id = upd_table_id)
178: end loop;
179:
180: -- set flag on old data (attribute1 was never used before)
181: forall c in l_upd_id_tbl.first..l_upd_id_tbl.last
182: update cn_reasons_all
183: set attribute1 = x_note_id_tbl(c)
184: where reason_id = l_reas_id_tbl(c)
185: and rowid = l_rowid_tbl(c);
186: