Ada yang bisa bantu utk sintak sql servernya dari algoritma clipper ini?

Mohon bantuannya, utk sintak ini dirubah ke sintak sql server...trims

SELECT HDMHal
INDEX ON BrandName, PartNo
GO TOP
DO WHILE ! EOF()
      cBrandName := BrandName
      nHit := 0
      nHal := 1

      Do WHILE ! EOF() and cBrandName = BrandName
           IF nHit < 2
               nHit := nHit + 1
           ELSE
                 nHal := nHal + 1
                 nHit := 1
            ENDIF
            IF HalPenuh = 0
                 REPLACE NoHalaman WITH nHal
            ELSE
                 IF MODULUS(Nomor,2) > 0
                        REPLACE NoHalaman WITH nHal
                 ELSE
                         nHal := nHal + 1
                        REPLACE NoHalaman WITH nHal
                 ENDIF
                 nHal := nHal + 1
                 nHit := 0
            ENDIF
            SKIP +1
       ENDDO

ENDDO