하기쿼리 참고하세요...

---쿼리시작---

WITH TBL_TEST(Idx, 코드, 결과, 금액)
AS
(
 SELECT 1, 'A', 1500, 600  UNION ALL
 SELECT 2, 'A', 1500, 400  UNION ALL
 SELECT 3, 'A', 1500, 1500 UNION ALL
 SELECT 4, 'B', 2000, 1000 UNION ALL
 SELECT 5, 'B', 2000, 1000 UNION ALL
 SELECT 6, 'B', 2000, 1000 UNION ALL
 SELECT 7, 'C', 1000, 1000
)
,tblA(Idx,코드,결과,금액,seq) As
(
     Select a.*
           ,ROW_NUMBER() Over (PARTITION By a.코드 Order By a.코드,a.Idx)
       From TBL_TEST a
)          
,tblB(Idx,코드,결과,금액,잔액,seq) As
(
     Select a.Idx
           ,a.코드
           ,a.결과
           ,a.금액
           ,a.결과 - a.금액
           ,a.seq
       From tblA a
      Where a.seq = 1

  Union All     

     Select b.Idx
           ,b.코드
           ,b.결과
           ,( Case When a.잔액 - b.금액 < 0 Then a.잔액 Else b.금액 End )
           ,a.잔액 - b.금액
           ,b.seq
       From tblB a Inner Join tblA b On a.코드 = b.코드
                                    And a.seq = b.seq - 1
)  
     Select a.코드
           ,a.결과
           ,a.금액
--           ,a.잔액
       From tblB a 
      Where a.금액 <> 0                                        
   Order By a.코드 Asc
           ,a.seq Asc

---쿼리끝---

조건을 Case When 으로 억지로 맞추긴 했지만..

본문에 적어주신 샘플데이터를 토대로 한다면

하기처럼 나와야 하는게 아닌지요?

코드   결과    금액

A        1500     600

A        1500     400

A        1500     -1000

B        2000     1000

B        2000     1000

B        2000     -1000

C        1000     1000