DBA Data[Home] [Help]

APPS.CSD_MIGRATE_FROM_115X_PKG2 dependencies on CSD_REPAIRS

Line 4: PROCEDURE csd_repairs_mig2(p_slab_number IN NUMBER) IS

1: PACKAGE BODY CSD_Migrate_From_115X_PKG2 AS
2: /* $Header: csdmig2b.pls 115.5 2004/06/22 18:49:20 sragunat noship $ */
3:
4: PROCEDURE csd_repairs_mig2(p_slab_number IN NUMBER) IS
5:
6: Type NumTabType is VARRAY(10000) of NUMBER;
7: repair_line_id_mig NumTabType;
8:

Line 21: CURSOR csd_repairs_cursor (p_start number, p_end number) is

17: l_currency_code VARCHAR2(15);
18:
19: error_process exception;
20:
21: CURSOR csd_repairs_cursor (p_start number, p_end number) is
22: select cr.repair_line_id,
23: cr.rowid
24: from csd_repairs cr
25: where cr.currency_code IS NULL

Line 24: from csd_repairs cr

20:
21: CURSOR csd_repairs_cursor (p_start number, p_end number) is
22: select cr.repair_line_id,
23: cr.rowid
24: from csd_repairs cr
25: where cr.currency_code IS NULL
26: and cr.repair_line_id >= p_start
27: and cr.repair_line_id <= p_end;
28:

Line 33: CSD_MIG_SLABS_PKG.GET_TABLE_SLABS('CSD_REPAIRS'

29: BEGIN
30:
31: -- Get the Slab Number for the table
32: Begin
33: CSD_MIG_SLABS_PKG.GET_TABLE_SLABS('CSD_REPAIRS'
34: ,'CSD'
35: ,p_slab_number
36: ,v_min
37: ,v_max);

Line 61: -- Migration code for CSD_REPAIRS

57: null;
58: END;
59: */
60:
61: -- Migration code for CSD_REPAIRS
62: OPEN csd_repairs_cursor(v_min,v_max);
63: LOOP
64: FETCH csd_repairs_cursor bulk collect into
65: repair_line_id_mig,

Line 62: OPEN csd_repairs_cursor(v_min,v_max);

58: END;
59: */
60:
61: -- Migration code for CSD_REPAIRS
62: OPEN csd_repairs_cursor(v_min,v_max);
63: LOOP
64: FETCH csd_repairs_cursor bulk collect into
65: repair_line_id_mig,
66: rowid_mig

Line 64: FETCH csd_repairs_cursor bulk collect into

60:
61: -- Migration code for CSD_REPAIRS
62: OPEN csd_repairs_cursor(v_min,v_max);
63: LOOP
64: FETCH csd_repairs_cursor bulk collect into
65: repair_line_id_mig,
66: rowid_mig
67: LIMIT MAX_BUFFER_SIZE;
68:

Line 71: SAVEPOINT CSD_REPAIRS;

67: LIMIT MAX_BUFFER_SIZE;
68:
69: FOR j in 1..repair_line_id_mig.count
70: LOOP
71: SAVEPOINT CSD_REPAIRS;
72:
73: -- Added for the bug 3054706. Forward Ported as part of Bug 3714442
74: BEGIN
75:

Line 99: UPDATE csd_repairs

95:
96:
97: Begin
98:
99: UPDATE csd_repairs
100: SET currency_code = l_currency_code,
101: last_update_date = sysdate,
102: last_updated_by = fnd_global.user_id,
103: last_update_login = fnd_global.login_id

Line 113: ROLLBACK to CSD_REPAIRS;

109:
110: Exception
111:
112: When error_process then
113: ROLLBACK to CSD_REPAIRS;
114: v_error_text := substr(sqlerrm,1,1000)||'Repair Line Id:'||repair_line_id_mig(j);
115: INSERT INTO CSD_UPG_ERRORS
116: (ORIG_SYSTEM_REFERENCE,
117: TARGET_SYSTEM_REFERENCE,

Line 122: VALUES( 'CSD_REPAIRS'

118: ORIG_SYSTEM_REFERENCE_ID,
119: UPGRADE_DATETIME,
120: ERROR_MESSAGE,
121: MIGRATION_PHASE)
122: VALUES( 'CSD_REPAIRS'
123: ,'CSD_REPAIRS'
124: ,repair_line_id_mig(j)
125: ,sysdate
126: ,v_error_text

Line 123: ,'CSD_REPAIRS'

119: UPGRADE_DATETIME,
120: ERROR_MESSAGE,
121: MIGRATION_PHASE)
122: VALUES( 'CSD_REPAIRS'
123: ,'CSD_REPAIRS'
124: ,repair_line_id_mig(j)
125: ,sysdate
126: ,v_error_text
127: ,'11.5.9' );

Line 130: raise_application_error( -20000, 'Error while migrating CSD_REPAIRS table data: Error while updating CSD_REPAIRS. '|| v_error_text);

126: ,v_error_text
127: ,'11.5.9' );
128:
129: commit;
130: raise_application_error( -20000, 'Error while migrating CSD_REPAIRS table data: Error while updating CSD_REPAIRS. '|| v_error_text);
131:
132:
133: End;
134: END IF; -- l_currency_code IS NOT NULL

Line 139: EXIT WHEN csd_repairs_cursor%notfound;

135:
136: END LOOP;
137:
138: COMMIT;
139: EXIT WHEN csd_repairs_cursor%notfound;
140: END LOOP;
141:
142: if csd_repairs_cursor%isopen then
143: close csd_repairs_cursor;

Line 142: if csd_repairs_cursor%isopen then

138: COMMIT;
139: EXIT WHEN csd_repairs_cursor%notfound;
140: END LOOP;
141:
142: if csd_repairs_cursor%isopen then
143: close csd_repairs_cursor;
144: end if;
145:
146: COMMIT;

Line 143: close csd_repairs_cursor;

139: EXIT WHEN csd_repairs_cursor%notfound;
140: END LOOP;
141:
142: if csd_repairs_cursor%isopen then
143: close csd_repairs_cursor;
144: end if;
145:
146: COMMIT;
147:

Line 148: END csd_repairs_mig2;

144: end if;
145:
146: COMMIT;
147:
148: END csd_repairs_mig2;
149:
150:
151: /*-------------------------------------------------------------------------------*/
152: /* procedure name: insert_rep_typ_sar */