827: l_exportfinished BOOLEAN;
828:
829: BEGIN
830:
831: DBMS_LOB.CREATETEMPORARY(l_lob_loc, TRUE);
832: DBMS_LOB.OPEN(l_lob_loc, DBMS_LOB.LOB_READWRITE);
833:
834: l_buffer := jdr_utils.ExportDocument(p_document => p_doc_full_name,
835: p_exportfinished => l_exportfinished);
828:
829: BEGIN
830:
831: DBMS_LOB.CREATETEMPORARY(l_lob_loc, TRUE);
832: DBMS_LOB.OPEN(l_lob_loc, DBMS_LOB.LOB_READWRITE);
833:
834: l_buffer := jdr_utils.ExportDocument(p_document => p_doc_full_name,
835: p_exportfinished => l_exportfinished);
836:
839: END IF;
840:
841: l_amount := LENGTH(l_buffer);
842:
843: DBMS_LOB.WRITE(l_lob_loc, l_amount, l_position, l_buffer);
844: l_position := l_position + l_amount;
845:
846: IF l_exportfinished=FALSE THEN
847: LOOP
853: END IF;
854:
855: l_amount := LENGTH(l_buffer);
856:
857: DBMS_LOB.WRITE(l_lob_loc, l_amount, l_position, l_buffer);
858: l_position := l_position + l_amount;
859:
860: IF l_buffer IS NULL OR l_exportfinished THEN
861: EXIT;
867: xmlparser.parseCLOB(g_PARSER, l_lob_loc);
868:
869: l_xmldoc := xmlparser.getDocument(g_PARSER);
870:
871: DBMS_LOB.CLOSE(l_lob_loc);
872: DBMS_LOB.FREETEMPORARY(l_lob_loc);
873:
874: RETURN l_xmldoc;
875:
868:
869: l_xmldoc := xmlparser.getDocument(g_PARSER);
870:
871: DBMS_LOB.CLOSE(l_lob_loc);
872: DBMS_LOB.FREETEMPORARY(l_lob_loc);
873:
874: RETURN l_xmldoc;
875:
876: END parse_JRAD_Document;