Cursor - Allows you to maintain a sql result in an object to iterate through

cursor.sql

/* Formatted on 2/1/2024 10:10:51 AM (QP5 v5.381) */
DELETE FROM IMPROD.SM_SYS_MENU_STORES
      WHERE 1 = 1;

DECLARE
    CURSOR stores IS
        SELECT STORE
          FROM improd.store a
         WHERE     store_status = 0
               AND pos_close_Date IS NULL
               AND store_type IS NULL
               AND a.IP_SECOND_OCTET IS NOT NULL
        UNION
        SELECT STORE
          FROM Improd.STORE A
         WHERE A.store_status = 0 AND A.retail_store = 'Y'
        UNION
        SELECT warehouse_complex_id AS store FROM IMPROD.WAREHOUSE_COMPLEX;


    CURSOR menuList IS SELECT MENU_ID FROM IMPROD.SM_SYS_MENU;
BEGIN
    --DBMS_OUTPUT.PUT_LINE('BLOOP:');
    FOR s IN stores
    LOOP
        --DBMS_OUTPUT.PUT_LINE('CLOOP:');
        FOR m IN menuList
        LOOP
            INSERT INTO IMPROD.SM_SYS_MENU_STORES (STORE,
                                                   MENU_ID,
                                                   CREATE_ID,
                                                   CREATE_DATE,
                                                   UPDATE_ID,
                                                   UPDATE_DATE)
                 VALUES (s.STORE,
                         m.MENU_ID,
                         'SYSTEM',
                         SYSDATE,
                         'SYSTEM',
                         SYSDATE);
        --DBMS_OUTPUT.PUT_LINE('ENDLOOP:');

        END LOOP;
    END LOOP;

    COMMIT;
END;