Contador de Impressão<b> (Resolvido)</b>

[Jaques Nilson]

Olá pessoal....

Preciso de uma ajuda com um relatório, ele bem simples, porém não consigo o que mais preciso.....

fiz um modelo de relatório pro pessoal da Expedição, que conta quantos volumes tem no pedido e imprime uma etiqueta com os dados do cliente pra colar nas caixas....

até aí tudo bem, mas eu quero que nos volumes apareçam, por exemplo: 1/4 , 2/4 , 3/4 , 4/4....

tipo, são 4 volumes e cada etiqueta saia contando de 1 até o final que nesse exemplo é 4...

alguém tem uma idéia????

tentei usar o contador de impressão, mas ele só conta se o meu relatório gerar mais páginas, só que no caso eu to gerando só uma.....

Abraço a todos.....

[Jair - Fórmula]

Vc só vai conseguir fazer isso por sentença SQL.

[Jaques Nilson]

Blz.... Jair...

crio um contador via SQL... tudo bem...

mas o problema é que meu relatório só tem uma página, tem como via SQL fazer com que o gerador crie várias páginas????

se tem... dá uma dica ae???

Valeu,,...

Abração...

[Jair - Fórmula]

Jaques,

Dá sempre uma pesquisada nos posts já existentes no Fórum. Tem vários falando sobre isso.

Tá ai um deles:

http://www.forumrm.com.br/index.php?showto...ntador++paginas

[Frederico]

Boa Tarde Jaques, tudo bem ??

Você quer criar as etiquetas baseado na quantidade de volumes. Ex você tem 4 volumes e deseja que seja criado 4 etiquetas e fazer a numeração 1/4, 2/4 assim por diante.....?

Abraços !!!!

[Jaques Nilson]

Boa Tarde Jaques, tudo bem ??

Você quer criar as etiquetas baseado na quantidade de volumes. Ex você tem 4 volumes e deseja que seja criado 4 etiquetas e fazer a numeração 1/4, 2/4 assim por diante.....?

Abraços !!!!

Isso mesmo cara, vi o exemplo que o Jair citou acima, mas não atende minha necessidade....

o que vc sugere Fred???

[Frederico]

Isso mesmo cara, vi o exemplo que o Jair citou acima, mas não atende minha necessidade....

o que vc sugere Fred???

Jaques,

Teria que criar um Stored Procedure para que verifique no movimento a quantidade de volumes que você tem. E gere a quantidade de etiquetas. Vou montar aqui um exemplo e post para você ver se atende o que você precisa.

Quais as informações que vão na etiqueta....?

Abraços !!!

Editado 16 de Março de 2010 por Frederico

[Jaques Nilson]

Jaques,

Teria que criar um Stored Procedure para que verifique no movimento a quantidade de volumes que você tem. E gere a quantidade de etiquetas. Vou montar aqui um exemplo e post para você ver se atende o que você precisa.

Quais as informações que vão na etiqueta....?

Abraços !!!

Cara, no meu relatório só tem uma sentença SQL, é bem simples, segue abaixo....

SELECT

C.NOME AS CLIENTE,

C.CIDADE AS CIDADE,

C.CODETD AS UF,

M.NUMEROMOV AS PEDIDO,

CASE

WHEN MC.AMARRADOS IS NOT NULL THEN (CAST(CAST(MC.AMARRADOS AS NUMERIC(15,0)) AS VARCHAR) + ' Amarrado(s)')

END AS AMARRADOS,

CASE

WHEN MC.CAIXAS IS NOT NULL THEN (CAST(CAST(MC.CAIXAS AS NUMERIC(15,0))AS VARCHAR) + ' Caixa(s)')

END AS CAIXAS,

CASE

WHEN MC.FARDOS IS NOT NULL THEN (CAST(CAST(MC.FARDOS AS NUMERIC(15,0))AS VARCHAR) + ' Fardo(s)')

END AS FARDO,

CASE

WHEN MC.VOLUMES IS NOT NULL

THEN (CAST(CAST(MC.VOLUMES AS NUMERIC(15,0))AS VARCHAR) + ' Volumes c/ ' +

CAST(CAST(MC.CXVOLUMES AS NUMERIC(15,0)) AS VARCHAR) + ' caixa(s)')

END AS VOLUME,

CASE

WHEN MC.SACOLAS IS NOT NULL THEN (CAST(CAST(MC.SACOLAS AS NUMERIC(15,0))AS VARCHAR) + ' Sacola(s)')

END AS SACOLA,

CASE

WHEN MC.PACOTE IS NOT NULL THEN (CAST(CAST(MC.PACOTE AS NUMERIC(15,0))AS VARCHAR) + ' Pacote(s)')

END AS PACOTE,

MC.PESO AS PESO

FROM

FCFO C(NOLOCK)

INNER JOIN TMOV M(NOLOCK)

ON C.CODCOLIGADA = M.CODCOLCFO AND

C.CODCFO = M.CODCFO

INNER JOIN TMOVCOMPL MC(NOLOCK)

ON M.CODCOLIGADA = MC.CODCOLIGADA AND

M.IDMOV = MC.IDMOV

WHERE

M.CODCOLIGADA = :CODCOLIGADA AND

M.IDMOV = :IDMOV

Valeu mesmo.... abração...

[Wiliam]

Cara, no meu relatório só tem uma sentença SQL, é bem simples, segue abaixo....

SELECT

C.NOME AS CLIENTE,

C.CIDADE AS CIDADE,

C.CODETD AS UF,

M.NUMEROMOV AS PEDIDO,

CASE

WHEN MC.AMARRADOS IS NOT NULL THEN (CAST(CAST(MC.AMARRADOS AS NUMERIC(15,0)) AS VARCHAR) + ' Amarrado(s)')

END AS AMARRADOS,

CASE

WHEN MC.CAIXAS IS NOT NULL THEN (CAST(CAST(MC.CAIXAS AS NUMERIC(15,0))AS VARCHAR) + ' Caixa(s)')

END AS CAIXAS,

CASE

WHEN MC.FARDOS IS NOT NULL THEN (CAST(CAST(MC.FARDOS AS NUMERIC(15,0))AS VARCHAR) + ' Fardo(s)')

END AS FARDO,

CASE

WHEN MC.VOLUMES IS NOT NULL

THEN (CAST(CAST(MC.VOLUMES AS NUMERIC(15,0))AS VARCHAR) + ' Volumes c/ ' +

CAST(CAST(MC.CXVOLUMES AS NUMERIC(15,0)) AS VARCHAR) + ' caixa(s)')

END AS VOLUME,

CASE

WHEN MC.SACOLAS IS NOT NULL THEN (CAST(CAST(MC.SACOLAS AS NUMERIC(15,0))AS VARCHAR) + ' Sacola(s)')

END AS SACOLA,

CASE

WHEN MC.PACOTE IS NOT NULL THEN (CAST(CAST(MC.PACOTE AS NUMERIC(15,0))AS VARCHAR) + ' Pacote(s)')

END AS PACOTE,

MC.PESO AS PESO

FROM

FCFO C(NOLOCK)

INNER JOIN TMOV M(NOLOCK)

ON C.CODCOLIGADA = M.CODCOLCFO AND

C.CODCFO = M.CODCFO

INNER JOIN TMOVCOMPL MC(NOLOCK)

ON M.CODCOLIGADA = MC.CODCOLIGADA AND

M.IDMOV = MC.IDMOV

WHERE

M.CODCOLIGADA = :CODCOLIGADA AND

M.IDMOV = :IDMOV

Valeu mesmo.... abração...

Olá Jaques.

Talvez isso venha lhe ajudar.

Primeiro rode o código abaixo na sua base para criar a função Fn_Volumes

USE [CORPORE]

GO

/****** Object: UserDefinedFunction [dbo].[Fn_Volumes] Script Date: 03/16/2010 22:38:01 ******/

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

CREATE Function [dbo].[Fn_Volumes] (@codcoligada dcodcoligada,@idmov int)

returns @Etiquetas table (codcoligada smallint,idmov int, etiquetas varchar(10) )

As

Begin

declare @volumes int

declare @cont int

set @cont = 1

select @volumes = mc.volumes from

tmovcompl mc

where mc.codcoligada = @codcoligada and mc.idmov = @idmov

While @cont <= @volumes

Begin

insert into @Etiquetas values (@codcoligada,@idmov, convert(varchar,@cont)+'/'+convert(varchar,@volumes))

set @cont = @cont + 1

end

Return

End

-------------------------------//------------------------------------

Depois, altere sua sentença deixando-a conforme segue

SELECT

C.NOME AS CLIENTE,

C.CIDADE AS CIDADE,

C.CODETD AS UF,

M.NUMEROMOV AS PEDIDO,

CASE

WHEN MC.AMARRADOS IS NOT NULL THEN (CAST(CAST(MC.AMARRADOS AS NUMERIC(15,0)) AS VARCHAR) + ' Amarrado(s)')

END AS AMARRADOS,

CASE

WHEN MC.CAIXAS IS NOT NULL THEN (CAST(CAST(MC.CAIXAS AS NUMERIC(15,0))AS VARCHAR) + ' Caixa(s)')

END AS CAIXAS,

CASE

WHEN MC.FARDOS IS NOT NULL THEN (CAST(CAST(MC.FARDOS AS NUMERIC(15,0))AS VARCHAR) + ' Fardo(s)')

END AS FARDO,

CASE

WHEN MC.VOLUMES IS NOT NULL

THEN (CAST(CAST(MC.VOLUMES AS NUMERIC(15,0))AS VARCHAR) + ' Volumes c/ ' +

CAST(CAST(MC.CXVOLUMES AS NUMERIC(15,0)) AS VARCHAR) + ' caixa(s)')

END AS VOLUME,

CASE

WHEN MC.SACOLAS IS NOT NULL THEN (CAST(CAST(MC.SACOLAS AS NUMERIC(15,0))AS VARCHAR) + ' Sacola(s)')

END AS SACOLA,

CASE

WHEN MC.PACOTE IS NOT NULL THEN (CAST(CAST(MC.PACOTE AS NUMERIC(15,0))AS VARCHAR) + ' Pacote(s)')

END AS PACOTE,

MC.PESO AS PESO,

W.ETIQUETAS

FROM

FCFO C(NOLOCK)

INNER JOIN TMOV M(NOLOCK)

ON C.CODCOLIGADA = M.CODCOLCFO AND

C.CODCFO = M.CODCFO

INNER JOIN TMOVCOMPL MC(NOLOCK)

ON M.CODCOLIGADA = MC.CODCOLIGADA AND

M.IDMOV = MC.IDMOV

INNER JOIN

(SELECT * FROM DBO.FN_VOLUMES(:CODCOLIGADA,:IDMOV))W

ON W.CODCOLIGADA = M.CODCOLIGADA AND

W.IDMOV = M.IDMOV

WHERE

M.CODCOLIGADA =:CODCOLIGADA

AND M.IDMOV =:IDMOV

Espero que esse código seja útil para você e à todos que precisarem.

Dá um retorno para nós se funcionou, por favor.

Abs.

Wiliam.

Editado 17 de Março de 2010 por Wiliam

[Frederico]

Olá Jaques.

Talvez isso venha lhe ajudar.

Primeiro rode o código abaixo na sua base para criar a função Fn_Volumes

USE [CORPORE]

GO

/****** Object: UserDefinedFunction [dbo].[Fn_Volumes] Script Date: 03/16/2010 22:38:01 ******/

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

CREATE Function [dbo].[Fn_Volumes] (@codcoligada dcodcoligada,@idmov int)

returns @Etiquetas table (codcoligada smallint,idmov int, etiquetas varchar(10) )

As

Begin

declare @volumes int

declare @cont int

set @cont = 1

select @volumes = mc.volumes from

tmovcompl mc

where mc.codcoligada = @codcoligada and mc.idmov = @idmov

While @cont <= @volumes

Begin

insert into @Etiquetas values (@codcoligada,@idmov, convert(varchar,@cont)+'/'+convert(varchar,@volumes))

set @cont = @cont + 1

end

Return

End

-------------------------------//------------------------------------

Depois, altere sua sentença deixando-a conforme segue

SELECT

C.NOME AS CLIENTE,

C.CIDADE AS CIDADE,

C.CODETD AS UF,

M.NUMEROMOV AS PEDIDO,

CASE

WHEN MC.AMARRADOS IS NOT NULL THEN (CAST(CAST(MC.AMARRADOS AS NUMERIC(15,0)) AS VARCHAR) + ' Amarrado(s)')

END AS AMARRADOS,

CASE

WHEN MC.CAIXAS IS NOT NULL THEN (CAST(CAST(MC.CAIXAS AS NUMERIC(15,0))AS VARCHAR) + ' Caixa(s)')

END AS CAIXAS,

CASE

WHEN MC.FARDOS IS NOT NULL THEN (CAST(CAST(MC.FARDOS AS NUMERIC(15,0))AS VARCHAR) + ' Fardo(s)')

END AS FARDO,

CASE

WHEN MC.VOLUMES IS NOT NULL

THEN (CAST(CAST(MC.VOLUMES AS NUMERIC(15,0))AS VARCHAR) + ' Volumes c/ ' +

CAST(CAST(MC.CXVOLUMES AS NUMERIC(15,0)) AS VARCHAR) + ' caixa(s)')

END AS VOLUME,

CASE

WHEN MC.SACOLAS IS NOT NULL THEN (CAST(CAST(MC.SACOLAS AS NUMERIC(15,0))AS VARCHAR) + ' Sacola(s)')

END AS SACOLA,

CASE

WHEN MC.PACOTE IS NOT NULL THEN (CAST(CAST(MC.PACOTE AS NUMERIC(15,0))AS VARCHAR) + ' Pacote(s)')

END AS PACOTE,

MC.PESO AS PESO,

W.ETIQUETAS

FROM

FCFO C(NOLOCK)

INNER JOIN TMOV M(NOLOCK)

ON C.CODCOLIGADA = M.CODCOLCFO AND

C.CODCFO = M.CODCFO

INNER JOIN TMOVCOMPL MC(NOLOCK)

ON M.CODCOLIGADA = MC.CODCOLIGADA AND

M.IDMOV = MC.IDMOV

INNER JOIN

(SELECT * FROM DBO.FN_VOLUMES(:CODCOLIGADA,:IDMOV))W

ON W.CODCOLIGADA = M.CODCOLIGADA AND

W.IDMOV = M.IDMOV

WHERE

M.CODCOLIGADA =:CODCOLIGADA

AND M.IDMOV =:IDMOV

Espero que esse código seja útil para você e à todos que precisarem.

Dá um retorno para nós se funcionou, por favor.

Abs.

Wiliam.

Valeu pela dica Wiliam, o que estava montando era exatamente isso, mas em procedure.

Abraços !!!

[Jaques Nilson]

Galera... tem alguma coisa de errado, no SQL Server roda perfeitamente, exatamente como eu queria, mas no Gerador aparece apenas a última, por exemplo 1/10...

será que é a versão do gerador????

versão 10.70.15

abração...

[Frederico]

Galera... tem alguma coisa de errado, no SQL Server roda perfeitamente, exatamente como eu queria, mas no Gerador aparece apenas a última, por exemplo 1/10...

será que é a versão do gerador????

versão 10.70.15

abração...

Jaques,

Você está passando os paramêtros, pois o gerador não vai aceitar tipo @idmov, no caso passe o idmov no espelho#1 por exemplo e na função onde tiver @idmov, coloque @espelho#1_N.

Abraços !!!!

Editado 17 de Março de 2010 por Frederico

[Wiliam]

Galera... tem alguma coisa de errado, no SQL Server roda perfeitamente, exatamente como eu queria, mas no Gerador aparece apenas a última, por exemplo 1/10...

será que é a versão do gerador????

versão 10.70.15

abração...

Coloquei a sentença numa LD no gerador de relatórios e criei dois parâmetros codcoligada e idmov. Funcionou perfeitamente.

Wiliam.

[Jaques Nilson]

Beleeeeezaaaaa.....

Valeu William, valeu Fredão....

O problema foi solucionado, não sabia que o gerador só entende espelhos.... quando mudei pra espelhos rodou perfeitamente.....

Problema mais do que resolvido......

Forte abraço....

[Jaques Nilson]

Tópico Fechado / Resolvido.

O mesmo foi marcado como resolvido por não haver mais nada a resolver, pelo mesmo ter ficado parado por muito tempo sem o membro que o iniciou voltar a participar ou comentar, ou por não ter mais comentários de nenhum outro membro do Fórum.

Qualquer coisa, alguma dúvida ou questionamento sobre o assunto, pode postar novamente que analisaremos, ou se preferir, favor entrar em contato com a administração ou moderação, através do link: Administradores e Moderadores que retiraremos o STATUS de RESOLVIDO do seu título.

Se preferir, mande um email para admin@forumrm.com.br solicitando.

[Paulo (Doux Clair)]

Eu estava tendo o mesmo problema do Jaques.

Só imprimia a primeira etiqueta. Mesmo a sentença trazendo corretamente no Sql Server.

Meu relatório só tinha a LD com a SQL formatada para etiqueta.

Coloquei um cabeçalho de página com o Idmov e o Codcoligada. E espelhando esses campos na LD funcionou.

Porém agora tenho outro problema. Talvez mais básico do que imagino...

Quando vou imprimir na Zebra S4M que trabalhamos, a etiqueta 2 é impressa misturada com a etiqueta 1.

Não estou conseguindo parametrizar uma quebra de impressão para as etiquetas, já que não tenho campo de quebra na LD, apenas sql.

Tentei colocar algum campo relacionado a TMOV ou mesmo ao FCFO, porém dessa forma não imprime nada. Fica em branco!

Alguém pode me ajudar por favor? Se ficou confuso eu explico novamente!

[Frederico]

Eu estava tendo o mesmo problema do Jaques.

Só imprimia a primeira etiqueta. Mesmo a sentença trazendo corretamente no Sql Server.

Meu relatório só tinha a LD com a SQL formatada para etiqueta.

Coloquei um cabeçalho de página com o Idmov e o Codcoligada. E espelhando esses campos na LD funcionou.

Porém agora tenho outro problema. Talvez mais básico do que imagino...

Quando vou imprimir na Zebra S4M que trabalhamos, a etiqueta 2 é impressa misturada com a etiqueta 1.

Não estou conseguindo parametrizar uma quebra de impressão para as etiquetas, já que não tenho campo de quebra na LD, apenas sql.

Tentei colocar algum campo relacionado a TMOV ou mesmo ao FCFO, porém dessa forma não imprime nada. Fica em branco!

Alguém pode me ajudar por favor? Se ficou confuso eu explico novamente!

Paulo você não consegue fazer a quebra é isso? Poderia detalhar melhor

[]'s

[Paulo (Doux Clair)]

Paulo você não consegue fazer a quebra é isso? Poderia detalhar melhor

[]'s

Frederico.

Obrigado pela resposta.

A segunda etiqueta, estava saindo em cima da primeira.

Daí a próxima já era a 3a etiqueta com a 4a por cima... e assim por diante.

O erro estava na configuração do tamanho da etiqueta.

Eu estava me baseando nas dimensões originais da etiqueta, já que a impressão é feita em uma impressora especial de etiquetas. A Zebra.

Porém eu tive que configurar a pagina com dimensões de uma folha comum, A4.

Desta forma, foram impressas uma etiqueta por vez, corretamente.