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
