Arquivos do Excel

Executável de Exemplo para gerar arquivos do Excel.
vale a pena baixar para ver.. até gráfico gerado a partir executável, dentro do Excel.

Clique aqui para baixar o demo
Se gostar entre em contato comigo... e faça sua solicitação.

:) UliRamos

Update Incremental com Cursor "for Select"

/*

Bem deixa eu explicar o que Aconteceu..

o ultimo layout de exportação de dados para a Folha do Rubi 

precisava deste comando para que os dependentes variassem de acordo com a quantidade, exemplo: 3 dependentes , o primeiro código=1, o segundo código=2 e o terceiro Código=3, Já para o próximo titular tudo recomeçava com 1.

O COMANDO ABAIXO RESOLVE A PARADA, É CLARO CRIAMOS A COLUNA ID_DEPEN*/ 

/*

By Ulisses Ramos

Data: 12/09/2012 as 19hs

Belém - PA

alter taBLE dbo.FPCADDEP ADD ID_DEPEN SMALLINT

update dbo.FPCADDEP set ID_DEPEN=null

select * from TempDepen

*/

DECLARE UPDATE_TempDepen CURSOR FOR

SELECT matnum, recnum

FROM dbo.FPCADDEP

order by matnum;

declare @MatNum char(8);

declare @idNew int;

declare @recnum int;

OPEN UPDATE_TempDepen ;

FETCH NEXT FROM UPDATE_TempDepen into @MatNum,@recnum;

WHILE @@FETCH_STATUS <> -1

   BEGIN

  IF (@@FETCH_STATUS <> -2)

   BEGIN                   

      select @idNew = coalesce( MAX(a.id_depen),0)+1 from dbo.FPCADDEP a where a.MATNUM=@MatNum ;

      update dbo.FPCADDEP set  ID_DEPEN=@idNew where MATNUM=@MatNum  and RECNUM=@recnum ;

      print 'matnum é '+@MatNum+' e o id esta em :'+cast( @idNew as varchar(10));    

    END     

      FETCH NEXT FROM UPDATE_TempDepen into @MatNum,@recnum

 

   END;

CLOSE UPDATE_TempDepen;

DEALLOCATE UPDATE_TempDepen;

GO