DBA Data[Home] [Help]

APPS.CTO_AUTO_PURGE_PK dependencies on FND_FILE

Line 100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );

96: -- Log all the input parameters
97: l_stmt_num := 10;
98:
99: -- Given parameters.
100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );
101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );
102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );
103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );
104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));

Line 101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );

97: l_stmt_num := 10;
98:
99: -- Given parameters.
100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );
101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );
102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );
103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );
104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));
105:

Line 102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );

98:
99: -- Given parameters.
100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );
101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );
102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );
103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );
104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));
105:
106: -- Handle parameter dependency

Line 103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );

99: -- Given parameters.
100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );
101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );
102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );
103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );
104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));
105:
106: -- Handle parameter dependency
107:

Line 104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));

100: FND_FILE.PUT_LINE(FND_FILE.LOG,'Base Model Id : '||to_char(p_base_model) );
101: FND_FILE.PUT_LINE(FND_FILE.LOG,'Option Item Id : '||to_char(p_option_item) );
102: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config Item Id : '||to_char(p_config_item) );
103: FND_FILE.PUT_LINE(FND_FILE.LOG,'Created Days Ago : '||to_char(p_created_days_ago) );
104: FND_FILE.PUT_LINE(FND_FILE.LOG,'Last Referenced Days Ago : '||to_char(p_last_ref_days_ago));
105:
106: -- Handle parameter dependency
107:
108: l_stmt_num := 20;

Line 114: FND_FILE.PUT_LINE(FND_FILE.LOG,'No parameters supplied. Exiting ... ' );

110: if
111: ( p_base_model is NULL and p_config_item is NULL and p_created_days_ago is NULL and p_last_ref_days_ago is NULL )
112: then
113: l_stmt_num := 30;
114: FND_FILE.PUT_LINE(FND_FILE.LOG,'No parameters supplied. Exiting ... ' );
115: return ;
116: end if ;
117:
118: -- Process deletion of rows

Line 140: FND_FILE.PUT_LINE(FND_FILE.LOG,'Deleted from BAC : '||to_char(l_rec_count)||' records.');

136:
137: -- Count number of rows deleted.
138:
139: l_rec_count := SQL%ROWCOUNT;
140: FND_FILE.PUT_LINE(FND_FILE.LOG,'Deleted from BAC : '||to_char(l_rec_count)||' records.');
141:
142: l_stmt_num := 40;
143:
144: --removing duplicate config_item_ids

Line 157: FND_FILE.PUT_LINE(FND_FILE.LOG,'de-activated disctint config item ids ');

153: END LOOP;
154: END IF;
155:
156: --getting the group reference_id
157: FND_FILE.PUT_LINE(FND_FILE.LOG,'de-activated disctint config item ids ');
158: k := dist_cfg_idx_by_id_tbl.first;
159:
160: l_stmt_num := 50;
161:

Line 178: FND_FILE.PUT_LINE(FND_FILE.LOG,' grp ref ids '|| to_char(l_grp_ref_id_tbl.count) );

174: k := dist_cfg_idx_by_id_tbl.next(k);
175:
176: END LOOP;--while
177:
178: FND_FILE.PUT_LINE(FND_FILE.LOG,' grp ref ids '|| to_char(l_grp_ref_id_tbl.count) );
179:
180: l_stmt_num := 60;
181:
182: -- rkaza. 12/29/2005. bug 4108792.

Line 186: FND_FILE.PUT_LINE(FND_FILE.LOG, l_grp_ref_id_tbl(k));

182: -- rkaza. 12/29/2005. bug 4108792.
183: k := l_grp_ref_id_tbl.first;
184: while k is not null
185: loop
186: FND_FILE.PUT_LINE(FND_FILE.LOG, l_grp_ref_id_tbl(k));
187: k := l_grp_ref_id_tbl.next(k);
188: end loop;
189:
190: l_stmt_num := 70;

Line 198: FND_FILE.PUT_LINE(FND_FILE.LOG,'Rows deleted from bcmo:'|| sql%rowcount); --end bugfix 3557190

194: DELETE from bom_cto_model_orgs
195: WHERE group_reference_id = l_grp_ref_id_tbl(k);
196: end if;
197:
198: FND_FILE.PUT_LINE(FND_FILE.LOG,'Rows deleted from bcmo:'|| sql%rowcount); --end bugfix 3557190
199:
200: --Begin Bugfix 6241681: Removing the reference of purged configs from bom_cto_order_lines
201: l_stmt_num := 80;
202: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the references of purged configs from bom_cto_order_lines');

Line 202: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the references of purged configs from bom_cto_order_lines');

198: FND_FILE.PUT_LINE(FND_FILE.LOG,'Rows deleted from bcmo:'|| sql%rowcount); --end bugfix 3557190
199:
200: --Begin Bugfix 6241681: Removing the reference of purged configs from bom_cto_order_lines
201: l_stmt_num := 80;
202: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the references of purged configs from bom_cto_order_lines');
203: k := dist_cfg_idx_by_id_tbl.first;
204:
205: WHILE k is not null
206: LOOP

Line 208: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the reference for config id=>'||to_char(l_config_item_id));

204:
205: WHILE k is not null
206: LOOP
207: l_config_item_id := dist_cfg_idx_by_id_tbl(k);
208: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the reference for config id=>'||to_char(l_config_item_id));
209: BEGIN
210: FND_FILE.PUT_LINE(FND_FILE.LOG,'Going to check if this config is linked to some SO=>'||to_char(l_config_item_id));
211:
212: SELECT ato_line_id

Line 210: FND_FILE.PUT_LINE(FND_FILE.LOG,'Going to check if this config is linked to some SO=>'||to_char(l_config_item_id));

206: LOOP
207: l_config_item_id := dist_cfg_idx_by_id_tbl(k);
208: FND_FILE.PUT_LINE(FND_FILE.LOG,'Removing the reference for config id=>'||to_char(l_config_item_id));
209: BEGIN
210: FND_FILE.PUT_LINE(FND_FILE.LOG,'Going to check if this config is linked to some SO=>'||to_char(l_config_item_id));
211:
212: SELECT ato_line_id
213: BULK COLLECT INTO lbcolline_tbl --Bulk Collecting as a config may be linked to more than one line
214: FROM bom_cto_order_lines

Line 217: FND_FILE.PUT_LINE(FND_FILE.LOG,'No. of lines this config is linked to=>'||to_char(lbcolline_tbl.count));

213: BULK COLLECT INTO lbcolline_tbl --Bulk Collecting as a config may be linked to more than one line
214: FROM bom_cto_order_lines
215: WHERE config_item_id = l_config_item_id;
216:
217: FND_FILE.PUT_LINE(FND_FILE.LOG,'No. of lines this config is linked to=>'||to_char(lbcolline_tbl.count));
218:
219: IF lbcolline_tbl.count > 0 THEN
220: FOR j IN 1..lbcolline_tbl.count LOOP
221:

Line 224: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config item exists for this model line =>'||to_char(lbcolline_tbl(j)));

220: FOR j IN 1..lbcolline_tbl.count LOOP
221:
222: if (CTO_WORKFLOW.config_line_exists(lbcolline_tbl(j))) then
223:
224: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config item exists for this model line =>'||to_char(lbcolline_tbl(j)));
225: FND_FILE.PUT_LINE(FND_FILE.LOG,'It needs to be delinked before it can be purged');
226:
227: else
228:

Line 225: FND_FILE.PUT_LINE(FND_FILE.LOG,'It needs to be delinked before it can be purged');

221:
222: if (CTO_WORKFLOW.config_line_exists(lbcolline_tbl(j))) then
223:
224: FND_FILE.PUT_LINE(FND_FILE.LOG,'Config item exists for this model line =>'||to_char(lbcolline_tbl(j)));
225: FND_FILE.PUT_LINE(FND_FILE.LOG,'It needs to be delinked before it can be purged');
226:
227: else
228:
229: l_stmt_num := 90;

Line 236: FND_FILE.PUT_LINE(FND_FILE.LOG,'Looping to remove the references of all the parents for config id=>'||to_char(l_config_item_id));

232: FROM bom_cto_order_lines
233: WHERE config_item_id = l_config_item_id
234: and ato_line_id = lbcolline_tbl(j);
235:
236: FND_FILE.PUT_LINE(FND_FILE.LOG,'Looping to remove the references of all the parents for config id=>'||to_char(l_config_item_id));
237:
238: --FOR j IN 1..lline_tbl.Count LOOP
239: --llineid := lline_tbl(j);
240: --lpatolineid := lpatoline_tbl(j);

Line 258: FND_FILE.PUT_LINE(FND_FILE.LOG,'Cant find reference of config id=>'||to_char(l_config_item_id)||' in bcol');

254: UPDATE bom_cto_order_lines SET config_item_id = NULL WHERE line_id = llineid;
255: END IF; --if config line exists
256: END LOOP; --for loop ends
257: ELSE
258: FND_FILE.PUT_LINE(FND_FILE.LOG,'Cant find reference of config id=>'||to_char(l_config_item_id)||' in bcol');
259: END IF; --lbcolline_tbl.count > 0
260: EXCEPTION
261: WHEN no_data_found then
262: FND_FILE.PUT_LINE(FND_FILE.LOG,'Reference of config id=>'||to_char(l_config_item_id)||' has already been removed');

Line 262: FND_FILE.PUT_LINE(FND_FILE.LOG,'Reference of config id=>'||to_char(l_config_item_id)||' has already been removed');

258: FND_FILE.PUT_LINE(FND_FILE.LOG,'Cant find reference of config id=>'||to_char(l_config_item_id)||' in bcol');
259: END IF; --lbcolline_tbl.count > 0
260: EXCEPTION
261: WHEN no_data_found then
262: FND_FILE.PUT_LINE(FND_FILE.LOG,'Reference of config id=>'||to_char(l_config_item_id)||' has already been removed');
263:
264: END;
265:
266: k:= dist_cfg_idx_by_id_tbl.next(k);

Line 271: FND_FILE.PUT_LINE(FND_FILE.LOG,'Batch ID: '|| to_char(l_batch_id));

267:
268: END LOOP; --while loop ends
269: --Bugfix 6241681: Removing the reference of purged configs from bom_cto_order_lines
270:
271: FND_FILE.PUT_LINE(FND_FILE.LOG,'Batch ID: '|| to_char(l_batch_id));
272:
273: commit ;
274:
275: EXCEPTION