所以这就是发生的事情

Im使用2ddbbarcode在reportBuilder(数字隐喻)上生成QRCode,用于在报告中编码所有ITENS(产品),每行一个项目。 但它只编码第一行数据。 2ddbbarcode位于报告的标题带上。

如何在2dbdbarcode中有多行数据?

我已经在 http://www.digital-metaphors.com/pdf/rbuilder.pdf 但不能从那里得到任何东西

有帮助吗?

解决方案

我实际上找到了一种解决这个问题的方法。而不是创建报表流水线,以直接从数据库中获取数据,而不是在2dbarcode中从数据库中获取数据,我在打开报告之前传递数据。代码现在是:

        with DataModule2.Sql_IdQtd1 do
          begin
            Close;
            SQL.Clear;
            Sql.Add('select concat("when ",id_produto," then ",quant) from mv_vendas_movimento');
            Sql.Add('where controle=:NumPed');
            ParamByName('NumPed').Value := NumPed;
            ExecSQL;
        Open;
        First;

-- here it goes thru each row of data and store it to 2dbarcode.data, one row by line 

         DataModule2.p2dbrcd1.Data := 'UPDATE cad_produtos SET estoque = estoque + CASE id';
            while (not Eof) do begin
              DataModule2.p2dbrcd1.Data := DataModule2.p2dbrcd1.Data +sLineBreak+ DataModule2.Sql_IdQtd1concatwhenid_produtothenquant.Text;
              Next;
            end;
            DataModule2.p2dbrcd1.Data := DataModule2.p2dbrcd1.Data +sLineBreak+ 'ELSE estoque END'

          end;
.

许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top