PROCEDURE validate_staging_data IS
    CURSOR c_stage IS
        SELECT record_id, store, item
        FROM cust_sales_stage
        WHERE process_status = 'N';

    TYPE t_stage IS TABLE OF c_stage%ROWTYPE;
    v_stage_tab t_stage;
    
    TYPE t_error_tab IS TABLE OF VARCHAR2(4000) INDEX BY PLS_INTEGER;
    v_errors t_error_tab;
    v_status t_error_tab;
    
    c_limit CONSTANT PLS_INTEGER := 10000;
BEGIN
    OPEN c_stage;
    LOOP
        FETCH c_stage BULK COLLECT INTO v_stage_tab LIMIT c_limit;
        EXIT WHEN v_stage_tab.COUNT = 0;
        
        -- Reset memory arrays
        v_errors.DELETE;
        v_status.DELETE;
        
        -- Validate in memory
        FOR i IN 1..v_stage_tab.COUNT LOOP
            v_status(i) := 'P'; -- Default to Processed
            v_errors(i) := NULL;
            
            -- Validation 1: Store exists?
            IF NOT validate_store_exists(v_stage_tab(i).store) THEN
                v_status(i) := 'E';
                v_errors(i) := v_errors(i) || 'Store does not exist. ';
            END IF;
            
            -- Validation 2: Item active?
            IF NOT validate_item_active(v_stage_tab(i).item) THEN
                v_status(i) := 'E';
                v_errors(i) := v_errors(i) || 'Item is not active. ';
            END IF;
        END LOOP;
        
        -- Bulk update the staging table
        FORALL i IN 1..v_stage_tab.COUNT
            UPDATE cust_sales_stage
            SET process_status = v_status(i),
                error_message = v_errors(i)
            WHERE record_id = v_stage_tab(i).record_id;
            
        COMMIT;
    END LOOP;
    CLOSE c_stage;
END;