DBA Data[Home] [Help]

APPS.PAY_MX_ISR_FORMAT37_INFO dependencies on DBMS_LOB

Line 55: IF dbms_lob.getLength (p_blob) IS NOT NULL THEN

51: *****************************************************************************/
52:
53: PROCEDURE write_to_magtape_lob(p_blob BLOB) IS
54: BEGIN
55: IF dbms_lob.getLength (p_blob) IS NOT NULL THEN
56: pay_core_files.write_to_magtape_lob (p_blob);
57: END IF;
58: END write_to_magtape_lob;
59:

Line 302: is_temp := dbms_lob.istemporary(l_xml_clob);

298:
299: dbg( l_xml_query) ;
300: dbg('check for clob istemporary') ;
301:
302: is_temp := dbms_lob.istemporary(l_xml_clob);
303: dbg('Istemporary(l_xml_clob) ' ||is_temp );
304:
305: IF is_temp = 1 THEN
306: DBMS_LOB.FREETEMPORARY(l_xml_clob);

Line 306: DBMS_LOB.FREETEMPORARY(l_xml_clob);

302: is_temp := dbms_lob.istemporary(l_xml_clob);
303: dbg('Istemporary(l_xml_clob) ' ||is_temp );
304:
305: IF is_temp = 1 THEN
306: DBMS_LOB.FREETEMPORARY(l_xml_clob);
307: END IF;
308:
309: dbg('clob createtemporary') ;
310:

Line 311: dbms_lob.createtemporary(l_xml_clob,false,DBMS_LOB.CALL);

307: END IF;
308:
309: dbg('clob createtemporary') ;
310:
311: dbms_lob.createtemporary(l_xml_clob,false,DBMS_LOB.CALL);
312: dbms_lob.open(l_xml_clob,dbms_lob.lob_readwrite);
313:
314: dbg('set the context') ;
315:

Line 312: dbms_lob.open(l_xml_clob,dbms_lob.lob_readwrite);

308:
309: dbg('clob createtemporary') ;
310:
311: dbms_lob.createtemporary(l_xml_clob,false,DBMS_LOB.CALL);
312: dbms_lob.open(l_xml_clob,dbms_lob.lob_readwrite);
313:
314: dbg('set the context') ;
315:
316: l_xml_ctx := DBMS_XMLQuery.newcontext(l_xml_query);

Line 331: dbms_lob.close(l_xml_clob);

327: return l_xml_clob ;
328:
329: exception
330: when OTHERS then
331: dbms_lob.close(l_xml_clob);
332: dbg('sqleerm ' || sqlerrm);
333: HR_UTILITY.RAISE_ERROR;
334:
335: end create_xml_string;

Line 413: l_is_temp_emp := dbms_lob.istemporary(lc_emp_clob);

409: dbg('l_arch_person_id ' ||l_arch_person_id);
410: dbg('l_legal_employer_id ' ||l_legal_employer_id);
411: dbg('l_year ' ||l_year);
412:
413: l_is_temp_emp := dbms_lob.istemporary(lc_emp_clob);
414: dbg('Istemporary(lc_emp_clob) ' ||l_is_temp_emp );
415:
416: IF l_is_temp_emp = 1 THEN
417: DBMS_LOB.FREETEMPORARY(lc_emp_clob);

Line 417: DBMS_LOB.FREETEMPORARY(lc_emp_clob);

413: l_is_temp_emp := dbms_lob.istemporary(lc_emp_clob);
414: dbg('Istemporary(lc_emp_clob) ' ||l_is_temp_emp );
415:
416: IF l_is_temp_emp = 1 THEN
417: DBMS_LOB.FREETEMPORARY(lc_emp_clob);
418: END IF;
419:
420: dbms_lob.createtemporary(lc_emp_clob,false,DBMS_LOB.CALL);
421: dbms_lob.open(lc_emp_clob,dbms_lob.lob_readwrite);

Line 420: dbms_lob.createtemporary(lc_emp_clob,false,DBMS_LOB.CALL);

416: IF l_is_temp_emp = 1 THEN
417: DBMS_LOB.FREETEMPORARY(lc_emp_clob);
418: END IF;
419:
420: dbms_lob.createtemporary(lc_emp_clob,false,DBMS_LOB.CALL);
421: dbms_lob.open(lc_emp_clob,dbms_lob.lob_readwrite);
422:
423: lc_emp_clob := create_xml_string(l_arch_payroll_action_id,l_arch_person_id,l_legal_employer_id,
424: l_year,l_pai_eff_date);

Line 421: dbms_lob.open(lc_emp_clob,dbms_lob.lob_readwrite);

417: DBMS_LOB.FREETEMPORARY(lc_emp_clob);
418: END IF;
419:
420: dbms_lob.createtemporary(lc_emp_clob,false,DBMS_LOB.CALL);
421: dbms_lob.open(lc_emp_clob,dbms_lob.lob_readwrite);
422:
423: lc_emp_clob := create_xml_string(l_arch_payroll_action_id,l_arch_person_id,l_legal_employer_id,
424: l_year,l_pai_eff_date);
425:

Line 429: dbg(dbms_lob.substr(lc_emp_clob,dbms_lob.getlength(lc_emp_clob),1));

425:
426: dbg('After create xml string ');
427:
428: dbg('XML String is ');
429: dbg(dbms_lob.substr(lc_emp_clob,dbms_lob.getlength(lc_emp_clob),1));
430:
431: begin
432:
433: dbms_lob.open(lc_emp_clob,DBMS_LOB.LOB_READONLY);

Line 433: dbms_lob.open(lc_emp_clob,DBMS_LOB.LOB_READONLY);

429: dbg(dbms_lob.substr(lc_emp_clob,dbms_lob.getlength(lc_emp_clob),1));
430:
431: begin
432:
433: dbms_lob.open(lc_emp_clob,DBMS_LOB.LOB_READONLY);
434: LOOP
435: dbms_lob.read(lc_emp_clob,l_amount,l_position,l_buffer);
436: dbg('inside the loop');
437: dbg(l_buffer);

Line 435: dbms_lob.read(lc_emp_clob,l_amount,l_position,l_buffer);

431: begin
432:
433: dbms_lob.open(lc_emp_clob,DBMS_LOB.LOB_READONLY);
434: LOOP
435: dbms_lob.read(lc_emp_clob,l_amount,l_position,l_buffer);
436: dbg('inside the loop');
437: dbg(l_buffer);
438: pay_core_files.write_to_magtape_lob(l_buffer);
439: l_position := l_position+l_amount;

Line 445: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));

441: exception WHEN NO_DATA_FOUND THEN
442: null ;
443: end ;
444:
445: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));
446:
447: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN
448: dbg('Closing lc_emp_clob' );
449: dbms_lob.close(lc_emp_clob);

Line 447: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN

443: end ;
444:
445: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));
446:
447: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN
448: dbg('Closing lc_emp_clob' );
449: dbms_lob.close(lc_emp_clob);
450: END IF;
451:

Line 449: dbms_lob.close(lc_emp_clob);

445: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));
446:
447: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN
448: dbg('Closing lc_emp_clob' );
449: dbms_lob.close(lc_emp_clob);
450: END IF;
451:
452:
453: EXCEPTION

Line 455: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN

451:
452:
453: EXCEPTION
454: WHEN OTHERS then
455: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN
456: dbg('Raising exception and Closing lc_emp_clob' );
457: dbms_lob.close(lc_emp_clob);
458: END IF;
459:

Line 457: dbms_lob.close(lc_emp_clob);

453: EXCEPTION
454: WHEN OTHERS then
455: IF dbms_lob.ISOPEN(lc_emp_clob)=1 THEN
456: dbg('Raising exception and Closing lc_emp_clob' );
457: dbms_lob.close(lc_emp_clob);
458: END IF;
459:
460: dbg('sqleerm ' || SQLERRM);
461: raise;

Line 485: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));

481: l_footer_xml_string := ''||fnd_global.local_chr(13)||fnd_global.local_chr(10);
482:
483: write_to_magtape_lob (l_footer_xml_string);
484:
485: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));
486:
487: END get_footers;
488:
489:

Line 511: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));

507: ' '||fnd_global.local_chr(13)||fnd_global.local_chr(10);
508:
509: write_to_magtape_lob (l_header_xml_string);
510:
511: dbg('Length of pay_mag_tape.g_blob_value ' ||dbms_lob.getlength(pay_mag_tape.g_blob_value));
512:
513:
514: END get_headers ;
515: