pl sql et sql dynamique

Question

Je suis en train de créer une dynamique sql en utilisant le bloc de code suivant

firstSqlStatement := true; 
    updateText := 'UPDATE T_EMPLOYEES SET '; 
    if FIRSTNAME IS NOT NULL and FIRSTNAME > 0 THEN 
     updateText:=updateText || ' firstName=' || FIRSTNAME || ' '; 
     firstSqlStatement := false; 
    end if; 

    if MIDDLENAME IS NOT NULL and length(MIDDLENAME) > 0 THEN 
     if firstSqlStatement = false THEN 
      updateText:=updateText || ','; 
     end if; 

     updateText:=updateText || ' middleName=' || MIDDLENAME || ' '; 
     firstSqlStatement := false; 
    end if; 

    updateText:=updateText 
      || ' where upper(id)=upper(' || ID ||');';      
    DBMS_OUTPUT.put_line(updateText); 
    EXECUTE IMMEDIATE updateText; 

La déclaration n'exécute correctement car il y a manque des guillemets simples autour de valeurs.

Des idées que je peux faire pour que ce petit exemple fonctionne ou y a-t-il une meilleure façon de faire cela?

Answer 1

firstSqlStatement := true; 
updateText := 'UPDATE T_EMPLOYEES SET '; 

if FIRSTNAME IS NOT NULL and FIRSTNAME > 0 THEN 
    updateText:=updateText || ' firstName=''' || FIRSTNAME || ''' '; 
    firstSqlStatement := false; 
end if; 

if MIDDLENAME IS NOT NULL and length(MIDDLENAME) > 0 THEN 
    if firstSqlStatement = false THEN 
     updateText:=updateText || ','; 
    end if; 

    updateText:=updateText || ' middleName=''' || MIDDLENAME || ''' '; 
    firstSqlStatement := false; 
end if; 
updateText:=updateText || ' where upper(id)=upper(' || ID || ');'; 
DBMS_OUTPUT.put_line(updateText); 
EXECUTE IMMEDIATE updateText; 

utilisation '' »

Answer 2

Peut-être que vous pouvez le faire de cette façon.

declare 
    ll_employee_id number := 10; 
    lv_firstname varchar2(30) := 'Thomas'; 
    lv_middlename varchar2(30) := null; 
begin 
    update t_employees 
    set firstname = decode(lv_firstname, null, firstname, lv_firstname), 
     middlename = decode(lv_middlename, null, middlename, lv_middlename) 
    where employee_id = ll_employee_id; 
end; 

Answer 3

DECLARE 
    my_error exception; 
    sql_stmt   VARCHAR2 (500); 
    v_char_field  VARCHAR2 (500); 
    v_number_field NUMBER; 
    v_stmt_number NUMBER; 
BEGIN 
    sql_stmt := 'UPDATE TABLE'; 

    IF 1 = 1 -- REPLACE WITH CONDITION FOR SELECTION FIELD 
    THEN 
     sql_stmt := sql_stmt || 'field_1 = :1'; 
     v_stmt_number := 1; 
    ELSIF 1 = 1 -- REPLACE WITH CONDITION FOR SELECTION FIELD 
    THEN 
     sql_stmt := sql_stmt || 'field_2 = :1'; 
     v_stmt_number := 2; 
    ELSE 
     DBMS_OUTPUT.put_line ('Field unmanaged'); 
     RAISE my_error; 
    END IF; 

    IF 1 = 1 -- REPLACE WITH CONDITION FOR SELECTION TYPE FIELD 
    THEN 
     EXECUTE IMMEDIATE sql_stmt USING v_char_field; 
    ELSIF 1 = 1 -- REPLACE WITH CONDITION FOR SELECTION TYPE FIELD 
    THEN 
     EXECUTE IMMEDIATE sql_stmt USING v_number_field; 
    ELSE 
     DBMS_OUTPUT.put_line ('Type Field unmanaged'); 
     RAISE my_error; 
    END IF; 

    DBMS_OUTPUT.PUT_LINE ('STATEMENT NUMBER : ' || v_stmt_number); 

    DBMS_OUTPUT.PUT_LINE ('TOTAL RECORD UPDATE : ' || SQL%ROWCOUNT); 
EXCEPTION 
    WHEN my_error 
    THEN 
     NULL; 
    WHEN OTHERS 
    THEN 
     DBMS_OUTPUT.PUT_LINE ('ERROR :' || SQLERRM); 
END; 

Vous pouvez utiliser plusieurs sélections pour composer votre déclaration pour les champs de sélection à jour et pour le type.