PACKAGE BODY: CTXSYS.DOM_DOC_TEXT_CTX_PKG

Source

1 PACKAGE BODY DOM_DOC_TEXT_CTX_PKG AS
2 /* $Header: domdocimctx.sql 120.0.12010000.2 2009/01/16 09:27:45 yaoli ship $ */
3  
4  
5 PROCEDURE Get_Doc_Text_VARCHAR2
6 ( p_rowid  IN             ROWID
7 , x_tchar  IN OUT NOCOPY  VARCHAR2
8 ) IS
9    l_tlob    CLOB  :=  NULL;
10 BEGIN
11    --DBMS_LOB.CreateTemporary
12    --( lob_loc => l_tlob, cache => TRUE, dur => DBMS_LOB.Session );
13    -- Call iMT user datastore API to do all the work
14    APPS.DOM_DOC_TEXT_UTIL.Get_Doc_Text
15    ( p_rowid => p_rowid, p_output_type => 'VARCHAR2' 
16    , x_tlob => l_tlob, x_tchar => x_tchar
17    );
18    --DBMS_LOB.FreeTemporary (lob_loc => l_tlob);
19 END Get_Doc_Text_VARCHAR2;
20  
21 END DOM_DOC_TEXT_CTX_PKG;