286:
287: printDebug('Starting.....','parseInput');
288: l_InString := p_inString;
289:
290: delete from IBE_TEMP_TABLE where key =p_keyString;
291:
292: loop
293:
294: l_OutString := trim(substr(l_InString,1,instr(l_InString,',')-1));
295: l_InString := trim(substr(l_InString,instr(l_InString,',')+1));
296:
297: if l_OutString is not null then
298: if p_Type = 'CHAR' then
299: INSERT into IBE_TEMP_TABLE (KEY, CHAR_VAL) VALUES (p_keyString,l_OutString);
300: elsif p_Type = 'NUM' then
301: INSERT into IBE_TEMP_TABLE (KEY, NUM_VAL) VALUES (p_keyString,to_number(l_OutString));
302: end if;
303: end if;
297: if l_OutString is not null then
298: if p_Type = 'CHAR' then
299: INSERT into IBE_TEMP_TABLE (KEY, CHAR_VAL) VALUES (p_keyString,l_OutString);
300: elsif p_Type = 'NUM' then
301: INSERT into IBE_TEMP_TABLE (KEY, NUM_VAL) VALUES (p_keyString,to_number(l_OutString));
302: end if;
303: end if;
304:
305: if (instr(l_InString,',') = 0 or l_InString is null ) then
311: l_OutString := l_InString;
312:
313: if l_OutString is not null then
314: if p_Type = 'CHAR' then
315: INSERT into IBE_TEMP_TABLE (KEY, CHAR_VAL) VALUES (p_keyString,l_OutString);
316: elsif p_Type = 'NUM' then
317: INSERT into IBE_TEMP_TABLE (KEY, NUM_VAL) VALUES (p_keyString,to_number(l_OutString));
318: end if;
319: end if;
313: if l_OutString is not null then
314: if p_Type = 'CHAR' then
315: INSERT into IBE_TEMP_TABLE (KEY, CHAR_VAL) VALUES (p_keyString,l_OutString);
316: elsif p_Type = 'NUM' then
317: INSERT into IBE_TEMP_TABLE (KEY, NUM_VAL) VALUES (p_keyString,to_number(l_OutString));
318: end if;
319: end if;
320:
321: if p_Type = 'CHAR' then
318: end if;
319: end if;
320:
321: if p_Type = 'CHAR' then
322: x_QueryString := 'SELECT CHAR_VAL FROM IBE_TEMP_TABLE WHERE KEY = :'||p_number||'';
323: elsif p_Type = 'NUM' then
324: x_QueryString := 'SELECT NUM_VAL FROM IBE_TEMP_TABLE WHERE KEY = :'||p_number||'';
325: end if;
326:
320:
321: if p_Type = 'CHAR' then
322: x_QueryString := 'SELECT CHAR_VAL FROM IBE_TEMP_TABLE WHERE KEY = :'||p_number||'';
323: elsif p_Type = 'NUM' then
324: x_QueryString := 'SELECT NUM_VAL FROM IBE_TEMP_TABLE WHERE KEY = :'||p_number||'';
325: end if;
326:
327: exception
328: WHEN OTHERS then