917:
918: raw_data:=utl_raw.cast_to_raw(p_text);
919: text_size:=utl_raw.length(raw_data);
920:
921: dbms_lob.createtemporary(temp_blob,false,DBMS_LOB.CALL);
922: dbms_lob.open(temp_blob,dbms_lob.lob_readwrite);
923:
924: dbms_lob.writeappend(temp_blob,
925: text_size,
918: raw_data:=utl_raw.cast_to_raw(p_text);
919: text_size:=utl_raw.length(raw_data);
920:
921: dbms_lob.createtemporary(temp_blob,false,DBMS_LOB.CALL);
922: dbms_lob.open(temp_blob,dbms_lob.lob_readwrite);
923:
924: dbms_lob.writeappend(temp_blob,
925: text_size,
926: raw_data
920:
921: dbms_lob.createtemporary(temp_blob,false,DBMS_LOB.CALL);
922: dbms_lob.open(temp_blob,dbms_lob.lob_readwrite);
923:
924: dbms_lob.writeappend(temp_blob,
925: text_size,
926: raw_data
927: );
928:
925: text_size,
926: raw_data
927: );
928:
929: IF dbms_lob.ISOPEN(temp_blob)=1 THEN
930: hr_utility.trace('Closing temp_lob' );
931: dbms_lob.close(temp_blob);
932: END IF;
933:
927: );
928:
929: IF dbms_lob.ISOPEN(temp_blob)=1 THEN
930: hr_utility.trace('Closing temp_lob' );
931: dbms_lob.close(temp_blob);
932: END IF;
933:
934: return temp_blob;
935: END;
2737:
2738:
2739:
2740: hr_utility.trace('one set XML string ' ||l_xml_string);
2741: is_temp := dbms_lob.istemporary(l_xml_blob);
2742: hr_utility.trace('Istemporary(l_xml_blob) ' ||is_temp );
2743:
2744: IF is_temp = 1 THEN
2745: DBMS_LOB.FREETEMPORARY(l_xml_blob);
2741: is_temp := dbms_lob.istemporary(l_xml_blob);
2742: hr_utility.trace('Istemporary(l_xml_blob) ' ||is_temp );
2743:
2744: IF is_temp = 1 THEN
2745: DBMS_LOB.FREETEMPORARY(l_xml_blob);
2746: END IF;
2747:
2748: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
2749: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
2744: IF is_temp = 1 THEN
2745: DBMS_LOB.FREETEMPORARY(l_xml_blob);
2746: END IF;
2747:
2748: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
2749: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
2750: hr_utility.trace('OPENED l_xml_blob ' );
2751:
2752: raw_data:=utl_raw.cast_to_raw(l_xml_string);
2745: DBMS_LOB.FREETEMPORARY(l_xml_blob);
2746: END IF;
2747:
2748: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
2749: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
2750: hr_utility.trace('OPENED l_xml_blob ' );
2751:
2752: raw_data:=utl_raw.cast_to_raw(l_xml_string);
2753: text_size:=utl_raw.length(raw_data);
2751:
2752: raw_data:=utl_raw.cast_to_raw(l_xml_string);
2753: text_size:=utl_raw.length(raw_data);
2754:
2755: dbms_lob.writeappend(l_xml_blob,text_size,raw_data);
2756:
2757: hr_utility.trace('Get Length l_xml_clob ' ||dbms_lob.getlength(l_xml_blob) );
2758: dbms_lob.close(l_xml_blob);
2759: return l_xml_blob;
2753: text_size:=utl_raw.length(raw_data);
2754:
2755: dbms_lob.writeappend(l_xml_blob,text_size,raw_data);
2756:
2757: hr_utility.trace('Get Length l_xml_clob ' ||dbms_lob.getlength(l_xml_blob) );
2758: dbms_lob.close(l_xml_blob);
2759: return l_xml_blob;
2760: exception
2761: when OTHERS then
2754:
2755: dbms_lob.writeappend(l_xml_blob,text_size,raw_data);
2756:
2757: hr_utility.trace('Get Length l_xml_clob ' ||dbms_lob.getlength(l_xml_blob) );
2758: dbms_lob.close(l_xml_blob);
2759: return l_xml_blob;
2760: exception
2761: when OTHERS then
2762: dbms_lob.close(l_xml_blob);
2758: dbms_lob.close(l_xml_blob);
2759: return l_xml_blob;
2760: exception
2761: when OTHERS then
2762: dbms_lob.close(l_xml_blob);
2763: hr_utility.trace('sqleerm ' || sqlerrm);
2764: HR_UTILITY.RAISE_ERROR;
2765:
2766: end create_xml_string;
3082: l_local_count_completed := 0;
3083: l_state_local_total_count := l_state_local_tab.count;
3084: l_state_local_count_completed := 0;
3085:
3086: l_is_temp_xml_string := dbms_lob.istemporary(l_xml_blob);
3087: hr_utility.trace('Istemporary(l_xml_blob) ' ||l_is_temp_xml_string );
3088:
3089: IF l_is_temp_xml_string = 1 THEN
3090: DBMS_LOB.FREETEMPORARY(l_xml_blob);
3086: l_is_temp_xml_string := dbms_lob.istemporary(l_xml_blob);
3087: hr_utility.trace('Istemporary(l_xml_blob) ' ||l_is_temp_xml_string );
3088:
3089: IF l_is_temp_xml_string = 1 THEN
3090: DBMS_LOB.FREETEMPORARY(l_xml_blob);
3091: END IF;
3092:
3093: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
3094: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
3089: IF l_is_temp_xml_string = 1 THEN
3090: DBMS_LOB.FREETEMPORARY(l_xml_blob);
3091: END IF;
3092:
3093: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
3094: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
3095:
3096: IF (l_b14_total_count = 0) AND
3097: (l_b12_total_count = 0) AND
3090: DBMS_LOB.FREETEMPORARY(l_xml_blob);
3091: END IF;
3092:
3093: dbms_lob.createtemporary(l_xml_blob,false,DBMS_LOB.CALL);
3094: dbms_lob.open(l_xml_blob,dbms_lob.lob_readwrite);
3095:
3096: IF (l_b14_total_count = 0) AND
3097: (l_b12_total_count = 0) AND
3098: --(l_sl_total_count = 0)
3100:
3101: IF (g_no_corrections > 0) THEN
3102:
3103: hr_utility.trace('In l_b14_total_count and other counts =0 ' );
3104: -- dbms_lob.append(l_final_xml,p_xml_string);
3105: l_xml_blob := create_xml_string(--l_w2c_fields_o,
3106: l_w2c_fields_c,
3107: l_box14_codea,l_box14_meaninga_c,l_box14_meaninga_o,
3108: l_box14_codeb,l_box14_meaningb_c,l_box14_meaningb_o,
3427: l_locality2,
3428: p_year);
3429:
3430: hr_utility.trace('After l_out_create_xml, length of LOB ' ||
3431: dbms_lob.getlength(l_out_create_xml));
3432: --IF l_xml_string is not NULL and l_out_create_xml IS NOT NULL THEN
3433:
3434: dbms_lob.append(l_xml_blob,l_out_create_xml);
3435: hr_utility.trace('Length of l_xml_blob ' ||dbms_lob.getlength(l_xml_blob));
3430: hr_utility.trace('After l_out_create_xml, length of LOB ' ||
3431: dbms_lob.getlength(l_out_create_xml));
3432: --IF l_xml_string is not NULL and l_out_create_xml IS NOT NULL THEN
3433:
3434: dbms_lob.append(l_xml_blob,l_out_create_xml);
3435: hr_utility.trace('Length of l_xml_blob ' ||dbms_lob.getlength(l_xml_blob));
3436:
3437: --ELSE
3438: -- dbms_lob.writeappend(l_xml_string,dbms_lobamount,l_out_create_xml);
3431: dbms_lob.getlength(l_out_create_xml));
3432: --IF l_xml_string is not NULL and l_out_create_xml IS NOT NULL THEN
3433:
3434: dbms_lob.append(l_xml_blob,l_out_create_xml);
3435: hr_utility.trace('Length of l_xml_blob ' ||dbms_lob.getlength(l_xml_blob));
3436:
3437: --ELSE
3438: -- dbms_lob.writeappend(l_xml_string,dbms_lobamount,l_out_create_xml);
3439: --END IF;
3434: dbms_lob.append(l_xml_blob,l_out_create_xml);
3435: hr_utility.trace('Length of l_xml_blob ' ||dbms_lob.getlength(l_xml_blob));
3436:
3437: --ELSE
3438: -- dbms_lob.writeappend(l_xml_string,dbms_lobamount,l_out_create_xml);
3439: --END IF;
3440:
3441: END LOOP;
3442: END IF;
3443: --}
3444: END IF ; /* p_error_msg is null */
3445: hr_utility.trace('XML String is ');
3446:
3447: --hr_utility.trace(dbms_lob.substr(l_xml_string,,1));
3448:
3449: return l_xml_blob;
3450: EXCEPTION
3451: WHEN OTHERS then
3488: p_tax_unit_id ,
3489: p_year,
3490: p_error_msg , true);
3491:
3492: hr_utility.trace('dbms_lob.getlength(p_xml_blob) ' ||dbms_lob.getlength(p_xml_blob));
3493:
3494: IF p_error_msg IS NULL THEN
3495: hr_utility.trace('In final XML p_xml_string ');
3496: /* hr_utility.trace('XML String '||
3493:
3494: IF p_error_msg IS NULL THEN
3495: hr_utility.trace('In final XML p_xml_string ');
3496: /* hr_utility.trace('XML String '||
3497: dbms_lob.substr(p_xml_string,dbms_lob.getlength(p_xml_string),1));
3498: */
3499: l_final_xml_string :=
3500: -- ''|| EOL|| Bug 6712851
3501: '
3510: -- '
3511:
3512:
3513: hr_utility.trace('1. final 1. XML l_final_xml '||
3514: dbms_lob.substr(l_final_xml,dbms_lob.getlength(l_final_xml),1));
3515:
3516: l_last_xml_string := '
3517: -- '
3518: '
3523: ''||EOL||
3524: ''||EOL||
3525: '';
3526:
3527: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3528: hr_utility.trace('Istemporary(l_xml_string) ' ||l_is_temp_final_xml );
3529:
3530: IF l_is_temp_final_xml = 1 THEN
3531: DBMS_LOB.FREETEMPORARY(l_final_xml);
3527: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3528: hr_utility.trace('Istemporary(l_xml_string) ' ||l_is_temp_final_xml );
3529:
3530: IF l_is_temp_final_xml = 1 THEN
3531: DBMS_LOB.FREETEMPORARY(l_final_xml);
3532: END IF;
3533:
3534: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3535: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3530: IF l_is_temp_final_xml = 1 THEN
3531: DBMS_LOB.FREETEMPORARY(l_final_xml);
3532: END IF;
3533:
3534: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3535: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3536: l_final_xml := append_to_lob(l_final_xml_string);
3537: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3538:
3531: DBMS_LOB.FREETEMPORARY(l_final_xml);
3532: END IF;
3533:
3534: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3535: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3536: l_final_xml := append_to_lob(l_final_xml_string);
3537: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3538:
3539: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3533:
3534: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3535: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3536: l_final_xml := append_to_lob(l_final_xml_string);
3537: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3538:
3539: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3540:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3535: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3536: l_final_xml := append_to_lob(l_final_xml_string);
3537: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3538:
3539: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3540:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3542:
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3537: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3538:
3539: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3540:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3542:
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3544: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3545: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3539: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3540:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3542:
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3544: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3545: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3546: l_temp_blob := append_to_lob(l_last_xml_string);
3547: dbms_lob.append(l_final_xml,l_temp_blob);
3540:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3542:
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3544: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3545: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3546: l_temp_blob := append_to_lob(l_last_xml_string);
3547: dbms_lob.append(l_final_xml,l_temp_blob);
3548:
3541: dbms_lob.append(l_final_xml,p_xml_blob);
3542:
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3544: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3545: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3546: l_temp_blob := append_to_lob(l_last_xml_string);
3547: dbms_lob.append(l_final_xml,l_temp_blob);
3548:
3549: /* Added ISOPEN condition for bug 3899583 */
3543: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3544: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3545: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3546: l_temp_blob := append_to_lob(l_last_xml_string);
3547: dbms_lob.append(l_final_xml,l_temp_blob);
3548:
3549: /* Added ISOPEN condition for bug 3899583 */
3550: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3551: hr_utility.trace('Closing l_final_xml' );
3546: l_temp_blob := append_to_lob(l_last_xml_string);
3547: dbms_lob.append(l_final_xml,l_temp_blob);
3548:
3549: /* Added ISOPEN condition for bug 3899583 */
3550: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3551: hr_utility.trace('Closing l_final_xml' );
3552: dbms_lob.close(l_final_xml);
3553: END IF;
3554: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3548:
3549: /* Added ISOPEN condition for bug 3899583 */
3550: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3551: hr_utility.trace('Closing l_final_xml' );
3552: dbms_lob.close(l_final_xml);
3553: END IF;
3554: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3555: hr_utility.trace('Closing p_xml_blob' );
3556: dbms_lob.close(p_xml_blob);
3550: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3551: hr_utility.trace('Closing l_final_xml' );
3552: dbms_lob.close(l_final_xml);
3553: END IF;
3554: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3555: hr_utility.trace('Closing p_xml_blob' );
3556: dbms_lob.close(p_xml_blob);
3557: END IF;
3558: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3552: dbms_lob.close(l_final_xml);
3553: END IF;
3554: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3555: hr_utility.trace('Closing p_xml_blob' );
3556: dbms_lob.close(p_xml_blob);
3557: END IF;
3558: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3559: hr_utility.trace('Closing l_temp_blob' );
3560: dbms_lob.close(l_temp_blob);
3554: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3555: hr_utility.trace('Closing p_xml_blob' );
3556: dbms_lob.close(p_xml_blob);
3557: END IF;
3558: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3559: hr_utility.trace('Closing l_temp_blob' );
3560: dbms_lob.close(l_temp_blob);
3561: END IF;
3562: ELSE
3556: dbms_lob.close(p_xml_blob);
3557: END IF;
3558: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3559: hr_utility.trace('Closing l_temp_blob' );
3560: dbms_lob.close(l_temp_blob);
3561: END IF;
3562: ELSE
3563: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3564: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3559: hr_utility.trace('Closing l_temp_blob' );
3560: dbms_lob.close(l_temp_blob);
3561: END IF;
3562: ELSE
3563: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3564: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3565: l_final_xml := append_to_lob(p_error_msg);
3566:
3567: hr_utility.trace(' get final cml, p_error_msg '||p_error_msg);
3560: dbms_lob.close(l_temp_blob);
3561: END IF;
3562: ELSE
3563: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3564: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3565: l_final_xml := append_to_lob(p_error_msg);
3566:
3567: hr_utility.trace(' get final cml, p_error_msg '||p_error_msg);
3568:
3566:
3567: hr_utility.trace(' get final cml, p_error_msg '||p_error_msg);
3568:
3569: END IF ; /* p_error_msg is null */
3570: hr_utility.trace('dbms_lob.getlength(l_final_xml) ' ||dbms_lob.getlength(l_final_xml));
3571:
3572: return l_final_xml;
3573: EXCEPTION
3574: WHEN OTHERS then
3572: return l_final_xml;
3573: EXCEPTION
3574: WHEN OTHERS then
3575: /* Added ISOPEN condition for bug 3899583 */
3576: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3577: hr_utility.trace('Raising exception and Closing l_final_xml' );
3578: dbms_lob.close(l_final_xml);
3579: END IF;
3580: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3574: WHEN OTHERS then
3575: /* Added ISOPEN condition for bug 3899583 */
3576: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3577: hr_utility.trace('Raising exception and Closing l_final_xml' );
3578: dbms_lob.close(l_final_xml);
3579: END IF;
3580: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3581: hr_utility.trace('Raising exception and Closing p_xml_string' );
3582: dbms_lob.close(p_xml_blob);
3576: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3577: hr_utility.trace('Raising exception and Closing l_final_xml' );
3578: dbms_lob.close(l_final_xml);
3579: END IF;
3580: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3581: hr_utility.trace('Raising exception and Closing p_xml_string' );
3582: dbms_lob.close(p_xml_blob);
3583: END IF;
3584: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3578: dbms_lob.close(l_final_xml);
3579: END IF;
3580: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3581: hr_utility.trace('Raising exception and Closing p_xml_string' );
3582: dbms_lob.close(p_xml_blob);
3583: END IF;
3584: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3585: hr_utility.trace('Closing l_temp_blob' );
3586: dbms_lob.close(l_temp_blob);
3580: IF dbms_lob.ISOPEN(p_xml_blob)=1 THEN
3581: hr_utility.trace('Raising exception and Closing p_xml_string' );
3582: dbms_lob.close(p_xml_blob);
3583: END IF;
3584: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3585: hr_utility.trace('Closing l_temp_blob' );
3586: dbms_lob.close(l_temp_blob);
3587: END IF;
3588:
3582: dbms_lob.close(p_xml_blob);
3583: END IF;
3584: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3585: hr_utility.trace('Closing l_temp_blob' );
3586: dbms_lob.close(l_temp_blob);
3587: END IF;
3588:
3589:
3590: hr_utility.trace('sqleerm ' || SQLERRM);
3665: l_tax_unit_id,
3666: l_year,
3667: l_error_msg, false);
3668: hr_utility.trace('XML String is ');
3669: IF ((dbms_lob.getlength(lc_emp_blob) >0) and (l_error_msg IS NULL) )THEN
3670:
3671: --hr_utility.trace(dbms_lob.substr(lc_emp_blob,dbms_lob.getlength(lc_emp_blob),1));
3672:
3673: l_final_xml_string := /* 6712851 ''|| EOL|| */
3667: l_error_msg, false);
3668: hr_utility.trace('XML String is ');
3669: IF ((dbms_lob.getlength(lc_emp_blob) >0) and (l_error_msg IS NULL) )THEN
3670:
3671: --hr_utility.trace(dbms_lob.substr(lc_emp_blob,dbms_lob.getlength(lc_emp_blob),1));
3672:
3673: l_final_xml_string := /* 6712851 ''|| EOL|| */
3674: '
3675: '
3695: ''||EOL||
3696: ''||EOL;
3697:
3698:
3699: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3700: hr_utility.trace('Istemporary(l_xml_string) ' ||l_is_temp_final_xml );
3701:
3702: IF l_is_temp_final_xml = 1 THEN
3703: DBMS_LOB.FREETEMPORARY(l_final_xml);
3699: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3700: hr_utility.trace('Istemporary(l_xml_string) ' ||l_is_temp_final_xml );
3701:
3702: IF l_is_temp_final_xml = 1 THEN
3703: DBMS_LOB.FREETEMPORARY(l_final_xml);
3704: END IF;
3705:
3706: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3707: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3702: IF l_is_temp_final_xml = 1 THEN
3703: DBMS_LOB.FREETEMPORARY(l_final_xml);
3704: END IF;
3705:
3706: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3707: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3708:
3709: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3710: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3703: DBMS_LOB.FREETEMPORARY(l_final_xml);
3704: END IF;
3705:
3706: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3707: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3708:
3709: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3710: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3711:
3705:
3706: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3707: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3708:
3709: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3710: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3711:
3712: raw_data:=utl_raw.cast_to_raw(l_final_xml_string);
3713: text_size:=utl_raw.length(raw_data);
3706: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3707: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3708:
3709: dbms_lob.createtemporary(l_temp_blob,false,DBMS_LOB.CALL);
3710: dbms_lob.open(l_temp_blob,dbms_lob.lob_readwrite);
3711:
3712: raw_data:=utl_raw.cast_to_raw(l_final_xml_string);
3713: text_size:=utl_raw.length(raw_data);
3714:
3711:
3712: raw_data:=utl_raw.cast_to_raw(l_final_xml_string);
3713: text_size:=utl_raw.length(raw_data);
3714:
3715: -- dbms_lob.writeappend(l_final_xml,text_size,raw_data);
3716:
3717: /*dbms_lob.writeappend(l_final_xml,
3718: utl_raw.length(utl_raw.cast_to_raw(l_final_xml_string)),
3719: utl_raw.cast_to_raw(l_final_xml_string)
3713: text_size:=utl_raw.length(raw_data);
3714:
3715: -- dbms_lob.writeappend(l_final_xml,text_size,raw_data);
3716:
3717: /*dbms_lob.writeappend(l_final_xml,
3718: utl_raw.length(utl_raw.cast_to_raw(l_final_xml_string)),
3719: utl_raw.cast_to_raw(l_final_xml_string)
3720: );*/
3721: l_temp_blob := append_to_lob(l_final_xml_string);
3718: utl_raw.length(utl_raw.cast_to_raw(l_final_xml_string)),
3719: utl_raw.cast_to_raw(l_final_xml_string)
3720: );*/
3721: l_temp_blob := append_to_lob(l_final_xml_string);
3722: dbms_lob.append(l_final_xml,l_temp_blob);
3723:
3724: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3725:
3726: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3720: );*/
3721: l_temp_blob := append_to_lob(l_final_xml_string);
3722: dbms_lob.append(l_final_xml,l_temp_blob);
3723:
3724: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3725:
3726: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3727:
3728: dbms_lob.append(l_final_xml,lc_emp_blob);
3722: dbms_lob.append(l_final_xml,l_temp_blob);
3723:
3724: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3725:
3726: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3727:
3728: dbms_lob.append(l_final_xml,lc_emp_blob);
3729:
3730: raw_data:=utl_raw.cast_to_raw(l_last_xml_string);
3724: --dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3725:
3726: hr_utility.trace('Get Length l_final_xml ' ||dbms_lob.getlength(l_final_xml) );
3727:
3728: dbms_lob.append(l_final_xml,lc_emp_blob);
3729:
3730: raw_data:=utl_raw.cast_to_raw(l_last_xml_string);
3731: text_size:=utl_raw.length(raw_data);
3732:
3729:
3730: raw_data:=utl_raw.cast_to_raw(l_last_xml_string);
3731: text_size:=utl_raw.length(raw_data);
3732:
3733: --dbms_lob.writeappend(l_final_xml,text_size,raw_data);
3734:
3735: /*dbms_lob.writeappend(l_final_xml,
3736: utl_raw.length(utl_raw.cast_to_raw(l_last_xml_string)),
3737: utl_raw.cast_to_raw(l_last_xml_string)
3731: text_size:=utl_raw.length(raw_data);
3732:
3733: --dbms_lob.writeappend(l_final_xml,text_size,raw_data);
3734:
3735: /*dbms_lob.writeappend(l_final_xml,
3736: utl_raw.length(utl_raw.cast_to_raw(l_last_xml_string)),
3737: utl_raw.cast_to_raw(l_last_xml_string)
3738: );*/
3739:
3738: );*/
3739:
3740:
3741: l_temp_blob := append_to_lob(l_last_xml_string);
3742: dbms_lob.append(l_final_xml,l_temp_blob);
3743: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3744:
3745: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3746: hr_utility.trace('Closing l_final_xml' );
3739:
3740:
3741: l_temp_blob := append_to_lob(l_last_xml_string);
3742: dbms_lob.append(l_final_xml,l_temp_blob);
3743: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3744:
3745: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3746: hr_utility.trace('Closing l_final_xml' );
3747: dbms_lob.close(l_final_xml);
3741: l_temp_blob := append_to_lob(l_last_xml_string);
3742: dbms_lob.append(l_final_xml,l_temp_blob);
3743: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3744:
3745: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3746: hr_utility.trace('Closing l_final_xml' );
3747: dbms_lob.close(l_final_xml);
3748: END IF;
3749: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3743: --dbms_lob.writeappend(l_final_xml,length(l_last_xml_string),l_last_xml_string);
3744:
3745: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3746: hr_utility.trace('Closing l_final_xml' );
3747: dbms_lob.close(l_final_xml);
3748: END IF;
3749: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3750: hr_utility.trace('Closing lc_emp_blob' );
3751: dbms_lob.close(lc_emp_blob);
3745: IF DBMS_LOB.isopen(l_final_xml) = 1 THEN
3746: hr_utility.trace('Closing l_final_xml' );
3747: dbms_lob.close(l_final_xml);
3748: END IF;
3749: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3750: hr_utility.trace('Closing lc_emp_blob' );
3751: dbms_lob.close(lc_emp_blob);
3752: END IF;
3753: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3747: dbms_lob.close(l_final_xml);
3748: END IF;
3749: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3750: hr_utility.trace('Closing lc_emp_blob' );
3751: dbms_lob.close(lc_emp_blob);
3752: END IF;
3753: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3754: hr_utility.trace('Closing l_temp_blob' );
3755: dbms_lob.close(l_temp_blob);
3749: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3750: hr_utility.trace('Closing lc_emp_blob' );
3751: dbms_lob.close(lc_emp_blob);
3752: END IF;
3753: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3754: hr_utility.trace('Closing l_temp_blob' );
3755: dbms_lob.close(l_temp_blob);
3756: END IF;
3757:
3751: dbms_lob.close(lc_emp_blob);
3752: END IF;
3753: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3754: hr_utility.trace('Closing l_temp_blob' );
3755: dbms_lob.close(l_temp_blob);
3756: END IF;
3757:
3758: hr_utility.trace('dbms_lob.getlength(l_final_xml) ' ||dbms_lob.getlength(l_final_xml));
3759:
3754: hr_utility.trace('Closing l_temp_blob' );
3755: dbms_lob.close(l_temp_blob);
3756: END IF;
3757:
3758: hr_utility.trace('dbms_lob.getlength(l_final_xml) ' ||dbms_lob.getlength(l_final_xml));
3759:
3760: pay_core_files.write_to_magtape_lob(l_final_xml);
3761: -- hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3762:
3757:
3758: hr_utility.trace('dbms_lob.getlength(l_final_xml) ' ||dbms_lob.getlength(l_final_xml));
3759:
3760: pay_core_files.write_to_magtape_lob(l_final_xml);
3761: -- hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3762:
3763: END IF; /*dbms_lob.getlength(lc_emp_blob) >0*/
3764: -- l_is_temp_xml_string := dbms_lob.istemporary(pay_mag_tape.g_clob_value);
3765:
3759:
3760: pay_core_files.write_to_magtape_lob(l_final_xml);
3761: -- hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3762:
3763: END IF; /*dbms_lob.getlength(lc_emp_blob) >0*/
3764: -- l_is_temp_xml_string := dbms_lob.istemporary(pay_mag_tape.g_clob_value);
3765:
3766:
3767:
3760: pay_core_files.write_to_magtape_lob(l_final_xml);
3761: -- hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3762:
3763: END IF; /*dbms_lob.getlength(lc_emp_blob) >0*/
3764: -- l_is_temp_xml_string := dbms_lob.istemporary(pay_mag_tape.g_clob_value);
3765:
3766:
3767:
3768: EXCEPTION
3767:
3768: EXCEPTION
3769: WHEN OTHERS then
3770: /* Added ISOPEN condition for bug 3899583 */
3771: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3772: hr_utility.trace('Raising exception and Closing l_final_xml' ||sqlerrm);
3773: dbms_lob.close(l_final_xml);
3774: END IF;
3775: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3769: WHEN OTHERS then
3770: /* Added ISOPEN condition for bug 3899583 */
3771: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3772: hr_utility.trace('Raising exception and Closing l_final_xml' ||sqlerrm);
3773: dbms_lob.close(l_final_xml);
3774: END IF;
3775: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3776: hr_utility.trace('Raising exception and Closing p_xml_string' );
3777: dbms_lob.close(lc_emp_blob);
3771: IF dbms_lob.ISOPEN(l_final_xml)=1 THEN
3772: hr_utility.trace('Raising exception and Closing l_final_xml' ||sqlerrm);
3773: dbms_lob.close(l_final_xml);
3774: END IF;
3775: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3776: hr_utility.trace('Raising exception and Closing p_xml_string' );
3777: dbms_lob.close(lc_emp_blob);
3778: END IF;
3779: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3773: dbms_lob.close(l_final_xml);
3774: END IF;
3775: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3776: hr_utility.trace('Raising exception and Closing p_xml_string' );
3777: dbms_lob.close(lc_emp_blob);
3778: END IF;
3779: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3780: hr_utility.trace('Closing l_temp_blob' );
3781: dbms_lob.close(l_temp_blob);
3775: IF dbms_lob.ISOPEN(lc_emp_blob)=1 THEN
3776: hr_utility.trace('Raising exception and Closing p_xml_string' );
3777: dbms_lob.close(lc_emp_blob);
3778: END IF;
3779: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3780: hr_utility.trace('Closing l_temp_blob' );
3781: dbms_lob.close(l_temp_blob);
3782: END IF;
3783:
3777: dbms_lob.close(lc_emp_blob);
3778: END IF;
3779: IF dbms_lob.ISOPEN(l_temp_blob)=1 THEN
3780: hr_utility.trace('Closing l_temp_blob' );
3781: dbms_lob.close(l_temp_blob);
3782: END IF;
3783:
3784: hr_utility.trace('sqleerm ' || SQLERRM);
3785:
3795: BEGIN
3796: EOL := fnd_global.local_chr(13)||fnd_global.local_chr(10);
3797: l_last_xml_string :=
3798: ''||EOL;
3799: l_is_temp_final_xml := dbms_lob.istemporary(l_footer_xml);
3800: hr_utility.trace('Istemporary(l_footer_xml) ' ||l_is_temp_final_xml );
3801:
3802: IF l_is_temp_final_xml = 1 THEN
3803: DBMS_LOB.FREETEMPORARY(l_footer_xml);
3799: l_is_temp_final_xml := dbms_lob.istemporary(l_footer_xml);
3800: hr_utility.trace('Istemporary(l_footer_xml) ' ||l_is_temp_final_xml );
3801:
3802: IF l_is_temp_final_xml = 1 THEN
3803: DBMS_LOB.FREETEMPORARY(l_footer_xml);
3804: END IF;
3805:
3806: dbms_lob.createtemporary(l_footer_xml,false,DBMS_LOB.CALL);
3807: dbms_lob.open(l_footer_xml,dbms_lob.lob_readwrite);
3802: IF l_is_temp_final_xml = 1 THEN
3803: DBMS_LOB.FREETEMPORARY(l_footer_xml);
3804: END IF;
3805:
3806: dbms_lob.createtemporary(l_footer_xml,false,DBMS_LOB.CALL);
3807: dbms_lob.open(l_footer_xml,dbms_lob.lob_readwrite);
3808: dbms_lob.writeappend(l_footer_xml,length(l_last_xml_string),l_last_xml_string);
3809:
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3803: DBMS_LOB.FREETEMPORARY(l_footer_xml);
3804: END IF;
3805:
3806: dbms_lob.createtemporary(l_footer_xml,false,DBMS_LOB.CALL);
3807: dbms_lob.open(l_footer_xml,dbms_lob.lob_readwrite);
3808: dbms_lob.writeappend(l_footer_xml,length(l_last_xml_string),l_last_xml_string);
3809:
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3811:
3804: END IF;
3805:
3806: dbms_lob.createtemporary(l_footer_xml,false,DBMS_LOB.CALL);
3807: dbms_lob.open(l_footer_xml,dbms_lob.lob_readwrite);
3808: dbms_lob.writeappend(l_footer_xml,length(l_last_xml_string),l_last_xml_string);
3809:
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3811:
3812: --dbms_lob.append(pay_mag_tape.g_clob_value,l_footer_xml);
3806: dbms_lob.createtemporary(l_footer_xml,false,DBMS_LOB.CALL);
3807: dbms_lob.open(l_footer_xml,dbms_lob.lob_readwrite);
3808: dbms_lob.writeappend(l_footer_xml,length(l_last_xml_string),l_last_xml_string);
3809:
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3811:
3812: --dbms_lob.append(pay_mag_tape.g_clob_value,l_footer_xml);
3813: pay_core_files.write_to_magtape_lob(l_last_xml_string);
3814: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_footer_xml,dbms_lob.getlength(l_footer_xml),1));
3808: dbms_lob.writeappend(l_footer_xml,length(l_last_xml_string),l_last_xml_string);
3809:
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3811:
3812: --dbms_lob.append(pay_mag_tape.g_clob_value,l_footer_xml);
3813: pay_core_files.write_to_magtape_lob(l_last_xml_string);
3814: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_footer_xml,dbms_lob.getlength(l_footer_xml),1));
3815:
3816: --hr_utility.trace('In Get footers,Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3810: hr_utility.trace('In Get footers,Length of length(l_footer_xml) ' ||dbms_lob.getlength(l_footer_xml));
3811:
3812: --dbms_lob.append(pay_mag_tape.g_clob_value,l_footer_xml);
3813: pay_core_files.write_to_magtape_lob(l_last_xml_string);
3814: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_footer_xml,dbms_lob.getlength(l_footer_xml),1));
3815:
3816: --hr_utility.trace('In Get footers,Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3817: END;
3818:
3812: --dbms_lob.append(pay_mag_tape.g_clob_value,l_footer_xml);
3813: pay_core_files.write_to_magtape_lob(l_last_xml_string);
3814: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_footer_xml,dbms_lob.getlength(l_footer_xml),1));
3815:
3816: --hr_utility.trace('In Get footers,Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3817: END;
3818:
3819: PROCEDURE get_headers IS
3820:
3826: l_final_xml_string :=
3827: -- ''|| EOL|| Bug 6712851
3828: '
3829:
3830: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3831: hr_utility.trace('Istemporary(l_final_xml) ' ||l_is_temp_final_xml );
3832:
3833: IF l_is_temp_final_xml = 1 THEN
3834: DBMS_LOB.FREETEMPORARY(l_final_xml);
3830: l_is_temp_final_xml := dbms_lob.istemporary(l_final_xml);
3831: hr_utility.trace('Istemporary(l_final_xml) ' ||l_is_temp_final_xml );
3832:
3833: IF l_is_temp_final_xml = 1 THEN
3834: DBMS_LOB.FREETEMPORARY(l_final_xml);
3835: END IF;
3836:
3837: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3833: IF l_is_temp_final_xml = 1 THEN
3834: DBMS_LOB.FREETEMPORARY(l_final_xml);
3835: END IF;
3836:
3837: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3834: DBMS_LOB.FREETEMPORARY(l_final_xml);
3835: END IF;
3836:
3837: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3842: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_final_xml_string,dbms_lob.getlength(l_final_xml_string),1));
3835: END IF;
3836:
3837: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3842: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_final_xml_string,dbms_lob.getlength(l_final_xml_string),1));
3843: --hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3836:
3837: dbms_lob.createtemporary(l_final_xml,false,DBMS_LOB.CALL);
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3842: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_final_xml_string,dbms_lob.getlength(l_final_xml_string),1));
3843: --hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3844: END;
3838: dbms_lob.open(l_final_xml,dbms_lob.lob_readwrite);
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3842: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_final_xml_string,dbms_lob.getlength(l_final_xml_string),1));
3843: --hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3844: END;
3845:
3846: function get_outfile return VARCHAR2 is
3839: dbms_lob.writeappend(l_final_xml,length(l_final_xml_string),l_final_xml_string);
3840: --dbms_lob.append(pay_mag_tape.g_clob_value,l_final_xml);
3841: pay_core_files.write_to_magtape_lob(l_final_xml_string);
3842: --pay_core_files.write_to_magtape_lob(dbms_lob.substr(l_final_xml_string,dbms_lob.getlength(l_final_xml_string),1));
3843: --hr_utility.trace('Length of pay_mag_tape.g_clob_value ' ||dbms_lob.getlength(pay_mag_tape.g_clob_value));
3844: END;
3845:
3846: function get_outfile return VARCHAR2 is
3847: TEMP_UTL varchar2(512);