190: is
191: templob CLOB := 'program;';
192: begin
193: dbms_aw.execute ('cns '||m_curr_obj);
194: dbms_lob.append(templob, p_program);
195: dbms_lob.append(templob, ';end');
196: templob := dbms_aw.interpclob(templob);
197: end LOAD_PROGRAM;
198:
191: templob CLOB := 'program;';
192: begin
193: dbms_aw.execute ('cns '||m_curr_obj);
194: dbms_lob.append(templob, p_program);
195: dbms_lob.append(templob, ';end');
196: templob := dbms_aw.interpclob(templob);
197: end LOAD_PROGRAM;
198:
199: -------------------------------------------------------------------------------