INSERT INTO tableD VALUES
(v_cur_premise_id,
v_cur_account_id,
v_cur_person_id,
v_cur_sp_id,
v_cur_sa_id,
v_cur_life_support_ind,
sysdate,
sysdate,
'Insert - Initial Load');

v_counter := v_counter + 1;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('Error on insert into CISIF_ACTIVE_PREMISE_LIST');
END;

**********
IF v_counter > 500 THEN
COMMIT;
v_counter := 0;
END IF;
************

END LOOP; /* End of person cursor loop */
CLOSE person_cur;


END LOOP; /* End of account cursor loop */
CLOSE account_cur;

END LOOP; /* End of sa_sp cursor loop */
CLOSE sa_sp_cur;
COMMIT;
END proc;