94: C_CREATED CONSTANT BOOLEAN := TRUE;
95:
96: g_Max_line CONSTANT NUMBER := 225;
97: g_chr_quote CONSTANT VARCHAR2(10):='''';
98: g_chr_newline CONSTANT VARCHAR2(10):= fa_cmp_string_pkg.g_chr_newline;
99:
100: g_log_level_rec fa_api_types.log_level_rec_type;
101:
102: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
131: G_MODULE_NAME||l_procedure_name||'.begin',
132: 'Beginning of procedure');
133: END IF;
134:
135: l_array_body := fa_cmp_string_pkg.g_null_varchar2s;
136: l_array_pkg := fa_cmp_string_pkg.g_null_varchar2s;
137:
138:
139: l_proc_name := 'load_mls_data';
132: 'Beginning of procedure');
133: END IF;
134:
135: l_array_body := fa_cmp_string_pkg.g_null_varchar2s;
136: l_array_pkg := fa_cmp_string_pkg.g_null_varchar2s;
137:
138:
139: l_proc_name := 'load_mls_data';
140:
140:
141: l_bodypkg := C_PRIVATE_API_1;
142: l_bodypkg := REPLACE(l_bodypkg,'$proc_name$',l_proc_name);
143:
144: fa_cmp_string_pkg.CreateString
145: (p_package_text => l_BodyPkg
146: ,p_array_string => l_array_pkg);
147:
148:
154: raise invalid_mode;
155: end if;
156:
157: l_array_pkg :=
158: fa_cmp_string_pkg.ConcatTwoStrings
159: (p_array_string_1 => l_array_pkg
160: ,p_array_string_2 => l_array_body);
161:
162: -- add the debug for row counts
161:
162: -- add the debug for row counts
163: l_bodypkg := C_PRIVATE_API_2;
164:
165: fa_cmp_string_pkg.CreateString
166: (p_package_text => l_BodyPkg
167: ,p_array_string => l_array_body);
168:
169: l_array_pkg :=
166: (p_package_text => l_BodyPkg
167: ,p_array_string => l_array_body);
168:
169: l_array_pkg :=
170: fa_cmp_string_pkg.ConcatTwoStrings
171: (p_array_string_1 => l_array_pkg
172: ,p_array_string_2 => l_array_body);
173:
174: -- add the closing
174: -- add the closing
175: l_bodypkg := C_PRIVATE_API_3;
176: l_bodypkg := REPLACE(l_bodypkg,'$proc_name$',l_proc_name);
177:
178: fa_cmp_string_pkg.CreateString
179: (p_package_text => l_BodyPkg
180: ,p_array_string => l_array_body);
181:
182: l_array_pkg :=
179: (p_package_text => l_BodyPkg
180: ,p_array_string => l_array_body);
181:
182: l_array_pkg :=
183: fa_cmp_string_pkg.ConcatTwoStrings
184: (p_array_string_1 => l_array_pkg
185: ,p_array_string_2 => l_array_body);
186:
187: p_package_body := l_array_pkg;