25: set status = l_status where process = p_process_name
26: and run_date =p_run_date;
27: commit;
28:
29: FND_FILE.NEW_LINE(FND_FILE.log, 1);
30:
31: EXCEPTION WHEN OTHERS THEN
32: errbuf := errbuf||SQLERRM;
33: retcode := '1';
30:
31: EXCEPTION WHEN OTHERS THEN
32: errbuf := errbuf||SQLERRM;
33: retcode := '1';
34: FND_FILE.put_line(fnd_file.log,'Error in update_psft_sync_run: '||SQLCODE);
35: FND_FILE.NEW_LINE(FND_FILE.log, 1);
36: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
37:
38: END update_psft_sync_run;
31: EXCEPTION WHEN OTHERS THEN
32: errbuf := errbuf||SQLERRM;
33: retcode := '1';
34: FND_FILE.put_line(fnd_file.log,'Error in update_psft_sync_run: '||SQLCODE);
35: FND_FILE.NEW_LINE(FND_FILE.log, 1);
36: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
37:
38: END update_psft_sync_run;
39: /*Procedure to update the record into hr_psft_sync_run table ends*/
32: errbuf := errbuf||SQLERRM;
33: retcode := '1';
34: FND_FILE.put_line(fnd_file.log,'Error in update_psft_sync_run: '||SQLCODE);
35: FND_FILE.NEW_LINE(FND_FILE.log, 1);
36: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
37:
38: END update_psft_sync_run;
39: /*Procedure to update the record into hr_psft_sync_run table ends*/
40:
47: IS
48: l_status varchar2(10);
49: BEGIN
50:
51: FND_FILE.NEW_LINE(FND_FILE.log, 1);
52:
53: if p_status = 1 then
54: l_status := 'COMPLETED';
55: elsif p_status = 2 then
61: INSERT INTO hr_psft_sync_run(run_date,status,process)
62: Values(sysdate,l_status,p_process_name);
63: commit;
64:
65: FND_FILE.NEW_LINE(FND_FILE.log, 1);
66:
67: EXCEPTION WHEN OTHERS THEN
68: errbuf := errbuf||SQLERRM;
69: retcode := '1';
66:
67: EXCEPTION WHEN OTHERS THEN
68: errbuf := errbuf||SQLERRM;
69: retcode := '1';
70: FND_FILE.put_line(fnd_file.log,'Error in insert_psft_sync_run: '||SQLCODE);
71: FND_FILE.NEW_LINE(FND_FILE.log, 1);
72: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
73:
74: END insert_psft_sync_run;
67: EXCEPTION WHEN OTHERS THEN
68: errbuf := errbuf||SQLERRM;
69: retcode := '1';
70: FND_FILE.put_line(fnd_file.log,'Error in insert_psft_sync_run: '||SQLCODE);
71: FND_FILE.NEW_LINE(FND_FILE.log, 1);
72: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
73:
74: END insert_psft_sync_run;
75: /*Procedure to insert the record into hr_psft_sync_run table ends*/
68: errbuf := errbuf||SQLERRM;
69: retcode := '1';
70: FND_FILE.put_line(fnd_file.log,'Error in insert_psft_sync_run: '||SQLCODE);
71: FND_FILE.NEW_LINE(FND_FILE.log, 1);
72: FND_FILE.put_line(fnd_file.log,'Error Msg: '||substr(SQLERRM,1,700));
73:
74: END insert_psft_sync_run;
75: /*Procedure to insert the record into hr_psft_sync_run table ends*/
76:
161: fetch fet_psft_sync into l_dummy;
162: close fet_psft_sync;
163: if l_dummy = 0
164: then
165: FND_FILE.NEW_LINE(FND_FILE.log, 1);
166: FND_FILE.put_line(fnd_file.log,'Country Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
167: hr_delta_sync_messages.insert_psft_sync_run(2,'COUNTRY_DELTA_SYNC',errbuf,retcode);
168:
169:
162: close fet_psft_sync;
163: if l_dummy = 0
164: then
165: FND_FILE.NEW_LINE(FND_FILE.log, 1);
166: FND_FILE.put_line(fnd_file.log,'Country Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
167: hr_delta_sync_messages.insert_psft_sync_run(2,'COUNTRY_DELTA_SYNC',errbuf,retcode);
168:
169:
170:
213:
214: fetch csr_gen_msg into p_gen_status,p_gen_msg;
215: if csr_gen_msg%found then
216: if p_gen_status not in ('0','10') then
217: FND_FILE.NEW_LINE(FND_FILE.log, 1);
218: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends for the document id '||p_cntry_code||'-'||to_char(p_unique_key)
219: ||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
220: end if;
221: end if;
214: fetch csr_gen_msg into p_gen_status,p_gen_msg;
215: if csr_gen_msg%found then
216: if p_gen_status not in ('0','10') then
217: FND_FILE.NEW_LINE(FND_FILE.log, 1);
218: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends for the document id '||p_cntry_code||'-'||to_char(p_unique_key)
219: ||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
220: end if;
221: end if;
222: close csr_gen_msg;
252:
253: fetch csr_gen_msg into p_gen_status,p_gen_msg;
254: if csr_gen_msg%found then
255: if p_gen_status not in ('0','10') then
256: FND_FILE.NEW_LINE(FND_FILE.log, 1);
257: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends for the document id '||p_cntry_code||'-'||to_char(p_unique_key)
258: ||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
259: end if;
260: end if;
253: fetch csr_gen_msg into p_gen_status,p_gen_msg;
254: if csr_gen_msg%found then
255: if p_gen_status not in ('0','10') then
256: FND_FILE.NEW_LINE(FND_FILE.log, 1);
257: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends for the document id '||p_cntry_code||'-'||to_char(p_unique_key)
258: ||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
259: end if;
260: end if;
261: close csr_gen_msg;
265: end loop;
266: close fet_cntry_fsync;
267:
268: hr_delta_sync_messages.update_psft_sync_run(1,'COUNTRY_DELTA_SYNC',p_effective_date,errbuf,retcode);
269: FND_FILE.NEW_LINE(FND_FILE.log, 1);
270: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
271: end if;
272:
273: exception
266: close fet_cntry_fsync;
267:
268: hr_delta_sync_messages.update_psft_sync_run(1,'COUNTRY_DELTA_SYNC',p_effective_date,errbuf,retcode);
269: FND_FILE.NEW_LINE(FND_FILE.log, 1);
270: FND_FILE.put_line(fnd_file.log,'Country Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
271: end if;
272:
273: exception
274: when OTHERS then
274: when OTHERS then
275: hr_delta_sync_messages.update_psft_sync_run(3,'COUNTRY_DELTA_SYNC',p_effective_date,errbuf,retcode);
276: errbuf := errbuf||SQLERRM;
277: retcode := '1';
278: FND_FILE.put_line(fnd_file.log, 'Error in Country Delta Synch Extraction: '||SQLCODE);
279: FND_FILE.NEW_LINE(FND_FILE.log, 1);
280: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
281:
282: end hr_country_delta_sync;
275: hr_delta_sync_messages.update_psft_sync_run(3,'COUNTRY_DELTA_SYNC',p_effective_date,errbuf,retcode);
276: errbuf := errbuf||SQLERRM;
277: retcode := '1';
278: FND_FILE.put_line(fnd_file.log, 'Error in Country Delta Synch Extraction: '||SQLCODE);
279: FND_FILE.NEW_LINE(FND_FILE.log, 1);
280: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
281:
282: end hr_country_delta_sync;
283:
276: errbuf := errbuf||SQLERRM;
277: retcode := '1';
278: FND_FILE.put_line(fnd_file.log, 'Error in Country Delta Synch Extraction: '||SQLCODE);
279: FND_FILE.NEW_LINE(FND_FILE.log, 1);
280: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
281:
282: end hr_country_delta_sync;
283:
284: /*Procedure to extract the delta synch data for country ends here*/
369: fetch fet_psft_sync into l_dummy;
370: close fet_psft_sync;
371: if l_dummy = 0
372: then
373: FND_FILE.NEW_LINE(FND_FILE.log, 1);
374: FND_FILE.put_line(fnd_file.log,'State Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
375: hr_delta_sync_messages.insert_psft_sync_run(2,'STATE_DELTA_SYNC',errbuf,retcode);
376:
377: open fet_psft_run_dt;
370: close fet_psft_sync;
371: if l_dummy = 0
372: then
373: FND_FILE.NEW_LINE(FND_FILE.log, 1);
374: FND_FILE.put_line(fnd_file.log,'State Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
375: hr_delta_sync_messages.insert_psft_sync_run(2,'STATE_DELTA_SYNC',errbuf,retcode);
376:
377: open fet_psft_run_dt;
378: fetch fet_psft_run_dt into p_max_run_date;
422: fetch csr_gen_msg into p_gen_status,p_gen_msg;
423: if csr_gen_msg%found then
424:
425: if p_gen_status not in ('0','10') then
426: FND_FILE.NEW_LINE(FND_FILE.log, 1);
427: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends for the document id '||p_state_code||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
428: end if;
429: end if;
430: close csr_gen_msg;
423: if csr_gen_msg%found then
424:
425: if p_gen_status not in ('0','10') then
426: FND_FILE.NEW_LINE(FND_FILE.log, 1);
427: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends for the document id '||p_state_code||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
428: end if;
429: end if;
430: close csr_gen_msg;
431:
458: fetch csr_gen_msg into p_gen_status,p_gen_msg;
459: if csr_gen_msg%found then
460:
461: if p_gen_status not in ('0','10') then
462: FND_FILE.NEW_LINE(FND_FILE.log, 1);
463: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends for the document id '||p_state_code||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
464: end if;
465: end if;
466: close csr_gen_msg;
459: if csr_gen_msg%found then
460:
461: if p_gen_status not in ('0','10') then
462: FND_FILE.NEW_LINE(FND_FILE.log, 1);
463: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends for the document id '||p_state_code||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
464: end if;
465: end if;
466: close csr_gen_msg;
467: else
471:
472: close fet_state_sync;
473:
474: hr_delta_sync_messages.update_psft_sync_run(1,'STATE_DELTA_SYNC',p_effective_date,errbuf,retcode);
475: FND_FILE.NEW_LINE(FND_FILE.log, 1);
476: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
477:
478: end if;
479:
472: close fet_state_sync;
473:
474: hr_delta_sync_messages.update_psft_sync_run(1,'STATE_DELTA_SYNC',p_effective_date,errbuf,retcode);
475: FND_FILE.NEW_LINE(FND_FILE.log, 1);
476: FND_FILE.put_line(fnd_file.log,'State Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
477:
478: end if;
479:
480:
484: when others then
485: hr_delta_sync_messages.update_psft_sync_run(3,'STATE_DELTA_SYNC',p_effective_date,errbuf,retcode);
486: errbuf := errbuf||SQLERRM;
487: retcode := '1';
488: FND_FILE.put_line(fnd_file.log, 'Error in State Delta Synch Extraction: '||SQLCODE);
489: FND_FILE.NEW_LINE(FND_FILE.log, 1);
490: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
491:
492: end hr_state_delta_sync;
485: hr_delta_sync_messages.update_psft_sync_run(3,'STATE_DELTA_SYNC',p_effective_date,errbuf,retcode);
486: errbuf := errbuf||SQLERRM;
487: retcode := '1';
488: FND_FILE.put_line(fnd_file.log, 'Error in State Delta Synch Extraction: '||SQLCODE);
489: FND_FILE.NEW_LINE(FND_FILE.log, 1);
490: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
491:
492: end hr_state_delta_sync;
493:
486: errbuf := errbuf||SQLERRM;
487: retcode := '1';
488: FND_FILE.put_line(fnd_file.log, 'Error in State Delta Synch Extraction: '||SQLCODE);
489: FND_FILE.NEW_LINE(FND_FILE.log, 1);
490: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
491:
492: end hr_state_delta_sync;
493:
494: /*Procedure to extract the delta synch data for state ends here*/
671: then
672:
673:
674:
675: FND_FILE.NEW_LINE(FND_FILE.log, 1);
676: FND_FILE.put_line(fnd_file.log,'Location Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
677: hr_delta_sync_messages.insert_psft_sync_run(2,'LOC_DELTA_SYNC',errbuf,retcode);
678:
679: open fet_psft_run_dt;
672:
673:
674:
675: FND_FILE.NEW_LINE(FND_FILE.log, 1);
676: FND_FILE.put_line(fnd_file.log,'Location Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
677: hr_delta_sync_messages.insert_psft_sync_run(2,'LOC_DELTA_SYNC',errbuf,retcode);
678:
679: open fet_psft_run_dt;
680: fetch fet_psft_run_dt into p_max_run_date;
759: fetch csr_gen_msg into p_gen_status,p_gen_msg;
760: if csr_gen_msg%found then
761:
762: if p_gen_status not in ('0','10') then
763: FND_FILE.NEW_LINE(FND_FILE.log, 1);
764: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends for the document id '||p_loc_id||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
765: end if;
766: end if;
767: close csr_gen_msg;
760: if csr_gen_msg%found then
761:
762: if p_gen_status not in ('0','10') then
763: FND_FILE.NEW_LINE(FND_FILE.log, 1);
764: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends for the document id '||p_loc_id||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
765: end if;
766: end if;
767: close csr_gen_msg;
768:
835: fetch csr_gen_msg into p_gen_status,p_gen_msg;
836: if csr_gen_msg%found then
837:
838: if p_gen_status not in ('0','10') then
839: FND_FILE.NEW_LINE(FND_FILE.log, 1);
840: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends for the document id '||p_loc_id||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
841: end if;
842: end if;
843: close csr_gen_msg;
836: if csr_gen_msg%found then
837:
838: if p_gen_status not in ('0','10') then
839: FND_FILE.NEW_LINE(FND_FILE.log, 1);
840: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends for the document id '||p_loc_id||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
841: end if;
842: end if;
843: close csr_gen_msg;
844:
849: end loop;
850: close fet_loc_sync;
851:
852: hr_delta_sync_messages.update_psft_sync_run(1,'LOC_DELTA_SYNC',p_effective_date,errbuf,retcode);
853: FND_FILE.NEW_LINE(FND_FILE.log, 1);
854: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
855:
856: end if;
857:
850: close fet_loc_sync;
851:
852: hr_delta_sync_messages.update_psft_sync_run(1,'LOC_DELTA_SYNC',p_effective_date,errbuf,retcode);
853: FND_FILE.NEW_LINE(FND_FILE.log, 1);
854: FND_FILE.put_line(fnd_file.log,'Location Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
855:
856: end if;
857:
858: exception
861:
862: hr_delta_sync_messages.update_psft_sync_run(3,'LOC_DELTA_SYNC',p_effective_date,errbuf,retcode);
863: errbuf := errbuf||SQLERRM;
864: retcode := '1';
865: FND_FILE.put_line(fnd_file.log, 'Error in Location Delta Synch Extraction: '||SQLCODE);
866: FND_FILE.NEW_LINE(FND_FILE.log, 1);
867: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
868:
869: end hr_location_delta_sync;
862: hr_delta_sync_messages.update_psft_sync_run(3,'LOC_DELTA_SYNC',p_effective_date,errbuf,retcode);
863: errbuf := errbuf||SQLERRM;
864: retcode := '1';
865: FND_FILE.put_line(fnd_file.log, 'Error in Location Delta Synch Extraction: '||SQLCODE);
866: FND_FILE.NEW_LINE(FND_FILE.log, 1);
867: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
868:
869: end hr_location_delta_sync;
870:
863: errbuf := errbuf||SQLERRM;
864: retcode := '1';
865: FND_FILE.put_line(fnd_file.log, 'Error in Location Delta Synch Extraction: '||SQLCODE);
866: FND_FILE.NEW_LINE(FND_FILE.log, 1);
867: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
868:
869: end hr_location_delta_sync;
870:
871: /*Procedure to fetch the delta sync data for location ends here*/
1170: then
1171:
1172:
1173:
1174: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1175: FND_FILE.put_line(fnd_file.log,'Person Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1176: hr_delta_sync_messages.insert_psft_sync_run(2,'PERSON_DELTA_SYNC',errbuf,retcode);
1177:
1178: open csr_psft_sync;
1171:
1172:
1173:
1174: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1175: FND_FILE.put_line(fnd_file.log,'Person Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1176: hr_delta_sync_messages.insert_psft_sync_run(2,'PERSON_DELTA_SYNC',errbuf,retcode);
1177:
1178: open csr_psft_sync;
1179: fetch csr_psft_sync into l_sync_date;
1254: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1255: if csr_gen_msg%found then
1256:
1257: if p_gen_status not in ('0','10') then
1258: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1259: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends for the document id '||L_EMPLOYEE_NUMBER||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1260: end if;
1261: end if;
1262: close csr_gen_msg;
1255: if csr_gen_msg%found then
1256:
1257: if p_gen_status not in ('0','10') then
1258: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1259: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends for the document id '||L_EMPLOYEE_NUMBER||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1260: end if;
1261: end if;
1262: close csr_gen_msg;
1263:
1325: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1326: if csr_gen_msg%found then
1327:
1328: if p_gen_status not in ('0','10') then
1329: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1330: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends for the document id '||L_EMPLOYEE_NUMBER||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1331: end if;
1332: end if;
1333: close csr_gen_msg;
1326: if csr_gen_msg%found then
1327:
1328: if p_gen_status not in ('0','10') then
1329: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1330: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends for the document id '||L_EMPLOYEE_NUMBER||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1331: end if;
1332: end if;
1333: close csr_gen_msg;
1334:
1342: end loop;
1343: close csr_person_delta_sync;
1344:
1345: hr_delta_sync_messages.update_psft_sync_run(1,'PERSON_DELTA_SYNC',p_effective_date,errbuf,retcode);
1346: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1347: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1348: end if;
1349:
1350: exception
1343: close csr_person_delta_sync;
1344:
1345: hr_delta_sync_messages.update_psft_sync_run(1,'PERSON_DELTA_SYNC',p_effective_date,errbuf,retcode);
1346: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1347: FND_FILE.put_line(fnd_file.log,'Person Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1348: end if;
1349:
1350: exception
1351:
1353:
1354: hr_delta_sync_messages.update_psft_sync_run(3,'PERSON_DELTA_SYNC',p_effective_date,errbuf,retcode);
1355: errbuf := errbuf||SQLERRM;
1356: retcode := '1';
1357: FND_FILE.put_line(fnd_file.log, 'Error in Person Delta Synch Extraction: '||SQLCODE);
1358: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1359: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1360:
1361:
1354: hr_delta_sync_messages.update_psft_sync_run(3,'PERSON_DELTA_SYNC',p_effective_date,errbuf,retcode);
1355: errbuf := errbuf||SQLERRM;
1356: retcode := '1';
1357: FND_FILE.put_line(fnd_file.log, 'Error in Person Delta Synch Extraction: '||SQLCODE);
1358: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1359: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1360:
1361:
1362:
1355: errbuf := errbuf||SQLERRM;
1356: retcode := '1';
1357: FND_FILE.put_line(fnd_file.log, 'Error in Person Delta Synch Extraction: '||SQLCODE);
1358: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1359: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1360:
1361:
1362:
1363: end;
1477: fetch fet_psft_sync into l_dummy;
1478: close fet_psft_sync;
1479: if l_dummy = 0
1480: then
1481: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1482: FND_FILE.put_line(fnd_file.log,'Work Force Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1483: hr_delta_sync_messages.insert_psft_sync_run(2,'WORKFORCE_DELTA_SYNC',errbuf,retcode);
1484:
1485:
1478: close fet_psft_sync;
1479: if l_dummy = 0
1480: then
1481: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1482: FND_FILE.put_line(fnd_file.log,'Work Force Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1483: hr_delta_sync_messages.insert_psft_sync_run(2,'WORKFORCE_DELTA_SYNC',errbuf,retcode);
1484:
1485:
1486:
1628:
1629: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1630: if csr_gen_msg%found then
1631: if p_gen_status not in ('0','10') then
1632: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1633: FND_FILE.put_line(fnd_file.log,'Workforce Delta Synch Data Extraction Ends for the document id '||WorkForceDeltaType.EMPLID(1)||WorkForceDeltaType.BUSINESS_UNIT(1)||
1634: WorkForceDeltaType.JOBCODE(1)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1635: end if;
1636: end if;
1629: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1630: if csr_gen_msg%found then
1631: if p_gen_status not in ('0','10') then
1632: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1633: FND_FILE.put_line(fnd_file.log,'Workforce Delta Synch Data Extraction Ends for the document id '||WorkForceDeltaType.EMPLID(1)||WorkForceDeltaType.BUSINESS_UNIT(1)||
1634: WorkForceDeltaType.JOBCODE(1)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1635: end if;
1636: end if;
1637: close csr_gen_msg;
1789:
1790: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1791: if csr_gen_msg%found then
1792: if p_gen_status not in ('0','10') then
1793: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1794: FND_FILE.put_line(fnd_file.log,'Workforce Delta Synch Data Extraction Ends for the document id '||WorkForceDeltaType.EMPLID(I)||WorkForceDeltaType.BUSINESS_UNIT(I)||
1795: WorkForceDeltaType.JOBCODE(I)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1796: end if;
1797: end if;
1790: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1791: if csr_gen_msg%found then
1792: if p_gen_status not in ('0','10') then
1793: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1794: FND_FILE.put_line(fnd_file.log,'Workforce Delta Synch Data Extraction Ends for the document id '||WorkForceDeltaType.EMPLID(I)||WorkForceDeltaType.BUSINESS_UNIT(I)||
1795: WorkForceDeltaType.JOBCODE(I)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1796: end if;
1797: end if;
1798: close csr_gen_msg;
1799:
1800:
1801: END Loop;
1802: hr_delta_sync_messages.update_psft_sync_run(1,'WORKFORCE_DELTA_SYNC',p_effective_date,errbuf,retcode);
1803: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1804: FND_FILE.put_line(fnd_file.log,'Work Force Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1805:
1806: End if;
1807:
1800:
1801: END Loop;
1802: hr_delta_sync_messages.update_psft_sync_run(1,'WORKFORCE_DELTA_SYNC',p_effective_date,errbuf,retcode);
1803: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1804: FND_FILE.put_line(fnd_file.log,'Work Force Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1805:
1806: End if;
1807:
1808: exception
1809: when OTHERS then
1810: hr_delta_sync_messages.update_psft_sync_run(3,'WORKFORCE_DELTA_SYNC',p_effective_date,errbuf,retcode);
1811: errbuf := errbuf||SQLERRM;
1812: retcode := '1';
1813: FND_FILE.put_line(fnd_file.log, 'Error in Work Force Delta Synch Extraction: '||SQLCODE);
1814: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1815: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1816:
1817: end hr_workforce_delta_sync;
1810: hr_delta_sync_messages.update_psft_sync_run(3,'WORKFORCE_DELTA_SYNC',p_effective_date,errbuf,retcode);
1811: errbuf := errbuf||SQLERRM;
1812: retcode := '1';
1813: FND_FILE.put_line(fnd_file.log, 'Error in Work Force Delta Synch Extraction: '||SQLCODE);
1814: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1815: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1816:
1817: end hr_workforce_delta_sync;
1818: /*Procedure to extract the workforce data for delta synch process ends here*/
1811: errbuf := errbuf||SQLERRM;
1812: retcode := '1';
1813: FND_FILE.put_line(fnd_file.log, 'Error in Work Force Delta Synch Extraction: '||SQLCODE);
1814: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1815: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
1816:
1817: end hr_workforce_delta_sync;
1818: /*Procedure to extract the workforce data for delta synch process ends here*/
1819:
1899: close fet_psft_sync;
1900: if l_dummy = 0
1901: then
1902:
1903: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1904: FND_FILE.put_line(fnd_file.log,'JobCode Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1905: hr_delta_sync_messages.insert_psft_sync_run(2,'JOBCODE_DELTA_SYNC',errbuf,retcode);
1906: /* Fetching the jobcode data for delta Sync */
1907:
1900: if l_dummy = 0
1901: then
1902:
1903: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1904: FND_FILE.put_line(fnd_file.log,'JobCode Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
1905: hr_delta_sync_messages.insert_psft_sync_run(2,'JOBCODE_DELTA_SYNC',errbuf,retcode);
1906: /* Fetching the jobcode data for delta Sync */
1907:
1908: open fet_psft_run_dt;
1992: fetch csr_gen_msg into p_gen_status,p_gen_msg;
1993: if csr_gen_msg%found then
1994:
1995: if p_gen_status not in ('0','10') then
1996: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1997: FND_FILE.put_line(fnd_file.log,'JobCode Delta Synch Data Extraction Ends for the document id '||Jobcodedeltatype.SETID(1)||
1998: Jobcodedeltatype.JOBCODE(1)||'-'
1999: ||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2000: end if;
1993: if csr_gen_msg%found then
1994:
1995: if p_gen_status not in ('0','10') then
1996: FND_FILE.NEW_LINE(FND_FILE.log, 1);
1997: FND_FILE.put_line(fnd_file.log,'JobCode Delta Synch Data Extraction Ends for the document id '||Jobcodedeltatype.SETID(1)||
1998: Jobcodedeltatype.JOBCODE(1)||'-'
1999: ||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2000: end if;
2001: end if;
2104: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2105: if csr_gen_msg%found then
2106:
2107: if p_gen_status not in ('0','10') then
2108: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2109: FND_FILE.put_line(fnd_file.log,'JobCode Delta Synch Data Extraction Ends for the document id '||Jobcodedeltatype.SETID(1)||
2110: Jobcodedeltatype.JOBCODE(1)||'-'
2111: ||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2112: end if;
2105: if csr_gen_msg%found then
2106:
2107: if p_gen_status not in ('0','10') then
2108: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2109: FND_FILE.put_line(fnd_file.log,'JobCode Delta Synch Data Extraction Ends for the document id '||Jobcodedeltatype.SETID(1)||
2110: Jobcodedeltatype.JOBCODE(1)||'-'
2111: ||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2112: end if;
2113: end if;
2115:
2116: END loop;
2117:
2118: hr_delta_sync_messages.update_psft_sync_run(1,'JOBCODE_DELTA_SYNC',p_effective_date,errbuf,retcode);
2119: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2120: FND_FILE.put_line(fnd_file.log,'Jobcode Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2121: end if;
2122:
2123: EXCEPTION
2116: END loop;
2117:
2118: hr_delta_sync_messages.update_psft_sync_run(1,'JOBCODE_DELTA_SYNC',p_effective_date,errbuf,retcode);
2119: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2120: FND_FILE.put_line(fnd_file.log,'Jobcode Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2121: end if;
2122:
2123: EXCEPTION
2124: WHEN OTHERS THEN
2124: WHEN OTHERS THEN
2125: hr_delta_sync_messages.update_psft_sync_run(3,'JOBCODE_DELTA_SYNC',p_effective_date,errbuf,retcode);
2126: errbuf := errbuf||SQLERRM;
2127: retcode := '1';
2128: FND_FILE.put_line(fnd_file.log, 'Error in Jobcode Delta Synch Extraction: '||SQLCODE);
2129: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2130: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2131:
2132: end hr_jobcode_delta_sync;
2125: hr_delta_sync_messages.update_psft_sync_run(3,'JOBCODE_DELTA_SYNC',p_effective_date,errbuf,retcode);
2126: errbuf := errbuf||SQLERRM;
2127: retcode := '1';
2128: FND_FILE.put_line(fnd_file.log, 'Error in Jobcode Delta Synch Extraction: '||SQLCODE);
2129: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2130: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2131:
2132: end hr_jobcode_delta_sync;
2133: /*Procedure to extract the jobcode data for delta synch process ends here*/
2126: errbuf := errbuf||SQLERRM;
2127: retcode := '1';
2128: FND_FILE.put_line(fnd_file.log, 'Error in Jobcode Delta Synch Extraction: '||SQLCODE);
2129: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2130: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2131:
2132: end hr_jobcode_delta_sync;
2133: /*Procedure to extract the jobcode data for delta synch process ends here*/
2134: /*Procedure to extract the organization data for delta synch process begins here*/
2254: fetch fet_psft_sync into l_dummy;
2255: close fet_psft_sync;
2256: if l_dummy = 0
2257: then
2258: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2259: FND_FILE.put_line(fnd_file.log,'Organization Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2260: hr_delta_sync_messages.insert_psft_sync_run(2,'ORG_DELTA_SYNC',errbuf,retcode);
2261:
2262:
2255: close fet_psft_sync;
2256: if l_dummy = 0
2257: then
2258: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2259: FND_FILE.put_line(fnd_file.log,'Organization Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2260: hr_delta_sync_messages.insert_psft_sync_run(2,'ORG_DELTA_SYNC',errbuf,retcode);
2261:
2262:
2263:
2320: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2321: if csr_gen_msg%found then
2322:
2323: if p_gen_status not in ('0','10') then
2324: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2325: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends for the document id '||to_char(p_dept_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2326: end if;
2327: end if;
2328: close csr_gen_msg;
2321: if csr_gen_msg%found then
2322:
2323: if p_gen_status not in ('0','10') then
2324: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2325: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends for the document id '||to_char(p_dept_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2326: end if;
2327: end if;
2328: close csr_gen_msg;
2329:
2373: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2374: if csr_gen_msg%found then
2375:
2376: if p_gen_status not in ('0','10') then
2377: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2378: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends for the document id '||to_char(p_dept_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2379: end if;
2380: end if;
2381: close csr_gen_msg;
2374: if csr_gen_msg%found then
2375:
2376: if p_gen_status not in ('0','10') then
2377: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2378: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends for the document id '||to_char(p_dept_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2379: end if;
2380: end if;
2381: close csr_gen_msg;
2382: else
2385: end loop;
2386: close fet_orgn_fsync;
2387:
2388: hr_delta_sync_messages.update_psft_sync_run(1,'ORG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2389: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2390: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2391: end if;
2392:
2393: exception
2386: close fet_orgn_fsync;
2387:
2388: hr_delta_sync_messages.update_psft_sync_run(1,'ORG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2389: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2390: FND_FILE.put_line(fnd_file.log,'Organization Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2391: end if;
2392:
2393: exception
2394: when OTHERS then
2394: when OTHERS then
2395: hr_delta_sync_messages.update_psft_sync_run(3,'ORG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2396: errbuf := errbuf||SQLERRM;
2397: retcode := '1';
2398: FND_FILE.put_line(fnd_file.log, 'Error in Organization Delta Synch Extraction: '||SQLCODE);
2399: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2400: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2401: end hr_organizaton_delta_sync;
2402: /*Procedure to extract the organization data for delta synch process begins here*/
2395: hr_delta_sync_messages.update_psft_sync_run(3,'ORG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2396: errbuf := errbuf||SQLERRM;
2397: retcode := '1';
2398: FND_FILE.put_line(fnd_file.log, 'Error in Organization Delta Synch Extraction: '||SQLCODE);
2399: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2400: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2401: end hr_organizaton_delta_sync;
2402: /*Procedure to extract the organization data for delta synch process begins here*/
2403:
2396: errbuf := errbuf||SQLERRM;
2397: retcode := '1';
2398: FND_FILE.put_line(fnd_file.log, 'Error in Organization Delta Synch Extraction: '||SQLCODE);
2399: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2400: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2401: end hr_organizaton_delta_sync;
2402: /*Procedure to extract the organization data for delta synch process begins here*/
2403:
2404: /*Procedure to extract the business group data for delta synch process begins here*/
2494: fetch fet_psft_sync into l_dummy;
2495: close fet_psft_sync;
2496: if l_dummy = 0
2497: then
2498: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2499: FND_FILE.put_line(fnd_file.log,'Business Group Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2500: hr_delta_sync_messages.insert_psft_sync_run(2,'BG_DELTA_SYNC',errbuf,retcode);
2501:
2502:
2495: close fet_psft_sync;
2496: if l_dummy = 0
2497: then
2498: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2499: FND_FILE.put_line(fnd_file.log,'Business Group Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2500: hr_delta_sync_messages.insert_psft_sync_run(2,'BG_DELTA_SYNC',errbuf,retcode);
2501:
2502:
2503:
2549: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2550: if csr_gen_msg%found then
2551:
2552: if p_gen_status not in ('0','10') then
2553: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2554: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends for the document id '||to_char(p_bg_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2555: end if;
2556: end if;
2557: close csr_gen_msg;
2550: if csr_gen_msg%found then
2551:
2552: if p_gen_status not in ('0','10') then
2553: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2554: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends for the document id '||to_char(p_bg_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2555: end if;
2556: end if;
2557: close csr_gen_msg;
2558:
2589: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2590: if csr_gen_msg%found then
2591:
2592: if p_gen_status not in ('0','10') then
2593: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2594: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends for the document id '||to_char(p_bg_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2595: end if;
2596: end if;
2597: close csr_gen_msg;
2590: if csr_gen_msg%found then
2591:
2592: if p_gen_status not in ('0','10') then
2593: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2594: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends for the document id '||to_char(p_bg_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2595: end if;
2596: end if;
2597: close csr_gen_msg;
2598: else
2601: end loop;
2602: close fet_bg_fsync;
2603:
2604: hr_delta_sync_messages.update_psft_sync_run(1,'BG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2605: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2606: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2607: end if;
2608:
2609: exception
2602: close fet_bg_fsync;
2603:
2604: hr_delta_sync_messages.update_psft_sync_run(1,'BG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2605: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2606: FND_FILE.put_line(fnd_file.log,'Business Group Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2607: end if;
2608:
2609: exception
2610: when OTHERS then
2610: when OTHERS then
2611: hr_delta_sync_messages.update_psft_sync_run(3,'BG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2612: errbuf := errbuf||SQLERRM;
2613: retcode := '1';
2614: FND_FILE.put_line(fnd_file.log, 'Error in Business Group Delta Synch Extraction: '||SQLCODE);
2615: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2616: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2617: end hr_businessgrp_delta_sync;
2618: /*Procedure to extract the business group data for delta synch process ends here*/
2611: hr_delta_sync_messages.update_psft_sync_run(3,'BG_DELTA_SYNC',p_effective_date,errbuf,retcode);
2612: errbuf := errbuf||SQLERRM;
2613: retcode := '1';
2614: FND_FILE.put_line(fnd_file.log, 'Error in Business Group Delta Synch Extraction: '||SQLCODE);
2615: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2616: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2617: end hr_businessgrp_delta_sync;
2618: /*Procedure to extract the business group data for delta synch process ends here*/
2619:
2612: errbuf := errbuf||SQLERRM;
2613: retcode := '1';
2614: FND_FILE.put_line(fnd_file.log, 'Error in Business Group Delta Synch Extraction: '||SQLCODE);
2615: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2616: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2617: end hr_businessgrp_delta_sync;
2618: /*Procedure to extract the business group data for delta synch process ends here*/
2619:
2620: /*Procedure to extract the payroll group data for delta synch process begins here*/
2722: fetch fet_psft_sync into l_dummy;
2723: close fet_psft_sync;
2724: if l_dummy = 0
2725: then
2726: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2727: FND_FILE.put_line(fnd_file.log,'Payroll Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2728: hr_delta_sync_messages.insert_psft_sync_run(2,'PYRL_DELTA_SYNC',errbuf,retcode);
2729:
2730:
2723: close fet_psft_sync;
2724: if l_dummy = 0
2725: then
2726: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2727: FND_FILE.put_line(fnd_file.log,'Payroll Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2728: hr_delta_sync_messages.insert_psft_sync_run(2,'PYRL_DELTA_SYNC',errbuf,retcode);
2729:
2730:
2731:
2784: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2785: if csr_gen_msg%found then
2786:
2787: if p_gen_status not in ('0','10') then
2788: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2789: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends for the document id '||to_char(p_pyrl_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2790: end if;
2791: end if;
2792: close csr_gen_msg;
2785: if csr_gen_msg%found then
2786:
2787: if p_gen_status not in ('0','10') then
2788: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2789: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends for the document id '||to_char(p_pyrl_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2790: end if;
2791: end if;
2792: close csr_gen_msg;
2793:
2831: fetch csr_gen_msg into p_gen_status,p_gen_msg;
2832: if csr_gen_msg%found then
2833:
2834: if p_gen_status not in ('0','10') then
2835: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2836: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends for the document id '||to_char(p_pyrl_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2837: end if;
2838: end if;
2839: close csr_gen_msg;
2832: if csr_gen_msg%found then
2833:
2834: if p_gen_status not in ('0','10') then
2835: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2836: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends for the document id '||to_char(p_pyrl_id)||'-'||to_char(p_unique_key)||'due to :'||p_gen_msg||'on'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2837: end if;
2838: end if;
2839: close csr_gen_msg;
2840: else
2843: end loop;
2844: close fet_pyrl_fsync;
2845:
2846: hr_delta_sync_messages.update_psft_sync_run(1,'PYRL_DELTA_SYNC',p_effective_date,errbuf,retcode);
2847: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2848: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2849: end if;
2850:
2851: exception
2844: close fet_pyrl_fsync;
2845:
2846: hr_delta_sync_messages.update_psft_sync_run(1,'PYRL_DELTA_SYNC',p_effective_date,errbuf,retcode);
2847: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2848: FND_FILE.put_line(fnd_file.log,'Payroll Delta Synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2849: end if;
2850:
2851: exception
2852: when OTHERS then
2852: when OTHERS then
2853: hr_delta_sync_messages.update_psft_sync_run(3,'PYRL_DELTA_SYNC',p_effective_date,errbuf,retcode);
2854: errbuf := errbuf||SQLERRM;
2855: retcode := '1';
2856: FND_FILE.put_line(fnd_file.log, 'Error in Payroll Delta Synch Extraction: '||SQLCODE);
2857: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2858: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2859: end hr_payroll_delta_sync;
2860: /*Procedure to extract the payroll group data for delta synch process ends here*/
2853: hr_delta_sync_messages.update_psft_sync_run(3,'PYRL_DELTA_SYNC',p_effective_date,errbuf,retcode);
2854: errbuf := errbuf||SQLERRM;
2855: retcode := '1';
2856: FND_FILE.put_line(fnd_file.log, 'Error in Payroll Delta Synch Extraction: '||SQLCODE);
2857: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2858: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2859: end hr_payroll_delta_sync;
2860: /*Procedure to extract the payroll group data for delta synch process ends here*/
2861:
2854: errbuf := errbuf||SQLERRM;
2855: retcode := '1';
2856: FND_FILE.put_line(fnd_file.log, 'Error in Payroll Delta Synch Extraction: '||SQLCODE);
2857: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2858: FND_FILE.put_line(fnd_file.log, 'Error Msg: '||substr(SQLERRM,1,700));
2859: end hr_payroll_delta_sync;
2860: /*Procedure to extract the payroll group data for delta synch process ends here*/
2861:
2862: /*Common procedure called from concurrent program to extract the data begins here*/
2866: p_party_site_id in number)
2867: is
2868: p_effective_date date default sysdate;
2869: begin
2870: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2871: FND_FILE.put_line(fnd_file.log,'Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2872: if p_process_name = 'STATE_DELTA_SYNCH'
2873: then
2874: hr_delta_sync_messages.hr_state_delta_sync(ERRBUF,RETCODE,p_party_site_id);
2867: is
2868: p_effective_date date default sysdate;
2869: begin
2870: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2871: FND_FILE.put_line(fnd_file.log,'Delta synch Data Extraction Begins:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2872: if p_process_name = 'STATE_DELTA_SYNCH'
2873: then
2874: hr_delta_sync_messages.hr_state_delta_sync(ERRBUF,RETCODE,p_party_site_id);
2875: elsif p_process_name = 'COUNTRY_DELTA_SYNCH'
2893: hr_delta_sync_messages.hr_businessgrp_delta_sync(ERRBUF,RETCODE,p_party_site_id);
2894: elsif p_process_name = 'PAYROLL_DELTA_SYNCH' then
2895: hr_delta_sync_messages.hr_payroll_delta_sync(ERRBUF,RETCODE,p_party_site_id);
2896: end if;
2897: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2898: FND_FILE.put_line(fnd_file.log,'Delta synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2899: end hr_delta_sync;
2900: /*Common procedure called from concurrent program to extract the data ends here*/
2901:
2894: elsif p_process_name = 'PAYROLL_DELTA_SYNCH' then
2895: hr_delta_sync_messages.hr_payroll_delta_sync(ERRBUF,RETCODE,p_party_site_id);
2896: end if;
2897: FND_FILE.NEW_LINE(FND_FILE.log, 1);
2898: FND_FILE.put_line(fnd_file.log,'Delta synch Data Extraction Ends:'||to_char(p_effective_date, 'DD/MM/RRRR HH:MI:SS'));
2899: end hr_delta_sync;
2900: /*Common procedure called from concurrent program to extract the data ends here*/
2901:
2902: /*common procedure to update the status of the sync data from message designer starts here*/