Crear un cursor

Declare @Contrato int,@Grupo int,@Integrante smallint
Declare CursorA Cursor forward_only FOR
Select Contrato,Grupo,Integrante from Contratos where grupo=10036
Open CursorA
Fetch Next From CursorA
Into @Contrato,@Grupo,@Integrante
While @@Fetch_status = 0
Begin
        Select @Contrato,@Grupo,@Integrante
        Fetch NEXT FROM CursorA
        Into @Contrato,@Grupo,@Integrante
End
Close CursorA
Deallocate CursorA