If statement in loop

Question

for rec in cur loop
               dID := rec.update_id;
               dTYPE := rec.update_type;
               dNUMBER := rec.patch_number;
               dDESC := rec.description;     
               dOLD := rec.old_db_version;
               --search if patch is already installed, if Yes do nothing, else:
               if dID = cID then     
                    --now check version of DB
                    if cVER = version then
                    exec procedures(1);
          end loop;
Error on line 10
DECLARE
var NUMBER;
     version varchar(12);
     installed boolean;
     --var
ORA-06550: line 79, column 12:
PLS-00103: Encountered the symbol "PROCEDURES" when expecting one of the following:
:= . ( @ % ;
The symbol ":=" was substituted for "PROCEDURES" to continue.
ORA-06550: line 82, column 10:
PLS-00103: Encountered the symbol "LOOP" when expecting one of the following:
why that if statement make for loop broken?

Answer 1

stil the same,. i will paste it there all :)
--testing procedure
set serveroutput on
create or replace procedure sampleP is
begin
dbms_output.put_line('write something');
end;
DECLARE
var NUMBER;      
     version varchar(12);
     installed boolean;
     --variables for reading from table in database - installed hotfix's
     dID varchar(128);
     dPACKAGE varchar(50);
     dSEQUENCE varchar(50);
     dNUMBER varchar(128);
     dBASE varchar(256);     
     dNEW varchar(128);
     --variables for reading from table in database - current hotfix
     cID varchar(128);
     cPACKAGE varchar(50);
     dSEQUENCE varchar(50);
     cNUMBER varchar(128);
     cBASE varchar(256);     
     cNEW varchar(128);                    
     --procedure's in array
     --array for procedures
     type p_procedures is table of varchar(100) index by pls_integer;
     procedures p_procedures;
     --array for hotfix , which version it have
     --it must match with procedures array
     type p_versions is table of varchar(100) index by pls_integer;
     versions p_versions;
     CURSOR cur IS SELECT update_id,update_type,patch_number,description,old_db_version FROM SWIZ_DB_UPDATE_HISTORY;
BEGIN
     --set hotfix installed to NO = 0
     --installed := 0;
     --sampleP;
     --execute procedures in field
     --first fill it with correct names
     procedures(1) := 'sampleP;';
     procedures(2) := 'sampleP1;';
--then execute them in loop
for v_rec in procedures.first .. procedures.last loop
--execute immediate 'begin ' || procedures(v_rec) || ' end';
     DBMS_OUTPUT.put(procedures(v_rec));
end loop;
     -- get the current version of database
     SELECT version INTO version FROM SWIZ_DB_VERSION;
     --info about current hotfix
     SELECT ID into cID from A_ID;
     SELECT package_id into cTYPE from A_ID;
     SELECT base_version into cNUMBER from A_ID;
     SELECT description into cDESC from A_ID;
     SELECT new_version into cNEW from A_ID;
     SELECT seq into cSEQUENCE from A_ID;
     --loop that go through history of db updates
          for rec in cur loop
               dID := rec.update_id;
               dTYPE := rec.update_type;
               dNUMBER := rec.patch_number;
               dDESC := rec.description;     
               dOLD := rec.old_db_version;
               --search if patch is already installed, if Yes do nothing, else:
               -- if dID = cID then     
                    --now check version of DB
                    -- if cVER = version then
                                             execute immediate 'begin ' || procedures(1) || ' end;';
          end loop;
          --now check if hotfix can be installed to current version of DB
END;