问使用两个子查询的结果更改Oracle序列

EN

DECLARE
    l_max NUMBER;
    l_curr_seq_val NUMBER;
    l_new_seq_val NUMBER;
    l_curr_inc_bv number;
BEGIN
    --Get max value from table
    SELECT max(id) INTO l_max FROM COM_UPDN_BASE_FRMT_DTL;
    --get current value from seq and current increment_by from dba_sequences
    SELECT com_updn_base_frmt_dtl_seq.nextval,increment_by INTO l_curr_seq_val,l_curr_inc_bv FROM dba_sequences WHERE sequence_name = 'COM_UPDN_BASE_FRMT_DTL_SEQ' and sequence_owner=USER;
    --If there is a difference, do the fix
    if (l_curr_inc_bv != l_max-l_curr_seq_val) then
        EXECUTE IMMEDIATE
        'ALTER SEQUENCE com_updn_base_frmt_dtl_seq INCREMENT BY ' || (l_max - l_curr_seq_val);
        SELECT com_updn_base_frmt_dtl_seq.nextval INTO l_new_seq_val from dual;
        EXECUTE IMMEDIATE
        'ALTER SEQUENCE com_updn_base_frmt_dtl_seq INCREMENT BY ' || (l_curr_inc_bv);
    end if;
END;
/

DECLARE 
    l_max NUMBER(5,0);
    l_last NUMBER(5,0);
BEGIN
    SELECT max(id) INTO l_max FROM COM_UPDN_BASE_FRMT_DTL;
    SELECT last_number INTO l_last FROM all_sequences WHERE sequence_name = 'COM_UPDN_BASE_FRMT_DTL_SEQ';
    
    EXECUTE IMMEDIATE
    'ALTER SEQUENCE com_updn_base_frmt_dtl_seq INCREMENT BY ' || (l_max - l_last);
END;