FÁBIÃO

Não brow, to falando sobre o table temp mas numa seção de banco de dados. Acho que se aplica sim, pois exclui a necessidade de criar tabelas Z, já que os dados são realmente temporários. []'s

Então... não é tão eficiente, mas a saída que achei foi reprocessar a tabela registro a registro até não encontrar nenhum filho, sendo assim o segredo acho que está na variável loop. Se não me engano uma vez você me mostrou um lance de output, tipo uma tabela temporária mesmo só que não persistida em banco. Escreve um artigo sobre este assunto e manda lá na na revista ou aqui e manda o link pra nós, seria muito útil, poderia inclusive criar uma versão 2 desta solução. []'s Oi, inclusive acho que está fácil pra ajustar pra rastrear da nota para o pedido como sua primeira versão. []'s

Então, sumi nada só voltei a trabalhar em projetos da região de campinas. Então tem coisas que só com procedure pra resolver. Opa ligo sim. []'s

Priscilinha, boa noite. Libório, lembra de mim? projeto Financeiro Leilão, superbid, mais ativo? (eeeeeeeeita mundim piqueno). Segue versão final do script, validada pelo do Prado. ------------------- -- INICIO DO SCRIPT -- AUTOR: FÁBIO DELBONI -- DATA: 23:40 1/7/2009 -- DROPA TABELA IF EXISTS( SELECT * FROM SYSOBJECTS WHERE name = 'ZTMOVRAST' ) BEGIN DROP TABLE ZTMOVRAST END GO -- CRIA TABELA CREATE TABLE ZTMOVRAST ( IDMOV INT ) GO -- DROPA PROCEDURE IF EXISTS ( SELECT * FROM SYSOBJECTS WHERE name = 'ZSP_TMOVRAST' ) BEGIN DROP PROCEDURE dbo.ZSP_TMOVRAST END GO -- CRIA PROCEDURE CREATE PROCEDURE ZSP_TMOVRAST( @CODCOLIGADA INT, @IDMOV INT ) AS BEGIN -- VARIAVEIS DECLARE @IDMOVDESTINO INT DECLARE @LOOP INT SET @LOOP = 1 DECLARE @CONTADOR INT DELETE ZTMOVRAST INSERT INTO ZTMOVRAST(IDMOV) VALUES(@IDMOV) WHILE ( @LOOP > 0 ) BEGIN SET @LOOP = 0 DECLARE C1 CURSOR FOR SELECT IDMOV FROM ZTMOVRAST ORDER BY IDMOV OPEN C1 FETCH NEXT FROM C1 INTO @IDMOV WHILE ( @@FETCH_STATUS = 0 ) BEGIN DECLARE C2 CURSOR FOR SELECT IDMOVDESTINO FROM TMOVRELAC WHERE CODCOLORIGEM = @CODCOLIGADA AND IDMOVORIGEM = @IDMOV OPEN C2 FETCH NEXT FROM C2 INTO @IDMOVDESTINO WHILE ( @@FETCH_STATUS = 0 ) BEGIN SELECT @CONTADOR = COUNT(*) FROM ZTMOVRAST WHERE IDMOV = @IDMOVDESTINO IF ( @CONTADOR = 0 ) BEGIN INSERT ZTMOVRAST ( IDMOV ) VALUES ( @IDMOVDESTINO ) SET @LOOP = @LOOP + 1 END FETCH NEXT FROM C2 INTO @IDMOVDESTINO END CLOSE C2 DEALLOCATE C2 FETCH NEXT FROM C1 INTO @IDMOV END CLOSE C1 DEALLOCATE C1 END SELECT TMOV.DATAEMISSAO, TMOV.CODTMV, TMOV.NUMEROMOV, TMOV.CODCOLIGADA, TMOV.IDMOV FROM ZTMOVRAST, TMOV WHERE ZTMOVRAST.IDMOV = TMOV.IDMOV AND TMOV.CODCOLIGADA = @CODCOLIGADA ORDER BY TMOV.DATAEMISSAO, TMOV.CODTMV, TMOV.NUMERO, TMOV.CODCOLIGADA, TMOV.IDMOV END GO -- FIM DO SCRIPT ---------------- -- EXECTA PROCEDURE EXEC dbo.ZSP_TMOVRAST 1, 113800 Resolvido _

Já fiz isto pra zebra... no caso a linguagem era EPL2... eu fazia assim: gerava um arquivo txt e dava um comando BAT... segue o arquivo exemplo e comando. ARQUIVO ETIQUETA.TXT M100,80,10 N Q192,24 q800 S2 D4 ZB A20,20,0,3,1,1,N,"JANELA DE CORRER ELO 1,00 X 1,20 X 120" B218,50,0,E30,3,15,105,B,"789837085034" A20,55,0,3,1,1,N,"" A580,55,0,2,1,1,N,"CARGA-" A580,75,0,2,1,1,N,"PEDIDO-009046" A580,95,0,2,1,1,N,"QTD-2" A20,150,0,2,1,1,N,"JUNDIAI" A580,150,0,4,1,1,N,"M.C.1º PASSO" A580,115,0,2,1,1,N,"23031406" P2 M100,80,10 N Q192,24 q800 S2 D4 ZB A20,20,0,3,1,1,N,"JANELA DE CORRER ELO 1,00 X 1,50 X 120" B218,50,0,E30,3,15,105,B,"789837085035" A20,55,0,3,1,1,N,"" A580,55,0,2,1,1,N,"CARGA-" A580,75,0,2,1,1,N,"PEDIDO-009046" A580,95,0,2,1,1,N,"QTD-2" A20,150,0,2,1,1,N,"JUNDIAI" A580,150,0,4,1,1,N,"M.C.1º PASSO" A580,115,0,2,1,1,N,"23031406" P2 É importante ter um enter no final do P2 da ultima linha ai do arquivo. Segue agora o comando para impressão: ARQUIVO ETIQUETA.BAT COPY C:\CorporeRM\ETIQUETA.TXT \\192.168.0.28\zebra DEL C:\CorporeRM\ETIQUETA.TXT É importante excluir o arquivo para o usuário não fazer m.... No windows ME ou antecessores eu usava o comando \b para enviar para lpt1 como binário, senão ele imprimia o txt e não funcionava. []'s