Então Sérgio, tente utilizar um vetor / array para carregar todos os 
documentos, depois de carregar todos esses caras, você manda a mensagem 
AM_Imprime e controla lá dentro pelo vetor.
 
Acredito que isso possa te ajudar...
 
Boa sorte
 
Rafael Pereira Larizzatti
Analista Desenvolvedor Centura
Thales Informática Ltda
GE Healthcare
[EMAIL PROTECTED]
+55 (11) 2164-3616

 

________________________________

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sergio Yoshimura
Sent: quarta-feira, 28 de novembro de 2007 09:43
To: [email protected]
Subject: [sqlwin] RE: [sqlwin] RE: [sqlwin] Impressão de vários documentos



Olá Rafael, eu já fiz isso, o teste que faço é com 2 documentos, 

Enquanto ele está no while e manda a mensagem para o tblImprimeVD ele só passa 
pelo AM_Imprime, 

só quando sai do while  ele passa pelo Sam_ReportStar e nesta altura ele só tem 
o número do último documento.

Caso tenha alguma dica que possa fazer de outra forma é sempre bem vindo.

Obrigado e abraços,

Sergio

 

De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em nome de Thales, Rafael (GE 
Healthcare, consultant)
Enviada: quarta-feira, 28 de Novembro de 2007 10:42
Para: [email protected]
Assunto: [sqlwin] RE: [sqlwin] Impressão de vários documentos

 

Bom dia Sergio

 

Na verdade, com as informações que vc passou, para mim fica difícil descobrir o 
que está acontecendo!

Seria interessante vc debugar e verificar quantos registros e quantas vezes 
está passando dentro do while. verificar também, se todas vez que ele passa no 
while, a mensagem que manda para tblImprimeVD está executando corretamente, 
enfim... o velho e bom debug pode te ajudar...

 

Boa sorte

 

Rafael Pereira Larizzatti
Analista Desenvolvedor Centura
Thales Informática Ltda
GE Healthcare
[EMAIL PROTECTED]
+55 (11) 2164-3616

 

 

________________________________

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Sergio Yoshimura
Sent: quarta-feira, 28 de novembro de 2007 08:19
To: [email protected]
Subject: [sqlwin] Impressão de vários documentos

Olá Pessoal, preciso imprimir ao fim do dia todas as vendas a dinheiro que 
foram emitidas durante o dia.

 

No botão de confirmação executo os comandos abaixo para ler os números das vds.

 

If rb5VD = TRUE

            Call SqlConnect( hSql1_Contab )

            Call SqlPrepare( hSql1_Contab, ' Select vd_num 

                                   from vendadin

                                   where

                                   (vd_data >= :df4Datade and vd_data <= 
:df4Dataa) and

                                   (vd_clie >= :dfDoClie and vd_clie <= 
:dfAoClie) and 

                                   vd_filial = :nFilial 

                                   into :dfVD ')

            If SqlExecute( hSql1_Contab )

                        While SqlFetchNext ( hSql1_Contab, nFetchLocal )

                                   Call SalSendMsg( tblImprimeVD, AM_Imprime, 
0, 0 )

                        

O que acontece é que só imprime o último documento.

Utilizo o TD 3.0 PTF4 + Report Buider 3.0

No Sam_ReportStart faço sempre a comparação se o nº do documento = dfVD

 

Obrigado e abraços a todos,

Sergio

 

Responder a