173:
174:
175: FUNCTION GenerateHeaderExtract
176: (p_extract_type IN VARCHAR2,
177: p_package_body OUT NOCOPY DBMS_SQL.VARCHAR2S) RETURN BOOLEAN IS
178:
179: l_loop_total number := 1;
180: l_level varchar2(30);
181: l_extract_type varchar2(30);
180: l_level varchar2(30);
181: l_extract_type varchar2(30);
182: l_proc_name varchar2(80);
183:
184: l_array_pkg DBMS_SQL.VARCHAR2S;
185: l_BodyPkg VARCHAR2(32000);
186: l_array_body DBMS_SQL.VARCHAR2S;
187: l_procedure_name varchar2(80) := 'GenerateHeaderExtract';
188:
182: l_proc_name varchar2(80);
183:
184: l_array_pkg DBMS_SQL.VARCHAR2S;
185: l_BodyPkg VARCHAR2(32000);
186: l_array_body DBMS_SQL.VARCHAR2S;
187: l_procedure_name varchar2(80) := 'GenerateHeaderExtract';
188:
189: invalid_mode EXCEPTION;
190: