Dynamic creating field names within Loop

Question

Hi,
I've a record which comprises of a few key fields and then 52 qty fields, one for each week of the year. ( Not my design honest!!).
Anyway with in a Cursor there are currently 52 "IF" statements clearing out values less than the current week number. I'd tried to replace this with the following. However I'm having trouble with the " 'c1_rec.qty'| |lv_count " bit.
Has anyone got any ideas?
lv_week:=22; ( added for clarity )
lv_count:=1;
WHILE lv_count < lv_week LOOP
'c1_rec.qty'&#0124; &#0124;lv_count :=0;
lv_count:=lv_count+1;
END LOOP;
John-Paul Thompson

Answer 1

John-Paul;
If I understand the question correctly, you have a table with 52 columns, one for each week of the year. You are trying to zero the quantity for each week prior to the current week. I'm going to take a sab at this. Bear in mind that I have no way to debug the code.
DECLARE
c NUMBER;
n NUMBER;
v_sql VARCHAR2(2000)
lv_week NUMBER:=22; ( initialize week#)
lv_count NUMBER:=1;
BEGIN
v_sql := 'UPDATE c1_rec SET '
WHILE lv_count < lv_week LOOP
v_sql := v_sql&#0124; &#0124;
'qty'| |TO_CHAR(lv_count) &#0124; &#0124;' :=0';
lv_count:=lv_count+1;
IF lv_count < lv_week THEN
v_sql := v_sql &#0124; &#0124; ', ';
END IF;
END LOOP;
--sql := v_sql &#0124; &#0124; YOUR WHERE CLAUSE
c:= dbms_sql.open_cursor;
dbms_sql.parse(c, v_sql, dbms_sql.native)
n:= dbms_sql.execute(c);
dbms_sql.close_cursor(c);
END;
HTH
Randall
null