Etiketen Druck mit Rave

[WoGe]

Hi,

warum nicht das dataset entsprechend füllen?

SQL-Code:

CREATE PROCEDURE LABEL_TEST (
    AVON INTEGER,
    ABIS INTEGER,
    WAS VARCHAR(50))
RETURNS (
    ZEILE1 VARCHAR(50),
    ZEILE2 VARCHAR(50))
AS
DECLARE VARIABLE WIEVIELE INTEGER;
DECLARE VARIABLE VAR_I INTEGER;
begin
  wieviele = :abis - :avon;
  if (:avon > 1 ) then
  begin
    var_i = 1;
    while ( var_i < :avon ) do
    begin
      Zeile1 = '';
      Zeile2 = '';
      var_i = var_i + 1;
      suspend;
    end
  end

  var_i = 0;
  for
      select plz.oname, plz.oname24 from postleit plz
      where plz.oname containing :was
      into :zeile1, :zeile2
  do
  begin
    if (var_i <= wieviele) then
    begin
      var_i = var_i + 1;
      suspend;
    end
    else exit;
  end
end

kann dann z.B. so aufgerufen werden:

SQL-Code:

SELECT ZEILE1, ZEILE2
FROM LABEL_TEST(3, 6, 'frank')

mfg
wo