DBA Data[Home] [Help]

APPS.IGF_SL_UPLOAD_XML dependencies on DBMS_LOB

Line 281: DBMS_LOB.CREATETEMPORARY(tmpClob1,TRUE,DBMS_LOB.SESSION);

277:
278: -- Here tmpClob is the final CLOB output, not tmpClob1
279: -- Open tmpClob1.
280: tmpClob1 := EMPTY_CLOB;
281: DBMS_LOB.CREATETEMPORARY(tmpClob1,TRUE,DBMS_LOB.SESSION);
282: DBMS_LOB.OPEN(tmpClob1,DBMS_LOB.LOB_READWRITE);
283: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
284: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
285: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob1 IS opened successfully');

Line 282: DBMS_LOB.OPEN(tmpClob1,DBMS_LOB.LOB_READWRITE);

278: -- Here tmpClob is the final CLOB output, not tmpClob1
279: -- Open tmpClob1.
280: tmpClob1 := EMPTY_CLOB;
281: DBMS_LOB.CREATETEMPORARY(tmpClob1,TRUE,DBMS_LOB.SESSION);
282: DBMS_LOB.OPEN(tmpClob1,DBMS_LOB.LOB_READWRITE);
283: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
284: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
285: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob1 IS opened successfully');
286: END IF;

Line 283: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN

279: -- Open tmpClob1.
280: tmpClob1 := EMPTY_CLOB;
281: DBMS_LOB.CREATETEMPORARY(tmpClob1,TRUE,DBMS_LOB.SESSION);
282: DBMS_LOB.OPEN(tmpClob1,DBMS_LOB.LOB_READWRITE);
283: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
284: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
285: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob1 IS opened successfully');
286: END IF;
287: ELSE

Line 311: DBMS_LOB.WRITEAPPEND(tmpClob1, LENGTH(myclob_text), myclob_text);

307: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug', 'After reading line number: ' || ln_file_line_num || 'Length of the text is: ' || LENGTH(myclob_text) || 'Start of the text is: ' || SUBSTR(myclob_text, 1, 32));
308: END IF;
309:
310: IF myclob_text IS NOT NULL AND LENGTH(myclob_text) <> 0 THEN
311: DBMS_LOB.WRITEAPPEND(tmpClob1, LENGTH(myclob_text), myclob_text);
312: END IF;
313:
314: END LOOP;
315: EXCEPTION

Line 329: DBMS_LOB.CREATETEMPORARY(tmpClob,TRUE,DBMS_LOB.SESSION);

325: END;
326:
327: -- Open tmpClob
328: tmpClob := EMPTY_CLOB;
329: DBMS_LOB.CREATETEMPORARY(tmpClob,TRUE,DBMS_LOB.SESSION);
330: DBMS_LOB.OPEN(tmpClob,DBMS_LOB.LOB_READWRITE);
331: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
332: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
333: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob IS opened successfully');

Line 330: DBMS_LOB.OPEN(tmpClob,DBMS_LOB.LOB_READWRITE);

326:
327: -- Open tmpClob
328: tmpClob := EMPTY_CLOB;
329: DBMS_LOB.CREATETEMPORARY(tmpClob,TRUE,DBMS_LOB.SESSION);
330: DBMS_LOB.OPEN(tmpClob,DBMS_LOB.LOB_READWRITE);
331: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
332: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
333: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob IS opened successfully');
334: END IF;

Line 331: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN

327: -- Open tmpClob
328: tmpClob := EMPTY_CLOB;
329: DBMS_LOB.CREATETEMPORARY(tmpClob,TRUE,DBMS_LOB.SESSION);
330: DBMS_LOB.OPEN(tmpClob,DBMS_LOB.LOB_READWRITE);
331: IF DBMS_LOB.ISOPEN(tmpClob1) = 1 THEN
332: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
333: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','tmpClob IS opened successfully');
334: END IF;
335: ELSE

Line 343: ln_start_pos := DBMS_LOB.INSTR(tmpClob1,'

339: RETURN;
340: END IF;
341:
342: -- Copy from tmpClob1 to tmpClob
343: ln_start_pos := DBMS_LOB.INSTR(tmpClob1,' 344: ln_end_pos := DBMS_LOB.INSTR(tmpClob1,'',1,1);
345: ln_end_pos := ln_end_pos + LENGTH('');
346: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
347: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug', 'Start of ie ln_end_pos is: ' || ln_end_pos);

Line 344: ln_end_pos := DBMS_LOB.INSTR(tmpClob1,'',1,1);

340: END IF;
341:
342: -- Copy from tmpClob1 to tmpClob
343: ln_start_pos := DBMS_LOB.INSTR(tmpClob1,' 344: ln_end_pos := DBMS_LOB.INSTR(tmpClob1,'',1,1);
345: ln_end_pos := ln_end_pos + LENGTH('');
346: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
347: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug', 'Start of ie ln_end_pos is: ' || ln_end_pos);
348: END IF;

Line 349: DBMS_LOB.COPY(tmpClob, tmpClob1, ln_end_pos-ln_start_pos, 1, ln_start_pos);

345: ln_end_pos := ln_end_pos + LENGTH('');
346: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
347: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug', 'Start of ie ln_end_pos is: ' || ln_end_pos);
348: END IF;
349: DBMS_LOB.COPY(tmpClob, tmpClob1, ln_end_pos-ln_start_pos, 1, ln_start_pos);
350:
351: -- Try to find out the document id from the file
352: MYCLOB_TEXT := TRIM(DBMS_LOB.SUBSTR(tmpClob,10000,1));
353: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN

Line 352: MYCLOB_TEXT := TRIM(DBMS_LOB.SUBSTR(tmpClob,10000,1));

348: END IF;
349: DBMS_LOB.COPY(tmpClob, tmpClob1, ln_end_pos-ln_start_pos, 1, ln_start_pos);
350:
351: -- Try to find out the document id from the file
352: MYCLOB_TEXT := TRIM(DBMS_LOB.SUBSTR(tmpClob,10000,1));
353: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
354: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.main.debug','MYCLOB_TEXT is read successfully: '||SUBSTR(MYCLOB_TEXT, 1, 1000));
355: END IF;
356:

Line 494: new_xml_len := DBMS_LOB.GETLENGTH(newxmldoc);

490:
491: SELECT INBOUND_DOC INTO xmldoc FROM igf_sl_cod_doc_dtls WHERE DOCUMENT_ID_TXT = l_doc_id;
492: SELECT INBOUND_DOC INTO newxmldoc FROM igf_sl_cod_doc_dtls WHERE DOCUMENT_ID_TXT = l_doc_id FOR UPDATE;
493:
494: new_xml_len := DBMS_LOB.GETLENGTH(newxmldoc);
495: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
496: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.upload_xml.debug','Before erasing the newxmldoc. Its length new_xml_len is '||new_xml_len);
497: END IF;
498: DBMS_LOB.ERASE(newxmldoc, new_xml_len, 1);

Line 498: DBMS_LOB.ERASE(newxmldoc, new_xml_len, 1);

494: new_xml_len := DBMS_LOB.GETLENGTH(newxmldoc);
495: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
496: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.upload_xml.debug','Before erasing the newxmldoc. Its length new_xml_len is '||new_xml_len);
497: END IF;
498: DBMS_LOB.ERASE(newxmldoc, new_xml_len, 1);
499:
500: buffer := '
501: ';
502: amount := LENGTH(buffer);

Line 506: DBMS_LOB.WRITE(newxmldoc, amount, 1, buffer);

502: amount := LENGTH(buffer);
503: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
504: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.upload_xml.debug','Writing root tags into newxmldoc');
505: END IF;
506: DBMS_LOB.WRITE(newxmldoc, amount, 1, buffer);
507: --akomurav one off 4873868
508: -- Remove the xsi:nil tags from the inbound file
509: new_l_start_pos := DBMS_LOB.INSTR(xmldoc,'',1,1);
510: new_l_start_pos_buffer :=new_xml_len;

Line 509: new_l_start_pos := DBMS_LOB.INSTR(xmldoc,'',1,1);

505: END IF;
506: DBMS_LOB.WRITE(newxmldoc, amount, 1, buffer);
507: --akomurav one off 4873868
508: -- Remove the xsi:nil tags from the inbound file
509: new_l_start_pos := DBMS_LOB.INSTR(xmldoc,'',1,1);
510: new_l_start_pos_buffer :=new_xml_len;
511: flag := 1;
512: nth_occur := 1;
513: while (flag =1) loop

Line 514: new_end_pos := DBMS_LOB.INSTR(xmldoc,'xsi:nil',1,nth_occur);

510: new_l_start_pos_buffer :=new_xml_len;
511: flag := 1;
512: nth_occur := 1;
513: while (flag =1) loop
514: new_end_pos := DBMS_LOB.INSTR(xmldoc,'xsi:nil',1,nth_occur);
515: if new_end_pos > 0 then
516: DBMS_LOB.COPY(newxmldoc,xmldoc,new_end_pos-new_l_start_pos,amount+1,new_l_start_pos);
517: nth_occur := nth_occur + 1;
518: amount := amount+(new_end_pos-new_l_start_pos);

Line 516: DBMS_LOB.COPY(newxmldoc,xmldoc,new_end_pos-new_l_start_pos,amount+1,new_l_start_pos);

512: nth_occur := 1;
513: while (flag =1) loop
514: new_end_pos := DBMS_LOB.INSTR(xmldoc,'xsi:nil',1,nth_occur);
515: if new_end_pos > 0 then
516: DBMS_LOB.COPY(newxmldoc,xmldoc,new_end_pos-new_l_start_pos,amount+1,new_l_start_pos);
517: nth_occur := nth_occur + 1;
518: amount := amount+(new_end_pos-new_l_start_pos);
519: end_tag := DBMS_LOB.INSTR(xmldoc,'>',new_end_pos+1,1);
520: new_l_start_pos := end_tag;

Line 519: end_tag := DBMS_LOB.INSTR(xmldoc,'>',new_end_pos+1,1);

515: if new_end_pos > 0 then
516: DBMS_LOB.COPY(newxmldoc,xmldoc,new_end_pos-new_l_start_pos,amount+1,new_l_start_pos);
517: nth_occur := nth_occur + 1;
518: amount := amount+(new_end_pos-new_l_start_pos);
519: end_tag := DBMS_LOB.INSTR(xmldoc,'>',new_end_pos+1,1);
520: new_l_start_pos := end_tag;
521: end if;
522: if new_end_pos = 0 then
523: flag:=0;

Line 527: DBMS_LOB.COPY(newxmldoc,xmldoc,new_l_start_pos_buffer-new_l_start_pos+1,amount+1,new_l_start_pos);

523: flag:=0;
524: end if;
525: end loop;
526:
527: DBMS_LOB.COPY(newxmldoc,xmldoc,new_l_start_pos_buffer-new_l_start_pos+1,amount+1,new_l_start_pos);
528: buffer := '';
529: amount := LENGTH(buffer);
530: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
531: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.upload_xml.debug','Appending tag');

Line 533: DBMS_LOB.WRITEAPPEND(newxmldoc, amount, buffer);

529: amount := LENGTH(buffer);
530: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
531: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_upload_xml.upload_xml.debug','Appending tag');
532: END IF;
533: DBMS_LOB.WRITEAPPEND(newxmldoc, amount, buffer);
534: END;
535:
536: -- set the workflow attributes
537: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN