[Home] [Help]
TYPE BODY: APPS.JTF_DIAG_RAW_TEXT
Source
1 TYPE BODY "JTF_DIAG_RAW_TEXT" AS
2 MEMBER FUNCTION CONSTRUCT_NODE RETURN VARCHAR2 IS
3 STR varchar2(20000);
4 BEGIN
5 STR := '<node>';
6 STR := STR || ' <content><![CDATA[' || SELF.RAW_TEXT || ']]></content>';
7 STR := STR || ' </node>';
8 RETURN STR;
9 END CONSTRUCT_NODE;
10 MEMBER PROCEDURE SET_ADDED_TO_PARENT IS
11 BEGIN
12 SELF.ADDED_TO_PARENT := 1;
13 END SET_ADDED_TO_PARENT;
14 END;