在plsql中如何在游标for循环中分离借方和贷方

DECLARE
  CURSOR c_data IS
    SELECT * FROM your_table; -- 替换为实际的查询语句

  v_debit_amount NUMBER;
  v_credit_amount NUMBER;
BEGIN
  FOR r_data IN c_data LOOP
    -- 根据具体的业务逻辑判断借方和贷方
    IF r_data.amount > 0 THEN
      v_debit_amount := r_data.amount;
      v_credit_amount := 0;
    ELSE
      v_debit_amount := 0;
      v_credit_amount := -r_data.amount;
    END IF;

    -- 在这里可以根据需要进行借方和贷方的处理
    -- 可以调用相应的存储过程或函数来处理数据

    -- 输出借方和贷方金额
    DBMS_OUTPUT.PUT_LINE('Debit Amount: ' || v_debit_amount);
    DBMS_OUTPUT.PUT_LINE('Credit Amount: ' || v_credit_amount);
  END LOOP;
END;